]> code.citadel.org Git - citadel.git/blobdiff - webcit/webcit.c
lower case tags
[citadel.git] / webcit / webcit.c
index 1c19ec3bd3b7eabe8dafbe8e2d103afcf0c50647..c9a110a72275f7fe3b79a80938477f24a7e755e8 100644 (file)
 #include "webserver.h"
 #include "mime_parser.h"
 
-char request_method[128];
+/*
+ * Subdirectories from which the client may request static content
+ */
+char *static_content_dirs[] = {
+       "static",
+       "tiny_mce"
+};
 
 /*
  * String to unset the cookie.
@@ -229,7 +235,7 @@ void escputs(char *strbuf)
 void urlesc(char *outbuf, char *strbuf)
 {
        int a, b, c;
-       char *ec = " #&;`'|*?-~<>^()[]{}$\\";
+       char *ec = " #&;`'|*?-~<>^()[]{}$\"\\";
 
        strcpy(outbuf, "");
 
@@ -298,12 +304,12 @@ void msgesc(char *target, char *strbuf)
        strcpy(target, "");
 
        for (a = 0; a < strlen(strbuf); ++a) {
-               if (strbuf[a] == '\'') 
-                       strcat(target, "\\'");
-               else if (strbuf[a] == '\n')
+               if (strbuf[a] == '\n')
                        strcat(target, " ");
                else if (strbuf[a] == '\r')
                        strcat(target, " ");
+               else if (strbuf[a] == '\'')
+                       strcat(target, "&#39;");
                else {
                        strncat(target, &strbuf[a], 1);
                }
@@ -334,14 +340,13 @@ void output_headers(      int do_httpheaders,     /* 1 = output HTTP headers
                                                /*     <div id="content"> either.                   */
 
                        int unset_cookies,      /* 1 = session is terminating, so unset the cookies */
-                       int refresh30,          /* 1 = automatically refresh page every 30 seconds  */
                        int suppress_check,     /* 1 = suppress check for instant messages          */
                        int cache               /* 1 = allow browser to cache this page             */
 ) {
        char cookie[SIZ];
        char httpnow[SIZ];
 
-       wprintf("HTTP/1.0 200 OK\n");
+       wprintf("HTTP/1.1 200 OK\n");
        httpdate(httpnow, time(NULL));
 
        if (do_httpheaders) {
@@ -380,16 +385,6 @@ void output_headers(       int do_httpheaders,     /* 1 = output HTTP headers
        if (do_htmlhead) {
                /* wprintf("\n"); */
                begin_burst();
-
-               if (refresh30) {
-                       svprintf("REFRESHTAG", WCS_STRING, "%s",
-                               "<meta http-equiv=\"refresh\" content=\"30\" />\n");
-               }
-               else {
-                       svprintf("REFRESHTAG", WCS_STRING, "%s",
-                               "<meta http-equiv=\"refresh\" content=\"500363689;\" />\n");
-               }
-
                do_template("head");
        }
 
@@ -433,12 +428,12 @@ void output_headers(      int do_httpheaders,     /* 1 = output HTTP headers
  * Generic function to do an HTTP redirect.  Easy and fun.
  */
 void http_redirect(char *whichpage) {
-       wprintf("HTTP/1.0 302 Moved Temporarily\n");
+       wprintf("HTTP/1.1 302 Moved Temporarily\n");
        wprintf("Location: %s\r\n", whichpage);
        wprintf("URI: %s\r\n", whichpage);
        wprintf("Content-type: text/html; charset=utf-8\r\n\r\n");
        wprintf("<html><body>");
-       wprintf("Go <A HREF=\"%s\">here</A>.", whichpage);
+       wprintf("Go <a href=\"%s\">here</A>.", whichpage);
        wprintf("</body></html>\n");
 }
 
@@ -462,7 +457,7 @@ void check_for_instant_messages()
 void http_transmit_thing(char *thing, size_t length, char *content_type,
                         int is_static) {
 
-       output_headers(0, 0, 0, 0, 0, 0, is_static);
+       output_headers(0, 0, 0, 0, 0, is_static);
 
        wprintf("Content-type: %s\r\n"
                "Server: %s\r\n"
@@ -508,17 +503,16 @@ void http_transmit_thing(char *thing, size_t length, char *content_type,
 
 void output_static(char *what)
 {
-       char buf[256];
        FILE *fp;
        struct stat statbuf;
        off_t bytes;
        char *bigbuffer;
        char content_type[128];
 
-       sprintf(buf, "static/%s", what);
-       fp = fopen(buf, "rb");
+       fp = fopen(what, "rb");
        if (fp == NULL) {
-               wprintf("HTTP/1.0 404 %s\n", strerror(errno));
+               lprintf(9, "output_static('%s')  -- NOT FOUND --\n", what);
+               wprintf("HTTP/1.1 404 %s\n", strerror(errno));
                wprintf("Content-Type: text/plain\r\n");
                wprintf("\r\n");
                wprintf("Cannot open %s: %s\n", what, strerror(errno));
@@ -560,6 +554,7 @@ void output_static(char *what)
                fread(bigbuffer, bytes, 1, fp);
                fclose(fp);
 
+               lprintf(9, "output_static('%s')  %s\n", what, content_type);
                http_transmit_thing(bigbuffer, (size_t)bytes, content_type, 1);
                free(bigbuffer);
        }
@@ -598,7 +593,7 @@ void output_image()
                /* Instead of an ugly 404, send a 1x1 transparent GIF
                 * when there's no such image on the server.
                 */
-               output_static("blank.gif");
+               output_static("static/blank.gif");
        }
 
 
@@ -609,28 +604,28 @@ void output_image()
  * Generic function to output an arbitrary MIME part from an arbitrary
  * message number on the server.
  */
-void output_mimepart()
+void mimepart(char *msgnum, char *partnum)
 {
        char buf[SIZ];
        off_t bytes;
        char content_type[SIZ];
        char *content = NULL;
        
-       serv_printf("OPNA %s|%s", bstr("msgnum"), bstr("partnum"));
+       serv_printf("OPNA %s|%s", msgnum, partnum);
        serv_getln(buf, sizeof buf);
        if (buf[0] == '2') {
                bytes = extract_long(&buf[4], 0);
                content = malloc(bytes + 2);
                extract_token(content_type, &buf[4], 3, '|', sizeof content_type);
-               output_headers(0, 0, 0, 0, 0, 0, 0);
+               output_headers(0, 0, 0, 0, 0, 0);
                read_server_binary(content, bytes);
                serv_puts("CLOS");
                serv_getln(buf, sizeof buf);
                http_transmit_thing(content, bytes, content_type, 0);
                free(content);
        } else {
-               wprintf("HTTP/1.0 404 %s\n", &buf[4]);
-               output_headers(0, 0, 0, 0, 0, 0, 0);
+               wprintf("HTTP/1.1 404 %s\n", &buf[4]);
+               output_headers(0, 0, 0, 0, 0, 0);
                wprintf("Content-Type: text/plain\r\n");
                wprintf("\r\n");
                wprintf(_("An error occurred while retrieving this part: %s\n"), &buf[4]);
@@ -640,6 +635,7 @@ void output_mimepart()
 
 
 /*
+ * Read any MIME part of a message, from the server, into memory.
  */
 char *load_mimepart(long msgnum, char *partnum)
 {
@@ -674,8 +670,8 @@ char *load_mimepart(long msgnum, char *partnum)
  */
 void convenience_page(char *titlebarcolor, char *titlebarmsg, char *messagetext)
 {
-       wprintf("HTTP/1.0 200 OK\n");
-       output_headers(1, 1, 2, 0, 0, 0, 0);
+       wprintf("HTTP/1.1 200 OK\n");
+       output_headers(1, 1, 2, 0, 0, 0);
        wprintf("<div id=\"banner\">\n");
        wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#%s\"><TR><TD>", titlebarcolor);
        wprintf("<SPAN CLASS=\"titlebar\">%s</SPAN>\n", titlebarmsg);
@@ -692,7 +688,7 @@ void convenience_page(char *titlebarcolor, char *titlebarmsg, char *messagetext)
  * Display a blank page.
  */
 void blank_page(void) {
-       output_headers(1, 1, 0, 0, 1, 0, 0);
+       output_headers(1, 1, 0, 0, 0, 0);
        wDumpContent(2);
 }
 
@@ -710,11 +706,18 @@ void url_do_template(void) {
  * Offer to make any page the user's "start page."
  */
 void offer_start_page(void) {
-       wprintf("<A HREF=\"/change_start_page?startpage=");
+       wprintf("<a href=\"/change_start_page?startpage=");
        urlescputs(WC->this_page);
        wprintf("\"><FONT SIZE=-2 COLOR=\"#AAAAAA\">");
        wprintf(_("Make this my start page"));
        wprintf("</FONT></A>");
+/*
+       wprintf("<br/><a href=\"/rss?room=");
+       urlescputs(WC->wc_roomname);
+       wprintf("\" title=\"RSS 2.0 feed for ");
+       escputs(WC->wc_roomname);
+       wprintf("\"><img alt=\"RSS\" border=\"0\" src=\"/static/xml_button.gif\"/></a>\n");
+*/
 }
 
 
@@ -733,7 +736,7 @@ void change_start_page(void) {
 
        set_preference("startpage", bstr("startpage"), 1);
 
-       output_headers(1, 1, 0, 0, 0, 0, 0);
+       output_headers(1, 1, 0, 0, 0, 0);
        do_template("newstartpage");
        wDumpContent(1);
 }
@@ -751,7 +754,7 @@ void display_success(char *successmessage)
 /* This is probably temporary and should be revisited */
 void authorization_required(const char *message)
 {
-       wprintf("HTTP/1.0 401 Authorization Required\r\n");
+       wprintf("HTTP/1.1 401 Authorization Required\r\n");
        wprintf("WWW-Authenticate: Basic realm=\"\"\r\n", serv_info.serv_humannode);
        wprintf("Content-Type: text/html\r\n\r\n");
        wprintf("<h1>");
@@ -769,8 +772,8 @@ 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) ) {
@@ -801,6 +804,70 @@ void upload_handler(char *name, char *filename, char *partnum, char *disp,
 
 }
 
+/*
+ * Convenience functions to wrap around asynchronous ajax responses
+ */
+void begin_ajax_response(void) {
+        output_headers(0, 0, 0, 0, 0, 0);
+
+        wprintf("Content-type: text/html; charset=UTF-8\r\n"
+                "Server: %s\r\n"
+                "Connection: close\r\n"
+                "Pragma: no-cache\r\n"
+                "Cache-Control: no-cache\r\n",
+                SERVER);
+        begin_burst();
+}
+
+void end_ajax_response(void) {
+        wprintf("\r\n");
+        wDumpContent(0);
+}
+
+void ajax_servcmd(void)
+{
+       char buf[1024];
+       char gcontent[1024];
+       char *junk;
+       size_t len;
+
+       begin_ajax_response();
+
+       serv_printf("%s", bstr("g_cmd"));
+       serv_getln(buf, sizeof buf);
+
+       if (buf[0] == '8') {
+               serv_printf("\n\n000");
+       }
+       if ((buf[0] == '1') || (buf[0] == '8')) {
+               while (serv_getln(gcontent, sizeof gcontent), strcmp(gcontent, "000")) {
+                       /* maybe do something with it? */
+               }
+               wprintf("000");
+       }
+       if (buf[0] == '4') {
+               text_to_server(bstr("g_input"), 0);
+               serv_puts("000");
+       }
+       if (buf[0] == '6') {
+               len = atol(&buf[4]);
+               junk = malloc(len);
+               serv_read(junk, len);
+               free(junk);
+       }
+       if (buf[0] == '7') {
+               len = atol(&buf[4]);
+               junk = malloc(len);
+               memset(junk, 0, len);
+               serv_write(junk, len);
+               free(junk);
+       }
+
+       end_ajax_response();
+}
+
+
+
 
 
 
@@ -810,11 +877,17 @@ void upload_handler(char *name, char *filename, char *partnum, char *disp,
 void session_loop(struct httprequest *req)
 {
        char cmd[1024];
-       char action[128];
+       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 buf[SIZ];
+       char request_method[128];
+       char pathname[1024];
        int a, b;
        int ContentLength = 0;
        int BytesRead = 0;
@@ -825,6 +898,7 @@ void session_loop(struct httprequest *req)
        char browser_host[SIZ];
        char user_agent[SIZ];
        int body_start = 0;
+       int is_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.
@@ -856,28 +930,49 @@ void session_loop(struct httprequest *req)
        safestrncpy(cmd, hptr->line, sizeof cmd);
        hptr = hptr->next;
        extract_token(request_method, cmd, 0, ' ', sizeof request_method);
+       extract_token(pathname, cmd, 1, ' ', sizeof pathname);
 
        /* Figure out the action */
-       extract_token(action, cmd, 1, '/', sizeof 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, cmd, 2, '/', sizeof arg1);
+       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, cmd, 3, '/', sizeof arg2);
+       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, cmd, 4, '/', sizeof arg3);
+       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;
+
        while (hptr != NULL) {
                safestrncpy(buf, hptr->line, sizeof buf);
                hptr = hptr->next;
@@ -954,11 +1049,25 @@ void session_loop(struct httprequest *req)
 
 
        /* Static content can be sent without connecting to Citadel. */
-       if (!strcasecmp(action, "static")) {
-               safestrncpy(buf, arg1, sizeof buf);
-               for (a = 0; a < strlen(buf); ++a)
-                       if (isspace(buf[a]))
+       is_static = 0;
+       for (a=0; a<(sizeof(static_content_dirs) / sizeof(char *)); ++a) {
+               if (!strcasecmp(action, static_content_dirs[a])) {
+                       is_static = 1;
+               }
+       }
+       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;
+                       }
+               }
+               for (a = 0; a < strlen(buf); ++a) {
+                       if (isspace(buf[a])) {
                                buf[a] = 0;
+                       }
+               }
                output_static(buf);
                goto SKIP_ALL_THIS_CRAP;        /* Don't try to connect */
        }
@@ -1045,7 +1154,7 @@ void session_loop(struct httprequest *req)
 
        /* This needs to run early */
        if (!strcasecmp(action, "rss")) {
-               display_rss(bstr("room"));
+               display_rss(bstr("room"), request_method);
                goto SKIP_ALL_THIS_CRAP;
        }
 
@@ -1140,7 +1249,9 @@ void session_loop(struct httprequest *req)
        } else if (!strcasecmp(action, "who")) {
                who();
        } else if (!strcasecmp(action, "who_inner_html")) {
-               who_inner_html();
+               begin_ajax_response();
+               who_inner_div();
+               end_ajax_response();
        } else if (!strcasecmp(action, "knrooms")) {
                knrooms();
        } else if (!strcasecmp(action, "gotonext")) {
@@ -1168,7 +1279,9 @@ void session_loop(struct httprequest *req)
        } else if (!strcasecmp(action, "headers")) {
                readloop("headers");
        } else if (!strcasecmp(action, "msg")) {
-               embed_message();
+               embed_message(arg1);
+       } else if (!strcasecmp(action, "printmsg")) {
+               print_message(arg1);
        } else if (!strcasecmp(action, "display_enter")) {
                display_enter();
        } else if (!strcasecmp(action, "post")) {
@@ -1291,10 +1404,12 @@ void session_loop(struct httprequest *req)
                display_generic();
        } else if (!strcasecmp(action, "do_generic")) {
                do_generic();
+       } else if (!strcasecmp(action, "ajax_servcmd")) {
+               ajax_servcmd();
        } else if (!strcasecmp(action, "display_menubar")) {
                display_menubar(1);
-       } else if (!strcasecmp(action, "output_mimepart")) {
-               output_mimepart();
+       } else if (!strcasecmp(action, "mimepart")) {
+               mimepart(arg1, arg2);
        } else if (!strcasecmp(action, "edit_vcard")) {
                edit_vcard();
        } else if (!strcasecmp(action, "submit_vcard")) {
@@ -1333,6 +1448,10 @@ void session_loop(struct httprequest *req)
 #endif
        } else if (!strcasecmp(action, "summary")) {
                summary();
+       } else if (!strcasecmp(action, "summary_inner_div")) {
+               begin_ajax_response();
+               summary_inner_div();
+               end_ajax_response();
        } else if (!strcasecmp(action, "iconbar")) {
                do_iconbar();
        } else if (!strcasecmp(action, "display_customize_iconbar")) {
@@ -1351,8 +1470,14 @@ void session_loop(struct httprequest *req)
                display_preferences();
        } else if (!strcasecmp(action, "set_preferences")) {
                set_preferences();
+       } else if (!strcasecmp(action, "recp_autocomplete")) {
+               recp_autocomplete(bstr("recp"));
+       } else if (!strcasecmp(action, "cc_autocomplete")) {
+               recp_autocomplete(bstr("cc"));
+       } else if (!strcasecmp(action, "bcc_autocomplete")) {
+               recp_autocomplete(bstr("bcc"));
        } else if (!strcasecmp(action, "diagnostics")) {
-               output_headers(1, 1, 1, 0, 0, 0, 0);
+               output_headers(1, 1, 1, 0, 0, 0);
                wprintf("Session: %d<hr />\n", WC->wc_session);
                wprintf("Command: <br /><PRE>\n");
                escputs(cmd);
@@ -1362,6 +1487,7 @@ void session_loop(struct httprequest *req)
                wprintf("</PRE><hr />\n");
                wDumpContent(1);
        }
+
        /* When all else fais, display the main menu. */
        else {
                display_main_menu();