Remove $Id$ tags from most of webcit
[citadel.git] / webcit / groupdav_main.c
index adb402f37061c3f7e5b21ff87deb5affda24e3ae..f72d09a2231aa8647f11d99d38d4bf95d691f8b6 100644 (file)
 /*
- * $Id$
- *
  * Entry point for GroupDAV functions
  *
+ * Copyright (c) 2005-2010 by the citadel.org team
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * 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.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  */
 
-#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"
 
-void groupdav_main(struct httprequest *req) {
-
-       struct httprequest *rptr;
-       char dav_method[SIZ];
-       char dav_pathname[SIZ];
-
-       if (!WC->logged_in) {
-               wprintf(
-                       "HTTP/1.1 401 Authorization Required\n"
-                       "WWW-Authenticate: Basic realm=\"%s\"\n"
-                       "Connection: close\n",
-                       serv_info.serv_humannode
-               );
-               wprintf("Content-Type: text/plain\n");
-               wprintf("\n");
-               wprintf("GroupDAV sessions require HTTP authentication.\n");
-               return;
+extern HashList *HandlerHash;
+
+HashList *DavNamespaces = NULL;
+
+/*
+ * 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) {
+       hprintf(
+               "Server: %s / %s\r\n"
+               "Connection: close\r\n",
+               PACKAGE_STRING, ChrPtr(WC->serv_info->serv_software)
+       );
+}
+
+
+
+/*
+ * string conversion function
+ */
+void euid_escapize(char *target, const 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 euid_unescapize(char *target, const 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;
+                       b = decode_hex(hex);
+                       target[target_length] = b;
+                       target[++target_length] = 0;
+                       a += 2;
+               }
+               else {
+                       target[target_length] = source[a];
+                       target[++target_length] = 0;
+               }
        }
+}
 
-       extract_token(dav_method, req->line, 0, ' ');
-       extract_token(dav_pathname, req->line, 1, ' ');
+
+
+
+/*
+ * Main entry point for GroupDAV requests
+ */
+void groupdav_main(void)
+{
+       wcsession *WCC = WC;
+       int i, len;
+
+       StrBufUnescape(WCC->Hdr->HR.ReqLine, 0);
+
+       StrBufStripSlashes(WCC->Hdr->HR.ReqLine, 0);
 
        /*
-        * 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.
         */
-       if (!strcasecmp(dav_method, "GET")) {
-               groupdav_get(dav_pathname);
-               return;
+       len = StrLength(WCC->Hdr->HR.dav_ifmatch);
+       if (len > 0) {
+               StrBufTrim(WCC->Hdr->HR.dav_ifmatch);
+               if (ChrPtr(WCC->Hdr->HR.dav_ifmatch)[0] == '\"') {
+                       StrBufCutLeft(WCC->Hdr->HR.dav_ifmatch, 1);
+                       len --;
+                       for (i=0; i<len; ++i) {
+                               if (ChrPtr(WCC->Hdr->HR.dav_ifmatch)[i] == '\"') {
+                                       StrBufCutAt(WCC->Hdr->HR.dav_ifmatch, i, NULL);
+                                       len = StrLength(WCC->Hdr->HR.dav_ifmatch);
+                               }
+                       }
+               }
+               if (!strcmp(ChrPtr(WCC->Hdr->HR.dav_ifmatch), "*")) {
+                       FlushStrBuf(WCC->Hdr->HR.dav_ifmatch);
+               }
        }
 
+       switch (WCC->Hdr->HR.eReqType)
+       {
        /*
-        * Couldn't find what we were looking for.  Die in a car fire.
+        * 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.
         */
-       wprintf(
-               "HTTP/1.1 404 not found\n"
-               "Connection: close\n"
-               "Content-Type: text/plain\n"
-               "\n"
-       );
-       wprintf("The object or resource \"%s\" was not found.\n", dav_pathname);
+       case eOPTIONS:
+               groupdav_options();
+               break;
+
+
+       /*
+        * The PROPFIND method is basically used to list all objects in a
+        * room, or to list all relevant rooms on the server.
+        */
+       case ePROPFIND:
+               groupdav_propfind();
+               break;
+
+       /*
+        * The GET method is used for fetching individual items.
+        */
+       case eGET:
+               groupdav_get();
+               break;
+       
+       /*
+        * The PUT method is used to add or modify items.
+        */
+       case ePUT:
+               groupdav_put();
+               break;
+       
+       /*
+        * The DELETE method kills, maims, and destroys.
+        */
+       case eDELETE:
+               groupdav_delete();
+               break;
+       default:
 
        /*
-        * FIXME ... after development is finished, get rid of all this
+        * Couldn't find what we were looking for.  Die in a car fire.
         */
-       wprintf("\n\n\n ** DEBUGGING INFO FOLLOWS ** \n\n");
-       wprintf("WC->httpauth_user = %s\n", WC->httpauth_user);
-       wprintf("WC->httpauth_pass = (%d characters)\n", strlen(WC->httpauth_pass));
-       wprintf("WC->wc_session    = %d\n", WC->wc_session);
+               hprintf("HTTP/1.1 501 Method not implemented\r\n");
+               groupdav_common_headers();
+               hprintf("Content-Type: text/plain\r\n");
+               wc_printf("GroupDAV method \"%s\" is not implemented.\r\n",
+                       ReqStrs[WCC->Hdr->HR.eReqType]);
+               end_burst();
+       }
+}
+
+
+/*
+ * Output our host prefix for globally absolute URL's.
+ */  
+void groupdav_identify_host(void) {
+       wcsession *WCC = WC;
+
+       if (StrLength(WCC->Hdr->HR.http_host)!=0) {
+               wc_printf("%s://%s",
+                       (is_https ? "https" : "http"),
+                       ChrPtr(WCC->Hdr->HR.http_host));
+       }
+}
+
+
+void tmplput_GROUPDAV_HOSTNAME(StrBuf *Target, WCTemplputParams *TP) 
+{
+       wcsession *WCC = WC;
+
+       if (StrLength(WCC->Hdr->HR.http_host)!=0) {
+               StrBufAppendPrintf(Target, 
+                                  "%s://%s",
+                                  (is_https ? "https" : "http"),
+                                  ChrPtr(WCC->Hdr->HR.http_host));
+       }
+}
+
+/*
+ * Output our host prefix for globally absolute URL's.
+ */  
+void groupdav_identify_hosthdr(void) {
+       wcsession *WCC = WC;
+
+       if (StrLength(WCC->Hdr->HR.http_host)!=0) {
+               hprintf("%s://%s",
+                       (is_https ? "https" : "http"),
+                       ChrPtr(WCC->Hdr->HR.http_host));
+       }
+}
+
+
+void Header_HandleIfMatch(StrBuf *Line, ParsedHttpHdrs *hdr)
+{
+       hdr->HR.dav_ifmatch = Line;
+}
        
-       for (rptr=req; rptr!=NULL; rptr=rptr->next) {
-               wprintf("> %s\n", rptr->line);
+void Header_HandleDepth(StrBuf *Line, ParsedHttpHdrs *hdr)
+{
+       if (!strcasecmp(ChrPtr(Line), "infinity")) {
+               hdr->HR.dav_depth = 32767;
+       }
+       else if (strcmp(ChrPtr(Line), "0") == 0) {
+               hdr->HR.dav_depth = 0;
+       }
+       else if (strcmp(ChrPtr(Line), "1") == 0) {
+               hdr->HR.dav_depth = 1;
        }
 }
+int Conditional_DAV_DEPTH(StrBuf *Target, WCTemplputParams *TP)
+{
+       return WC->Hdr->HR.dav_depth == GetTemplateTokenNumber(Target, TP, 2, 0);
+}
+
+
+void RegisterDAVNamespace(const char * UrlString, 
+                         long UrlSLen, 
+                         const char *DisplayName, 
+                         long dslen, 
+                         WebcitHandlerFunc F, 
+                         WebcitRESTDispatchID RID,
+                         long Flags)
+{
+       void *vHandler;
+
+       /* first put it in... */
+       WebcitAddUrlHandler(UrlString, UrlSLen, DisplayName, dslen, F, Flags|PARSE_REST_URL);
+       /* get it out again... */
+       GetHash(HandlerHash, UrlString, UrlSLen, &vHandler);
+       ((WebcitHandler*)vHandler)->RID = RID;
+       /* and keep a copy of it, so we can compare it later */
+       Put(DavNamespaces, UrlString, UrlSLen, vHandler, reference_free_handler);
+}
+
+int Conditional_DAV_NS(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+       void *vHandler;
+       const char *NS;
+       long NSLen;
+
+       GetTemplateTokenString(NULL, TP, 2, &NS, &NSLen);
+       GetHash(HandlerHash, NS, NSLen, &vHandler);
+       return WCC->Hdr->HR.Handler == vHandler;
+}
+
+
+int Conditional_DAV_NSCURRENT(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+       void *vHandler;
+
+       vHandler = CTX;
+       return WCC->Hdr->HR.Handler == vHandler;
+}
+
+void tmplput_DAV_NAMESPACE(StrBuf *Target, WCTemplputParams *TP)
+{
+       wcsession *WCC = WC;
+
+       if (TP->Filter.ContextType == CTX_DAVNS) {
+               WebcitHandler *H;
+               H = (WebcitHandler*) CTX;
+               StrBufAppendTemplate(Target, TP, H->Name, 0);
+       }
+       else if (WCC->Hdr->HR.Handler != NULL) {
+               StrBufAppendTemplate(Target, TP, WCC->Hdr->HR.Handler->Name, 0);
+       }
+}
+
+int GroupdavDispatchREST(RESTDispatchID WhichAction, int IgnoreFloor)
+{
+       wcsession *WCC = WC;
+       void *vDir;
+       
+       switch(WhichAction){
+       case ExistsID:
+               GetHash(WCC->Directory, IKEY(WCC->ThisRoom->nRoomNameParts + 1), &vDir);
+               return locate_message_by_uid(ChrPtr((StrBuf*)vDir)) != -1;
+               /* TODO: remember euid */
+       case PutID:
+       case DeleteID:
+               break;
+
+
+       }
+       return 0;
+}
+
+
+void
+ServerStartModule_DAV
+(void)
+{
+
+       DavNamespaces = NewHash(1, NULL);
+
+}
+
+void 
+ServerShutdownModule_DAV
+(void)
+{
+       DeleteHash(&DavNamespaces);
+}
+
+
+
+
+void 
+InitModule_GROUPDAV
+(void)
+{
+//     WebcitAddUrlHandler(HKEY("groupdav"), "", 0, groupdav_main, XHTTP_COMMANDS|COOKIEUNNEEDED|FORCE_SESSIONCLOSE);
+       RegisterDAVNamespace(HKEY("groupdav"), HKEY("GroupDAV"), 
+                            groupdav_main, GroupdavDispatchREST, 
+                            XHTTP_COMMANDS|COOKIEUNNEEDED|FORCE_SESSIONCLOSE);
+
+       RegisterNamespace("DAV:HOSTNAME", 0, 0, tmplput_GROUPDAV_HOSTNAME, NULL, CTX_NONE);
+
+       RegisterConditional(HKEY("COND:DAV:NS"), 0, Conditional_DAV_NS,  CTX_NONE);
+
+       RegisterIterator("DAV:NS", 0, DavNamespaces, NULL, 
+                        NULL, NULL, CTX_DAVNS, CTX_NONE, IT_NOFLAG);
+
+
+       RegisterConditional(HKEY("COND:DAV:NSCURRENT"), 0, Conditional_DAV_NSCURRENT,  CTX_DAVNS);
+       RegisterNamespace("DAV:NAMESPACE", 0, 1, tmplput_DAV_NAMESPACE, NULL, CTX_NONE);
+
+       RegisterHeaderHandler(HKEY("IF-MATCH"), Header_HandleIfMatch);
+       RegisterHeaderHandler(HKEY("DEPTH"), Header_HandleDepth);
+       RegisterConditional(HKEY("COND:DAV:DEPTH"), 1, Conditional_DAV_DEPTH,  CTX_NONE);
+
+}