Nearly all <FORM> blocks now contain a hidden input
[citadel.git] / webcit / webcit.c
index d61a66a1463b83b5b8581110d8acb905edfd4dd4..3e93030717adea7a3b5338378eb7f49edbd7e7eb 100644 (file)
@@ -28,11 +28,16 @@ void unescape_input(char *buf)
 {
        int a, b;
        char hex[3];
+       long buflen;
 
-       while ((isspace(buf[strlen(buf) - 1])) && (strlen(buf) > 0))
-               buf[strlen(buf) - 1] = 0;
+       buflen = strlen(buf);
 
-       for (a = 0; a < strlen(buf); ++a) {
+       while ((isspace(buf[buflen - 1])) && (buflen > 0)){
+               buf[buflen - 1] = 0;
+               buflen --;
+       }
+
+       for (a = 0; a < buflen; ++a) {
                if (buf[a] == '+')
                        buf[a] = ' ';
                if (buf[a] == '%') {
@@ -42,7 +47,9 @@ void unescape_input(char *buf)
                        b = 0;
                        sscanf(hex, "%02x", &b);
                        buf[a] = (char) b;
-                       strcpy(&buf[a + 1], &buf[a + 3]);
+                       memmove(&buf[a + 1], &buf[a + 3], buflen - a - 2);
+                       
+                       buflen -=2;
                }
        }
 
@@ -256,14 +263,13 @@ void escputs(char *strbuf)
 
 /** 
  * \brief Escape a string for feeding out as a URL.
- * Returns a pointer to a buffer that must be freed by the caller!
  * \param outbuf the output buffer
  * \param strbuf the input buffer
  */
 void urlesc(char *outbuf, char *strbuf)
 {
        int a, b, c;
-       char *ec = " #&;`'|*?-~<>^()[]{}$\"\\";
+       char *ec = " #&;`'|*?-~<>^()[]{}/$\"\\";
 
        strcpy(outbuf, "");
 
@@ -429,6 +435,11 @@ void output_headers(       int do_httpheaders,     /**< 1 = output HTTP headers
 
        if (do_htmlhead) {
                begin_burst();
+               if (!access("static.local/webcit.css", R_OK)) {
+                       svprintf("CSSLOCAL", WCS_STRING,
+                          "<link href=\"static.local/webcit.css\" rel=\"stylesheet\" type=\"text/css\">"
+                       );
+               }
                do_template("head");
        }
 
@@ -759,9 +770,9 @@ void url_do_template(void) {
 void offer_start_page(void) {
        wprintf("<a href=\"change_start_page?startpage=");
        urlescputs(WC->this_page);
-       wprintf("\"><font size=-2 color=\"#AAAAAA\">");
+       wprintf("\">");
        wprintf(_("Make this my start page"));
-       wprintf("</font></a>");
+       wprintf("</a>");
 /*
        wprintf("<br/><a href=\"rss?room=");
        urlescputs(WC->wc_roomname);
@@ -844,8 +855,7 @@ void upload_handler(char *name, char *filename, char *partnum, char *disp,
 {
        struct urlcontent *u;
 
-       /* lprintf(9, "upload_handler() name=%s, type=%s, len=%d\n",
-               name, cbtype, length); */
+       lprintf(9, "upload_handler() name=%s, type=%s, len=%d\n", name, cbtype, length);
 
        /* Form fields */
        if ( (length > 0) && (strlen(cbtype) == 0) ) {
@@ -856,6 +866,7 @@ void upload_handler(char *name, char *filename, char *partnum, char *disp,
                u->url_data = malloc(length + 1);
                memcpy(u->url_data, content, length);
                u->url_data[length] = 0;
+               /* lprintf(9, "Key: <%s>  Data: <%s>\n", u->url_key, u->url_data); */
        }
 
        /** Uploaded files */
@@ -991,17 +1002,13 @@ void session_loop(struct httprequest *req)
 {
        char cmd[1024];
        char action[1024];
-       char arg1[128];
-       char arg2[128];
-       char arg3[128];
-       char arg4[128];
-       char arg5[128];
-       char arg6[128];
-       char arg7[128];
+       char arg[8][128];
+       size_t sizes[10];
+       char *index[10];
        char buf[SIZ];
        char request_method[128];
        char pathname[1024];
-       int a, b;
+       int a, b, nBackDots, nEmpty;
        int ContentLength = 0;
        int BytesRead = 0;
        char ContentType[512];
@@ -1012,7 +1019,7 @@ void session_loop(struct httprequest *req)
        char user_agent[256];
        int body_start = 0;
        int is_static = 0;
-
+       int n_static = 0;
        /**
         * We stuff these with the values coming from the client cookies,
         * so we can use them to reconnect a timed out session if we have to.
@@ -1047,45 +1054,27 @@ void session_loop(struct httprequest *req)
        extract_token(pathname, cmd, 1, ' ', sizeof pathname);
 
        /** Figure out the action */
-       extract_token(action, pathname, 1, '/', sizeof action);
-       if (strstr(action, "?")) *strstr(action, "?") = 0;
-       if (strstr(action, "&")) *strstr(action, "&") = 0;
-       if (strstr(action, " ")) *strstr(action, " ") = 0;
-
-       extract_token(arg1, pathname, 2, '/', sizeof arg1);
-       if (strstr(arg1, "?")) *strstr(arg1, "?") = 0;
-       if (strstr(arg1, "&")) *strstr(arg1, "&") = 0;
-       if (strstr(arg1, " ")) *strstr(arg1, " ") = 0;
-
-       extract_token(arg2, pathname, 3, '/', sizeof arg2);
-       if (strstr(arg2, "?")) *strstr(arg2, "?") = 0;
-       if (strstr(arg2, "&")) *strstr(arg2, "&") = 0;
-       if (strstr(arg2, " ")) *strstr(arg2, " ") = 0;
-
-       extract_token(arg3, pathname, 4, '/', sizeof arg3);
-       if (strstr(arg3, "?")) *strstr(arg3, "?") = 0;
-       if (strstr(arg3, "&")) *strstr(arg3, "&") = 0;
-       if (strstr(arg3, " ")) *strstr(arg3, " ") = 0;
-
-       extract_token(arg4, pathname, 5, '/', sizeof arg4);
-       if (strstr(arg4, "?")) *strstr(arg4, "?") = 0;
-       if (strstr(arg4, "&")) *strstr(arg4, "&") = 0;
-       if (strstr(arg4, " ")) *strstr(arg4, " ") = 0;
-
-       extract_token(arg5, pathname, 6, '/', sizeof arg5);
-       if (strstr(arg5, "?")) *strstr(arg5, "?") = 0;
-       if (strstr(arg5, "&")) *strstr(arg5, "&") = 0;
-       if (strstr(arg5, " ")) *strstr(arg5, " ") = 0;
-
-       extract_token(arg6, pathname, 7, '/', sizeof arg6);
-       if (strstr(arg6, "?")) *strstr(arg6, "?") = 0;
-       if (strstr(arg6, "&")) *strstr(arg6, "&") = 0;
-       if (strstr(arg6, " ")) *strstr(arg6, " ") = 0;
-
-       extract_token(arg7, pathname, 8, '/', sizeof arg7);
-       if (strstr(arg7, "?")) *strstr(arg7, "?") = 0;
-       if (strstr(arg7, "&")) *strstr(arg7, "&") = 0;
-       if (strstr(arg7, " ")) *strstr(arg7, " ") = 0;
+       index[0] = action;
+       sizes[0] = sizeof action;
+       for (a=1; a<9; a++)
+       {
+               index[a] = arg[a-1];
+               sizes[a] = sizeof arg[a-1];
+       }
+////   index[9] = &foo; todo
+       nBackDots = 0;
+       nEmpty = 0;
+       for ( a = 0; a < 9; ++a)
+       {
+               extract_token(index[a], pathname, a + 1, '/', sizes[a]);
+               if (strstr(index[a], "?")) *strstr(index[a], "?") = 0;
+               if (strstr(index[a], "&")) *strstr(index[a], "&") = 0;
+               if (strstr(index[a], " ")) *strstr(index[a], " ") = 0;
+               if ((index[a][0] == '.') && (index[a][1] == '.'))
+                       nBackDots++;
+               if (index[a][0] == '\0')
+                       nEmpty++;
+       }
 
        while (hptr != NULL) {
                safestrncpy(buf, hptr->line, sizeof buf);
@@ -1145,16 +1134,13 @@ void session_loop(struct httprequest *req)
                body_start = strlen(content);
 
                /** Read the entire input data at once. */
-               client_read(WC->http_sock, &content[BytesRead+body_start],
-                       ContentLength);
+               client_read(WC->http_sock, &content[BytesRead+body_start], ContentLength);
 
-               if (!strncasecmp(ContentType,
-                             "application/x-www-form-urlencoded", 33)) {
+               if (!strncasecmp(ContentType, "application/x-www-form-urlencoded", 33)) {
                        addurls(&content[body_start]);
                } else if (!strncasecmp(ContentType, "multipart", 9)) {
                        content_end = content + ContentLength + body_start;
-                       mime_parser(content, content_end, *upload_handler,
-                                       NULL, NULL, NULL, 0);
+                       mime_parser(content, content_end, *upload_handler, NULL, NULL, NULL, 0);
                }
        } else {
                content = NULL;
@@ -1190,25 +1176,50 @@ void session_loop(struct httprequest *req)
        for (a=0; a<ndirs; ++a) {
                if (!strcasecmp(action, (char*)static_content_dirs[a])) { /* map web to disk location */
                        is_static = 1;
+                       n_static = a;
                }
        }
        if (is_static) {
-               snprintf(buf, sizeof buf, "%s/%s/%s/%s/%s/%s/%s/%s",
-                       action, arg1, arg2, arg3, arg4, arg5, arg6, arg7);
-               for (a=0; a<8; ++a) {
-                       if (buf[strlen(buf)-1] == '/') {
-                               buf[strlen(buf)-1] = 0;
+               if (nBackDots < 2)
+               {
+                       snprintf(buf, sizeof buf, "%s/%s/%s/%s/%s/%s/%s/%s",
+                                static_dirs[n_static], 
+                                index[1], index[2], index[3], index[4], index[5], index[6], index[7]);
+                       for (a=0; a<8; ++a) {
+                               if (buf[strlen(buf)-1] == '/') {
+                                       buf[strlen(buf)-1] = 0;
+                               }
                        }
-               }
-               for (a = 0; a < strlen(buf); ++a) {
-                       if (isspace(buf[a])) {
-                               buf[a] = 0;
+                       for (a = 0; a < strlen(buf); ++a) {
+                               if (isspace(buf[a])) {
+                                       buf[a] = 0;
+                               }
                        }
+                       output_static(buf);
+               }
+               else 
+               {
+                       lprintf(9, "Suspicious request. Ignoring.");
+                       wprintf("HTTP/1.1 404 Security check failed\r\n");
+                       wprintf("Content-Type: text/plain\r\n");
+                       wprintf("\r\n");
+                       wprintf("Security check failed.\r\n");
                }
-               output_static(buf);
                goto SKIP_ALL_THIS_CRAP;        /* Don't try to connect */
        }
 
+       /* If the client sent a nonce that is incorrect, kill the request. */
+       if (strlen(bstr("nonce")) > 0) {
+               if (atoi(bstr("nonce")) != WC->nonce) {
+                       lprintf(9, "Ignoring request with mismatched nonce.\n");
+                       wprintf("HTTP/1.1 404 Security check failed\r\n");
+                       wprintf("Content-Type: text/plain\r\n");
+                       wprintf("\r\n");
+                       wprintf("Security check failed.\r\n");
+                       goto SKIP_ALL_THIS_CRAP;
+               }
+       }
+
        /**
         * If we're not connected to a Citadel server, try to hook up the
         * connection now.
@@ -1396,6 +1407,22 @@ void session_loop(struct httprequest *req)
                begin_ajax_response();
                who_inner_div();
                end_ajax_response();
+       } else if (!strcasecmp(action, "wholist_section")) {
+               begin_ajax_response();
+               wholist_section();
+               end_ajax_response();
+       } else if (!strcasecmp(action, "new_messages_html")) {
+               begin_ajax_response();
+               new_messages_section();
+               end_ajax_response();
+       } else if (!strcasecmp(action, "tasks_inner_html")) {
+               begin_ajax_response();
+               tasks_section();
+               end_ajax_response();
+       } else if (!strcasecmp(action, "calendar_inner_html")) {
+               begin_ajax_response();
+               calendar_section();
+               end_ajax_response();
        } else if (!strcasecmp(action, "iconbar_ajax_menu")) {
                begin_ajax_response();
                do_iconbar();
@@ -1433,11 +1460,11 @@ void session_loop(struct httprequest *req)
        } else if (!strcasecmp(action, "do_search")) {
                readloop("do_search");
        } else if (!strcasecmp(action, "msg")) {
-               embed_message(arg1);
+               embed_message(index[1]);
        } else if (!strcasecmp(action, "printmsg")) {
-               print_message(arg1);
+               print_message(index[1]);
        } else if (!strcasecmp(action, "msgheaders")) {
-               display_headers(arg1);
+               display_headers(index[1]);
        } else if (!strcasecmp(action, "wiki")) {
                display_wiki_page();
        } else if (!strcasecmp(action, "display_enter")) {
@@ -1483,7 +1510,7 @@ void session_loop(struct httprequest *req)
        } else if (!strcasecmp(action, "editroom")) {
                editroom();
        } else if (!strcasecmp(action, "display_editinfo")) {
-               display_edit(_("Room info"), "EINF 0", "RINF", "/editinfo", 1);
+               display_edit(_("Room info"), "EINF 0", "RINF", "editinfo", 1);
        } else if (!strcasecmp(action, "editinfo")) {
                save_edit(_("Room info"), "EINF 1", 1);
        } else if (!strcasecmp(action, "display_editbio")) {
@@ -1567,9 +1594,9 @@ void session_loop(struct httprequest *req)
        } else if (!strcasecmp(action, "display_menubar")) {
                display_menubar(1);
        } else if (!strcasecmp(action, "mimepart")) {
-               mimepart(arg1, arg2, 0);
+               mimepart(index[1], index[2], 0);
        } else if (!strcasecmp(action, "mimepart_download")) {
-               mimepart(arg1, arg2, 1);
+               mimepart(index[1], index[2], 1);
        } else if (!strcasecmp(action, "edit_vcard")) {
                edit_vcard();
        } else if (!strcasecmp(action, "submit_vcard")) {
@@ -1646,8 +1673,12 @@ void session_loop(struct httprequest *req)
                recp_autocomplete(bstr("cc"));
        } else if (!strcasecmp(action, "bcc_autocomplete")) {
                recp_autocomplete(bstr("bcc"));
+       } else if (!strcasecmp(action, "display_address_book_middle_div")) {
+               display_address_book_middle_div();
+       } else if (!strcasecmp(action, "display_address_book_inner_div")) {
+               display_address_book_inner_div();
        } else if (!strcasecmp(action, "set_floordiv_expanded")) {
-               set_floordiv_expanded(arg1);
+               set_floordiv_expanded(index[1]);
        } else if (!strcasecmp(action, "diagnostics")) {
                output_headers(1, 1, 1, 0, 0, 0);
                wprintf("Session: %d<hr />\n", WC->wc_session);
@@ -1660,6 +1691,12 @@ void session_loop(struct httprequest *req)
                wDumpContent(1);
        } else if (!strcasecmp(action, "updatenote")) {
                updatenote();
+       } else if (!strcasecmp(action, "display_room_directory")) {
+               display_room_directory();
+       } else if (!strcasecmp(action, "download_file")) {
+               download_file(index[1]);
+       } else if (!strcasecmp(action, "upload_file")) {
+               upload_file();
        }
 
        /** When all else fais, display the main menu. */