/*
- * $Id$
+ * This module handles instant message related functions.
+ *
+ * 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.
*/
-/**
- * \defgroup PageFunc Functions which implement the chat and paging facilities.
- * \ingroup ClientPower
- */
-/*@{*/
+
#include "webcit.h"
-/**
- * \brief display the form for paging (x-messaging) another user
+/*
+ * display the form for paging (x-messaging) another user
*/
void display_page(void)
{
strcpy(recp, bstr("recp"));
- output_headers(1, 1, 2, 0, 0, 0);
- wprintf("<div id=\"banner\">\n"
- "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
- "<SPAN CLASS=\"titlebar\">");
- wprintf(_("Send instant message"));
- wprintf("</SPAN>"
- "</TD></TR></TABLE>\n"
- "</div>\n<div id=\"content\">\n"
- );
-
- wprintf("<div class=\"fix_scrollbar_bug\">"
- "<table border=0 width=100%% bgcolor=\"#ffffff\"><tr><td>\n");
-
- wprintf(_("Send an instant message to: "));
- escputs(recp);
- wprintf("<br>\n");
+ 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");
- wprintf("<FORM METHOD=\"POST\" action=\"page_user\">\n");
+ wc_printf("<div id=\"content\" class=\"service\">\n");
- wprintf("<TABLE border=0 width=100%%><TR><TD>\n");
+ wc_printf("<table class=\"paging_background\"><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:"));
- wprintf("<br />");
+ wc_printf("<INPUT TYPE=\"hidden\" NAME=\"recp\" VALUE=\"");
+ escputs(recp);
+ wc_printf("\">\n");
- wprintf("<TEXTAREA NAME=\"msgtext\" wrap=soft ROWS=5 COLS=40 "
+ wc_printf(_("Enter message text:"));
+ wc_printf("<br>");
+
+ 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=\"send_button\" VALUE=\"%s\">", _("Send message"));
- wprintf("<br /><a href=\"javascript:window.close();\"%s</A>\n", _("Cancel"));
+ 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");
- wprintf("</td></tr></table></div>\n");
+ wc_printf("</FORM></CENTER>\n");
+ wc_printf("</td></tr></table>\n");
wDumpContent(1);
}
-/**
- * \brief page another user
+/*
+ * page another user
*/
void page_user(void)
{
- char recp[SIZ];
- char buf[SIZ];
- char closewin[SIZ];
-
- output_headers(1, 1, 2, 0, 0, 0);
- wprintf("<div id=\"banner\">\n"
- "<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>"
- "<SPAN CLASS=\"titlebar\">");
- wprintf(_("Add or edit an event"));
- wprintf("</SPAN>"
- "</TD></TR></TABLE>\n"
- "</div>\n<div id=\"content\">\n"
- );
-
- strcpy(recp, bstr("recp"));
- strcpy(closewin, bstr("closewin"));
+ char recp[256];
+ StrBuf *Line;
- if (strlen(bstr("send_button")) == 0) {
- wprintf("<EM>");
- wprintf(_("Message was not sent."));
- wprintf("</EM><br />\n");
+ safestrncpy(recp, bstr("recp"), sizeof recp);
+
+ if (!havebstr("send_button")) {
+ AppendImportantMessage(_("Message was not sent."), -1);
} else {
+ Line = NewStrBuf();
serv_printf("SEXP %s|-", recp);
- serv_getln(buf, sizeof 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>");
- wprintf(_("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();\">");
- wprintf(_("[ close window ]"));
- wprintf("</A></CENTER>\n");
- }
- wDumpContent(1);
+ url_do_template();
}
-/**
- * \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_getln(buf, sizeof buf);
- if (buf[0] != '2') {
- smart_goto("_BASEROOM_");
- return;
- }
-
- /**
- * 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) {
- close(WC->chat_sock);
- WC->chat_sock = (-1);
- }
-
- /**
- * 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.)
- */
- begin_ajax_response();
- do_template("chatframeset");
- end_ajax_response();
- return;
-}
-
-
-/**
- * \brief display page popup
+/*
+ * 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];
/** 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.")
- );
-
/** First, do the check as part of our page load. */
serv_puts("NOOP");
- serv_getln(buf, sizeof buf);
- if (buf[3] == '*') {
+ 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>"
- );
- }
- }
-
- /** 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: Math.random(), "
- " onSuccess: HandleSslp } ); "
- " } "
- " new PeriodicalExecuter(CheckPager, 30); "
- "</script> "
- );
-}
-
-
-
-/**
- * \brief 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) {
-
- 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);
+ return 1;
}
-
- 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_getln(buf, sizeof buf);
- if (buf[0] == '2') {
- serv_printf("USER %s", WC->wc_username);
- serv_getln(buf, sizeof buf);
- if (buf[0] == '3') {
- serv_printf("PASS %s", WC->wc_password);
- serv_getln(buf, sizeof buf);
- if (buf[0] == '2') {
- serv_printf("GOTO %s", WC->wc_roomname);
- serv_getln(buf, sizeof buf);
- if (buf[0] == '2') {
- serv_puts("CHAT");
- serv_getln(buf, sizeof buf);
- if (buf[0] == '8') {
- good_chatmode = 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];
-/**
- * \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.
- */
-void chat_recv(void) {
- int i;
- struct pollfd pf;
- int got_data = 0;
- int end_chat_now = 0;
- char buf[SIZ];
- char cl_user[SIZ];
- char cl_text[SIZ];
- char *output_data = NULL;
-
- output_headers(0, 0, 0, 0, 0, 0);
-
- wprintf("Content-type: text/html; charset=utf-8\n");
- wprintf("\n");
- wprintf("<html>\n"
- "<head>\n"
- "<meta http-equiv=\"refresh\" content=\"3\" />\n"
- "</head>\n"
-
- "<body bgcolor=\"#FFFFFF\">\n"
- );
-
- if (setup_chat_socket() != 0) {
- 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("");
- 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;
-
- /** 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_getln(buf, sizeof buf);
-
- if (!strcmp(buf, "000")) {
- strcpy(buf, ":|");
- strcat(buf, _("Now exiting chat mode."));
- end_chat_now = 1;
- }
-
- /** Unswap the sockets. */
- i = WC->serv_sock;
- WC->serv_sock = WC->chat_sock;
- WC->chat_sock = i;
-
- /** Append our output data */
- output_data = realloc(output_data, strlen(output_data) + strlen(buf) + 4);
- strcat(output_data, buf);
- strcat(output_data, "\n");
- }
-
- } while ( (got_data) && (!end_chat_now) );
-
- if (end_chat_now) {
- close(WC->chat_sock);
- WC->chat_sock = (-1);
- wprintf("<img src=\"static/blank.gif\" onLoad=\"parent.window.close();\">\n");
- }
-
- if (strlen(output_data) > 0) {
+ safestrncpy(recp, bstr("recp"), sizeof recp);
- if (output_data[strlen(output_data)-1] == '\n') {
- output_data[strlen(output_data)-1] = 0;
- }
-
- /** 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', 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")) {
-
- wprintf("parent.chat_transcript.document.write('");
-
- if (strcasecmp(cl_user, WC->last_chat_user)) {
- wprintf("<TABLE border=0 WIDTH=100%% "
- "CELLSPACING=1 CELLPADDING=0 "
- "BGCOLOR="#FFFFFF">"
- "<TR><TD></TR></TD></TABLE>"
- );
-
- }
-
- wprintf("<TABLE border=0 WIDTH=100%% "
- "CELLSPACING=0 CELLPADDING=0 "
- "BGCOLOR="#EEEEEE">");
-
- wprintf("<TR><TD>");
-
- if (!strcasecmp(cl_user, ":")) {
- wprintf("<I>");
- }
-
- if (strcasecmp(cl_user, WC->last_chat_user)) {
- wprintf("<B>");
-
- if (!strcasecmp(cl_user, WC->wc_fullname)) {
- wprintf("<FONT COLOR="#FF0000">");
- }
- else {
- wprintf("<FONT COLOR="#0000FF">");
- }
- jsescputs(cl_user);
-
- wprintf("</FONT>: </B>");
- }
- else {
- wprintf(" ");
- }
- jsescputs(cl_text);
- if (!strcasecmp(cl_user, ":")) {
- wprintf("</I>");
- }
-
- wprintf("</TD></TR></TABLE>");
- wprintf("'); \n");
-
- strcpy(WC->last_chat_user, cl_user);
- }
- }
+ serv_printf("SEXP %s|-", recp);
+ serv_getln(buf, sizeof buf);
- wprintf("parent.chat_transcript.scrollTo(999999,999999);\">\n");
+ if (buf[0] == '4') {
+ text_to_server(bstr("msg"));
+ serv_puts("000");
}
- free(output_data);
-
- wprintf("</BODY></HTML>\n");
- wDumpContent(0);
+ escputs(buf); /* doesn't really matter what we return - the client ignores it */
}
-/**
- * \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);
- wprintf("Content-type: text/html; charset=utf-8\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 (strlen(bstr("help_button")) > 0) {
- strcpy(send_this, "/help");
- }
-
- if (strlen(bstr("list_button")) > 0) {
- strcpy(send_this, "/who");
- }
-
- if (strlen(bstr("exit_button")) > 0) {
- strcpy(send_this, "/quit");
- }
-
- 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;
+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("COND:PAGE:WAITING", 0, Conditional_PAGE_WAITING, CTX_NONE);
+}
- 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);
- }
- }
- /** 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=\"text\" SIZE=\"80\" MAXLENGTH=\"%d\" "
- "NAME=\"send_this\">\n", SIZ-10);
- wprintf("<br />");
- 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");
- wDumpContent(0);
+void
+SessionDestroyModule_PAGING
+(wcsession *sess)
+{
+ /* nothing here anymore */
}
-
-/*@}*/