* *** HUGE CHANGES *** *** WARNING: NOT FULLY FUNCTIONAL ***
[citadel.git] / webcit / who.c
1 /* $Id$ */
2
3 #include <ctype.h>
4 #include <stdlib.h>
5 #include <unistd.h>
6 #include <stdio.h>
7 #include <fcntl.h>
8 #include <signal.h>
9 #include <sys/types.h>
10 #include <sys/wait.h>
11 #include <sys/socket.h>
12 #include <sys/time.h>
13 #include <limits.h>
14 #include <netinet/in.h>
15 #include <netdb.h>
16 #include <string.h>
17 #include <pwd.h>
18 #include <errno.h>
19 #include <stdarg.h>
20 #include <pthread.h>
21 #include <signal.h>
22 #include "webcit.h"
23
24
25
26
27
28
29 /*
30  * who is on?
31  */
32 void whobbs(void)
33 {
34         char buf[SIZ], sess, user[SIZ], room[SIZ], host[SIZ],
35                 realroom[SIZ], realhost[SIZ];
36         time_t last_activity;
37         time_t now;
38         int bg = 0;
39
40         output_headers(1, 1, 2, 0, 1, 0, 0);
41
42         wprintf("<script language=\"JavaScript\">\n"
43                 "function ConfirmKill() { \n"
44                 "return confirm('Do you really want to kill this session?');\n"
45                 "}\n"
46                 "</script>\n"
47         );
48
49         wprintf("<div id=\"banner\">\n");
50         wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
51         wprintf("<IMG SRC=\"/static/users-icon.gif\" ALT=\" \" ALIGN=MIDDLE>");
52         wprintf("<SPAN CLASS=\"titlebar\">&nbsp;Users currently on ");
53         escputs(serv_info.serv_humannode);
54         wprintf("</SPAN></TD><TD ALIGN=RIGHT>");
55         offer_start_page();
56         wprintf("</TD></TR></TABLE>\n");
57         wprintf("</div>\n"
58                 "<div id=\"text\">\n");
59
60         do_template("beginbox_nt");
61         wprintf("<CENTER>"
62                 "<TABLE BORDER=0 CELLSPACING=0 WIDTH=100%%>\n<TR>\n");
63         wprintf("<TH COLSPAN=4>Session ID</TH>\n");
64         wprintf("<TH>User Name</TH>\n");
65         wprintf("<TH>Room</TH>");
66         wprintf("<TH>From host</TH>\n</TR>\n");
67
68         serv_puts("TIME");
69         serv_gets(buf);
70         if (buf[0] == '2') {
71                 now = extract_long(&buf[4], 0);
72         }
73         else {
74                 now = time(NULL);
75         }
76
77         serv_puts("RWHO");
78         serv_gets(buf);
79         if (buf[0] == '1') {
80                 while (serv_gets(buf), strcmp(buf, "000")) {
81                         sess = extract_int(buf, 0);
82                         extract(user, buf, 1);
83                         extract(room, buf, 2);
84                         extract(host, buf, 3);
85                         extract(realroom, buf, 9);
86                         extract(realhost, buf, 10);
87                         last_activity = extract_long(buf, 5);
88
89                         bg = 1 - bg;
90                         wprintf("<TR BGCOLOR=\"#%s\">",
91                                 (bg ? "DDDDDD" : "FFFFFF")
92                         );
93
94
95                         wprintf("<TD>%d</TD><TD>", sess);
96                         if ((WC->is_aide) &&
97                             (sess != WC->ctdl_pid)) {
98                                 wprintf(" <A HREF=\"/terminate_session&which_session=%d&session_owner=", sess);
99                                 urlescputs(user);
100                                 wprintf("\" onClick=\"return ConfirmKill();\" "
101                                 ">(kill)</A>");
102                         }
103                         if (sess == WC->ctdl_pid) {
104                                 wprintf(" <A HREF=\"/edit_me\" "
105                                         ">(edit)</A>");
106                         }
107                         wprintf("</TD>");
108
109                         /* (link to page this user) */
110                         wprintf("<TD><A HREF=\"/display_page&recp=");
111                         urlescputs(user);
112                         wprintf("\">"
113                                 "<IMG ALIGN=MIDDLE WIDTH=20 HEIGHT=15 "
114                                 "SRC=\"/static/page.gif\" "
115                                 "ALT=\"(p)\""
116                                 " BORDER=0></A>&nbsp;");
117                         wprintf("</TD>");
118
119                         /* (idle flag) */
120                         wprintf("<TD>");
121                         if ((now - last_activity) > 900L) {
122                                 wprintf("&nbsp;"
123                                         "<IMG ALIGN=MIDDLE "
124                                         "SRC=\"/static/idle.gif\" "
125                                         "ALT=\"[idle]\" BORDER=0>");
126                         }
127                         wprintf("</TD>\n\t<TD>");
128
129
130
131                         /* username (link to user bio/photo page) */
132                         wprintf("<A HREF=\"/showuser&who=");
133                         urlescputs(user);
134                         wprintf("\">");
135                         escputs(user);
136                         wprintf("</A>");
137
138                         /* room */
139                         wprintf("</TD>\n\t<TD>");
140                         escputs(room);
141                         if (strlen(realroom) > 0) {
142                                 wprintf("<br /><I>");
143                                 escputs(realroom);
144                                 wprintf("</I>");
145                         }
146                         wprintf("</TD>\n\t<TD>");
147
148                         /* hostname */
149                         escputs(host);
150                         if (strlen(realhost) > 0) {
151                                 wprintf("<br /><I>");
152                                 escputs(realhost);
153                                 wprintf("</I>");
154                         }
155                         wprintf("</TD>\n</TR>");
156                 }
157         }
158         wprintf("</TABLE>\n"
159                 "Click on a name to read user info.  Click on "
160                 "<IMG ALIGN=MIDDLE SRC=\"/static/page.gif\" ALT=\"(p)\" "
161                 "BORDER=0> to send "
162                 "a page (instant message) to that user.<br /></CENTER>\n");
163         do_template("endbox");
164         wDumpContent(1);
165 }
166
167
168 void terminate_session(void)
169 {
170         char buf[SIZ];
171
172         serv_printf("TERM %s", bstr("which_session"));
173         serv_gets(buf);
174         whobbs();
175 }
176
177
178 /*
179  * Change your session info (fake roomname and hostname)
180  */
181 void edit_me(void)
182 {
183         char buf[SIZ];
184
185         if (!strcasecmp(bstr("sc"), "Change room name")) {
186                 serv_printf("RCHG %s", bstr("fake_roomname"));
187                 serv_gets(buf);
188                 http_redirect("/whobbs");
189         } else if (!strcasecmp(bstr("sc"), "Change host name")) {
190                 serv_printf("HCHG %s", bstr("fake_hostname"));
191                 serv_gets(buf);
192                 http_redirect("/whobbs");
193         } else if (!strcasecmp(bstr("sc"), "Change user name")) {
194                 serv_printf("UCHG %s", bstr("fake_username"));
195                 serv_gets(buf);
196                 http_redirect("/whobbs");
197         } else if (!strcasecmp(bstr("sc"), "Cancel")) {
198                 http_redirect("/whobbs");
199         } else {
200
201                 output_headers(1, 1, 0, 0, 0, 0, 0);
202
203                 wprintf("<div id=\"banner\">\n");
204                 wprintf("<TABLE WIDTH=100%% BORDER=0 BGCOLOR=\"#444455\"><TR><TD>");
205                 wprintf("<SPAN CLASS=\"titlebar\">");
206                 wprintf("Edit your session display");
207                 wprintf("</SPAN></TD></TR></TABLE>\n");
208                 wprintf("</div>\n<div id=\"text\">\n");
209
210                 wprintf("This screen allows you to change the way your\n");
211                 wprintf("session appears in the 'Who is online' listing.\n");
212                 wprintf("To turn off any 'fake' name you've previously\n");
213                 wprintf("set, simply click the appropriate 'change' button\n");
214                 wprintf("without typing anything in the corresponding box.\n");
215                 wprintf("<br />\n");
216
217                 wprintf("<FORM METHOD=\"POST\" ACTION=\"/edit_me\">\n");
218
219                 wprintf("<TABLE border=0 width=100%%>\n");
220
221                 wprintf("<TR><TD><B>Room name:</B></TD>\n<TD>");
222                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_roomname\" MAXLENGTH=\"64\">\n");
223                 wprintf("</TD>\n<TD ALIGN=center>");
224                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change room name\">");
225                 wprintf("</TD>\n</TR>\n");
226
227                 wprintf("<TR><TD><B>Host name:</B></TD><TD>");
228                 wprintf("<INPUT TYPE=\"text\" NAME=\"fake_hostname\" MAXLENGTH=\"64\">\n");
229                 wprintf("</TD>\n<TD ALIGN=center>");
230                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change host name\">");
231                 wprintf("</TD>\n</TR>\n");
232
233                 if (WC->is_aide) {
234                         wprintf("<TR><TD><B>User name:</B></TD><TD>");
235                         wprintf("<INPUT TYPE=\"text\" NAME=\"fake_username\" MAXLENGTH=\"64\">\n");
236                         wprintf("</TD>\n<TD ALIGN=center>");
237                         wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Change user name\">");
238                         wprintf("</TD>\n</TR>\n");
239                 }
240                 wprintf("<TR><TD>&nbsp;</TD><TD>&nbsp;</TD><TD ALIGN=center>");
241                 wprintf("<INPUT TYPE=\"submit\" NAME=\"sc\" VALUE=\"Cancel\">");
242                 wprintf("</TD></TR></TABLE>\n");
243
244                 wprintf("</FORM></CENTER>\n");
245                 wDumpContent(1);
246         }
247 }