]> jfr.im git - irc/rqf/shadowircd.git/blame - modules/m_trace.c
Add some ircd-seven love to CREDITS.
[irc/rqf/shadowircd.git] / modules / m_trace.c
CommitLineData
212380e3 1/*
2 * ircd-ratbox: A slightly useful ircd.
3 * m_trace.c: Traces a path to a client/server.
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 *
4d7a1ee5 24 * $Id: m_trace.c 3183 2007-02-01 01:07:42Z jilles $
212380e3 25 */
26
27#include "stdinc.h"
28#include "class.h"
29#include "hook.h"
30#include "client.h"
31#include "hash.h"
32#include "common.h"
33#include "hash.h"
13ae2f4b 34#include "match.h"
212380e3 35#include "ircd.h"
36#include "numeric.h"
212380e3 37#include "s_serv.h"
38#include "s_conf.h"
39#include "s_newconf.h"
40#include "send.h"
41#include "msg.h"
42#include "parse.h"
43#include "modules.h"
44
45static int m_trace(struct Client *, struct Client *, int, const char **);
46
47static void trace_spy(struct Client *, struct Client *);
48
49struct Message trace_msgtab = {
50 "TRACE", 0, 0, 0, MFLG_SLOW,
51 {mg_unreg, {m_trace, 0}, {m_trace, 0}, mg_ignore, mg_ignore, {m_trace, 0}}
52};
53
54int doing_trace_hook;
55
56mapi_clist_av1 trace_clist[] = { &trace_msgtab, NULL };
57mapi_hlist_av1 trace_hlist[] = {
58 { "doing_trace", &doing_trace_hook },
59 { NULL, NULL }
60};
4d7a1ee5 61DECLARE_MODULE_AV1(trace, NULL, NULL, trace_clist, trace_hlist, NULL, "$Revision: 3183 $");
212380e3 62
63static void count_downlinks(struct Client *server_p, int *pservcount, int *pusercount);
a70bad1d 64static int report_this_status(struct Client *source_p, struct Client *target_p);
212380e3 65
51b0223e
VY
66static const char *empty_sockhost = "255.255.255.255";
67
212380e3 68/*
69 * m_trace
212380e3 70 * parv[1] = servername
71 */
72static int
73m_trace(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
74{
75 struct Client *target_p = NULL;
76 struct Class *cltmp;
77 const char *tname;
78 int doall = 0;
79 int cnt = 0, wilds, dow;
08d11e34 80 rb_dlink_node *ptr;
212380e3 81
82 if(parc > 1)
83 {
84 tname = parv[1];
85
86 if(parc > 2)
87 {
88 if(hunt_server(client_p, source_p, ":%s TRACE %s :%s", 2, parc, parv) !=
89 HUNTED_ISME)
90 return 0;
91 }
92 }
93 else
94 tname = me.name;
95
96 /* if we have 3 parameters, then the command is directed at us. So
97 * we shouldnt be forwarding it anywhere.
98 */
99 if(parc < 3)
100 {
101 switch (hunt_server(client_p, source_p, ":%s TRACE :%s", 1, parc, parv))
102 {
103 case HUNTED_PASS: /* note: gets here only if parv[1] exists */
104 {
105 struct Client *ac2ptr;
106
107 if(MyClient(source_p))
108 ac2ptr = find_named_client(tname);
109 else
110 ac2ptr = find_client(tname);
111
112 if(ac2ptr == NULL)
113 {
08d11e34 114 RB_DLINK_FOREACH(ptr, global_client_list.head)
212380e3 115 {
116 ac2ptr = ptr->data;
117
4d7a1ee5 118 if(match(tname, ac2ptr->name))
212380e3 119 break;
120 else
121 ac2ptr = NULL;
122 }
123 }
124
125 /* giving this out with flattened links defeats the
126 * object --fl
127 */
128 if(IsOper(source_p) || IsExemptShide(source_p) ||
129 !ConfigServerHide.flatten_links)
130 sendto_one_numeric(source_p, RPL_TRACELINK,
131 form_str(RPL_TRACELINK),
132 ircd_version,
133 ac2ptr ? ac2ptr->name : tname,
134 ac2ptr ? ac2ptr->from->name : "EEK!");
135
136 return 0;
137 }
138
139 case HUNTED_ISME:
140 break;
141
142 default:
143 return 0;
144 }
145 }
146
147 if(match(tname, me.name))
148 {
149 doall = 1;
150 }
151 /* if theyre tracing our SID, we need to move tname to our name so
152 * we dont give the sid in ENDOFTRACE
153 */
154 else if(!MyClient(source_p) && !strcmp(tname, me.id))
155 {
156 doall = 1;
157 tname = me.name;
158 }
159
160 wilds = strchr(tname, '*') || strchr(tname, '?');
161 dow = wilds || doall;
162
163 /* specific trace */
164 if(dow == 0)
165 {
166 if(MyClient(source_p) || parc > 2)
167 target_p = find_named_person(tname);
168 else
169 target_p = find_person(tname);
170
171 /* tname could be pointing to an ID at this point, so reset
172 * it to target_p->name if we have a target --fl
173 */
174 if(target_p != NULL)
175 {
a70bad1d 176 report_this_status(source_p, target_p);
212380e3 177 tname = target_p->name;
178 }
179
180 trace_spy(source_p, target_p);
181
182 sendto_one_numeric(source_p, RPL_ENDOFTRACE,
183 form_str(RPL_ENDOFTRACE), tname);
184 return 0;
185 }
186
187 trace_spy(source_p, NULL);
188
189 /* give non-opers a limited trace output of themselves (if local),
190 * opers and servers (if no shide) --fl
191 */
192 if(!IsOper(source_p))
193 {
194 if(MyClient(source_p))
195 {
196 if(doall || (wilds && match(tname, source_p->name)))
a70bad1d 197 report_this_status(source_p, source_p);
212380e3 198 }
199
08d11e34 200 RB_DLINK_FOREACH(ptr, local_oper_list.head)
212380e3 201 {
202 target_p = ptr->data;
203
204 if(!doall && wilds && (match(tname, target_p->name) == 0))
205 continue;
206
a70bad1d 207 report_this_status(source_p, target_p);
212380e3 208 }
209
210 if (IsExemptShide(source_p) || !ConfigServerHide.flatten_links)
211 {
08d11e34 212 RB_DLINK_FOREACH(ptr, serv_list.head)
212380e3 213 {
214 target_p = ptr->data;
215
216 if(!doall && wilds && !match(tname, target_p->name))
217 continue;
218
a70bad1d 219 report_this_status(source_p, target_p);
212380e3 220 }
221 }
222
223 sendto_one_numeric(source_p, RPL_ENDOFTRACE,
224 form_str(RPL_ENDOFTRACE), tname);
225 return 0;
226 }
227
228 /* source_p is opered */
229
230 /* report all direct connections */
08d11e34 231 RB_DLINK_FOREACH(ptr, lclient_list.head)
212380e3 232 {
233 target_p = ptr->data;
234
235 /* dont show invisible users to remote opers */
236 if(IsInvisible(target_p) && dow && !MyConnect(source_p) && !IsOper(target_p))
237 continue;
238
239 if(!doall && wilds && !match(tname, target_p->name))
240 continue;
241
823d0e7a
JT
242 /* remote opers may not see invisible normal users */
243 if(dow && !MyConnect(source_p) && !IsOper(target_p) &&
244 IsInvisible(target_p))
245 continue;
246
a70bad1d 247 cnt = report_this_status(source_p, target_p);
212380e3 248 }
249
08d11e34 250 RB_DLINK_FOREACH(ptr, serv_list.head)
212380e3 251 {
252 target_p = ptr->data;
253
254 if(!doall && wilds && !match(tname, target_p->name))
255 continue;
256
a70bad1d 257 cnt = report_this_status(source_p, target_p);
212380e3 258 }
259
260 if(MyConnect(source_p))
261 {
08d11e34 262 RB_DLINK_FOREACH(ptr, unknown_list.head)
212380e3 263 {
264 target_p = ptr->data;
265
266 if(!doall && wilds && !match(tname, target_p->name))
267 continue;
268
a70bad1d 269 cnt = report_this_status(source_p, target_p);
212380e3 270 }
271 }
272
273 if(!cnt)
274 {
275 sendto_one_numeric(source_p, ERR_NOSUCHSERVER, form_str(ERR_NOSUCHSERVER),
276 tname);
277
278 /* let the user have some idea that its at the end of the
279 * trace
280 */
281 sendto_one_numeric(source_p, RPL_ENDOFTRACE,
282 form_str(RPL_ENDOFTRACE), tname);
283 return 0;
284 }
285
286 if(doall)
287 {
08d11e34 288 RB_DLINK_FOREACH(ptr, class_list.head)
212380e3 289 {
290 cltmp = ptr->data;
291
292 if(CurrUsers(cltmp) > 0)
293 sendto_one_numeric(source_p, RPL_TRACECLASS,
294 form_str(RPL_TRACECLASS),
295 ClassName(cltmp), CurrUsers(cltmp));
296 }
297 }
298
299 sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), tname);
300
301 return 0;
302}
303
304/*
305 * count_downlinks
306 *
307 * inputs - pointer to server to count
308 * - pointers to server and user count
309 * output - NONE
310 * side effects - server and user counts are added to given values
311 */
312static void
313count_downlinks(struct Client *server_p, int *pservcount, int *pusercount)
314{
08d11e34 315 rb_dlink_node *ptr;
212380e3 316
317 (*pservcount)++;
08d11e34
WP
318 *pusercount += rb_dlink_list_length(&server_p->serv->users);
319 RB_DLINK_FOREACH(ptr, server_p->serv->servers.head)
212380e3 320 {
321 count_downlinks(ptr->data, pservcount, pusercount);
322 }
323}
324
325/*
326 * report_this_status
327 *
328 * inputs - pointer to client to report to
329 * - pointer to client to report about
330 * output - counter of number of hits
331 * side effects - NONE
332 */
333static int
a70bad1d 334report_this_status(struct Client *source_p, struct Client *target_p)
212380e3 335{
336 const char *name;
337 const char *class_name;
338 char ip[HOSTIPLEN];
339 int cnt = 0;
340
341 /* sanity check - should never happen */
342 if(!MyConnect(target_p))
343 return 0;
344
9879cd59 345 rb_inet_ntop_sock((struct sockaddr *)&target_p->localClient->ip, ip, sizeof(ip));
212380e3 346 class_name = get_client_class(target_p);
347
348 if(IsAnyServer(target_p))
715b28fe 349 name = target_p->name;
212380e3 350 else
351 name = get_client_name(target_p, HIDE_IP);
352
353 switch (target_p->status)
354 {
355 case STAT_CONNECTING:
356 sendto_one_numeric(source_p, RPL_TRACECONNECTING,
357 form_str(RPL_TRACECONNECTING),
358 class_name, name);
359 cnt++;
360 break;
361
362 case STAT_HANDSHAKE:
363 sendto_one_numeric(source_p, RPL_TRACEHANDSHAKE,
364 form_str(RPL_TRACEHANDSHAKE),
365 class_name, name);
366 cnt++;
367 break;
368
369 case STAT_ME:
370 break;
371
372 case STAT_UNKNOWN:
373 /* added time -Taner */
374 sendto_one_numeric(source_p, RPL_TRACEUNKNOWN,
375 form_str(RPL_TRACEUNKNOWN),
376 class_name, name, ip,
9f6bbe3c 377 rb_current_time() - target_p->localClient->firsttime);
212380e3 378 cnt++;
379 break;
380
381 case STAT_CLIENT:
346aca17
JT
382 {
383 int tnumeric;
212380e3 384
346aca17
JT
385 tnumeric = IsOper(target_p) ? RPL_TRACEOPERATOR : RPL_TRACEUSER;
386 sendto_one_numeric(source_p, tnumeric, form_str(tnumeric),
387 class_name, name,
388 show_ip(source_p, target_p) ? ip : empty_sockhost,
389 rb_current_time() - target_p->localClient->lasttime,
390 rb_current_time() - target_p->localClient->last);
391
392 cnt++;
393 }
a70bad1d 394 break;
212380e3 395
396 case STAT_SERVER:
397 {
398 int usercount = 0;
399 int servcount = 0;
400
401 count_downlinks(target_p, &servcount, &usercount);
402
403 sendto_one_numeric(source_p, RPL_TRACESERVER, form_str(RPL_TRACESERVER),
404 class_name, servcount, usercount, name,
405 *(target_p->serv->by) ? target_p->serv->by : "*", "*",
9f6bbe3c 406 me.name, rb_current_time() - target_p->localClient->lasttime);
212380e3 407 cnt++;
408
409 }
410 break;
411
412 default: /* ...we actually shouldn't come here... --msa */
413 sendto_one_numeric(source_p, RPL_TRACENEWTYPE,
414 form_str(RPL_TRACENEWTYPE),
415 me.name, source_p->name, name);
416 cnt++;
417 break;
418 }
419
420 return (cnt);
421}
422
423/* trace_spy()
424 *
425 * input - pointer to client
426 * output - none
427 * side effects - hook event doing_trace is called
428 */
429static void
430trace_spy(struct Client *source_p, struct Client *target_p)
431{
432 hook_data_client hdata;
433
434 hdata.client = source_p;
435 hdata.target = target_p;
436
437 call_hook(doing_trace_hook, &hdata);
438}