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