* add a Display name to our handlers; this will be used by DAV handlers.
[citadel.git] / webcit / paging.c
index c892b7a64ed9926286d76b34962692e584450297..b4d5a3c0c981f83adf8154e7d3f536bbfc4135e7 100644 (file)
@@ -1,32 +1,9 @@
 /*
  * $Id$
- *
- * Functions which implement the chat and paging facilities.
  */
 
-#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 <sys/poll.h>
-#include <sys/time.h>
-#include <limits.h>
-#include <netinet/in.h>
-#include <netdb.h>
-#include <string.h>
-#include <pwd.h>
-#include <errno.h>
-#include <stdarg.h>
-#include <pthread.h>
-#include <signal.h>
 #include "webcit.h"
 
-
 /*
  * display the form for paging (x-messaging) another user
  */
@@ -36,22 +13,25 @@ void display_page(void)
 
        strcpy(recp, bstr("recp"));
 
-        output_headers(1, 1, 2, 0, 0, 0, 0);
-        wprintf("<div id=\"banner\">\n"
-                "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
-                "<SPAN CLASS=\"titlebar\">Send instant message</SPAN>"
-                "</TD></TR></TABLE>\n"
-                "</div>\n<div id=\"content\">\n"
-        );
-                                                                                                                             
-        wprintf("<div id=\"fix_scrollbar_bug\">"
-               "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>\n");
-
-       wprintf("Send an instant message to: ");
+        output_headers(1, 1, 2, 0, 0, 0);
+        wprintf("<div id=\"banner\">\n");
+        wprintf("<h1>");
+       wprintf(_("Send instant message"));
+       wprintf("</h1>");
+        wprintf("</div>\n");
+
+       wprintf("<div id=\"content\" class=\"service\">\n");
+
+        wprintf("<div class=\"fix_scrollbar_bug\">"
+               "<table class=\"paging_background\"><tr><td>\n");
+
+       wprintf(_("Send an instant message to: "));
        escputs(recp);
        wprintf("<br>\n");
 
-       wprintf("<FORM METHOD=\"POST\" ACTION=\"/page_user\">\n");
+       wprintf("<FORM METHOD=\"POST\" action=\"page_user\">\n");
+       wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
+       wprintf("<input type=\"hidden\" name=\"template\" value=\"who\">\n");
 
        wprintf("<TABLE border=0 width=100%%><TR><TD>\n");
 
@@ -59,91 +39,82 @@ void display_page(void)
        escputs(recp);
        wprintf("\">\n");
 
-       wprintf("<INPUT TYPE=\"hidden\" NAME=\"closewin\" VALUE=\"");
-       escputs(bstr("closewin"));
-       wprintf("\">\n");
-
-       wprintf("Enter message text:<br />");
+       wprintf(_("Enter message text:"));
+       wprintf("<br />");
 
        wprintf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=5 COLS=40 "
                "WIDTH=40></TEXTAREA>\n");
 
        wprintf("</TD></TR></TABLE><br />\n");
 
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Send message\">");
-       wprintf("<br /><A HREF=\"javascript:window.close();\"Cancel</A>\n");
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"send_button\" VALUE=\"%s\">", _("Send message"));
+       wprintf("<br /><a href=\"javascript:window.close();\"%s</A>\n", _("Cancel"));
 
        wprintf("</FORM></CENTER>\n");
        wprintf("</td></tr></table></div>\n");
        wDumpContent(1);
 }
 
-/*
- * page another user
+/**
+ * \brief page another user
  */
 void page_user(void)
 {
-       char recp[SIZ];
-       char sc[SIZ];
-       char buf[SIZ];
-       char closewin[SIZ];
-
-        output_headers(1, 1, 2, 0, 0, 0, 0);
-        wprintf("<div id=\"banner\">\n"
-                "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
-                "<SPAN CLASS=\"titlebar\">Add or edit an event</SPAN>"
-                "</TD></TR></TABLE>\n"
-                "</div>\n<div id=\"content\">\n"
-        );
-                                                                                                                             
-       strcpy(recp, bstr("recp"));
-       strcpy(sc, bstr("sc"));
-       strcpy(closewin, bstr("closewin"));
+       char recp[256];
+       char buf[256];
+
+       safestrncpy(recp, bstr("recp"), sizeof recp);
 
-       if (strcmp(sc, "Send message")) {
-               wprintf("<EM>Message was not sent.</EM><br />\n");
+       if (!havebstr("send_button")) {
+               safestrncpy(WC->ImportantMessage,
+                       _("Message was not sent."),
+                       sizeof WC->ImportantMessage
+               );
        } else {
                serv_printf("SEXP %s|-", recp);
-               serv_gets(buf);
+               serv_getln(buf, sizeof buf);
 
                if (buf[0] == '4') {
-                       text_to_server(bstr("msgtext"), 0);
+                       text_to_server(bstr("msgtext"));
                        serv_puts("000");
-                       wprintf("<EM>Message has been sent to ");
-                       escputs(recp);
-                       wprintf(".</EM><br />\n");
+                       stresc(buf, 256, recp, 0, 0);
+                       snprintf(WC->ImportantMessage,
+                               sizeof WC->ImportantMessage,
+                               "%s%s.",
+                               _("Message has been sent to "),
+                               buf
+                       );
                }
                else {
-                       wprintf("<EM>%s</EM><br />\n", &buf[4]);
+                       safestrncpy(WC->ImportantMessage, &buf[4], sizeof WC->ImportantMessage);
                }
        }
-       
-       if (!strcasecmp(closewin, "yes")) {
-               wprintf("<CENTER><A HREF=\"javascript:window.close();\">"
-                       "[ close window ]</A></CENTER>\n");
-       }
 
-       wDumpContent(1);
+       url_do_template();
 }
 
 
 
-/*
- * multiuser chat
+/**
+ * \brief multiuser chat
  */
 void do_chat(void)
 {
        char buf[SIZ];
 
-       /* First, check to make sure we're still allowed in this room. */
-       serv_printf("GOTO %s", WC->wc_roomname);
-       serv_gets(buf);
+       /** First, check to make sure we're still allowed in this room. */
+       serv_printf("GOTO %s", ChrPtr(WC->wc_roomname));
+       serv_getln(buf, sizeof buf);
        if (buf[0] != '2') {
-               smart_goto("_BASEROOM_");
+               StrBuf *Buf;
+               Buf = NewStrBufPlain(HKEY("_BASEROOM_"));
+               smart_goto(Buf);
+               FreeStrBuf(&Buf);
                return;
        }
 
-       /* If the chat socket is still open from a previous chat,
+       /**
+        * If the chat socket is still open from a previous chat,
         * close it -- because it might be stale or in the wrong room.
         */
        if (WC->chat_sock < 0) {
@@ -151,46 +122,46 @@ void do_chat(void)
                WC->chat_sock = (-1);
        }
 
-       /* WebCit Chat works by having transmit, receive, and refresh
-        * frames.  Load the frameset.
+       /**
+        * WebCit Chat works by having transmit, receive, and refresh
+        * frames.  Load the frameset.  (This isn't AJAX but the headers
+        * output by begin_ajax_response() happen to be the ones we need.)
         */
-       do_template("chatframeset");
+       begin_ajax_response();
+       do_template("chatframeset", NULL);
+       end_ajax_response();
        return;
 }
 
 
-/*
- *
+/**
+ * \brief display page popup
+ * If there are instant messages waiting, and we notice that we haven't checked them in
+ * a while, it probably means that we need to open the instant messenger window.
  */
-void page_popup(void)
+int Conditional_PAGE_WAITING(StrBuf *Target, WCTemplputParams *TP)
 {
+       int len;
        char buf[SIZ];
-       char pagefrom[SIZ];
-
-       while (serv_puts("GEXP"), serv_gets(buf), buf[0]=='1') {
-
-               extract(pagefrom, &buf[4], 3);
-
-               wprintf("<table border=1 bgcolor=\"#880000\"><tr><td>");
-               wprintf("<span class=\"titlebar\">Instant message from ");
-               escputs(pagefrom);
-               wprintf("</span></td></tr><tr><td><font color=\"#FFFFFF\">");
-               fmout(NULL, "LEFT");
-               wprintf("</font></td></tr>"
-                       "<tr><td><div align=center><font color=\"#FFFFFF\">"
-                       "<a href=\"javascript:hide_page_popup()\">[ close window ]</a>"
-                       "</font></div>"
-                       "</td></tr>"
-                       "</table>\n");
-       }
 
-       WC->HaveInstantMessages = 0;
+       /** JavaScript function to alert the user that popups are probably blocked */
+       /** First, do the check as part of our page load. */
+       serv_puts("NOOP");
+       len = serv_getln(buf, sizeof buf);
+       if ((len >= 3) && (buf[3] == '*')) {
+               if ((time(NULL) - WC->last_pager_check) > 60) {
+                       return 1;
+               }
+       }
+       return 0;
+       /** Then schedule it to happen again a minute from now if the user is idle. */
 }
 
 
 
-/*
- * Support function for chat -- make sure the chat socket is connected
+/**
+ * \brief Support function for chat
+ * make sure the chat socket is connected
  * and in chat mode.
  */
 int setup_chat_socket(void) {
@@ -201,12 +172,12 @@ int setup_chat_socket(void) {
        if (WC->chat_sock < 0) {
 
                if (!strcasecmp(ctdlhost, "uds")) {
-                       /* unix domain socket */
+                       /** unix domain socket */
                        sprintf(buf, "%s/citadel.socket", ctdlport);
                        WC->chat_sock = uds_connectsock(buf);
                }
                else {
-                       /* tcp socket */
+                       /** tcp socket */
                        WC->chat_sock = tcp_connectsock(ctdlhost, ctdlport);
                }
 
@@ -214,24 +185,24 @@ int setup_chat_socket(void) {
                        return(errno);
                }
 
-               /* Temporarily swap the serv and chat sockets during chat talk */
+               /** Temporarily swap the serv and chat sockets during chat talk */
                i = WC->serv_sock;
                WC->serv_sock = WC->chat_sock;
                WC->chat_sock = i;
 
-               serv_gets(buf);
+               serv_getln(buf, sizeof buf);
                if (buf[0] == '2') {
-                       serv_printf("USER %s", WC->wc_username);
-                       serv_gets(buf);
+                       serv_printf("USER %s", ChrPtr(WC->wc_username));
+                       serv_getln(buf, sizeof buf);
                        if (buf[0] == '3') {
-                               serv_printf("PASS %s", WC->wc_password);
-                               serv_gets(buf);
+                               serv_printf("PASS %s", ChrPtr(WC->wc_password));
+                               serv_getln(buf, sizeof buf);
                                if (buf[0] == '2') {
-                                       serv_printf("GOTO %s", WC->wc_roomname);
-                                       serv_gets(buf);
+                                       serv_printf("GOTO %s", ChrPtr(WC->wc_roomname));
+                                       serv_getln(buf, sizeof buf);
                                        if (buf[0] == '2') {
                                                serv_puts("CHAT");
-                                               serv_gets(buf);
+                                               serv_getln(buf, sizeof buf);
                                                if (buf[0] == '8') {
                                                        good_chatmode = 1;
                                                }
@@ -240,7 +211,7 @@ int setup_chat_socket(void) {
                        }
                }
 
-               /* Unswap the sockets. */
+               /** Unswap the sockets. */
                i = WC->serv_sock;
                WC->serv_sock = WC->chat_sock;
                WC->chat_sock = i;
@@ -253,8 +224,9 @@ int setup_chat_socket(void) {
 
 
 
-/*
- * Receiving side of the chat window.  This is implemented in a
+/**
+ * \brief Receiving side of the chat window.  
+ * This is implemented in a
  * tiny hidden IFRAME that just does JavaScript writes to
  * other frames whenever it refreshes and finds new data.
  */
@@ -268,10 +240,10 @@ void chat_recv(void) {
        char cl_text[SIZ];
        char *output_data = NULL;
 
-       output_headers(0, 0, 0, 0, 0, 0, 0);
+       output_headers(0, 0, 0, 0, 0, 0);
 
-       wprintf("Content-type: text/html\n");
-       wprintf("\n");
+       hprintf("Content-type: text/html; charset=utf-8\r\n");
+       begin_burst();
        wprintf("<html>\n"
                "<head>\n"
                "<meta http-equiv=\"refresh\" content=\"3\" />\n"
@@ -281,12 +253,13 @@ void chat_recv(void) {
        );
 
        if (setup_chat_socket() != 0) {
-               wprintf("Error setting up chat socket</BODY></HTML>\n");
+               wprintf(_("An error occurred while setting up the chat socket."));
+               wprintf("</BODY></HTML>\n");
                wDumpContent(0);
                return;
        }
 
-       /*
+       /**
         * See if there is any chat data waiting.
         */
        output_data = strdup("");
@@ -295,27 +268,28 @@ void chat_recv(void) {
                pf.fd = WC->chat_sock;
                pf.events = POLLIN;
                pf.revents = 0;
-               if (poll(&pf, 1, 1) > 0) if (pf.revents & POLLIN) {
+               if ((poll(&pf, 1, 1) > 0) && (pf.revents & POLLIN)) {
                        ++got_data;
 
-                       /* Temporarily swap the serv and chat sockets during chat talk */
+                       /** Temporarily swap the serv and chat sockets during chat talk */
                        i = WC->serv_sock;
                        WC->serv_sock = WC->chat_sock;
                        WC->chat_sock = i;
        
-                       serv_gets(buf);
+                       serv_getln(buf, sizeof buf);
 
                        if (!strcmp(buf, "000")) {
-                               strcpy(buf, ":|exiting chat mode");
+                               strcpy(buf, ":|");
+                               strcat(buf, _("Now exiting chat mode."));
                                end_chat_now = 1;
                        }
                        
-                       /* Unswap the sockets. */
+                       /** Unswap the sockets. */
                        i = WC->serv_sock;
                        WC->serv_sock = WC->chat_sock;
                        WC->chat_sock = i;
 
-                       /* Append our output data */
+                       /** Append our output data */
                        output_data = realloc(output_data, strlen(output_data) + strlen(buf) + 4);
                        strcat(output_data, buf);
                        strcat(output_data, "\n");
@@ -326,24 +300,25 @@ void chat_recv(void) {
        if (end_chat_now) {
                close(WC->chat_sock);
                WC->chat_sock = (-1);
-               wprintf("<IMG SRC=\"/static/blank.gif\" onLoad=\"parent.window.close();\">\n");
+               wprintf("<img src=\"static/blank.gif\" onLoad=\"parent.window.close();\">\n");
        }
 
-       if (strlen(output_data) > 0) {
-
-               if (output_data[strlen(output_data)-1] == '\n') {
-                       output_data[strlen(output_data)-1] = 0;
+       if (!IsEmptyStr(output_data)) {
+               int len;
+               len = strlen(output_data);
+               if (output_data[len-1] == '\n') {
+                       output_data[len-1] = 0;
                }
 
-               /* Output our fun to the other frame. */
-               wprintf("<IMG SRC=\"/static/blank.gif\" WIDTH=1 HEIGHT=1\n"
+               /** Output our fun to the other frame. */
+               wprintf("<img src=\"static/blank.gif\" WIDTH=1 HEIGHT=1\n"
                        "onLoad=\" \n"
                );
 
                for (i=0; i<num_tokens(output_data, '\n'); ++i) {
-                       extract_token(buf, output_data, i, '\n');
-                       extract_token(cl_user, buf, 0, '|');
-                       extract_token(cl_text, buf, 1, '|');
+                       extract_token(buf, output_data, i, '\n', sizeof buf);
+                       extract_token(cl_user, buf, 0, '|', sizeof cl_user);
+                       extract_token(cl_text, buf, 1, '|', sizeof cl_text);
 
                        if (strcasecmp(cl_text, "NOOP")) {
 
@@ -371,7 +346,7 @@ void chat_recv(void) {
                                if (strcasecmp(cl_user, WC->last_chat_user)) {
                                        wprintf("<B>");
        
-                                       if (!strcasecmp(cl_user, WC->wc_username)) {
+                                       if (!strcasecmp(cl_user, ChrPtr(WC->wc_fullname))) {
                                                wprintf("<FONT COLOR=&quot;#FF0000&quot;>");
                                        }
                                        else {
@@ -406,84 +381,82 @@ void chat_recv(void) {
 }
 
 
-/*
- * sending side of the chat window
+/**
+ * \brief sending side of the chat window
  */
 void chat_send(void) {
        int i;
        char send_this[SIZ];
        char buf[SIZ];
 
-       output_headers(0, 0, 0, 0, 0, 0, 0);
-       wprintf("Content-type: text/html\n");
-       wprintf("\n");
+       output_headers(0, 0, 0, 0, 0, 0);
+       hprintf("Content-type: text/html; charset=utf-8\r\n");
+       begin_burst();
        wprintf("<HTML>"
                "<BODY onLoad=\"document.chatsendform.send_this.focus();\" >"
        );
 
-       if (bstr("send_this") != NULL) {
+       if (havebstr("send_this")) {
                strcpy(send_this, bstr("send_this"));
        }
        else {
                strcpy(send_this, "");
        }
 
-       if (bstr("sendbutton") != NULL) {
-
-               if (!strcasecmp(bstr("sendbutton"), "Help")) {
-                       strcpy(send_this, "/help");
-               }
+       if (havebstr("help_button")) {
+               strcpy(send_this, "/help");
+       }
 
-               if (!strcasecmp(bstr("sendbutton"), "List Users")) {
-                       strcpy(send_this, "/who");
-               }
+       if (havebstr("list_button")) {
+               strcpy(send_this, "/who");
+       }
 
-               if (!strcasecmp(bstr("sendbutton"), "Exit")) {
-                       strcpy(send_this, "/quit");
-               }
+       if (havebstr("exit_button")) {
+               strcpy(send_this, "/quit");
+       }
 
-               if (setup_chat_socket() != 0) {
-                       wprintf("Error setting up chat socket</BODY></HTML>\n");
-                       wDumpContent(0);
-                       return;
-               }
+       if (setup_chat_socket() != 0) {
+               wprintf(_("An error occurred while setting up the chat socket."));
+               wprintf("</BODY></HTML>\n");
+               wDumpContent(0);
+               return;
+       }
 
-               /* Temporarily swap the serv and chat sockets during chat talk */
-               i = WC->serv_sock;
-               WC->serv_sock = WC->chat_sock;
-               WC->chat_sock = i;
+       /** Temporarily swap the serv and chat sockets during chat talk */
+       i = WC->serv_sock;
+       WC->serv_sock = WC->chat_sock;
+       WC->chat_sock = i;
 
-               while (strlen(send_this) > 0) {
-                       if (strlen(send_this) < 67) {
-                               serv_puts(send_this);
-                               strcpy(send_this, "");
-                       }
-                       else {
-                               for (i=55; i<67; ++i) {
-                                       if (send_this[i] == ' ') break;
-                               }
-                               strncpy(buf, send_this, i);
-                               buf[i] = 0;
-                               strcpy(send_this, &send_this[i]);
-                               serv_puts(buf);
+       while (!IsEmptyStr(send_this)) {
+               if (strlen(send_this) < 67) {
+                       serv_puts(send_this);
+                       strcpy(send_this, "");
+               }
+               else {
+                       for (i=55; i<67; ++i) {
+                               if (send_this[i] == ' ') break;
                        }
+                       strncpy(buf, send_this, i);
+                       buf[i] = 0;
+                       strcpy(send_this, &send_this[i]);
+                       serv_puts(buf);
                }
-
-               /* Unswap the sockets. */
-               i = WC->serv_sock;
-               WC->serv_sock = WC->chat_sock;
-               WC->chat_sock = i;
-
        }
 
-       wprintf("<FORM METHOD=\"POST\" ACTION=\"/chat_send\" NAME=\"chatsendform\">\n");
+       /** Unswap the sockets. */
+       i = WC->serv_sock;
+       WC->serv_sock = WC->chat_sock;
+       WC->chat_sock = i;
+
+       wprintf("<FORM METHOD=\"POST\" action=\"chat_send\" NAME=\"chatsendform\">\n");
+       wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
        wprintf("<INPUT TYPE=\"text\" SIZE=\"80\" MAXLENGTH=\"%d\" "
                "NAME=\"send_this\">\n", SIZ-10);
        wprintf("<br />");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"Send\">\n");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"Help\">\n");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"List Users\">\n");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"Exit\">\n");
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"send_button\" VALUE=\"%s\">\n", _("Send"));
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"help_button\" VALUE=\"%s\">\n", _("Help"));
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"list_button\" VALUE=\"%s\">\n", _("List users"));
+       wprintf("<INPUT TYPE=\"submit\" NAME=\"exit_button\" VALUE=\"%s\">\n", _("Exit"));
        wprintf("</FORM>\n");
 
        wprintf("</BODY></HTML>\n");
@@ -491,3 +464,42 @@ void chat_send(void) {
 }
 
 
+void ajax_send_instant_message(void) {
+       char recp[256];
+       char buf[256];
+
+       safestrncpy(recp, bstr("recp"), sizeof recp);
+
+       serv_printf("SEXP %s|-", recp);
+       serv_getln(buf, sizeof buf);
+
+       if (buf[0] == '4') {
+               text_to_server(bstr("msg"));
+               serv_puts("000");
+       }
+
+       escputs(buf);   /* doesn't really matter what we return - the client ignores it */
+}
+
+
+void 
+InitModule_PAGING
+(void)
+{
+       WebcitAddUrlHandler(HKEY("display_page"), "", 0, display_page, 0);
+       WebcitAddUrlHandler(HKEY("page_user"), "", 0, page_user, 0);
+       WebcitAddUrlHandler(HKEY("chat"), "", 0, do_chat, 0);
+       WebcitAddUrlHandler(HKEY("chat_recv"), "", 0, chat_recv, 0);
+       WebcitAddUrlHandler(HKEY("chat_send"), "", 0, chat_send, 0);
+       WebcitAddUrlHandler(HKEY("ajax_send_instant_message"), "", 0, ajax_send_instant_message, AJAX);
+       RegisterConditional(HKEY("COND:PAGE:WAITING"), 0, Conditional_PAGE_WAITING, CTX_NONE);
+}
+
+
+void 
+SessionDestroyModule_CHAT
+(wcsession *sess)
+{
+       if (sess->chat_sock > 0)
+               close(sess->chat_sock);
+}