webcit/who.c

   1 /*
   2  * $Id$
   3  *
   4  * Display a list of all users currently logged on to the Citadel server.
   5  */
   6
   7 #include "webcit.h"
   8
   9
  10
  11 /*
  12  * Display inner div of Wholist
  13  */
  14 void who_inner_div(void) {
  15         char buf[SIZ], user[SIZ], room[SIZ], host[SIZ],
  16                 realroom[SIZ], realhost[SIZ];
  17         int sess;
  18         time_t last_activity;
  19         time_t now;
  20         int bg = 0;
  21
  22         wprintf("<table border=\"0\" cellspacing=\"0\" width=\"100%%\" bgcolor=\"#FFFFFF\">"
  23                 "<tr>\n");
  24         wprintf("<th colspan=\"3\"> </th>\n");
  25         wprintf("<th>%s</th>\n", _("User name"));
  26         wprintf("<th>%s</th>", _("Room"));
  27         wprintf("<th>%s</th>\n</tr>\n", _("From host"));
  28
  29         serv_puts("TIME");
  30         serv_getln(buf, sizeof buf);
  31         if (buf[0] == '2') {
  32                 now = extract_long(&buf[4], 0);
  33         }
  34         else {
  35                 now = time(NULL);
  36         }
  37
  38         serv_puts("RWHO");
  39         serv_getln(buf, sizeof buf);
  40         if (buf[0] == '1') {
  41                 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
  42                         sess = extract_int(buf, 0);
  43                         extract_token(user, buf, 1, '|', sizeof user);
  44                         extract_token(room, buf, 2, '|', sizeof room);
  45                         extract_token(host, buf, 3, '|', sizeof host);
  46                         extract_token(realroom, buf, 9, '|', sizeof realroom);
  47                         extract_token(realhost, buf, 10, '|', sizeof realhost);
  48                         last_activity = extract_long(buf, 5);
  49
  50                         bg = 1 - bg;
  51                         wprintf("<tr bgcolor=\"#%s\">",
  52                                 (bg ? "DDDDDD" : "FFFFFF")
  53                         );
  54
  55
  56                         wprintf("<td>");
  57                         if ((WC->is_aide) &&
  58                             (sess != WC->ctdl_pid)) {
  59                                 wprintf(" <a href=\"/terminate_session?which_session=%d", sess);
  60                                 wprintf("\" onClick=\"return ConfirmKill();\">%s</a>", _("(kill)"));
  61                         }
  62                         if (sess == WC->ctdl_pid) {
  63                                 wprintf(" <a href=\"/edit_me\">%s</a>", _("(edit)"));
  64                         }
  65                         wprintf("</td>");
  66
  67                         /* (link to page this user) */
  68                         wprintf("<td><a href=\"/display_page?recp=");
  69                         urlescputs(user);
  70                         wprintf("\">"
  71                                 "<img align=\"middle\" "
  72                                 "src=\"/static/citadelchat_24x.gif\" "
  73                                 "alt=\"(p)\""
  74                                 " border=\"0\" /></a> ");
  75                         wprintf("</td>");
  76
  77                         /* (idle flag) */
  78                         wprintf("<td>");
  79                         if ((now - last_activity) > 900L) {
  80                                 wprintf(" "
  81                                         "<img align=\"middle\" "
  82                                         "src=\"/static/inactiveuser_24x.gif\" "
  83                                         "alt=\"(idle)\" border=\"0\" />");
  84                         }
  85                         else {
  86                                 wprintf(" "
  87                                         "<img align=\"middle\" "
  88                                         "src=\"/static/activeuser_24x.gif\" "
  89                                         "alt=\"(active)\" border=\"0\" />");
  90                         }
  91                         wprintf("</td>\n<td>");
  92
  93
  94
  95                         /* username (link to user bio/photo page) */
  96                         wprintf("<a href=\"/showuser?who=");
  97                         urlescputs(user);
  98                         wprintf("\">");
  99                         escputs(user);
 100                         wprintf("</a>");
 101
 102                         /* room */
 103                         wprintf("</td>\n\t<td>");
 104                         escputs(room);
 105                         if (strlen(realroom) > 0) {
 106                                 wprintf("<br /><i>");
 107                                 escputs(realroom);
 108                                 wprintf("</i>");
 109                         }
 110                         wprintf("</td>\n\t<td>");
 111
 112                         /* hostname */
 113                         escputs(host);
 114                         if (strlen(realhost) > 0) {
 115                                 wprintf("<br /><i>");
 116                                 escputs(realhost);
 117                                 wprintf("</i>");
 118                         }
 119                         wprintf("</td>\n</tr>");
 120                 }
 121         }
 122         wprintf("</table>");
 123 }
 124
 125
 126 /*
 127  * AJAX-response version of wholist inner html
 128  */
 129 void who_inner_html(void) {
 130         output_headers(0, 0, 0, 0, 0, 0, 0);
 131
 132         wprintf("Content-type: text/html; charset=UTF-8\r\n"
 133                 "Server: %s\r\n"
 134                 "Connection: close\r\n"
 135                 "Pragma: no-cache\r\n"
 136                 "Cache-Control: no-store, no-cache, must-revalidate\r\n",
 137                 SERVER);
 138         begin_burst();
 139
 140         who_inner_div();
 141
 142         wprintf("\r\n");
 143         wDumpContent(0);
 144 }
 145
 146
 147 /*
 148  * who is on?
 149  */
 150 void who(void)
 151 {
 152         char title[256];
 153
 154         output_headers(1, 1, 2, 0, 0, 0, 0);
 155
 156         wprintf("<script type=\"text/javascript\">\n"
 157                 "function ConfirmKill() { \n"
 158                 "return confirm('%s');\n"
 159                 "}\n"
 160                 "</script>\n", _("Do you really want to kill this session?")
 161         );
 162
 163         wprintf("<div id=\"banner\">\n");
 164         wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
 165         wprintf("<IMG SRC=\"/static/usermanag_48x.gif\" ALT=\" \" "
 166                 "ALIGN=MIDDLE "
 167                 ">");
 168         wprintf("<SPAN CLASS=\"titlebar\"> ");
 169
 170         snprintf(title, sizeof title, _("Users currently on %s"), serv_info.serv_humannode);
 171         escputs(title);
 172
 173         wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
 174         offer_start_page();
 175         wprintf("</TD></TR></TABLE>\n");
 176         wprintf("</div>\n");
 177
 178         wprintf("<div id=\"content\">\n");
 179
 180         wprintf("<div style=\"display:inline\" id=\"fix_scrollbar_bug\">");
 181         who_inner_div();
 182         wprintf("</div>\n");
 183
 184         wprintf("<div id=\"instructions\" align=center>");
 185         wprintf(_("Click on a name to read user info.  Click on %s "
 186                 "to send an instant message to that user."),
 187                 "<img align=\"middle\" src=\"/static/citadelchat_16x.gif\" alt=\"(p)\" border=\"0\">"
 188         );
 189         wprintf("</div>\n");
 190
 191         /* JavaScript to make the ajax refresh happen:
 192          * * See http://www.sergiopereira.com/articles/prototype.js.html for info on Ajax.Updater
 193          * * It wants: 1. The div being updated
 194          * *           2. The URL of the update source
 195          * *           3. Other flags (such as the HTTP method)
 196          *
 197          * * setInterval() makes it auto-run this code every 30,000 milliseconds (30 seconds)
 198          *
 199          * FIXME b0rken IE is still caching it
 200          */
 201         wprintf(
 202                 "<script type=\"text/javascript\">                                                      \n"
 203                 " setInterval(\" new Ajax.Updater('fix_scrollbar_bug', '/who_inner_html',               "
 204                 "                       {method: 'get'});                       \", 30000);             \n"
 205                 "</script>                                                                              \n"
 206         );
 207         wDumpContent(1);
 208 }
 209
 210
 211 void terminate_session(void)
 212 {
 213         char buf[SIZ];
 214
 215         serv_printf("TERM %s", bstr("which_session"));
 216         serv_getln(buf, sizeof buf);
 217         who();
 218 }
 219
 220
 221 /*
 222  * Change your session info (fake roomname and hostname)
 223  */
 224 void edit_me(void)
 225 {
 226         char buf[SIZ];
 227
 228         if (strlen(bstr("change_room_name_button")) > 0) {
 229                 serv_printf("RCHG %s", bstr("fake_roomname"));
 230                 serv_getln(buf, sizeof buf);
 231                 http_redirect("/who");
 232         } else if (strlen(bstr("change_host_name_button")) > 0) {
 233                 serv_printf("HCHG %s", bstr("fake_hostname"));
 234                 serv_getln(buf, sizeof buf);
 235                 http_redirect("/who");
 236         } else if (strlen(bstr("change_user_name_button")) > 0) {
 237                 serv_printf("UCHG %s", bstr("fake_username"));
 238                 serv_getln(buf, sizeof buf);
 239                 http_redirect("/who");
 240         } else if (strlen(bstr("cancel_button")) > 0) {
 241                 http_redirect("/who");
 242         } else {
 243                 output_headers(1, 1, 0, 0, 0, 0, 0);
 244
 245                 wprintf("<div id=\"banner\">\n");
 246                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
 247                 wprintf("<SPAN CLASS=\"titlebar\">");
 248                 wprintf(_("Edit your session display"));
 249                 wprintf("</SPAN></TD></TR></TABLE>\n");
 250                 wprintf("</div>\n<div id=\"content\">\n");
 251
 252                 wprintf(_("This screen allows you to change the way your "
 253                         "session appears in the 'Who is online' listing. "
 254                         "To turn off any 'fake' name you've previously "
 255                         "set, simply click the appropriate 'change' button "
 256                         "without typing anything in the corresponding box. "));
 257                 wprintf("<br />\n");
 258
 259                 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
 260
 261                 wprintf("<TABLE border=0 width=100%%>\n");
 262
 263                 wprintf("<TR><TD><B>");
 264                 wprintf(_("Room name:"));
 265                 wprintf("</B></TD>\n<TD>");
 266                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
 267                 wprintf("</TD>\n<TD ALIGN=center>");
 268                 wprintf("<INPUT TYPE=\"submit\" NAME=\"change_room_name_button\" VALUE=\"%s\">",
 269                         _("Change room name"));
 270                 wprintf("</TD>\n</TR>\n");
 271
 272                 wprintf("<TR><TD><B>");
 273                 wprintf(_("Host name:"));
 274                 wprintf("</B></TD><TD>");
 275                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
 276                 wprintf("</TD>\n<TD ALIGN=center>");
 277                 wprintf("<INPUT TYPE=\"submit\" NAME=\"change_host_name_button\" VALUE=\"%s\">",
 278                         _("Change host name"));
 279                 wprintf("</TD>\n</TR>\n");
 280
 281                 if (WC->is_aide) {
 282                         wprintf("<TR><TD><B>");
 283                         wprintf(_("User name:"));
 284                         wprintf("</B></TD><TD>");
 285                         wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
 286                         wprintf("</TD>\n<TD ALIGN=center>");
 287                         wprintf("<INPUT TYPE=\"submit\" NAME=\"change_user_name_button\" VALUE=\"%s\">",
 288                                 _("Change user name"));
 289                         wprintf("</TD>\n</TR>\n");
 290                 }
 291                 wprintf("<TR><TD> </TD><TD> </TD><TD ALIGN=center>");
 292                 wprintf("<INPUT TYPE=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">",
 293                         _("Cancel"));
 294                 wprintf("</TD></TR></TABLE>\n");
 295                 wprintf("</FORM></CENTER>\n");
 296                 wDumpContent(1);
 297         }
 298 }