4c2e28cdc80495e92c7254bdb2d8d84eec588f0a
[citadel.git] / citadel / modules / rwho / serv_rwho.c
1 /*
2  * This module implements server commands related to the display and
3  * manipulation of the "Who's online" list.
4  *
5  * Copyright (c) 1987-2012 by the citadel.org team
6  *
7  * This program is open source software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License version 3.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  */
16
17 #include "sysdep.h"
18 #include <stdlib.h>
19 #include <unistd.h>
20 #include <stdio.h>
21 #include <fcntl.h>
22 #include <signal.h>
23 #include <pwd.h>
24 #include <errno.h>
25 #include <sys/types.h>
26
27 #if TIME_WITH_SYS_TIME
28 # include <sys/time.h>
29 # include <time.h>
30 #else
31 # if HAVE_SYS_TIME_H
32 #  include <sys/time.h>
33 # else
34 #  include <time.h>
35 # endif
36 #endif
37
38 #include <sys/wait.h>
39 #include <string.h>
40 #include <limits.h>
41 #include <libcitadel.h>
42 #include "citadel.h"
43 #include "server.h"
44 #include "citserver.h"
45 #include "support.h"
46 #include "config.h"
47 #include "control.h"
48 #include "user_ops.h"
49 #include "database.h"
50 #include "msgbase.h"
51
52
53 #include "ctdl_module.h"
54
55 /* Don't show the names of private rooms unless the viewing
56  * user also knows the rooms.
57  */
58 void GenerateRoomDisplay(char *real_room,
59                         CitContext *viewed,
60                         CitContext *viewer) {
61
62         int ra;
63
64         strcpy(real_room, viewed->room.QRname);
65         if (viewed->room.QRflags & QR_MAILBOX) {
66                 strcpy(real_room, &real_room[11]);
67         }
68         if (viewed->room.QRflags & QR_PRIVATE) {
69                 CtdlRoomAccess(&viewed->room, &viewer->user, &ra, NULL);
70                 if ( (ra & UA_KNOWN) == 0) {
71                         strcpy(real_room, " ");
72                 }
73         }
74
75         if (viewed->cs_flags & CS_CHAT) {
76                 while (strlen(real_room) < 14) {
77                         strcat(real_room, " ");
78                 }
79                 strcpy(&real_room[14], "<chat>");
80         }
81
82 }
83
84
85
86 /*
87  * display who's online
88  */
89 void cmd_rwho(char *argbuf) {
90         struct CitContext *nptr;
91         int nContexts, i;
92         int spoofed = 0;
93         int user_spoofed = 0;
94         int room_spoofed = 0;
95         int host_spoofed = 0;
96         int aide;
97         char un[40];
98         char real_room[ROOMNAMELEN], room[ROOMNAMELEN];
99         char host[64], flags[5];
100         
101         /* So that we don't keep the context list locked for a long time
102          * we create a copy of it first
103          */
104         nptr = CtdlGetContextArray(&nContexts) ;
105         if (!nptr)
106         {
107                 /* Couldn't malloc so we have to bail but stick to the protocol */
108                 cprintf("%d%c \n", LISTING_FOLLOWS, CtdlCheckExpress() );
109                 cprintf("000\n");
110                 return;
111         }
112         
113         aide = ( (CC->user.axlevel >= AxAideU) || (CC->internal_pgm) ) ;
114         cprintf("%d%c \n", LISTING_FOLLOWS, CtdlCheckExpress() );
115         
116         for (i=0; i<nContexts; i++) 
117         {
118                 flags[0] = '\0';
119                 spoofed = 0;
120                 user_spoofed = 0;
121                 room_spoofed = 0;
122                 host_spoofed = 0;
123                 
124                 if (!aide && nptr[i].state == CON_SYS)
125                         continue;
126
127                 if (!aide && nptr[i].kill_me != 0)
128                         continue;
129
130                 if (nptr[i].cs_flags & CS_POSTING)
131                    strcat(flags, "*");
132                 else
133                    strcat(flags, ".");
134                    
135                 if (nptr[i].fake_username[0])
136                 {
137                    strcpy(un, nptr[i].fake_username);
138                    spoofed = 1;
139                    user_spoofed = 1;
140                 }
141                 else
142                    strcpy(un, nptr[i].curr_user);
143                    
144                 if (nptr[i].fake_hostname[0])
145                 {
146                    strcpy(host, nptr[i].fake_hostname);
147                    spoofed = 1;
148                    host_spoofed = 1;
149                 }
150                 else
151                    strcpy(host, nptr[i].cs_host);
152
153                 GenerateRoomDisplay(real_room, &nptr[i], CC);
154
155                 if (nptr[i].fake_roomname[0]) {
156                         strcpy(room, nptr[i].fake_roomname);
157                         spoofed = 1;
158                         room_spoofed = 1;
159                 }
160                 else {
161                         strcpy(room, real_room);
162                 }
163                 
164                 if ((aide) && (spoofed)) {
165                         strcat(flags, "+");
166                 }
167                 
168                 if ((nptr[i].cs_flags & CS_STEALTH) && (aide)) {
169                         strcat(flags, "-");
170                 }
171                 
172                 if (((nptr[i].cs_flags&CS_STEALTH)==0) || (aide))
173                 {
174                         cprintf("%d|%s|%s|%s|%s|%ld|%s|%s|",
175                                 nptr[i].cs_pid, un, room,
176                                 host, nptr[i].cs_clientname,
177                                 (long)(nptr[i].lastidle),
178                                 nptr[i].lastcmdname, flags
179                         );
180
181                         if ((user_spoofed) && (aide)) {
182                                 cprintf("%s|", nptr[i].curr_user);
183                         }
184                         else {
185                                 cprintf("|");
186                         }
187         
188                         if ((room_spoofed) && (aide)) {
189                                 cprintf("%s|", real_room);
190                         }
191                         else {
192                                 cprintf("|");
193                         }
194         
195                         if ((host_spoofed) && (aide)) {
196                                 cprintf("%s|", nptr[i].cs_host);
197                         }
198                         else {
199                                 cprintf("|");
200                         }
201         
202                         cprintf("%d\n", nptr[i].logged_in);
203                 }
204         }
205         
206         /* release out copy of the context list */
207         free(nptr);
208
209         /* Now it's magic time.  Before we finish, call any EVT_RWHO hooks
210          * so that external paging modules such as serv_icq can add more
211          * content to the Wholist.
212          */
213         PerformSessionHooks(EVT_RWHO);
214         cprintf("000\n");
215 }
216
217
218 /*
219  * Masquerade roomname
220  */
221 void cmd_rchg(char *argbuf)
222 {
223         char newroomname[ROOMNAMELEN];
224
225         extract_token(newroomname, argbuf, 0, '|', sizeof newroomname);
226         newroomname[ROOMNAMELEN-1] = 0;
227         if (!IsEmptyStr(newroomname)) {
228                 safestrncpy(CC->fake_roomname, newroomname,
229                         sizeof(CC->fake_roomname) );
230         }
231         else {
232                 safestrncpy(CC->fake_roomname, "", sizeof CC->fake_roomname);
233         }
234         cprintf("%d OK\n", CIT_OK);
235 }
236
237 /*
238  * Masquerade hostname 
239  */
240 void cmd_hchg(char *argbuf)
241 {
242         char newhostname[64];
243
244         extract_token(newhostname, argbuf, 0, '|', sizeof newhostname);
245         if (!IsEmptyStr(newhostname)) {
246                 safestrncpy(CC->fake_hostname, newhostname,
247                         sizeof(CC->fake_hostname) );
248         }
249         else {
250                 safestrncpy(CC->fake_hostname, "", sizeof CC->fake_hostname);
251         }
252         cprintf("%d OK\n", CIT_OK);
253 }
254
255
256 /*
257  * Masquerade username (aides only)
258  */
259 void cmd_uchg(char *argbuf)
260 {
261
262         char newusername[USERNAME_SIZE];
263
264         extract_token(newusername, argbuf, 0, '|', sizeof newusername);
265
266         if (CtdlAccessCheck(ac_aide)) return;
267
268         if (!IsEmptyStr(newusername)) {
269                 CC->cs_flags &= ~CS_STEALTH;
270                 memset(CC->fake_username, 0, 32);
271                 if (strncasecmp(newusername, CC->curr_user,
272                                 strlen(CC->curr_user)))
273                         safestrncpy(CC->fake_username, newusername,
274                                 sizeof(CC->fake_username));
275         }
276         else {
277                 CC->fake_username[0] = '\0';
278                 CC->cs_flags |= CS_STEALTH;
279         }
280         cprintf("%d\n",CIT_OK);
281 }
282
283
284
285
286 /*
287  * enter or exit "stealth mode"
288  */
289 void cmd_stel(char *cmdbuf)
290 {
291         int requested_mode;
292
293         requested_mode = extract_int(cmdbuf,0);
294
295         if (CtdlAccessCheck(ac_logged_in)) return;
296
297         if (requested_mode == 1) {
298                 CC->cs_flags = CC->cs_flags | CS_STEALTH;
299                 PerformSessionHooks(EVT_STEALTH);
300         }
301         if (requested_mode == 0) {
302                 CC->cs_flags = CC->cs_flags & ~CS_STEALTH;
303                 PerformSessionHooks(EVT_UNSTEALTH);
304         }
305
306         cprintf("%d %d\n", CIT_OK,
307                 ((CC->cs_flags & CS_STEALTH) ? 1 : 0) );
308 }
309
310
311 CTDL_MODULE_INIT(rwho)
312 {
313         if(!threading)
314         {
315                 CtdlRegisterProtoHook(cmd_rwho, "RWHO", "Display who is online");
316                 CtdlRegisterProtoHook(cmd_hchg, "HCHG", "Masquerade hostname");
317                 CtdlRegisterProtoHook(cmd_rchg, "RCHG", "Masquerade roomname");
318                 CtdlRegisterProtoHook(cmd_uchg, "UCHG", "Masquerade username");
319                 CtdlRegisterProtoHook(cmd_stel, "STEL", "Enter/exit stealth mode");
320         }
321         
322         /* return our module name for the log */
323         return "rwho";
324 }