* Doxygen groups. Sorted the files into groups. so now we have a nice structure
[citadel.git] / webcit / groupdav_main.c
1 /*
2  * $Id$
3  */
4 /**
5  * \defgroup GroupdavMain Entry point for GroupDAV functions
6  * \ingroup WebcitHttpServerGDav
7  *
8  */
9 /*@{*/
10 #include "webcit.h"
11 #include "webserver.h"
12 #include "groupdav.h"
13
14
15 /**
16  * \brief Output HTTP headers which are common to all requests.
17  *
18  * Please observe that we don't use the usual output_headers()
19  * and wDumpContent() functions in the GroupDAV subsystem, so we
20  * do our own header stuff here.
21  *
22  */
23 void groupdav_common_headers(void) {
24         wprintf(
25                 "Server: %s / %s\r\n"
26                 "Connection: close\r\n",
27                 SERVER, serv_info.serv_software
28         );
29 }
30
31
32
33 /**
34  * \brief string conversion function
35  * \param target output string
36  * \param source string to process
37  */
38 void euid_escapize(char *target, char *source) {
39         int i;
40         int target_length = 0;
41
42         strcpy(target, "");
43         for (i=0; i<strlen(source); ++i) {
44                 if (isalnum(source[i])) {
45                         target[target_length] = source[i];
46                         target[++target_length] = 0;
47                 }
48                 else if (source[i] == ' ') {
49                         target[target_length] = '_';
50                         target[++target_length] = 0;
51                 }
52                 else if (source[i] == '-') {
53                         target[target_length] = '-';
54                         target[++target_length] = 0;
55                 }
56                 else {
57                         sprintf(&target[target_length], "%%%02X", source[i]);
58                         target_length += 3;
59                 }
60         }
61 }
62
63 /**
64  * \brief string conversion function
65  * \param target output string
66  * \param source string to process
67  */
68 void euid_unescapize(char *target, char *source) {
69         int a, b;
70         char hex[3];
71         int target_length = 0;
72
73         strcpy(target, "");
74
75         for (a = 0; a < strlen(source); ++a) {
76                 if (source[a] == '%') {
77                         hex[0] = source[a + 1];
78                         hex[1] = source[a + 2];
79                         hex[2] = 0;
80                         b = 0;
81                         sscanf(hex, "%02x", &b);
82                         target[target_length] = b;
83                         target[++target_length] = 0;
84                         a += 2;
85                 }
86                 else if (source[a] == '_') {
87                         target[target_length] = ' ';
88                         target[++target_length] = 0;
89                 }
90                 else if (source[a] == '-') {
91                         target[target_length] = '-';
92                         target[++target_length] = 0;
93                 }
94                 else {
95                         target[target_length] = source[a];
96                         target[++target_length] = 0;
97                 }
98         }
99 }
100
101
102
103
104 /**
105  * \brief Main entry point for GroupDAV requests
106  * \param req Request header
107  * \param dav_content_type the kind of dav elemet to represent??
108  * \param dav_content_length the length of our response
109  * \param dav_content the actual content to give back
110  */
111 void groupdav_main(struct httprequest *req,
112                         char *dav_content_type,
113                         int dav_content_length,
114                         char *dav_content
115 ) {
116         struct httprequest *rptr;
117         char dav_method[256];
118         char dav_pathname[256];
119         char dav_ifmatch[256];
120         char buf[256];
121         char *ds;
122         int i;
123
124         strcpy(dav_method, "");
125         strcpy(dav_pathname, "");
126         strcpy(dav_ifmatch, "");
127
128         for (rptr=req; rptr!=NULL; rptr=rptr->next) {
129                 /* lprintf(9, "< %s\n", rptr->line); */
130                 if (!strncasecmp(rptr->line, "Host: ", 6)) {
131                         safestrncpy(WC->http_host, &rptr->line[6],
132                                 sizeof WC->http_host);
133                 }
134                 if (!strncasecmp(rptr->line, "If-Match: ", 10)) {
135                         safestrncpy(dav_ifmatch, &rptr->line[10],
136                                 sizeof dav_ifmatch);
137                 }
138         }
139
140         if (!WC->logged_in) {
141                 wprintf("HTTP/1.1 401 Unauthorized\r\n");
142                 groupdav_common_headers();
143                 wprintf("WWW-Authenticate: Basic realm=\"%s\"\r\n",
144                         serv_info.serv_humannode);
145                 wprintf("Content-Length: 0\r\n\r\n");
146                 return;
147         }
148
149         extract_token(dav_method, req->line, 0, ' ', sizeof dav_method);
150         extract_token(dav_pathname, req->line, 1, ' ', sizeof dav_pathname);
151         unescape_input(dav_pathname);
152
153         /**
154          * If the request does not begin with "/groupdav", prepend it.  If
155          * we happen to introduce a double-slash, that's ok; we'll strip it
156          * in the next step.
157          */
158         if (strncasecmp(dav_pathname, "/groupdav", 9)) {
159                 snprintf(buf, sizeof buf, "/groupdav/%s", dav_pathname);
160                 safestrncpy(dav_pathname, buf, sizeof dav_pathname);
161         }
162         
163         /** Remove any stray double-slashes in pathname */
164         while (ds=strstr(dav_pathname, "//"), ds != NULL) {
165                 strcpy(ds, ds+1);
166         }
167
168         /**
169          * If there's an If-Match: header, strip out the quotes if present, and
170          * then if all that's left is an asterisk, make it go away entirely.
171          */
172         if (strlen(dav_ifmatch) > 0) {
173                 striplt(dav_ifmatch);
174                 if (dav_ifmatch[0] == '\"') {
175                         strcpy(dav_ifmatch, &dav_ifmatch[1]);
176                         for (i=0; i<strlen(dav_ifmatch); ++i) {
177                                 if (dav_ifmatch[i] == '\"') {
178                                         dav_ifmatch[i] = 0;
179                                 }
180                         }
181                 }
182                 if (!strcmp(dav_ifmatch, "*")) {
183                         strcpy(dav_ifmatch, "");
184                 }
185         }
186
187         /**
188          * The OPTIONS method is not required by GroupDAV.  This is an
189          * experiment to determine what might be involved in supporting
190          * other variants of DAV in the future.
191          */
192         if (!strcasecmp(dav_method, "OPTIONS")) {
193                 groupdav_options(dav_pathname);
194                 return;
195         }
196
197         /**
198          * The PROPFIND method is basically used to list all objects in a
199          * room, or to list all relevant rooms on the server.
200          */
201         if (!strcasecmp(dav_method, "PROPFIND")) {
202                 groupdav_propfind(dav_pathname);
203                 return;
204         }
205
206         /**
207          * The GET method is used for fetching individual items.
208          */
209         if (!strcasecmp(dav_method, "GET")) {
210                 groupdav_get(dav_pathname);
211                 return;
212         }
213
214         /**
215          * The PUT method is used to add or modify items.
216          */
217         if (!strcasecmp(dav_method, "PUT")) {
218                 groupdav_put(dav_pathname, dav_ifmatch,
219                                 dav_content_type, dav_content);
220                 return;
221         }
222
223         /**
224          * The DELETE method kills, maims, and destroys.
225          */
226         if (!strcasecmp(dav_method, "DELETE")) {
227                 groupdav_delete(dav_pathname, dav_ifmatch);
228                 return;
229         }
230
231         /**
232          * Couldn't find what we were looking for.  Die in a car fire.
233          */
234         wprintf("HTTP/1.1 501 Method not implemented\r\n");
235         groupdav_common_headers();
236         wprintf("Content-Type: text/plain\r\n"
237                 "\r\n"
238                 "GroupDAV method \"%s\" is not implemented.\r\n",
239                 dav_method
240         );
241 }
242
243
244 /*@}*/