* Removed all of the absolute URL's.
[citadel.git] / 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  * who is on?
128  */
129 void who(void)
130 {
131         char title[256];
132
133         output_headers(1, 1, 2, 0, 0, 0);
134
135         wprintf("<script type=\"text/javascript\">\n"
136                 "function ConfirmKill() { \n"
137                 "return confirm('%s');\n"
138                 "}\n"
139                 "</script>\n", _("Do you really want to kill this session?")
140         );
141
142         wprintf("<div id=\"banner\">\n");
143         wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
144         wprintf("<img src=\"static/usermanag_48x.gif\" ALT=\" \" "
145                 "ALIGN=MIDDLE "
146                 ">");
147         wprintf("<SPAN CLASS=\"titlebar\"> ");
148
149         snprintf(title, sizeof title, _("Users currently on %s"), serv_info.serv_humannode);
150         escputs(title);
151
152         wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
153         offer_start_page();
154         wprintf("</TD></TR></TABLE>\n");
155         wprintf("</div>\n");
156
157         wprintf("<div id=\"content\">\n");
158
159         wprintf("<div style=\"display:inline\" id=\"fix_scrollbar_bug\">");
160         who_inner_div();
161         wprintf("</div>\n");
162
163         wprintf("<div id=\"instructions\" align=center>");
164         wprintf(_("Click on a name to read user info.  Click on %s "
165                 "to send an instant message to that user."),
166                 "<img align=\"middle\" src=\"static/citadelchat_16x.gif\" alt=\"(p)\" border=\"0\">"
167         );
168         wprintf("</div>\n");
169
170         /* JavaScript to make the ajax refresh happen:
171          * See http://www.sergiopereira.com/articles/prototype.js.html for info on Ajax.PeriodicalUpdater
172          * It wants: 1. The div being updated
173          *           2. The URL of the update source
174          *           3. Other flags (such as the HTTP method and the refresh frequency)
175          */
176         wprintf(
177                 "<script type=\"text/javascript\">                                      "
178                 " new Ajax.PeriodicalUpdater('fix_scrollbar_bug', '/who_inner_html',    "
179                 "                            { method: 'get', frequency: 30 }  );       "
180                 "</script>                                                              \n"
181         );
182         wDumpContent(1);
183 }
184
185
186 void terminate_session(void)
187 {
188         char buf[SIZ];
189
190         serv_printf("TERM %s", bstr("which_session"));
191         serv_getln(buf, sizeof buf);
192         who();
193 }
194
195
196 /*
197  * Change your session info (fake roomname and hostname)
198  */
199 void edit_me(void)
200 {
201         char buf[SIZ];
202
203         if (strlen(bstr("change_room_name_button")) > 0) {
204                 serv_printf("RCHG %s", bstr("fake_roomname"));
205                 serv_getln(buf, sizeof buf);
206                 http_redirect("/who");
207         } else if (strlen(bstr("change_host_name_button")) > 0) {
208                 serv_printf("HCHG %s", bstr("fake_hostname"));
209                 serv_getln(buf, sizeof buf);
210                 http_redirect("/who");
211         } else if (strlen(bstr("change_user_name_button")) > 0) {
212                 serv_printf("UCHG %s", bstr("fake_username"));
213                 serv_getln(buf, sizeof buf);
214                 http_redirect("/who");
215         } else if (strlen(bstr("cancel_button")) > 0) {
216                 http_redirect("/who");
217         } else {
218                 output_headers(1, 1, 0, 0, 0, 0);
219
220                 wprintf("<div id=\"banner\">\n");
221                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
222                 wprintf("<SPAN CLASS=\"titlebar\">");
223                 wprintf(_("Edit your session display"));
224                 wprintf("</SPAN></TD></TR></TABLE>\n");
225                 wprintf("</div>\n<div id=\"content\">\n");
226
227                 wprintf(_("This screen allows you to change the way your "
228                         "session appears in the 'Who is online' listing. "
229                         "To turn off any 'fake' name you've previously "
230                         "set, simply click the appropriate 'change' button "
231                         "without typing anything in the corresponding box. "));
232                 wprintf("<br />\n");
233
234                 wprintf("<form method=\"POST\" action=\"edit_me\">\n");
235
236                 wprintf("<table border=0 width=100%%>\n");
237
238                 wprintf("<tr><td><b>");
239                 wprintf(_("Room name:"));
240                 wprintf("</b></td>\n<td>");
241                 wprintf("<input type=\"text\" name=\"fake_roomname\" maxlength=\"64\">\n");
242                 wprintf("</td>\n<td align=center>");
243                 wprintf("<input type=\"submit\" name=\"change_room_name_button\" value=\"%s\">",
244                         _("Change room name"));
245                 wprintf("</td>\n</tr>\n");
246
247                 wprintf("<TR><TD><B>");
248                 wprintf(_("Host name:"));
249                 wprintf("</B></TD><TD>");
250                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
251                 wprintf("</TD>\n<TD ALIGN=center>");
252                 wprintf("<INPUT TYPE=\"submit\" NAME=\"change_host_name_button\" VALUE=\"%s\">",
253                         _("Change host name"));
254                 wprintf("</TD>\n</TR>\n");
255
256                 if (WC->is_aide) {
257                         wprintf("<TR><TD><B>");
258                         wprintf(_("User name:"));
259                         wprintf("</B></TD><TD>");
260                         wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
261                         wprintf("</TD>\n<TD ALIGN=center>");
262                         wprintf("<INPUT TYPE=\"submit\" NAME=\"change_user_name_button\" VALUE=\"%s\">",
263                                 _("Change user name"));
264                         wprintf("</TD>\n</TR>\n");
265                 }
266                 wprintf("<TR><TD> </TD><TD> </TD><TD ALIGN=center>");
267                 wprintf("<INPUT TYPE=\"submit\" NAME=\"cancel_button\" VALUE=\"%s\">",
268                         _("Cancel"));
269                 wprintf("</TD></TR></TABLE>\n");
270                 wprintf("</FORM></CENTER>\n");
271                 wDumpContent(1);
272         }
273 }