11 #include <sys/socket.h>
14 #include <netinet/in.h>
34 char buf[SIZ], sess, user[SIZ], room[SIZ], host[SIZ],
35 realroom[SIZ], realhost[SIZ];
41 wprintf("<SCRIPT LANGUAGE=\"JavaScript\">\n"
42 "function ConfirmKill() { \n"
43 "return confirm('Do you really want to kill this session?');\n"
48 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=007700><TR><TD>");
49 wprintf("<IMG SRC=\"/static/users-icon.gif\" ALT=\" \" ALIGN=MIDDLE>");
50 wprintf("<FONT SIZE=+1 COLOR=\"FFFFFF\"> <B>Users currently on ");
51 escputs(serv_info.serv_humannode);
52 wprintf("</B></FONT></TD><TD>");
54 wprintf("</TD></TR></TABLE>\n");
56 wprintf("<CENTER><TABLE BORDER=1 WIDTH=100%%>\n<TR>\n");
57 wprintf("<TH>Session ID</TH>\n");
58 wprintf("<TH>User Name</TH>\n");
59 wprintf("<TH>Room</TH>");
60 wprintf("<TH>From host</TH>\n</TR>\n");
65 now = extract_long(&buf[4], 0);
74 while (serv_gets(buf), strcmp(buf, "000")) {
75 sess = extract_int(buf, 0);
76 extract(user, buf, 1);
77 extract(room, buf, 2);
78 extract(host, buf, 3);
79 extract(realroom, buf, 9);
80 extract(realhost, buf, 10);
81 last_activity = extract_long(buf, 5);
83 wprintf("<TR>\n\t<TD ALIGN=center>%d", sess);
85 (sess != serv_info.serv_pid)) {
86 wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", sess);
88 wprintf("\" onClick=\"return ConfirmKill();\" "
91 if (sess == serv_info.serv_pid) {
92 wprintf(" <A HREF=\"/edit_me\" "
95 wprintf("</TD>\n\t<TD>");
97 /* (link to page this user) */
98 wprintf("<A HREF=\"/display_page&recp=");
101 "<IMG ALIGN=MIDDLE WIDTH=20 HEIGHT=15 "
102 "SRC=\"/static/page.gif\" "
104 " BORDER=0></A> ");
107 /* username (link to user bio/photo page) */
108 wprintf("<A HREF=\"/showuser&who=");
114 if ((now - last_activity) > 900L) {
117 "SRC=\"/static/idle.gif\" "
118 "ALT=\"[idle]\" BORDER=0>");
122 wprintf("</TD>\n\t<TD>");
124 if (strlen(realroom) > 0) {
129 wprintf("</TD>\n\t<TD>");
133 if (strlen(realhost) > 0) {
138 wprintf("</TD>\n</TR>");
142 "Click on a name to read user info. Click on "
143 "<IMG ALIGN=MIDDLE SRC=\"/static/page.gif\" ALT=\"(p)\" "
145 "a page (instant message) to that user.<BR></CENTER>\n");
150 void terminate_session(void)
154 serv_printf("TERM %s", bstr("which_session"));
161 * Change your session info (fake roomname and hostname)
167 if (!strcasecmp(bstr("sc"), "Change room name")) {
168 serv_printf("RCHG %s", bstr("fake_roomname"));
170 http_redirect("/whobbs");
171 } else if (!strcasecmp(bstr("sc"), "Change host name")) {
172 serv_printf("HCHG %s", bstr("fake_hostname"));
174 http_redirect("/whobbs");
175 } else if (!strcasecmp(bstr("sc"), "Change user name")) {
176 serv_printf("UCHG %s", bstr("fake_username"));
178 http_redirect("/whobbs");
179 } else if (!strcasecmp(bstr("sc"), "Cancel")) {
180 http_redirect("/whobbs");
185 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=000077><TR><TD>");
186 wprintf("<FONT SIZE=+1 COLOR=\"FFFFFF\"><B>");
187 wprintf("Edit your session display");
188 wprintf("</B></FONT></TD></TR></TABLE>\n");
189 wprintf("This screen allows you to change the way your\n");
190 wprintf("session appears in the 'Who is online' listing.\n");
191 wprintf("To turn off any 'fake' name you've previously\n");
192 wprintf("set, simply click the appropriate 'change' button\n");
193 wprintf("without typing anything in the corresponding box.\n");
196 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
198 wprintf("<TABLE border=0 width=100%%>\n");
200 wprintf("<TR><TD><B>Room name:</B></TD>\n<TD>");
201 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
202 wprintf("</TD>\n<TD ALIGN=center>");
203 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
204 wprintf("</TD>\n</TR>\n");
206 wprintf("<TR><TD><B>Host name:</B></TD><TD>");
207 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
208 wprintf("</TD>\n<TD ALIGN=center>");
209 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
210 wprintf("</TD>\n</TR>\n");
213 wprintf("<TR><TD><B>User name:</B></TD><TD>");
214 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
215 wprintf("</TD>\n<TD ALIGN=center>");
216 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
217 wprintf("</TD>\n</TR>\n");
219 wprintf("<TR><TD> </TD><TD> </TD><TD ALIGN=center>");
220 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
221 wprintf("</TD></TR></TABLE>\n");
223 wprintf("</FORM></CENTER>\n");