/*
* $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
*/
strcpy(recp, bstr("recp"));
- output_headers(1, 1, 0, 0, 0, 0, 0);
+ 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");
- svprintf("BOXTITLE", WCS_STRING, "Page: %s", recp);
- do_template("beginbox");
+ wprintf("<div class=\"fix_scrollbar_bug\">"
+ "<table class=\"paging_background\"><tr><td>\n");
- wprintf("<FORM METHOD=\"POST\" ACTION=\"/page_user\">\n");
+ wprintf(_("Send an instant message to: "));
+ escputs(recp);
+ wprintf("<br>\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");
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");
- do_template("endbox");
+ 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, 0, 0, 0, 0, 0);
+ char recp[256];
+ char buf[256];
- strcpy(recp, bstr("recp"));
- strcpy(sc, bstr("sc"));
- strcpy(closewin, bstr("closewin"));
+ 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) {
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 len;
char buf[SIZ];
- char pagefrom[SIZ];
- /* suppress express message check, do headers but no banner */
- output_headers(1, 1, 0, 0, 0, 1, 0);
-
- while (serv_puts("GEXP"), serv_gets(buf), buf[0]=='1') {
-
- extract(pagefrom, &buf[4], 3);
+ /** JavaScript function to alert the user that popups are probably blocked */
+ wprintf("<script type=\"text/javascript\"> "
+ "function PopUpFailed() { "
+ " alert(\"%s\"); "
+ "} "
+ "</script>\n",
+ _("You have one or more instant messages waiting, but the Citadel Instant Messenger "
+ "window failed to open. This is probably because you have a popup blocker "
+ "installed. Please configure your popup blocker to allow popups from this site "
+ "if you wish to receive instant messages.")
+ );
- wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
- wprintf("<SPAN CLASS=\"titlebar\">Instant message from ");
- escputs(pagefrom);
- wprintf("</SPAN></TD></TR></TABLE>\n");
-
- fmout(NULL, "LEFT");
+ /** 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) {
+ wprintf("<script type=\"text/javascript\">"
+ " var oWin = window.open('static/instant_messenger.html', "
+ " 'CTDL_MESSENGER', 'width=700,height=400'); "
+ " if (oWin==null || typeof(oWin)==\"undefined\") { "
+ " PopUpFailed(); "
+ " } "
+ "</script>"
+ );
+ }
}
- wprintf("<CENTER>");
- wprintf("<A HREF=\"/display_page&closewin=yes&recp=");
- urlescputs(pagefrom);
- wprintf("\">[ reply ]</A> \n");
-
- wprintf("<A HREF=\"javascript:window.close();\">"
- "[ close window ]</A></B>\n"
- "</CENTER>");
-
- wDumpContent(1);
- WC->HaveExpressMessages = 0;
+ /** Then schedule it to happen again a minute from now if the user is idle. */
+ wprintf("<script type=\"text/javascript\"> "
+ " function HandleSslp(sslg_xmlresponse) { "
+ " sslg_response = sslg_xmlresponse.responseText.substr(0, 1); "
+ " if (sslg_response == 'Y') { "
+ " var oWin = window.open('static/instant_messenger.html', 'CTDL_MESSENGER', "
+ " 'width=700,height=400'); "
+ " if (oWin==null || typeof(oWin)==\"undefined\") { "
+ " PopUpFailed(); "
+ " } "
+ " } "
+ " } "
+ " function CheckPager() { "
+ " new Ajax.Request('sslg', { method: 'get', parameters: CtdlRandomString(), "
+ " onSuccess: HandleSslp } ); "
+ " } "
+ " new PeriodicalExecuter(CheckPager, 30); "
+ "</script> "
+ );
}
-/*
- * 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) {
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);
}
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;
}
}
}
- /* Unswap the sockets. */
+ /** Unswap the sockets. */
i = WC->serv_sock;
WC->serv_sock = WC->chat_sock;
WC->chat_sock = i;
-/*
- * 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.
*/
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"
);
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("");
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");
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")) {
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="#FF0000">");
}
else {
}
-/*
- * 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");
}
+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"), display_page, 0);
+ WebcitAddUrlHandler(HKEY("page_user"), page_user, 0);
+ WebcitAddUrlHandler(HKEY("chat"), do_chat, 0);
+ WebcitAddUrlHandler(HKEY("chat_recv"), chat_recv, 0);
+ WebcitAddUrlHandler(HKEY("chat_send"), chat_send, 0);
+ WebcitAddUrlHandler(HKEY("ajax_send_instant_message"), ajax_send_instant_message, AJAX);
+}
+
+
+void
+SessionDestroyModule_CHAT
+(wcsession *sess)
+{
+ if (sess->chat_sock > 0)
+ close(sess->chat_sock);
+}