]> jfr.im git - irc/rqf/shadowircd.git/blame - modules/m_whois.c
bork bork bork
[irc/rqf/shadowircd.git] / modules / m_whois.c
CommitLineData
212380e3 1/*
2 * ircd-ratbox: A slightly useful ircd.
3 * m_whois.c: Shows who a user is.
4 *
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
22 * USA
23 *
f7eac53d 24 * $Id: m_whois.c 3536 2007-07-14 21:50:21Z jilles $
212380e3 25 */
26
27#include "stdinc.h"
28#include "tools.h"
29#include "common.h"
30#include "client.h"
31#include "hash.h"
32#include "channel.h"
33#include "hash.h"
34#include "ircd.h"
35#include "numeric.h"
36#include "s_conf.h"
37#include "s_serv.h"
38#include "send.h"
39#include "irc_string.h"
40#include "sprintf_irc.h"
41#include "s_conf.h"
42#include "s_log.h"
43#include "msg.h"
44#include "parse.h"
45#include "modules.h"
46#include "hook.h"
47#include "s_newconf.h"
48
49static void do_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
50static void single_whois(struct Client *source_p, struct Client *target_p, int operspy);
51
52static int m_whois(struct Client *, struct Client *, int, const char **);
53static int ms_whois(struct Client *, struct Client *, int, const char **);
54
55struct Message whois_msgtab = {
56 "WHOIS", 0, 0, 0, MFLG_SLOW,
57 {mg_unreg, {m_whois, 2}, {ms_whois, 2}, mg_ignore, mg_ignore, {m_whois, 2}}
58};
59
60int doing_whois_hook;
61int doing_whois_global_hook;
62
63mapi_clist_av1 whois_clist[] = { &whois_msgtab, NULL };
64mapi_hlist_av1 whois_hlist[] = {
65 { "doing_whois", &doing_whois_hook },
66 { "doing_whois_global", &doing_whois_global_hook },
67 { NULL, NULL }
68};
69
f7eac53d 70DECLARE_MODULE_AV1(whois, NULL, NULL, whois_clist, whois_hlist, NULL, "$Revision: 3536 $");
212380e3 71
72/*
73 * m_whois
74 * parv[0] = sender prefix
75 * parv[1] = nickname masklist
76 */
77static int
78m_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
79{
80 static time_t last_used = 0;
81
82 if(parc > 2)
83 {
84 if(EmptyString(parv[2]))
85 {
86 sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
87 me.name, source_p->name);
88 return 0;
89 }
90
91 if(!IsOper(source_p))
92 {
93 /* seeing as this is going across servers, we should limit it */
94 if((last_used + ConfigFileEntry.pace_wait_simple) > CurrentTime)
95 {
96 sendto_one(source_p, form_str(RPL_LOAD2HI),
97 me.name, source_p->name, "WHOIS");
98 sendto_one_numeric(source_p, RPL_ENDOFWHOIS,
f7eac53d 99 form_str(RPL_ENDOFWHOIS), parv[2]);
212380e3 100 return 0;
101 }
102 else
103 last_used = CurrentTime;
104 }
105
106 if(hunt_server(client_p, source_p, ":%s WHOIS %s :%s", 1, parc, parv) !=
107 HUNTED_ISME)
108 return 0;
109
110 parv[1] = parv[2];
111
112 }
113 do_whois(client_p, source_p, parc, parv);
114
115 return 0;
116}
117
118/*
119 * ms_whois
120 * parv[0] = sender prefix
121 * parv[1] = server to reply
122 * parv[2] = nickname to whois
123 */
124static int
125ms_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
126{
127 struct Client *target_p;
128
129 /* note: early versions of ratbox allowed users to issue a remote
130 * whois with a blank parv[2], so we cannot treat it as a protocol
131 * violation. --anfl
132 */
133 if(parc < 3 || EmptyString(parv[2]))
134 {
135 sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
136 me.name, source_p->name);
137 return 0;
138 }
139
140 /* check if parv[1] exists */
141 if((target_p = find_client(parv[1])) == NULL)
142 {
143 sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
144 form_str(ERR_NOSUCHSERVER),
145 IsDigit(parv[1][0]) ? "*" : parv[1]);
146 return 0;
147 }
148
149 /* if parv[1] isnt my client, or me, someone else is supposed
150 * to be handling the request.. so send it to them
151 */
152 if(!MyClient(target_p) && !IsMe(target_p))
153 {
154 sendto_one(target_p, ":%s WHOIS %s :%s",
155 get_id(source_p, target_p),
156 get_id(target_p, target_p), parv[2]);
157 return 0;
158 }
159
160 /* ok, the target is either us, or a client on our server, so perform the whois
161 * but first, parv[1] == server to perform the whois on, parv[2] == person
162 * to whois, so make parv[1] = parv[2] so do_whois is ok -- fl_
163 */
164 parv[1] = parv[2];
165 do_whois(client_p, source_p, parc, parv);
166
167 return 0;
168}
169
170/* do_whois
171 *
172 * inputs - pointer to
173 * output -
174 * side effects -
175 */
176static void
177do_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
178{
179 struct Client *target_p;
180 char *nick;
181 char *p = NULL;
182 int operspy = 0;
183
184 nick = LOCAL_COPY(parv[1]);
185 if((p = strchr(nick, ',')))
186 *p = '\0';
187
188 if(IsOperSpy(source_p) && *nick == '!')
189 {
190 operspy = 1;
191 nick++;
192 }
193
194 target_p = find_named_person(nick);
195
196 if(target_p != NULL)
197 {
198 if(operspy)
199 {
200 char buffer[BUFSIZE];
201
202 snprintf(buffer, sizeof(buffer), "%s!%s@%s %s",
203 target_p->name, target_p->username,
c88cdb00 204 target_p->host, target_p->servptr->name);
212380e3 205 report_operspy(source_p, "WHOIS", buffer);
206 }
207
208 single_whois(source_p, target_p, operspy);
209 }
210 else
211 sendto_one_numeric(source_p, ERR_NOSUCHNICK,
212 form_str(ERR_NOSUCHNICK),
8a1e143f 213 nick);
212380e3 214
215 sendto_one_numeric(source_p, RPL_ENDOFWHOIS,
216 form_str(RPL_ENDOFWHOIS), parv[1]);
217 return;
218}
219
220/*
221 * single_whois()
222 *
223 * Inputs - source_p client to report to
224 * - target_p client to report on
225 * Output - if found return 1
226 * Side Effects - do a single whois on given client
227 * writing results to source_p
228 */
229static void
230single_whois(struct Client *source_p, struct Client *target_p, int operspy)
231{
232 char buf[BUFSIZE];
233 dlink_node *ptr;
212380e3 234 struct membership *msptr;
235 struct Channel *chptr;
236 int cur_len = 0;
237 int mlen;
238 char *t;
239 int tlen;
240 hook_data_client hdata;
241 char *name;
242 char quest[] = "?";
243 int visible;
244 int extra_space = 0;
245
246 if(target_p->name[0] == '\0')
247 name = quest;
248 else
249 name = target_p->name;
250
251 if(target_p->user == NULL)
252 {
253 s_assert(0);
254 return;
255 }
256
212380e3 257 sendto_one_numeric(source_p, RPL_WHOISUSER, form_str(RPL_WHOISUSER),
258 target_p->name, target_p->username,
259 target_p->host, target_p->info);
260
261 cur_len = mlen = ircsprintf(buf, form_str(RPL_WHOISCHANNELS),
262 get_id(&me, source_p), get_id(source_p, source_p),
263 target_p->name);
264
265 /* Make sure it won't overflow when sending it to the client
266 * in full names; note that serverhiding may require more space
267 * for a different server name (not done here) -- jilles
268 */
269 if (!MyConnect(source_p))
270 {
271 extra_space = strlen(source_p->name) - 9;
272 if (extra_space < 0)
273 extra_space = 0;
274 extra_space += strlen(me.name) - 2; /* make sure >= 0 */
275 cur_len += extra_space;
276 }
277
278 t = buf + mlen;
279
04513cff 280 if (!IsService(target_p))
212380e3 281 {
04513cff 282 DLINK_FOREACH(ptr, target_p->user->channel.head)
283 {
284 msptr = ptr->data;
285 chptr = msptr->chptr;
212380e3 286
04513cff 287 visible = ShowChannel(source_p, chptr);
212380e3 288
04513cff 289 if(visible || operspy)
212380e3 290 {
04513cff 291 if((cur_len + strlen(chptr->chname) + 3) > (BUFSIZE - 5))
292 {
293 sendto_one(source_p, "%s", buf);
294 cur_len = mlen + extra_space;
295 t = buf + mlen;
296 }
297
298 tlen = ircsprintf(t, "%s%s%s ",
299 visible ? "" : "!",
300 find_channel_status(msptr, 1),
301 chptr->chname);
302 t += tlen;
303 cur_len += tlen;
212380e3 304 }
212380e3 305 }
306 }
307
308 if(cur_len > mlen + extra_space)
309 sendto_one(source_p, "%s", buf);
310
311 sendto_one_numeric(source_p, RPL_WHOISSERVER, form_str(RPL_WHOISSERVER),
c88cdb00 312 target_p->name, target_p->servptr->name,
1f8b58e7 313 target_p->servptr->info);
212380e3 314
315 if(target_p->user->away)
316 sendto_one_numeric(source_p, RPL_AWAY, form_str(RPL_AWAY),
317 target_p->name, target_p->user->away);
318
319 if(IsOper(target_p))
320 {
321 sendto_one_numeric(source_p, RPL_WHOISOPERATOR, form_str(RPL_WHOISOPERATOR),
322 target_p->name,
323 IsService(target_p) ? ConfigFileEntry.servicestring :
324 (IsAdmin(target_p) ? GlobalSetOptions.adminstring :
325 GlobalSetOptions.operstring));
326 }
327
328 if(MyClient(target_p))
329 {
330 if (IsDynSpoof(target_p) && (IsOper(source_p) || source_p == target_p))
331 {
332 /* trick here: show a nonoper their own IP if
333 * dynamic spoofed but not if auth{} spoofed
334 * -- jilles */
335 ClearDynSpoof(target_p);
336 sendto_one_numeric(source_p, RPL_WHOISHOST,
337 form_str(RPL_WHOISHOST),
338 target_p->name, target_p->orighost,
339 show_ip(source_p, target_p) ? target_p->sockhost : "255.255.255.255");
340 SetDynSpoof(target_p);
341 }
342 else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p))
343 sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
344 form_str(RPL_WHOISACTUALLY),
345 target_p->name, target_p->sockhost);
346
347 sendto_one_numeric(source_p, RPL_WHOISIDLE, form_str(RPL_WHOISIDLE),
348 target_p->name,
349 CurrentTime - target_p->localClient->last,
350 target_p->localClient->firsttime);
351 }
352 else
353 {
354 if (IsDynSpoof(target_p) && (IsOper(source_p) || source_p == target_p))
355 {
356 ClearDynSpoof(target_p);
357 sendto_one_numeric(source_p, RPL_WHOISHOST,
358 form_str(RPL_WHOISHOST),
359 target_p->name, target_p->orighost,
360 show_ip(source_p, target_p) && !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0")? target_p->sockhost : "255.255.255.255");
361 SetDynSpoof(target_p);
362 }
363 else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p) &&
364 !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0"))
365 {
366 sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
367 form_str(RPL_WHOISACTUALLY),
368 target_p->name, target_p->sockhost);
369
370 }
371
372 }
373
374 hdata.client = source_p;
375 hdata.target = target_p;
376
377 /* doing_whois_hook must only be called for local clients,
378 * doing_whois_global_hook must only be called for local targets
379 */
380 /* it is important that these are called *before* RPL_ENDOFWHOIS is
381 * sent, services compatibility code depends on it. --anfl
382 */
383 if(MyClient(source_p))
384 call_hook(doing_whois_hook, &hdata);
385 else
386 call_hook(doing_whois_global_hook, &hdata);
387
388 return;
389}
390