* Moved to the new string tokenizer API
[citadel.git] / webcit / who.c
index 2b8dd0155e945823abe45fbe0f8660fc0ea8f069..c3bb03f868d59888bc5057be0143ce7d04da3372 100644 (file)
-/* $Id$ */
+/*
+ * $Id$
+ *
+ * Display a list of all users currently logged on to the Citadel server.
+ */
 
+#include <ctype.h>
 #include <stdlib.h>
-#ifdef HAVE_UNISTD_H
 #include <unistd.h>
-#endif
 #include <stdio.h>
+#include <fcntl.h>
 #include <signal.h>
 #include <sys/types.h>
-#include <ctype.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"
-#include "child.h"
 
-struct whouser {
-       struct whouser *next;
-       int sessionnum;
-       char username[256];
-       char roomname[256];
-       char hostname[256];
-       char clientsoftware[256];
-};
+
+
+
+
 
 /*
  * who is on?
  */
 void whobbs(void)
 {
-       struct whouser *wlist = NULL;
-       struct whouser *wptr = NULL;
-       char buf[256], sess, user[256], room[256], host[256];
-       int foundit;
-
-       printf("HTTP/1.0 200 OK\n");
-       output_headers(1);
-
-       wprintf("<TABLE WIDTH=100% BORDER=0 BGCOLOR=007700><TR><TD>");
-       wprintf("<FONT SIZE=+1 COLOR=\"FFFFFF\"<B>Users currently on ");
+       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;
+
+       output_headers(1, 1, 2, 0, 1, 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/users-icon.gif\" ALT=\" \" ALIGN=MIDDLE>");
+       wprintf("<SPAN CLASS=\"titlebar\">&nbsp;Users currently on ");
        escputs(serv_info.serv_humannode);
-       wprintf("</B></FONT></TD></TR></TABLE>\n");
+       wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
+       offer_start_page();
+       wprintf("</TD></TR></TABLE>\n");
+       wprintf("</div>\n"
+               "<div id=\"content\">\n");
+
+       wprintf("<div id=\"fix_scrollbar_bug\">"
+               "<table border=0 cellspacing=0 width=100%% bgcolor=\"#FFFFFF\">"
+               "<tr>\n");
+       wprintf("<TH COLSPAN=3>&nbsp;</TH>\n");
+       wprintf("<TH>User Name</TH>\n");
+       wprintf("<TH>Room</TH>");
+       wprintf("<TH>From host</TH>\n</TR>\n");
+
+       serv_puts("TIME");
+       serv_gets(buf);
+       if (buf[0] == '2') {
+               now = extract_long(&buf[4], 0);
+       }
+       else {
+               now = time(NULL);
+       }
 
-       wprintf("<CENTER>\n<TABLE BORDER=1>\n<TR>\n");
-       wprintf("<TH><FONT FACE=\"Arial,Helvetica,sans-serif\">Session ID</FONT></TH>\n");
-       wprintf("<TH><FONT FACE=\"Arial,Helvetica,sans-serif\">User Name</FONT></TH>\n");
-       wprintf("<TH><FONT FACE=\"Arial,Helvetica,sans-serif\">Room</FONT></TH>");
-       wprintf("<TH><FONT FACE=\"Arial,Helvetica,sans-serif\">From host</FONT></TH>\n</TR>\n");
        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);
-
-                       foundit = 0;
-                       for (wptr = wlist; wptr != NULL; wptr = wptr->next) {
-                               if (wptr->sessionnum == sess) {
-                                       foundit = 1;
-                                       if (strcasecmp(user, wptr->username)) {
-                                               sprintf(buf, "%cBR%c%s",
-                                                       LB, RB, user);
-                                               strcat(wptr->username, buf);
-                                       }
-                                       if (strcasecmp(room, wptr->roomname)) {
-                                               sprintf(buf, "%cBR%c%s",
-                                                       LB, RB, room);
-                                               strcat(wptr->roomname, buf);
-                                       }
-                                       if (strcasecmp(host, wptr->hostname)) {
-                                               sprintf(buf, "%cBR%c%s",
-                                                       LB, RB, host);
-                                               strcat(wptr->hostname, buf);
-                                       }
-                               }
+                       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&session_owner=", sess);
+                               urlescputs(user);
+                               wprintf("\" onClick=\"return ConfirmKill();\" "
+                               ">[kill]</A>");
                        }
-
-                       if (foundit == 0) {
-                               wptr = (struct whouser *)
-                                   malloc(sizeof(struct whouser));
-                               wptr->next = wlist;
-                               wlist = wptr;
-                               strcpy(wlist->username, user);
-                               strcpy(wlist->roomname, room);
-                               strcpy(wlist->hostname, host);
-                               wlist->sessionnum = sess;
-                       }
-               }
-
-               while (wlist != NULL) {
-                       wprintf("<TR>\n\t<TD ALIGN=center><FONT FACE=\"Arial,Helvetica,sans-serif\">%d", wlist->sessionnum);
-                       if ((is_aide) &&
-                           (wlist->sessionnum != serv_info.serv_pid)) {
-                               wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", wlist->sessionnum);
-                               urlescputs(wlist->username);
-                               wprintf("\">(kill)</A>");
+                       if (sess == WC->ctdl_pid) {
+                               wprintf(" <A HREF=\"/edit_me\" "
+                                       ">[edit]</A>");
                        }
-                       if (wlist->sessionnum == serv_info.serv_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 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>");
                        }
-                       /* username */
-                       wprintf("</FONT></TD>\n\t<TD><FONT FACE=\"Arial,Helvetica,sans-serif\"><A HREF=\"/showuser?who=");
-                       urlescputs(wlist->username);
-                       wprintf("\" onMouseOver=\"window.status='View profile for ");
-                       escputs(wlist->username);
-                       wprintf("'; return true\">");
-                       escputs(wlist->username);
+                       wprintf("</TD>\n\t<TD>");
+
+
+
+                       /* username (link to user bio/photo page) */
+                       wprintf("<A HREF=\"/showuser&who=");
+                       urlescputs(user);
+                       wprintf("\">");
+                       escputs(user);
                        wprintf("</A>");
+
                        /* room */
-                       wprintf("</FONT></TD>\n\t<TD><FONT FACE=\"Arial,Helvetica,sans-serif\">");
-                       /* handle chat */
-                       if (strstr(wlist->roomname, "chat") != NULL) {
-                               wprintf("<A HREF=\"/chat\" onMouseOver=\"window.status='Chat'; return true\">&lt;chat&gt;</A>");
-                       } else {
-                               wprintf("<A HREF=\"/dotgoto&room=");
-                               urlescputs(wlist->roomname);
-                               wprintf("\" onMouseOver=\"window.status='Go to room ");
-                               escputs(wlist->roomname);
-                               wprintf("'; return true\">");
-                               escputs(wlist->roomname);
-                               wprintf("</A>");
+                       wprintf("</TD>\n\t<TD>");
+                       escputs(room);
+                       if (strlen(realroom) > 0) {
+                               wprintf("<br /><I>");
+                               escputs(realroom);
+                               wprintf("</I>");
                        }
-                       wprintf("</FONT></TD><TD><FONT FACE=\"Arial,Helvetica,sans-serif\">");
+                       wprintf("</TD>\n\t<TD>");
+
                        /* hostname */
-                       escputs(wlist->hostname);
-                       wprintf("</FONT></TD>\n</TR>");
-                       wptr = wlist->next;
-                       free(wlist);
-                       wlist = wptr;
+                       escputs(host);
+                       if (strlen(realhost) > 0) {
+                               wprintf("<br /><I>");
+                               escputs(realhost);
+                               wprintf("</I>");
+                       }
+                       wprintf("</TD>\n</TR>");
                }
        }
-       wprintf("</TABLE>\n<BR><BR>\n");
-       wprintf("<TABLE BORDER=0 BGCOLOR=\"#003399\">\n<TR><TD ALIGN=center VALIGN=center CELLPADING=20>\n");
-       wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\" SIZE=+2><B><A HREF=\"/whobbs\"><FONT COLOR=\"#FF0000\">Refresh</FONT></A></B></FONT>\n");
-       wprintf("</TD></TR>\n</TABLE>\n</CENTER>");
+       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);
 }
 
 
 void terminate_session(void)
 {
-       char buf[256];
-
-       if (!strcasecmp(bstr("confirm"), "Yes")) {
-               serv_printf("TERM %s", bstr("which_session"));
-               serv_gets(buf);
-               if (buf[0] == '2') {
-                       whobbs();
-               } else {
-                       display_error(&buf[4]);
-               }
-       } else {
-               printf("HTTP/1.0 200 OK\n");
-               output_headers(1);
-               wprintf("<TABLE WIDTH=100% BORDER=0 BGCOLOR=770000><TR><TD>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\" SIZE=+1 COLOR=\"FFFFFF\"<B>Confirm session termination");
-               wprintf("</B></FONT></TD></TR></TABLE>\n");
-
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\">Are you sure you want to terminate session %s",
-                       bstr("which_session"));
-               if (strlen(bstr("session_owner")) > 0) {
-                       wprintf(" (");
-                       escputs(bstr("session_owner"));
-                       wprintf(")");
-               }
-               wprintf("?<BR><BR>\n");
-
-               wprintf("<A HREF=\"/terminate_session&which_session=%s&confirm=yes\">",
-                       bstr("which_session"));
-               wprintf("Yes</A>&nbsp;&nbsp;&nbsp;");
-               wprintf("<A HREF=\"/whobbs\">No</A></FONT>");
-               wDumpContent(1);
-       }
+       char buf[SIZ];
 
+       serv_printf("TERM %s", bstr("which_session"));
+       serv_gets(buf);
+       whobbs();
 }
 
 
-
 /*
  * Change your session info (fake roomname and hostname)
  */
 void edit_me(void)
 {
-       char buf[256];
+       char buf[SIZ];
 
        if (!strcasecmp(bstr("sc"), "Change room name")) {
                serv_printf("RCHG %s", bstr("fake_roomname"));
                serv_gets(buf);
-               whobbs();
+               http_redirect("/whobbs");
        } else if (!strcasecmp(bstr("sc"), "Change host name")) {
                serv_printf("HCHG %s", bstr("fake_hostname"));
                serv_gets(buf);
-               whobbs();
+               http_redirect("/whobbs");
        } else if (!strcasecmp(bstr("sc"), "Change user name")) {
                serv_printf("UCHG %s", bstr("fake_username"));
                serv_gets(buf);
-               whobbs();
+               http_redirect("/whobbs");
        } else if (!strcasecmp(bstr("sc"), "Cancel")) {
-               whobbs();
+               http_redirect("/whobbs");
        } else {
 
-               printf("HTTP/1.0 200 OK\n");
-               output_headers(1);
+               output_headers(1, 1, 0, 0, 0, 0, 0);
 
-               wprintf("<TABLE WIDTH=100% BORDER=0 BGCOLOR=000077><TR><TD>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\" SIZE=+1 COLOR=\"FFFFFF\"><B>");
+               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("</B></FONT></TD></TR></TABLE>\n");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\">");
+               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</FONT>\n");
+               wprintf("<br />\n");
 
                wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
 
-               wprintf("<TABLE border=0 width=100%>\n");
-
-               wprintf("<TR><TD><FONT FACE=\"Arial,Helvetica,sans-serif\"><B>Room name:</B></FONT></TD>\n<TD>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
-               wprintf("</FONT></TD>\n<TD ALIGN=center>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
-               wprintf("</FONT></TD>\n</TR>\n");
-
-               wprintf("<TR><TD><FONT FACE=\"Arial,Helvetica,sans-serif\"><B>Host name:</B></FONT></TD><TD>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
-               wprintf("</FONT></TD>\n<TD ALIGN=center>");
-               wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
-               wprintf("</FONT></TD>\n</TR>\n");
-
-               if (is_aide) {
-                       wprintf("<TR><TD><FONT FACE=\"Arial,Helvetica,sans-serif\"><B>User name:</B></FONT></TD><TD>");
-                       wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
-                       wprintf("</FONT></TD>\n<TD ALIGN=center>");
-                       wprintf("<FONT FACE=\"Arial,Helvetica,sans-serif\"><INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
-                       wprintf("</FONT></TD>\n</TR>\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>&nbsp;</TD><TD>&nbsp;</TD><TD ALIGN=center>");
                wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");