webcit/who.c

   1 /* $Id$ */
   2
   3 #include <ctype.h>
   4 #include <stdlib.h>
   5 #include <unistd.h>
   6 #include <stdio.h>
   7 #include <fcntl.h>
   8 #include <signal.h>
   9 #include <sys/types.h>
  10 #include <sys/wait.h>
  11 #include <sys/socket.h>
  12 #include <sys/time.h>
  13 #include <limits.h>
  14 #include <netinet/in.h>
  15 #include <netdb.h>
  16 #include <string.h>
  17 #include <pwd.h>
  18 #include <errno.h>
  19 #include <stdarg.h>
  20 #include <pthread.h>
  21 #include <signal.h>
  22 #include "webcit.h"
  23
  24
  25
  26
  27
  28
  29 /*
  30  * who is on?
  31  */
  32 void whobbs(void)
  33 {
  34         char buf[SIZ], sess, user[SIZ], room[SIZ], host[SIZ],
  35                 realroom[SIZ], realhost[SIZ];
  36         time_t last_activity;
  37         time_t now;
  38         int bg = 0;
  39
  40         output_headers(7);
  41
  42         wprintf("<SCRIPT LANGUAGE=\"JavaScript\">\n"
  43                 "function ConfirmKill() { \n"
  44                 "return confirm('Do you really want to kill this session?');\n"
  45                 "}\n"
  46                 "</SCRIPT>\n"
  47         );
  48
  49         wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
  50         wprintf("<IMG SRC=\"/static/users-icon.gif\" ALT=\" \" ALIGN=MIDDLE>");
  51         wprintf("<SPAN CLASS=\"titlebar\">&nbsp;Users currently on ");
  52         escputs(serv_info.serv_humannode);
  53         wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
  54         offer_start_page();
  55         wprintf("</TD></TR></TABLE><BR>\n");
  56
  57         do_template("beginbox_nt");
  58         wprintf("<CENTER>"
  59                 "<TABLE BORDER=0 CELLSPACING=0 WIDTH=100%%>\n<TR>\n");
  60         wprintf("<TH COLSPAN=4>Session ID</TH>\n");
  61         wprintf("<TH>User Name</TH>\n");
  62         wprintf("<TH>Room</TH>");
  63         wprintf("<TH>From host</TH>\n</TR>\n");
  64
  65         serv_puts("TIME");
  66         serv_gets(buf);
  67         if (buf[0] == '2') {
  68                 now = extract_long(&buf[4], 0);
  69         }
  70         else {
  71                 now = time(NULL);
  72         }
  73
  74         serv_puts("RWHO");
  75         serv_gets(buf);
  76         if (buf[0] == '1') {
  77                 while (serv_gets(buf), strcmp(buf, "000")) {
  78                         sess = extract_int(buf, 0);
  79                         extract(user, buf, 1);
  80                         extract(room, buf, 2);
  81                         extract(host, buf, 3);
  82                         extract(realroom, buf, 9);
  83                         extract(realhost, buf, 10);
  84                         last_activity = extract_long(buf, 5);
  85
  86                         bg = 1 - bg;
  87                         wprintf("<TR BGCOLOR=\"#%s\">",
  88                                 (bg ? "DDDDDD" : "FFFFFF")
  89                         );
  90
  91
  92                         wprintf("<TD>%d</TD><TD>", sess);
  93                         if ((WC->is_aide) &&
  94                             (sess != WC->ctdl_pid)) {
  95                                 wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", sess);
  96                                 urlescputs(user);
  97                                 wprintf("\" onClick=\"return ConfirmKill();\" "
  98                                 ">(kill)</A>");
  99                         }
 100                         if (sess == WC->ctdl_pid) {
 101                                 wprintf(" <A HREF=\"/edit_me\" "
 102                                         ">(edit)</A>");
 103                         }
 104                         wprintf("</TD>");
 105
 106                         /* (link to page this user) */
 107                         wprintf("<TD><A HREF=\"/display_page&recp=");
 108                         urlescputs(user);
 109                         wprintf("\">"
 110                                 "<IMG ALIGN=MIDDLE WIDTH=20 HEIGHT=15 "
 111                                 "SRC=\"/static/page.gif\" "
 112                                 "ALT=\"(p)\""
 113                                 " BORDER=0></A>&nbsp;");
 114                         wprintf("</TD>");
 115
 116                         /* (idle flag) */
 117                         wprintf("<TD>");
 118                         if ((now - last_activity) > 900L) {
 119                                 wprintf("&nbsp;"
 120                                         "<IMG ALIGN=MIDDLE "
 121                                         "SRC=\"/static/idle.gif\" "
 122                                         "ALT=\"[idle]\" BORDER=0>");
 123                         }
 124                         wprintf("</TD>\n\t<TD>");
 125
 126
 127
 128                         /* username (link to user bio/photo page) */
 129                         wprintf("<A HREF=\"/showuser&who=");
 130                         urlescputs(user);
 131                         wprintf("\">");
 132                         escputs(user);
 133                         wprintf("</A>");
 134
 135                         /* room */
 136                         wprintf("</TD>\n\t<TD>");
 137                         escputs(room);
 138                         if (strlen(realroom) > 0) {
 139                                 wprintf("<BR><I>");
 140                                 escputs(realroom);
 141                                 wprintf("</I>");
 142                         }
 143                         wprintf("</TD>\n\t<TD>");
 144
 145                         /* hostname */
 146                         escputs(host);
 147                         if (strlen(realhost) > 0) {
 148                                 wprintf("<BR><I>");
 149                                 escputs(realhost);
 150                                 wprintf("</I>");
 151                         }
 152                         wprintf("</TD>\n</TR>");
 153                 }
 154         }
 155         wprintf("</TABLE>\n"
 156                 "Click on a name to read user info.  Click on "
 157                 "<IMG ALIGN=MIDDLE SRC=\"/static/page.gif\" ALT=\"(p)\" "
 158                 "BORDER=0> to send "
 159                 "a page (instant message) to that user.<BR></CENTER>\n");
 160         do_template("endbox");
 161         wDumpContent(1);
 162 }
 163
 164
 165 void terminate_session(void)
 166 {
 167         char buf[SIZ];
 168
 169         serv_printf("TERM %s", bstr("which_session"));
 170         serv_gets(buf);
 171         whobbs();
 172 }
 173
 174
 175 /*
 176  * Change your session info (fake roomname and hostname)
 177  */
 178 void edit_me(void)
 179 {
 180         char buf[SIZ];
 181
 182         if (!strcasecmp(bstr("sc"), "Change room name")) {
 183                 serv_printf("RCHG %s", bstr("fake_roomname"));
 184                 serv_gets(buf);
 185                 http_redirect("/whobbs");
 186         } else if (!strcasecmp(bstr("sc"), "Change host name")) {
 187                 serv_printf("HCHG %s", bstr("fake_hostname"));
 188                 serv_gets(buf);
 189                 http_redirect("/whobbs");
 190         } else if (!strcasecmp(bstr("sc"), "Change user name")) {
 191                 serv_printf("UCHG %s", bstr("fake_username"));
 192                 serv_gets(buf);
 193                 http_redirect("/whobbs");
 194         } else if (!strcasecmp(bstr("sc"), "Cancel")) {
 195                 http_redirect("/whobbs");
 196         } else {
 197
 198                 output_headers(3);
 199
 200                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
 201                 wprintf("<SPAN CLASS=\"titlebar\">");
 202                 wprintf("Edit your session display");
 203                 wprintf("</SPAN></TD></TR></TABLE>\n");
 204                 wprintf("This screen allows you to change the way your\n");
 205                 wprintf("session appears in the 'Who is online' listing.\n");
 206                 wprintf("To turn off any 'fake' name you've previously\n");
 207                 wprintf("set, simply click the appropriate 'change' button\n");
 208                 wprintf("without typing anything in the corresponding box.\n");
 209                 wprintf("<BR>\n");
 210
 211                 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
 212
 213                 wprintf("<TABLE border=0 width=100%%>\n");
 214
 215                 wprintf("<TR><TD><B>Room name:</B></TD>\n<TD>");
 216                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
 217                 wprintf("</TD>\n<TD ALIGN=center>");
 218                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
 219                 wprintf("</TD>\n</TR>\n");
 220
 221                 wprintf("<TR><TD><B>Host name:</B></TD><TD>");
 222                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
 223                 wprintf("</TD>\n<TD ALIGN=center>");
 224                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
 225                 wprintf("</TD>\n</TR>\n");
 226
 227                 if (WC->is_aide) {
 228                         wprintf("<TR><TD><B>User name:</B></TD><TD>");
 229                         wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
 230                         wprintf("</TD>\n<TD ALIGN=center>");
 231                         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
 232                         wprintf("</TD>\n</TR>\n");
 233                 }
 234                 wprintf("<TR><TD>&nbsp;</TD><TD>&nbsp;</TD><TD ALIGN=center>");
 235                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
 236                 wprintf("</TD></TR></TABLE>\n");
 237
 238                 wprintf("</FORM></CENTER>\n");
 239                 wDumpContent(1);
 240         }
 241 }