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