removed a bunch of blank comment lines
[citadel.git] / webcit / paging.c
index fc573cd62066d8f7c398c06668244eb35844af12..38b8b541d482befa0408e5231fb5bd773f966856 100644 (file)
@@ -1,32 +1,19 @@
 /*
- * $Id$
+ * This module handles instant message related functions.
  *
- * Functions which implement the chat and paging facilities.
+ * Copyright (c) 1996-2012 by the citadel.org team
+ *
+ * This program is open source software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License, version 3.
+ *
+ * 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.
  */
 
-#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,35 +23,44 @@ void display_page(void)
 
        strcpy(recp, bstr("recp"));
 
-       output_headers(3);
+        output_headers(1, 1, 1, 0, 0, 0);
+        wc_printf("<div id=\"room_banner_override\">\n");
+        wc_printf("<h1>");
+       wc_printf(_("Send instant message"));
+       wc_printf("</h1>");
+        wc_printf("</div>\n");
 
-       svprintf("BOXTITLE", WCS_STRING, "Page: %s", recp);
-       do_template("beginbox");
+       wc_printf("<div id=\"content\" class=\"service\">\n");
 
-       wprintf("<FORM METHOD=\"POST\" ACTION=\"/page_user\">\n");
+       wc_printf("<table class=\"paging_background\"><tr><td>\n");
 
-       wprintf("<TABLE border=0 width=100%%><TR><TD>\n");
-
-       wprintf("<INPUT TYPE=\"hidden\" NAME=\"recp\" VALUE=\"");
+       wc_printf(_("Send an instant message to: "));
        escputs(recp);
-       wprintf("\">\n");
+       wc_printf("<br>\n");
+
+       wc_printf("<FORM METHOD=\"POST\" action=\"page_user\">\n");
+       wc_printf("<input type=\"hidden\" name=\"nonce\" value=\"%d\">\n", WC->nonce);
+       wc_printf("<input type=\"hidden\" name=\"template\" value=\"who\">\n");
 
-       wprintf("<INPUT TYPE=\"hidden\" NAME=\"closewin\" VALUE=\"");
-       escputs(bstr("closewin"));
-       wprintf("\">\n");
+       wc_printf("<TABLE border=0 width=100%%><TR><TD>\n");
 
-       wprintf("Enter message text:<BR>");
+       wc_printf("<INPUT TYPE=\"hidden\" NAME=\"recp\" VALUE=\"");
+       escputs(recp);
+       wc_printf("\">\n");
+
+       wc_printf(_("Enter message text:"));
+       wc_printf("<br>");
 
-       wprintf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=5 COLS=40 "
+       wc_printf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=5 COLS=40 "
                "WIDTH=40></TEXTAREA>\n");
 
-       wprintf("</TD></TR></TABLE><BR>\n");
+       wc_printf("</TD></TR></TABLE><br>\n");
 
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Send message\">");
-       wprintf("<BR><A HREF=\"javascript:window.close();\"Cancel</A>\n");
+       wc_printf("<INPUT TYPE=\"submit\" NAME=\"send_button\" VALUE=\"%s\">", _("Send message"));
+       wc_printf("<br><a href=\"javascript:window.close();\"%s</A>\n", _("Cancel"));
 
-       wprintf("</FORM></CENTER>\n");
-       do_template("endbox");
+       wc_printf("</FORM></CENTER>\n");
+       wc_printf("</td></tr></table>\n");
        wDumpContent(1);
 }
 
@@ -73,330 +69,88 @@ void display_page(void)
  */
 void page_user(void)
 {
-       char recp[SIZ];
-       char sc[SIZ];
-       char buf[SIZ];
-       char closewin[SIZ];
+       char recp[256];
+       StrBuf *Line;
 
-       output_headers(3);
+       safestrncpy(recp, bstr("recp"), sizeof recp);
 
-       strcpy(recp, bstr("recp"));
-       strcpy(sc, bstr("sc"));
-       strcpy(closewin, bstr("closewin"));
-
-       if (strcmp(sc, "Send message")) {
-               wprintf("<EM>Message was not sent.</EM><BR>\n");
+       if (!havebstr("send_button")) {
+               AppendImportantMessage(_("Message was not sent."), -1);
        } else {
+               Line = NewStrBuf();
                serv_printf("SEXP %s|-", recp);
-               serv_gets(buf);
-
-               if (buf[0] == '4') {
-                       text_to_server(bstr("msgtext"), 0);
+               StrBuf_ServGetln(Line);
+               if (GetServerStatusMsg(Line, NULL, 0, 0) == 4) {
+                       char buf[256];
+                       text_to_server(bstr("msgtext"));
                        serv_puts("000");
-                       wprintf("<EM>Message has been sent to ");
-                       escputs(recp);
-                       wprintf(".</EM><BR>\n");
-               }
-               else {
-                       wprintf("<EM>%s</EM><BR>\n", &buf[4]);
+                       stresc(buf, 256, recp, 0, 0);
+                       AppendImportantMessage(buf, -1);
+                       AppendImportantMessage(_("Message has been sent to "), -1);
                }
        }
-       
-       if (!strcasecmp(closewin, "yes")) {
-               wprintf("<CENTER><A HREF=\"javascript:window.close();\">"
-                       "[ close window ]</A></CENTER>\n");
-       }
 
-       wDumpContent(1);
+       url_do_template();
 }
 
 
 
 /*
- * multiuser chat
- */
-void do_chat(void)
-{
-
-       output_headers(1);
-
-       wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#000077\"><TR><TD>"
-               "<SPAN CLASS=\"titlebar\">Real-time chat</SPAN>\n"
-               "</TD></TR></TABLE>\n"
-               "<IFRAME WIDTH=100%% HEIGHT=200 SRC=\"/chat_recv\" "
-               "NAME=\"chat_recv\">\n"
-               "<!-- Alternate content for non-supporting browsers -->\n"
-               "If you are seeing this message, your browser does not contain\n"
-               "the IFRAME support required for the chat window.  Please upgrade\n"
-               "to a supported browser, such as\n"
-               "<A HREF=\"http://www.mozilla.org\">Mozilla</A>.\n"
-               "</IFRAME>\n"
-               "<HR width=100%%>\n"
-               "<IFRAME WIDTH=100%% HEIGHT=50 SRC=\"/chat_send\" "
-               "NAME=\"chat_send\">\n"
-               "</IFRAME>\n"
-       );
-       wDumpContent(1);
-}
-
-
-/*
- *
+ * 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];
-
-       /* suppress express message check, do headers but no frames */
-       output_headers(0x08 | 0x03);
-
-       while (serv_puts("GEXP"), serv_gets(buf), buf[0]=='1') {
-
-               extract(pagefrom, &buf[4], 3);
-
-               wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#007700\"><TR><TD>");
-               wprintf("<SPAN CLASS=\"titlebar\">Instant message from ");
-               escputs(pagefrom);
-               wprintf("</SPAN></TD></TR></TABLE>\n");
-               
-               fmout(NULL, "LEFT");
-       }
-
-       wprintf("<CENTER>");
-       wprintf("<A HREF=\"/display_page&closewin=yes&recp=");
-       urlescputs(pagefrom);
-        wprintf("\">[ reply ]</A>&nbsp;&nbsp;&nbsp;\n");
-
-       wprintf("<A HREF=\"javascript:window.close();\">"
-               "[ close window ]</A></B>\n"
-               "</CENTER>");
-
-       wDumpContent(1);
-       WC->HaveExpressMessages = 0;
-}
-
-
-
-/*
- * Support function for chat -- make sure the chat socket is connected
- * and in chat mode.
- */
-int setup_chat_socket(void) {
-       char buf[SIZ];
-       int i;
-       int good_chatmode = 0;
-
-       if (WC->chat_sock < 0) {
-
-               for (i=0; i<CHATLINES; ++i) {
-                       strcpy(WC->chatlines[i], "");
-               }
-
-               if (!strcasecmp(ctdlhost, "uds")) {
-                       /* unix domain socket */
-                       sprintf(buf, "%s/citadel.socket", ctdlport);
-                       WC->chat_sock = uds_connectsock(buf);
-               }
-               else {
-                       /* tcp socket */
-                       WC->chat_sock = tcp_connectsock(ctdlhost, ctdlport);
-               }
-
-               if (WC->chat_sock < 0) {
-                       return(errno);
-               }
 
-               /* 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);
-               if (buf[0] == '2') {
-                       serv_printf("USER %s", WC->wc_username);
-                       serv_gets(buf);
-                       if (buf[0] == '3') {
-                               serv_printf("PASS %s", WC->wc_password);
-                               serv_gets(buf);
-                               if (buf[0] == '2') {
-                                       serv_printf("GOTO %s", WC->wc_roomname);
-                                       serv_gets(buf);
-                                       if (buf[0] == '2') {
-                                               serv_puts("CHAT");
-                                               serv_gets(buf);
-                                               if (buf[0] == '8') {
-                                                       good_chatmode = 1;
-                                               }
-                                       }
-                               }
-                       }
+       /** 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;
                }
-
-               /* Unswap the sockets. */
-               i = WC->serv_sock;
-               WC->serv_sock = WC->chat_sock;
-               WC->chat_sock = i;
-
-               if (!good_chatmode) close(WC->serv_sock);
-
        }
-       return(0);
+       return 0;
+       /* Then schedule it to happen again a minute from now if the user is idle. */
 }
 
 
+void ajax_send_instant_message(void) {
+       char recp[256];
+       char buf[256];
 
-/*
- * receiving side of the chat window
- */
-void chat_recv(void) {
-       int i;
-       char name[SIZ];
-       char text[SIZ];
-       struct pollfd pf;
-       int got_data = 0;
-       int end_chat_now = 0;
-
-       output_headers(0);
-
-       wprintf("Content-type: text/html\n");
-       wprintf("\n");
-       wprintf("<HTML>\n"
-               "<HEAD>\n"
-               "<META HTTP-EQUIV=\"refresh\" CONTENT=\"3\">\n"
-               "</HEAD>\n"
-               "<BODY BGCOLOR=\"#FFFFFF\">"
-       );
-
-       if (setup_chat_socket() != 0) {
-               wprintf("Error setting up chat socket</BODY></HTML>\n");
-               wDumpContent(0);
-               return;
-       }
+       safestrncpy(recp, bstr("recp"), sizeof recp);
 
-       /*
-        * See if there is any chat data waiting.
-        */
-       do {
-               got_data = 0;
-               pf.fd = WC->chat_sock;
-               pf.events = POLLIN;
-               pf.revents = 0;
-               if (poll(&pf, 1, 1) > 0) if (pf.revents & POLLIN) {
-                       ++got_data;
-
-                       for (i=0; i<CHATLINES-1; ++i) {
-                               strcpy(WC->chatlines[i], WC->chatlines[i+1]);
-                       }
-       
-                       /* 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(WC->chatlines[CHATLINES-1]);
-                       if (!strcmp(WC->chatlines[CHATLINES-1], "000")) {
-                               end_chat_now = 1;
-                               strcpy(WC->chatlines[CHATLINES-1], ":|exiting chat mode");
-                       }
-                       
-                       /* Unswap the sockets. */
-                       i = WC->serv_sock;
-                       WC->serv_sock = WC->chat_sock;
-                       WC->chat_sock = i;
-               }
-       } while ( (got_data) && (!end_chat_now) );
-
-       /*
-        * Display appropriately.
-        */
-       for (i=0; i<CHATLINES; ++i) {
-               if (strlen(WC->chatlines[i]) > 0) {
-                       extract(name, WC->chatlines[i], 0);
-                       extract(text, WC->chatlines[i], 1);
-                       if (!strcasecmp(name, WC->wc_username)) {
-                               wprintf("<FONT COLOR=\"#004400\">");
-                       }
-                       else if (!strcmp(name, ":")) {
-                               wprintf("<FONT COLOR=\"#440000\">");
-                       }
-                       else {
-                               wprintf("<FONT COLOR=\"#000044\">");
-                       }
-                       escputs(name);
-                       wprintf(": </FONT>");
-                       escputs(text);
-                       wprintf("<BR>\n");
-               }
-       }
+       serv_printf("SEXP %s|-", recp);
+       serv_getln(buf, sizeof buf);
 
-       if (end_chat_now) {
-               close(WC->chat_sock);
-               WC->chat_sock = (-1);
-               wprintf("<IMG SRC=\"/static/blank.gif\" onLoad=\"top.location.replace('/do_welcome');\">\n");
+       if (buf[0] == '4') {
+               text_to_server(bstr("msg"));
+               serv_puts("000");
        }
 
-       wprintf("</BODY></HTML>\n");
-       wDumpContent(0);
+       escputs(buf);   /* doesn't really matter what we return - the client ignores it */
 }
 
 
-/*
- * sending side of the chat window
- */
-void chat_send(void) {
-       int i;
-       char send_this[SIZ];
-
-       output_headers(0);
-       wprintf("Content-type: text/html\n");
-       wprintf("\n");
-       wprintf("<HTML>"
-               "<BODY onLoad=\"document.chatsendform.send_this.focus();\" >"
-       );
-
-       if (bstr("send_this") != NULL) {
-               strcpy(send_this, bstr("send_this"));
-       }
-       else {
-               strcpy(send_this, "");
-       }
-
-       if (bstr("sendbutton") != NULL) {
-
-               if (!strcasecmp(bstr("sendbutton"), "Exit")) {
-                       strcpy(send_this, "/quit");
-               }
-
-               if (setup_chat_socket() != 0) {
-                       wprintf("Error setting up chat socket</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;
-
-               serv_puts(send_this);
-
-               /* Unswap the sockets. */
-               i = WC->serv_sock;
-               WC->serv_sock = WC->chat_sock;
-               WC->chat_sock = i;
-
-       }
-
-       wprintf("Send: ");
-       wprintf("<FORM METHOD=\"POST\" ACTION=\"/chat_send\" NAME=\"chatsendform\">\n");
-       wprintf("<INPUT TYPE=\"text\" SIZE=\"80\" MAXLENGTH=\"80\" NAME=\"send_this\">\n");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"Send\">\n");
-       wprintf("<INPUT TYPE=\"submit\" NAME=\"sendbutton\" VALUE=\"Exit\">\n");
-       wprintf("</FORM>\n");
-
-       wprintf("</BODY></HTML>\n");
-       wDumpContent(0);
+void 
+InitModule_PAGING
+(void)
+{
+       WebcitAddUrlHandler(HKEY("display_page"), "", 0, display_page, 0);
+       WebcitAddUrlHandler(HKEY("page_user"), "", 0, page_user, 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_PAGING
+(wcsession *sess)
+{
+       /* nothing here anymore */
+}