* we have now several bstrs:
[citadel.git] / webcit / who.c
index 512d68b55df8dfe10b7a599dbf3d20d2636f8c57..42be1583890aedd68d09c3de6343c2752c0adfb4 100644 (file)
 /*
  * $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>
+/**
+ * \defgroup DislpayWho Display a list of all users currently logged on to the Citadel server.
+ * \ingroup WebcitDisplayItems
+ */
+/*@{*/
 #include "webcit.h"
 
 
+typedef struct UserStateStruct {
+       char *UserName;
+       long UserNameLen;
+       char *Room;
+       long RoomLen;
+       char *Host;
+       long HostLen;
+       char *RealRoom;
+       long RealRoomLen;
+       char *RealHost;
+       long RealHostLen;
+       long LastActive;
+       int Session;
+       int Idle;
+       int SessionCount;
+} UserStateStruct;
+
+void DestroyUserStruct(void *vUser)
+{
+       UserStateStruct *User = (UserStateStruct*) vUser;
+       free(User->UserName);
+       free(User->Room);
+       free(User->Host);
+       free(User->RealRoom);
+       free(User->RealHost);
+       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(User1->UserName, User2->UserName);
+}
 
 
-
-/*
- * who is on?
- */
-void whobbs(void)
+int GetWholistSection(HashList *List, time_t now)
 {
-       char buf[SIZ], sess, user[SIZ], room[SIZ], host[SIZ],
+       struct wcsession *WCC = WC;     /* This is done to make it run faster; WC is a function */
+       UserStateStruct *User, *OldUser;
+       void *VOldUser;
+       char buf[SIZ], user[SIZ], room[SIZ], host[SIZ],
                realroom[SIZ], realhost[SIZ];
-       time_t last_activity;
-       time_t now;
-       int bg = 0;
-
-       output_headers(1, 1, 2, 0, 1, 0, 0);
+       size_t BufLen;
 
-       wprintf("<script type=\"text/javascript\">\n"
-               "function ConfirmKill() { \n"
-               "return confirm('Do you really want to kill this session?');\n"
-               "}\n"
-               "</script>\n"
-       );
+       serv_puts("RWHO");
+       serv_getln(buf, sizeof buf);
+       if (buf[0] == '1') {
+               while (BufLen = serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
+                       if (BufLen <= 0)
+                           continue;
+                       User = (UserStateStruct*) malloc(sizeof(UserStateStruct));
+                       User->Session = extract_int(buf, 0);
+
+                       User->UserNameLen = extract_token(user, buf, 1, '|', sizeof user);
+                       User->UserName = malloc(User->UserNameLen + 1);
+                       memcpy(User->UserName, user, User->UserNameLen + 1);
+
+                       User->RoomLen = extract_token(room, buf, 2, '|', sizeof room);
+                       User->Room = malloc(User->RoomLen + 1);
+                       memcpy(User->Room, room, User->RoomLen + 1);
+
+                       User->HostLen = extract_token(host, buf, 3, '|', sizeof host);
+                       User->Host = malloc(User->HostLen + 1);
+                       memcpy(User->Host, host, User->HostLen + 1);
+
+                       User->RealRoomLen = extract_token(realroom, buf, 9, '|', sizeof realroom);
+                       User->RealRoom = malloc(User->RealRoomLen + 1);
+                       memcpy(User->RealRoom, realroom, User->RealRoomLen + 1);
+
+                       User->RealHostLen = extract_token(realhost, buf, 10, '|', sizeof realhost);
+                       User->RealHost = malloc(User->RealHostLen + 1);
+                       memcpy(User->RealHost, realhost, User->RealHostLen + 1);
+                       
+                       User->LastActive = extract_long(buf, 5);
+                       User->Idle = (now - User->LastActive) > 900L;
+                       User->SessionCount = 1;
+
+                       if (GetHash(List, User->UserName, User->UserNameLen, &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, User->UserName, User->UserNameLen, User, DestroyUserStruct);
+               }
+               SortByPayload(List, CompareUserStruct);
+               return 1;
+       }
+       else
+               return 0;
+}
 
-       wprintf("<div id=\"banner\">\n");
-       wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
-       wprintf("<IMG SRC=\"/static/users-icon.gif\" ALT=\" \" ALIGN=MIDDLE>");
-       wprintf("<SPAN CLASS=\"titlebar\">&nbsp;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"
-               "<div id=\"content\">\n");
+/**
+ * \brief Display inner div of Wholist
+ */
+void who_inner_div(void) {
+       UserStateStruct *User;
+       void *VUser;
+       char buf[SIZ];
+       struct wcsession *WCC = WC;     /* This is done to make it run faster; WC is a function */
+       HashList *List;
+       HashPos  *it;
+       char *UserName;
+       long len;
+       time_t now;
+       int bg = 0;
 
-       wprintf("<div style=\"margin-right:1px\">"
-               "<table border=0 cellspacing=0 width=100%% bgcolor=\"#FFFFFF\">"
+       wprintf("<table class=\"altern\">"
                "<tr>\n");
-       wprintf("<TH COLSPAN=4>Session ID</TH>\n");
-       wprintf("<TH>User Name</TH>\n");
-       wprintf("<TH>Room</TH>");
-       wprintf("<TH>From host</TH>\n</TR>\n");
+       wprintf("<th class=\"edit_col\"> </th>\n");
+       wprintf("<th colspan=\"2\"> </th>\n");
+       wprintf("<th>%s</th>\n", _("User name"));
+       wprintf("<th>%s</th>", _("Room"));
+       wprintf("<th class=\"host_col\">%s</th>\n</tr>\n", _("From host"));
 
        serv_puts("TIME");
-       serv_gets(buf);
+       serv_getln(buf, sizeof buf);
+
        if (buf[0] == '2') {
                now = extract_long(&buf[4], 0);
        }
@@ -78,174 +145,301 @@ void whobbs(void)
                now = time(NULL);
        }
 
-       serv_puts("RWHO");
-       serv_gets(buf);
-       if (buf[0] == '1') {
-               while (serv_gets(buf), strcmp(buf, "000")) {
-                       sess = extract_int(buf, 0);
-                       extract(user, buf, 1);
-                       extract(room, buf, 2);
-                       extract(host, buf, 3);
-                       extract(realroom, buf, 9);
-                       extract(realhost, buf, 10);
-                       last_activity = extract_long(buf, 5);
+       List = NewHash();
 
+       if (GetWholistSection(List, now)) {
+               it = GetNewHashPos();
+               while (GetNextHashPos(List, it, &len, &UserName, &VUser)) {
+                       User = VUser;
                        bg = 1 - bg;
-                       wprintf("<TR BGCOLOR=\"#%s\">",
-                               (bg ? "DDDDDD" : "FFFFFF")
+                       wprintf("<tr class=\"%s\">",
+                               (bg ? "even" : "odd")
                        );
 
 
-                       wprintf("<TD>%d</TD><TD>", sess);
-                       if ((WC->is_aide) &&
-                           (sess != WC->ctdl_pid)) {
-                               wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", sess);
-                               urlescputs(user);
-                               wprintf("\" onClick=\"return ConfirmKill();\" "
-                               ">(kill)</A>");
+                       wprintf("<td class=\"edit_col\">");
+                       if ((WCC->is_aide) &&
+                           (User->Session != WCC->ctdl_pid)) {
+                               wprintf(" <a href=\"terminate_session?which_session=%d", User->Session);
+                               wprintf("\" onClick=\"return ConfirmKill();\">%s</a>", _("(kill)"));
                        }
-                       if (sess == WC->ctdl_pid) {
-                               wprintf(" <A HREF=\"/edit_me\" "
-                                       ">(edit)</A>");
+                       if (User->Session == WCC->ctdl_pid) {
+                               wprintf(" <a href=\"edit_me\">%s</a>", _("(edit)"));
                        }
-                       wprintf("</TD>");
+                       wprintf("</td>");
 
-                       /* (link to page this user) */
-                       wprintf("<TD><A HREF=\"/display_page&recp=");
-                       urlescputs(user);
+                       /** (link to page this user) */
+                       wprintf("<td width=\"5%\"><a href=\"display_page?recp=");
+                       urlescputs(User->UserName);
                        wprintf("\">"
-                               "<IMG ALIGN=MIDDLE WIDTH=20 HEIGHT=15 "
-                               "SRC=\"/static/page.gif\" "
-                               "ALT=\"(p)\""
-                               " BORDER=0></A>&nbsp;");
-                       wprintf("</TD>");
-
-                       /* (idle flag) */
-                       wprintf("<TD>");
-                       if ((now - last_activity) > 900L) {
-                               wprintf("&nbsp;"
-                                       "<IMG ALIGN=MIDDLE "
-                                       "SRC=\"/static/idle.gif\" "
-                                       "ALT=\"[idle]\" BORDER=0>");
+                               "<img align=\"middle\" "
+                               "src=\"static/citadelchat_24x.gif\" "
+                               "alt=\"(p)\""
+                               " border=\"0\" /></a> ");
+                       wprintf("</td>");
+
+                       /** (idle flag) */
+                       wprintf("<td width=\"5%\">");
+                       if (User->Idle) {
+                               wprintf(" "
+                                       "<img align=\"middle\" "
+                                       "src=\"static/inactiveuser_24x.gif\" "
+                                       "alt=\"(%s %d %s)\" border=\"0\" />",
+                                       _("idle since"),
+                                       (now - User->LastActive) / 60,
+                                       _("Minutes")
+                                       );
+                               
                        }
-                       wprintf("</TD>\n\t<TD>");
-
-
+                       else {
+                               wprintf(" "
+                                       "<img align=\"middle\" "
+                                       "src=\"static/activeuser_24x.gif\" "
+                                       "alt=\"(active)\" border=\"0\" />");
+                       }
+                       wprintf("</td>\n<td>");
 
-                       /* username (link to user bio/photo page) */
-                       wprintf("<A HREF=\"/showuser&who=");
-                       urlescputs(user);
+                       /** username (link to user bio/photo page) */
+                       wprintf("<a href=\"showuser?who=");
+                       urlescputs(User->UserName);
                        wprintf("\">");
-                       escputs(user);
-                       wprintf("</A>");
-
-                       /* room */
-                       wprintf("</TD>\n\t<TD>");
-                       escputs(room);
-                       if (strlen(realroom) > 0) {
-                               wprintf("<br /><I>");
-                               escputs(realroom);
-                               wprintf("</I>");
+                       escputs(User->UserName);
+                       if (User->SessionCount > 1)
+                               wprintf(" [%d] ", User->SessionCount);
+                       wprintf("</a>");
+
+                       /** room */
+                       wprintf("</td>\n\t<td>");
+                       escputs(User->Room);
+                       if (!IsEmptyStr(User->RealRoom) ) {
+                               wprintf("<br /><i>");
+                               escputs(User->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\t<td class=\"host_col\">");
+
+                       /** hostname */
+                       escputs(User->Host);
+                       if (!IsEmptyStr(User->RealHost)) {
+                               wprintf("<br /><i>");
+                               escputs(User->RealHost);
+                               wprintf("</i>");
                        }
-                       wprintf("</TD>\n</TR>");
+                       wprintf("</td>\n</tr>");
                }
+               DeleteHashPos(&it);
        }
-       wprintf("</TABLE></div>\n"
-               "<div align=center>"
-               "Click on a name to read user info.  Click on "
-               "<IMG ALIGN=MIDDLE SRC=\"/static/page.gif\" ALT=\"(p)\" "
-               "BORDER=0> to send "
-               "a page (instant message) to that user.</div>\n");
-       wDumpContent(1);
+       wprintf("</table>");
+       DeleteHash(&List);
+
 }
 
 
+/**
+ * \brief who is on?
+ */
+void who(void)
+{
+       char title[256];
+
+       output_headers(1, 1, 2, 0, 0, 0);
+
+       wprintf("<script type=\"text/javascript\">\n"
+               "function ConfirmKill() { \n"
+               "return confirm('%s');\n"
+               "}\n"
+               "</script>\n", _("Do you really want to kill this session?")
+       );
+
+       wprintf("<div id=\"banner\">\n");
+       wprintf("<div class=\"room_banner\">");
+       wprintf("<img src=\"static/usermanag_48x.gif\">");
+       wprintf("<h1>");
+       snprintf(title, sizeof title, _("Users currently on %s"), serv_info.serv_humannode);
+       escputs(title);
+       wprintf("</h1></div>");
+       wprintf("<ul class=\"room_actions\">\n");
+       wprintf("<li class=\"start_page\">");
+       offer_start_page();
+       wprintf("</li></ul>");
+       wprintf("</div>");
+
+       wprintf("<div id=\"content\" class=\"fix_scrollbar_bug who_is_online\">\n");
+       wprintf("<div class=\"box\">");
+       wprintf("<div class=\"boxlabel\">");    
+       snprintf(title, sizeof title, _("Users currently on %s"), serv_info.serv_humannode);
+       escputs(title);
+       wprintf("</div>");      
+       wprintf("<div class=\"boxcontent\">");
+        wprintf("<div id=\"who_inner\" >");
+       who_inner_div();
+       wprintf("</div>");
+
+       wprintf("<div class=\"instructions\">");
+       wprintf(_("Click on a name to read user info.  Click on %s "
+               "to send an instant message to that user."),
+               "<img align=\"middle\" src=\"static/citadelchat_16x.gif\" alt=\"(p)\" border=\"0\">"
+       );
+       wprintf("</div></div>\n");
+
+       /**
+        * JavaScript to make the ajax refresh happen:
+        * See http://www.sergiopereira.com/articles/prototype.js.html for info on Ajax.PeriodicalUpdater
+        * It wants: 1. The div being updated
+        *           2. The URL of the update source
+        *           3. Other flags (such as the HTTP method and the refresh frequency)
+        */
+       wprintf(
+               "<script type=\"text/javascript\">                                      "
+               " new Ajax.PeriodicalUpdater('who_inner', 'who_inner_html',     "
+               "                            { method: 'get', frequency: 30 }  );       "
+               "</script>                                                              \n"
+       );
+       wDumpContent(1);
+}
+
+/**
+ * \brief end session \todo what??? does this belong here? 
+ */
 void terminate_session(void)
 {
        char buf[SIZ];
 
        serv_printf("TERM %s", bstr("which_session"));
-       serv_gets(buf);
-       whobbs();
+       serv_getln(buf, sizeof buf);
+       who();
 }
 
 
-/*
- * Change your session info (fake roomname and hostname)
+/**
+ * \brief Change your session info (fake roomname and hostname)
  */
 void edit_me(void)
 {
        char buf[SIZ];
 
-       if (!strcasecmp(bstr("sc"), "Change room name")) {
+       if (havebstr("change_room_name_button")) {
                serv_printf("RCHG %s", bstr("fake_roomname"));
-               serv_gets(buf);
-               http_redirect("/whobbs");
-       } else if (!strcasecmp(bstr("sc"), "Change host name")) {
+               serv_getln(buf, sizeof buf);
+               http_redirect("who");
+       } else if (havebstr("change_host_name_button")) {
                serv_printf("HCHG %s", bstr("fake_hostname"));
-               serv_gets(buf);
-               http_redirect("/whobbs");
-       } else if (!strcasecmp(bstr("sc"), "Change user name")) {
+               serv_getln(buf, sizeof buf);
+               http_redirect("who");
+       } else if (havebstr("change_user_name_button")) {
                serv_printf("UCHG %s", bstr("fake_username"));
-               serv_gets(buf);
-               http_redirect("/whobbs");
-       } else if (!strcasecmp(bstr("sc"), "Cancel")) {
-               http_redirect("/whobbs");
+               serv_getln(buf, sizeof buf);
+               http_redirect("who");
+       } else if (havebstr("cancel_button")) {
+               http_redirect("who");
        } else {
-
-               output_headers(1, 1, 0, 0, 0, 0, 0);
+               output_headers(1, 1, 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("<table class=\"who_banner\"><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(_("This screen allows you to change the way your "
+                       "session appears in the 'Who is online' listing. "
+                       "To turn off any 'fake' name you've previously "
+                       "set, simply click the appropriate 'change' button "
+                       "without typing anything in the corresponding box. "));
                wprintf("<br />\n");
 
-               wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
+               wprintf("<form method=\"POST\" action=\"edit_me\">\n");
+               wprintf("<input type=\"hidden\" name=\"nonce\" value=\"%ld\">\n", WC->nonce);
+
+               wprintf("<table border=0 width=100%%>\n");
+
+               wprintf("<tr><td><b>");
+               wprintf(_("Room name:"));
+               wprintf("</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=\"change_room_name_button\" value=\"%s\">",
+                       _("Change room name"));
+               wprintf("</td>\n</tr>\n");
+
+               wprintf("<tr><td><b>");
+               wprintf(_("Host name:"));
+               wprintf("</b></td><td>");
+               wprintf("<input type=\"text\" name=\"fake_hostname\" maxlength=\"64\">\n");
+               wprintf("</td>\n<td align=center>");
+               wprintf("<input type=\"submit\" name=\"change_host_name_button\" value=\"%s\">",
+                       _("Change host name"));
+               wprintf("</td>\n</tr>\n");
 
-               wprintf("<TABLE border=0 width=100%%>\n");
+               if (WC->is_aide) {
+                       wprintf("<tr><td><b>");
+                       wprintf(_("User name:"));
+                       wprintf("</b></td><td>");
+                       wprintf("<input type=\"text\" name=\"fake_username\" maxlength=\"64\">\n");
+                       wprintf("</td>\n<td align=center>");
+                       wprintf("<input type=\"submit\" name \"change_user_name_button\" value=\"%s\">",
+                               _("Change user name"));
+                       wprintf("</td>\n</tr>\n");
+               }
+               wprintf("<tr><td> </td><td> </td><td align=center>");
+               wprintf("<input type=\"submit\" name=\"cancel_button\" value=\"%s\">",
+                       _("Cancel"));
+               wprintf("</td></tr></table>\n");
+               wprintf("</form></center>\n");
+               wDumpContent(1);
+       }
+}
 
-               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");
+/**
+ * \brief Wholist section
+ */
+void wholist_section(void) {
+       UserStateStruct *User;
+       void *VUser;
+       HashList *List;
+       HashPos  *it;
+       char *UserName;
+       long len;
+       char buf[SIZ];
+        time_t now;
 
-               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");
+       serv_puts("TIME");
+       serv_getln(buf, sizeof buf);
+       if (buf[0] == '2') {
+               now = extract_long(&buf[4], 0);
+       }
+       else {
+               now = time(NULL);
+       }
 
-               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");
+       List = NewHash();
+
+       if (GetWholistSection(List, now)) {
+               SortByPayload(List, CompareUserStruct);
+               it = GetNewHashPos();
+               while (GetNextHashPos(List, it, &len, &UserName, &VUser)) {
+                       User = VUser;
+                       if (strcmp(User->UserName, NLI)) {
+                               wprintf("<li class=\"");
+                               if (User->Idle) {
+                                       wprintf("inactiveuser");
+                               }
+                               else {
+                                       wprintf("activeuser");
+                               }
+                               wprintf("\"><a href=\"showuser?who=");
+                               urlescputs(User->UserName);
+                               wprintf("\">");
+                               escputs(User->UserName);
+                               wprintf("</a></li>");
+                       }
                }
-               wprintf("<TR><TD>&nbsp;</TD><TD>&nbsp;</TD><TD ALIGN=center>");
-               wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
-               wprintf("</TD></TR></TABLE>\n");
-
-               wprintf("</FORM></CENTER>\n");
-               wDumpContent(1);
+               DeleteHashPos(&it);
        }
+       DeleteHash(&List);
 }
+
+
+
+/*@}*/