-/*
- * $Id$
- *
- * Display a list of all users currently logged on to the Citadel server.
- */
-#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/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"
+CtxType CTX_WHO = CTX_NONE;
+
+typedef struct UserStateStruct {
+ StrBuf *UserName;
+ StrBuf *Room;
+ StrBuf *Host;
+ StrBuf *UserAgent;
+ StrBuf *RealRoom;
+ StrBuf *RealHost;
+ long LastActive;
+ int Session;
+ int Idle;
+ int IdleSince;
+ int SessionCount;
+} UserStateStruct;
+
+void DestroyUserStruct(void *vUser)
+{
+ UserStateStruct *User = (UserStateStruct*) vUser;
+ FreeStrBuf(&User->UserName);
+ FreeStrBuf(&User->Room);
+ FreeStrBuf(&User->Host);
+ FreeStrBuf(&User->RealRoom);
+ FreeStrBuf(&User->RealHost);
+ FreeStrBuf(&User->UserAgent);
+ free(User);
+}
+int CompareUserStruct(const void *VUser1, const void *VUser2)
+{
+ const UserStateStruct *User1 = (UserStateStruct*) GetSearchPayload(VUser1);
+ const UserStateStruct *User2 = (UserStateStruct*) GetSearchPayload(VUser2);
+
+ if (User1->Idle != User2->Idle)
+ return User1->Idle > User2->Idle;
+ return strcasecmp(ChrPtr(User1->UserName),
+ ChrPtr(User2->UserName));
+}
-/*
- * Display inner div of Wholist
- */
-void who_inner_div(void) {
- char buf[SIZ], user[SIZ], room[SIZ], host[SIZ],
- realroom[SIZ], realhost[SIZ];
- int sess;
- time_t last_activity;
- time_t now;
- int bg = 0;
-
- wprintf("<table border=\"0\" cellspacing=\"0\" width=\"100%%\" bgcolor=\"#FFFFFF\">"
- "<tr>\n");
- wprintf("<th colspan=\"3\"> </th>\n");
- wprintf("<th>User Name</th>\n");
- wprintf("<th>Room</th>");
- wprintf("<th>From host</th>\n</tr>\n");
- serv_puts("TIME");
- serv_getln(buf, sizeof buf);
- if (buf[0] == '2') {
- now = extract_long(&buf[4], 0);
- }
- else {
- now = time(NULL);
- }
+int GetWholistSection(HashList *List, time_t now, StrBuf *Buf, const char *FilterName, long FNLen)
+{
+ wcsession *WCC = WC;
+ UserStateStruct *User, *OldUser;
+ void *VOldUser;
+ size_t BufLen;
+ const char *Pos;
serv_puts("RWHO");
- serv_getln(buf, sizeof buf);
- if (buf[0] == '1') {
- while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
- sess = extract_int(buf, 0);
- extract_token(user, buf, 1, '|', sizeof user);
- extract_token(room, buf, 2, '|', sizeof room);
- extract_token(host, buf, 3, '|', sizeof host);
- extract_token(realroom, buf, 9, '|', sizeof realroom);
- extract_token(realhost, buf, 10, '|', sizeof realhost);
- last_activity = extract_long(buf, 5);
-
- bg = 1 - bg;
- wprintf("<tr bgcolor=\"#%s\">",
- (bg ? "DDDDDD" : "FFFFFF")
- );
-
-
- wprintf("<td>");
- if ((WC->is_aide) &&
- (sess != WC->ctdl_pid)) {
- wprintf(" <a href=\"/terminate_session?which_session=%d", sess);
- wprintf("\" onClick=\"return ConfirmKill();\" "
- ">[kill]</a>");
- }
- if (sess == WC->ctdl_pid) {
- wprintf(" <a href=\"/edit_me\" "
- ">[edit]</a>");
- }
- wprintf("</td>");
-
- /* (link to page this user) */
- wprintf("<td><a href=\"/display_page?recp=");
- urlescputs(user);
- wprintf("\">"
- "<img align=\"middle\" "
- "src=\"/static/citadelchat_24x.gif\" "
- "alt=\"(p)\""
- " border=\"0\" /></a> ");
- wprintf("</td>");
-
- /* (idle flag) */
- wprintf("<td>");
- if ((now - last_activity) > 900L) {
- wprintf(" "
- "<img align=\"middle\" "
- "src=\"/static/inactiveuser_24x.gif\" "
- "alt=\"[idle]\" border=\"0\" />");
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatus(Buf, NULL) == 1) {
+ while (BufLen = StrBuf_ServGetln(Buf),
+ ((BufLen >= 0) &&
+ ((BufLen != 3) || strcmp(ChrPtr(Buf), "000"))))
+ {
+ if (BufLen <= 0)
+ continue;
+ Pos = NULL;
+ User = (UserStateStruct*) malloc(sizeof(UserStateStruct));
+ User->Session = StrBufExtractNext_int(Buf, &Pos, '|');
+
+ User->UserName = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->UserName, Buf, &Pos, '|');
+
+ User->Room = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->Room, Buf, &Pos, '|');
+
+ User->Host = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->Host, Buf, &Pos, '|');
+
+ User->UserAgent = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->UserAgent, Buf, &Pos, '|');
+
+ User->LastActive = StrBufExtractNext_long(Buf, &Pos, '|');
+ StrBufSkip_NTokenS(Buf, &Pos, '|', 3);
+
+ User->RealRoom = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->RealRoom, Buf, &Pos, '|');
+
+ User->RealHost = NewStrBufPlain(NULL, BufLen);
+ StrBufExtract_NextToken(User->RealHost, Buf, &Pos, '|');
+
+ User->Idle = (now - User->LastActive) > 900L;
+ User->IdleSince = (now - User->LastActive) / 60;
+ User->SessionCount = 1;
+
+ if (FilterName == NULL) {
+ if (GetHash(List,
+ SKEY(User->UserName),
+ &VOldUser)) {
+ OldUser = VOldUser;
+ OldUser->SessionCount++;
+ if (!User->Idle) {
+ if (User->Session == WCC->ctdl_pid)
+ OldUser->Session = User->Session;
+
+ OldUser->Idle = User->Idle;
+ OldUser->LastActive = User->LastActive;
+ }
+ DestroyUserStruct(User);
+ }
+ else
+ Put(List,
+ SKEY(User->UserName),
+ User, DestroyUserStruct);
}
else {
- wprintf(" "
- "<img align=\"middle\" "
- "src=\"/static/activeuser_24x.gif\" "
- "alt=\"[active]\" border=\"0\" />");
+ if (strcmp(FilterName, ChrPtr(User->UserName)) == 0)
+ {
+ Put(List,
+ SKEY(User->UserName),
+ User, DestroyUserStruct);
+ }
+ else
+ {
+ DestroyUserStruct(User);
+ }
}
- wprintf("</td>\n<td>");
-
-
-
- /* username (link to user bio/photo page) */
- wprintf("<a href=\"/showuser?who=");
- urlescputs(user);
- wprintf("\">");
- escputs(user);
- wprintf("</a>");
-
- /* room */
- wprintf("</td>\n\t<td>");
- escputs(room);
- if (strlen(realroom) > 0) {
- wprintf("<br /><i>");
- escputs(realroom);
- wprintf("</i>");
- }
- wprintf("</td>\n\t<td>");
-
- /* hostname */
- escputs(host);
- if (strlen(realhost) > 0) {
- wprintf("<br /><i>");
- escputs(realhost);
- wprintf("</i>");
- }
- wprintf("</td>\n</tr>");
}
+ if (FilterName == NULL)
+ SortByPayload(List, CompareUserStruct);
+ return 1;
+ }
+ else {
+ return 0;
}
- wprintf("</table>");
-}
-
-
-/*
- * XML-encapsulated version of wholist inner html
- */
-void who_inner_html(void) {
- output_headers(0, 0, 0, 0, 0, 0, 0);
-
- wprintf("Content-type: text/xml;charset=UTF-8\r\n"
- "Server: %s\r\n"
- "Connection: close\r\n"
- "Pragma: no-cache\r\n"
- "Cache-Control: no-store\r\n",
- SERVER);
- begin_burst();
-
- wprintf("<?xml version=\"1.0\" encoding=\"UTF-8\"?>"
- "<ajax-response>\r\n"
- "<response type=\"element\" id=\"fix_scrollbar_bug\">\r\n"
- );
-
- who_inner_div();
-
- wprintf("</response>\r\n"
- "</ajax-response>\r\n"
- "\r\n"
- );
-
- wDumpContent(0);
}
-
/*
- * who is on?
+ * end session
*/
-void who(void)
-{
- /*
- output_headers(1, 1, 2, 0, 1, 0, 0); old refresh30 version
- */
- output_headers(1, 1, 2, 0, 0, 0, 0);
-
- wprintf("<script type=\"text/javascript\">\n"
- "function ConfirmKill() { \n"
- "return confirm('Do you really want to kill this session?');\n"
- "}\n"
- "</script>\n"
- );
-
- wprintf("<div id=\"banner\">\n");
- wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
- wprintf("<IMG SRC=\"/static/usermanag_48x.gif\" ALT=\" \" "
- "ALIGN=MIDDLE "
- ">");
- /* "onLoad=\"javascript:bodyOnLoad()\" " */
- wprintf("<SPAN CLASS=\"titlebar\"> Users currently on ");
- escputs(serv_info.serv_humannode);
- wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
- offer_start_page();
- wprintf("</TD></TR></TABLE>\n");
- wprintf("</div>\n");
-
- wprintf("<div id=\"content\">\n");
-
- wprintf("<div style=\"display:inline\" id=\"fix_scrollbar_bug\">");
- who_inner_div(); /* Actual data handled by another function */
- wprintf("</div>\n");
-
- wprintf("<div id=\"instructions\" align=center>"
- "Click on a name to read user info. Click on "
- "<IMG ALIGN=MIDDLE SRC=\"/static/citadelchat_16x.gif\" "
- "ALT=\"(p)\" BORDER=0>"
- " to send an instant message to that user.</div>\n");
-
- /* JavaScript to make the ajax refresh happen:
- * 1. Register the request 'getWholist' which calls the WebCit action 'who_inner_html'
- * 2. Register the 'fix_scrollbar_bug' div as one we're interested in ajaxifying
- * 3. setInterval to make the ajax refresh happen every 30 seconds. The random number
- * in the request is there to prevent IE from caching the XML even though it's been
- * told not to. Die, Microsoft, Die.
- */
- wprintf(
-" \n"
-" <script type=\"text/javascript\"> \n"
-" ajaxEngine.registerRequest('getWholist', 'who_inner_html');\n"
-" ajaxEngine.registerAjaxElement('fix_scrollbar_bug'); \n"
-" setInterval(\"ajaxEngine.sendRequest('getWholist', 'junk='+Math.random());\", 3000); \n"
-"</script>\n"
- );
-
-
- wDumpContent(1);
-}
-
-
void terminate_session(void)
{
char buf[SIZ];
serv_printf("TERM %s", bstr("which_session"));
serv_getln(buf, sizeof buf);
- who();
+ url_do_template();
}
{
char buf[SIZ];
- if (!strcasecmp(bstr("sc"), "Change room name")) {
+ output_headers(1, 0, 0, 0, 0, 0);
+ if (havebstr("change_room_name_button")) {
serv_printf("RCHG %s", bstr("fake_roomname"));
serv_getln(buf, sizeof buf);
- http_redirect("/who");
- } else if (!strcasecmp(bstr("sc"), "Change host name")) {
+ do_template("who");
+ } else if (havebstr("change_host_name_button")) {
serv_printf("HCHG %s", bstr("fake_hostname"));
serv_getln(buf, sizeof buf);
- http_redirect("/who");
- } else if (!strcasecmp(bstr("sc"), "Change user name")) {
+ do_template("who");
+ } else if (havebstr("change_user_name_button")) {
serv_printf("UCHG %s", bstr("fake_username"));
serv_getln(buf, sizeof buf);
- http_redirect("/who");
- } else if (!strcasecmp(bstr("sc"), "Cancel")) {
- http_redirect("/who");
+ do_template("who");
+ } else if (havebstr("cancel_button")) {
+ do_template("who");
} else {
+ do_template("who_edit");
+ }
+ end_burst();
+}
- output_headers(1, 1, 0, 0, 0, 0, 0);
-
- wprintf("<div id=\"banner\">\n");
- wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
- wprintf("<SPAN CLASS=\"titlebar\">");
- wprintf("Edit your session display");
- wprintf("</SPAN></TD></TR></TABLE>\n");
- wprintf("</div>\n<div id=\"content\">\n");
-
- wprintf("This screen allows you to change the way your\n");
- wprintf("session appears in the 'Who is online' listing.\n");
- wprintf("To turn off any 'fake' name you've previously\n");
- wprintf("set, simply click the appropriate 'change' button\n");
- wprintf("without typing anything in the corresponding box.\n");
- wprintf("<br />\n");
-
- wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
-
- wprintf("<TABLE border=0 width=100%%>\n");
-
- wprintf("<TR><TD><B>Room name:</B></TD>\n<TD>");
- wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
- wprintf("</TD>\n<TD ALIGN=center>");
- wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
- wprintf("</TD>\n</TR>\n");
-
- wprintf("<TR><TD><B>Host name:</B></TD><TD>");
- wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
- wprintf("</TD>\n<TD ALIGN=center>");
- wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
- wprintf("</TD>\n</TR>\n");
-
- if (WC->is_aide) {
- wprintf("<TR><TD><B>User name:</B></TD><TD>");
- wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
- wprintf("</TD>\n<TD ALIGN=center>");
- wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
- wprintf("</TD>\n</TR>\n");
- }
- wprintf("<TR><TD> </TD><TD> </TD><TD ALIGN=center>");
- wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
- wprintf("</TD></TR></TABLE>\n");
- wprintf("</FORM></CENTER>\n");
- wDumpContent(1);
+void _terminate_session(void) {
+ slrp_highest();
+ terminate_session();
+}
+
+HashList *GetWholistHash(StrBuf *Target, WCTemplputParams *TP)
+
+{
+ const char *ch = NULL;
+ int HashUniq = 1;
+ long len;
+ StrBuf *FilterNameStr = NULL;
+ StrBuf *Buf;
+ HashList *List;
+ time_t now;
+
+ Buf = NewStrBuf();
+
+ serv_puts("TIME");
+ StrBuf_ServGetln(Buf);
+ if (GetServerStatus(Buf, NULL) == 2) {
+ const char *pos = ChrPtr(Buf) + 4;
+ now = StrBufExtractNext_long(Buf, &pos, '|');
+ }
+ else {
+ now = time(NULL);
+ }
+ if (HaveTemplateTokenString(NULL, TP, 2, &ch, &len))
+ {
+ FilterNameStr = NewStrBuf();
+ GetTemplateTokenString(FilterNameStr, TP, 2, &ch, &len);
+ HashUniq = 0;
}
+
+ List = NewHash(HashUniq, NULL);
+ GetWholistSection(List, now, Buf, ch, len);
+ FreeStrBuf(&Buf);
+ FreeStrBuf(&FilterNameStr);
+ return List;
+}
+
+
+void DeleteWholistHash(HashList **KillMe)
+{
+ DeleteHash(KillMe);
+}
+
+void tmplput_who_username(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->UserName, 0);
+}
+
+void tmplput_who_UserAgent(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->UserAgent, 0);
+}
+
+void tmplput_who_room(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->Room, 0);
+}
+
+void tmplput_who_host(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->Host, 0);
+}
+
+void tmplput_who_realroom(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->RealRoom, 0);
+}
+int conditional_who_realroom(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ return StrLength(User->RealRoom) > 0;
+}
+
+void tmplput_who_realhost(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendTemplate(Target, TP, User->RealHost, 0);
+}
+int conditional_who_realhost(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ return StrLength(User->RealHost) > 0;
+}
+
+void tmplput_who_lastactive(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendPrintf(Target, "%d", User->LastActive);
+}
+
+void tmplput_who_idlesince(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendPrintf(Target, "%d", User->IdleSince);
+}
+
+void tmplput_who_session(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendPrintf(Target, "%d", User->Session);
+}
+
+int conditional_who_idle(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ return User->Idle;
+}
+
+int conditional_who_nsessions(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ return User->SessionCount;
+}
+
+void tmplput_who_nsessions(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ StrBufAppendPrintf(Target, "%d", User->SessionCount);
+}
+
+int conditional_who_isme(StrBuf *Target, WCTemplputParams *TP)
+{
+ UserStateStruct *User = (UserStateStruct*) CTX(CTX_WHO);
+ return (User->Session == WC->ctdl_pid);
+}
+
+void
+InitModule_WHO
+(void)
+{
+ RegisterCTX(CTX_WHO);
+
+ WebcitAddUrlHandler(HKEY("terminate_session"), "", 0, _terminate_session, 0);
+ WebcitAddUrlHandler(HKEY("edit_me"), "", 0, edit_me, 0);
+
+ RegisterIterator("WHOLIST", 1, NULL, GetWholistHash, NULL, DeleteWholistHash, CTX_WHO, CTX_NONE, IT_NOFLAG);
+
+ RegisterNamespace("WHO:NAME", 0, 1, tmplput_who_username, NULL, CTX_WHO);
+ RegisterNamespace("WHO:USERAGENT", 0, 1, tmplput_who_UserAgent, NULL, CTX_WHO);
+ RegisterNamespace("WHO:ROOM", 0, 1, tmplput_who_room, NULL, CTX_WHO);
+ RegisterNamespace("WHO:HOST", 0, 1, tmplput_who_host, NULL, CTX_WHO);
+ RegisterNamespace("WHO:REALROOM", 0, 1, tmplput_who_realroom, NULL, CTX_WHO);
+ RegisterNamespace("WHO:REALHOST", 0, 1, tmplput_who_realhost, NULL, CTX_WHO);
+ RegisterNamespace("WHO:LASTACTIVE", 0, 1, tmplput_who_lastactive, NULL, CTX_WHO);
+ RegisterNamespace("WHO:IDLESINCE", 0, 1, tmplput_who_idlesince, NULL, CTX_WHO);
+ RegisterNamespace("WHO:SESSION", 0, 1, tmplput_who_session, NULL, CTX_WHO);
+ RegisterNamespace("WHO:NSESSIONS", 0, 1, tmplput_who_nsessions, NULL, CTX_WHO);
+ RegisterNamespace("WHO:NSESSIONS", 0, 1, tmplput_who_nsessions, NULL, CTX_WHO);
+
+ RegisterConditional("WHO:IDLE", 1, conditional_who_idle, CTX_WHO);
+ RegisterConditional("WHO:NSESSIONS", 1, conditional_who_nsessions, CTX_WHO);
+ RegisterConditional("WHO:ISME", 1, conditional_who_isme, CTX_WHO);
+ RegisterConditional("WHO:REALROOM", 1, conditional_who_realroom, CTX_WHO);
+ RegisterConditional("WHO:REALHOST", 1, conditional_who_realhost, CTX_WHO);
}