4 * Display a list of all users currently logged on to the Citadel server.
13 #include <sys/types.h>
15 #include <sys/socket.h>
18 #include <netinet/in.h>
38 char buf[SIZ], user[SIZ], room[SIZ], host[SIZ],
39 realroom[SIZ], realhost[SIZ];
45 output_headers(1, 1, 2, 0, 1, 0, 0);
47 wprintf("<script type=\"text/javascript\">\n"
48 "function ConfirmKill() { \n"
49 "return confirm('Do you really want to kill this session?');\n"
54 wprintf("<div id=\"banner\">\n");
55 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
56 wprintf("<IMG SRC=\"/static/usermanag_48x.gif\" ALT=\" \" ALIGN=MIDDLE>");
57 wprintf("<SPAN CLASS=\"titlebar\"> Users currently on ");
58 escputs(serv_info.serv_humannode);
59 wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
61 wprintf("</TD></TR></TABLE>\n");
63 "<div id=\"content\">\n");
65 wprintf("<div id=\"fix_scrollbar_bug\">"
66 "<table border=0 cellspacing=0 width=100%% bgcolor=\"#FFFFFF\">"
68 wprintf("<TH COLSPAN=3> </TH>\n");
69 wprintf("<TH>User Name</TH>\n");
70 wprintf("<TH>Room</TH>");
71 wprintf("<TH>From host</TH>\n</TR>\n");
74 serv_getln(buf, sizeof buf);
76 now = extract_long(&buf[4], 0);
83 serv_getln(buf, sizeof buf);
85 while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
86 sess = extract_int(buf, 0);
87 extract_token(user, buf, 1, '|', sizeof user);
88 extract_token(room, buf, 2, '|', sizeof room);
89 extract_token(host, buf, 3, '|', sizeof host);
90 extract_token(realroom, buf, 9, '|', sizeof realroom);
91 extract_token(realhost, buf, 10, '|', sizeof realhost);
92 last_activity = extract_long(buf, 5);
95 wprintf("<TR BGCOLOR=\"#%s\">",
96 (bg ? "DDDDDD" : "FFFFFF")
102 (sess != WC->ctdl_pid)) {
103 wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", sess);
105 wprintf("\" onClick=\"return ConfirmKill();\" "
108 if (sess == WC->ctdl_pid) {
109 wprintf(" <A HREF=\"/edit_me\" "
114 /* (link to page this user) */
115 wprintf("<TD><A HREF=\"/display_page?recp=");
119 "SRC=\"/static/citadelchat_24x.gif\" "
121 " BORDER=0></A> ");
126 if ((now - last_activity) > 900L) {
129 "SRC=\"/static/inactiveuser_24x.gif\" "
130 "ALT=\"[idle]\" BORDER=0>");
135 "SRC=\"/static/activeuser_24x.gif\" "
136 "ALT=\"[active]\" BORDER=0>");
138 wprintf("</TD>\n\t<TD>");
142 /* username (link to user bio/photo page) */
143 wprintf("<A HREF=\"/showuser&who=");
150 wprintf("</TD>\n\t<TD>");
152 if (strlen(realroom) > 0) {
153 wprintf("<br /><I>");
157 wprintf("</TD>\n\t<TD>");
161 if (strlen(realhost) > 0) {
162 wprintf("<br /><I>");
166 wprintf("</TD>\n</TR>");
169 wprintf("</TABLE></div>\n"
171 "Click on a name to read user info. Click on "
172 "<IMG ALIGN=MIDDLE SRC=\"/static/citadelchat_16x.gif\" ALT=\"(p)\" "
173 "BORDER=0> to send an instant message to that user.</div>\n");
178 void terminate_session(void)
182 serv_printf("TERM %s", bstr("which_session"));
183 serv_getln(buf, sizeof buf);
189 * Change your session info (fake roomname and hostname)
195 if (!strcasecmp(bstr("sc"), "Change room name")) {
196 serv_printf("RCHG %s", bstr("fake_roomname"));
197 serv_getln(buf, sizeof buf);
198 http_redirect("/whobbs");
199 } else if (!strcasecmp(bstr("sc"), "Change host name")) {
200 serv_printf("HCHG %s", bstr("fake_hostname"));
201 serv_getln(buf, sizeof buf);
202 http_redirect("/whobbs");
203 } else if (!strcasecmp(bstr("sc"), "Change user name")) {
204 serv_printf("UCHG %s", bstr("fake_username"));
205 serv_getln(buf, sizeof buf);
206 http_redirect("/whobbs");
207 } else if (!strcasecmp(bstr("sc"), "Cancel")) {
208 http_redirect("/whobbs");
211 output_headers(1, 1, 0, 0, 0, 0, 0);
213 wprintf("<div id=\"banner\">\n");
214 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
215 wprintf("<SPAN CLASS=\"titlebar\">");
216 wprintf("Edit your session display");
217 wprintf("</SPAN></TD></TR></TABLE>\n");
218 wprintf("</div>\n<div id=\"content\">\n");
220 wprintf("This screen allows you to change the way your\n");
221 wprintf("session appears in the 'Who is online' listing.\n");
222 wprintf("To turn off any 'fake' name you've previously\n");
223 wprintf("set, simply click the appropriate 'change' button\n");
224 wprintf("without typing anything in the corresponding box.\n");
227 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
229 wprintf("<TABLE border=0 width=100%%>\n");
231 wprintf("<TR><TD><B>Room name:</B></TD>\n<TD>");
232 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
233 wprintf("</TD>\n<TD ALIGN=center>");
234 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
235 wprintf("</TD>\n</TR>\n");
237 wprintf("<TR><TD><B>Host name:</B></TD><TD>");
238 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
239 wprintf("</TD>\n<TD ALIGN=center>");
240 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
241 wprintf("</TD>\n</TR>\n");
244 wprintf("<TR><TD><B>User name:</B></TD><TD>");
245 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
246 wprintf("</TD>\n<TD ALIGN=center>");
247 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
248 wprintf("</TD>\n</TR>\n");
250 wprintf("<TR><TD> </TD><TD> </TD><TD ALIGN=center>");
251 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
252 wprintf("</TD></TR></TABLE>\n");
254 wprintf("</FORM></CENTER>\n");