Something went wrong. Try again.
[READ-ONLY] Mirror of https://github.com/VibeDevelopers/Comet.
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413/* * ircd-ratbox: an advanced Internet Relay Chat Daemon(ircd). * m_etrace.c: Gives local opers a trace output with added info. * * Copyright (C) 2002-2003 Lee Hardy <lee@leeh.co.uk> * Copyright (C) 2002-2005 ircd-ratbox development team * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions are * met: * * 1.Redistributions of source code must retain the above copyright notice, * this list of conditions and the following disclaimer. * 2.Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3.The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */
#include "stdinc.h"#include "class.h"#include "hook.h"#include "client.h"#include "hash.h"#include "hash.h"#include "match.h"#include "ircd.h"#include "numeric.h"#include "s_serv.h"#include "s_conf.h"#include "s_newconf.h"#include "send.h"#include "msg.h"#include "parse.h"#include "modules.h"#include "logger.h"#include "response.h"#include "supported.h"
static const char etrace_desc[] = "Provides enhanced tracing facilities to opers (ETRACE, CHANTRACE, and MASKTRACE)";
static void mo_etrace(struct MsgBuf *, struct Client *, struct Client *, int, const char **);static void me_etrace(struct MsgBuf *, struct Client *, struct Client *, int, const char **);static void m_chantrace(struct MsgBuf *, struct Client *, struct Client *, int, const char **);static void mo_masktrace(struct MsgBuf *, struct Client *, struct Client *, int, const char **);
struct Message etrace_msgtab = { "ETRACE", 0, 0, 0, 0, {mg_ignore, mg_not_oper, mg_ignore, mg_ignore, {me_etrace, 0}, {mo_etrace, 0}}};struct Message chantrace_msgtab = { "CHANTRACE", 0, 0, 0, 0, {mg_ignore, {m_chantrace, 2}, mg_ignore, mg_ignore, mg_ignore, {m_chantrace, 2}}};struct Message masktrace_msgtab = { "MASKTRACE", 0, 0, 0, 0, {mg_ignore, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_masktrace, 2}}};
static int_modinit(void){ add_isupport("ETRACE", isupport_string, "");
return 0;}
static void_moddeinit(void){ delete_isupport("ETRACE");}
mapi_clist_av1 etrace_clist[] = { &etrace_msgtab, &chantrace_msgtab, &masktrace_msgtab, NULL };
DECLARE_MODULE_AV2(etrace, _modinit, _moddeinit, etrace_clist, NULL, NULL, NULL, NULL, etrace_desc);
static void do_etrace(struct Client *source_p, int ipv4, int ipv6);static void do_etrace_full(struct Client *source_p);static void do_single_etrace(struct Client *source_p, struct Client *target_p);
static const char *empty_sockhost = "255.255.255.255";static const char *spoofed_sockhost = "0";
/* * m_etrace * parv[1] = options [or target] * parv[2] = [target] */static voidmo_etrace(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]){ if(!IsOperGeneral(source_p)) { sendto_one(source_p, form_str(ERR_NOPRIVS), me.name, source_p->name, "general"); return; }
if(parc > 1 && !EmptyString(parv[1])) { if(!irccmp(parv[1], "-full")) { begin_local_response_batch(); do_etrace_full(source_p); } else if(!irccmp(parv[1], "-v6")) { begin_local_response_batch(); do_etrace(source_p, 0, 1); } else if(!irccmp(parv[1], "-v4")) { begin_local_response_batch(); do_etrace(source_p, 1, 0); } else { struct Client *target_p = find_named_person(parv[1]);
if(target_p) { if (!MyClient(target_p)) { begin_remote_response_batch(1, target_p->servptr->name); sendto_one(target_p, ":%s ENCAP %s ETRACE %s", get_id(source_p, target_p), target_p->servptr->name, get_id(target_p, target_p)); } else { begin_local_response_batch(); do_single_etrace(source_p, target_p); sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), target_p->name); } } else sendto_one_numeric(source_p, ERR_NOSUCHNICK, form_str(ERR_NOSUCHNICK), parv[1]); } } else { begin_local_response_batch(); do_etrace(source_p, 1, 1); }}
static voidme_etrace(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]){ struct Client *target_p;
if(!IsOper(source_p) || parc < 2 || EmptyString(parv[1])) return;
/* we cant etrace remote clients.. we shouldnt even get sent them */ if((target_p = find_person(parv[1])) && MyClient(target_p)) do_single_etrace(source_p, target_p);
sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), target_p ? target_p->name : parv[1]);}
static voiddo_etrace(struct Client *source_p, int ipv4, int ipv6){ struct Client *target_p; rb_dlink_node *ptr;
/* report all direct connections */ RB_DLINK_FOREACH(ptr, lclient_list.head) { target_p = ptr->data;
if((!ipv4 && GET_SS_FAMILY(&target_p->localClient->ip) == AF_INET) || (!ipv6 && GET_SS_FAMILY(&target_p->localClient->ip) == AF_INET6)) continue;
sendto_one(source_p, form_str(RPL_ETRACE), me.name, source_p->name, SeesOper(target_p, source_p) ? "Oper" : "User", get_client_class(target_p), target_p->name, target_p->username, target_p->host, show_ip(source_p, target_p) ? target_p->sockhost : "255.255.255.255", target_p->info); }
sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), me.name);}
static voiddo_etrace_full(struct Client *source_p){ rb_dlink_node *ptr;
RB_DLINK_FOREACH(ptr, lclient_list.head) { do_single_etrace(source_p, ptr->data); }
sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), me.name);}
/* * do_single_etrace - searches local clients and displays those matching * a pattern * input - source client, target client * output - etrace results * side effects - etrace results are displayed */static voiddo_single_etrace(struct Client *source_p, struct Client *target_p){ /* note, we hide fullcaps for spoofed users, as mirc can often * advertise its internal ip address in the field --fl */ if(!show_ip(source_p, target_p)) sendto_one(source_p, form_str(RPL_ETRACEFULL), me.name, source_p->name, SeesOper(target_p, source_p) ? "Oper" : "User", get_client_class(target_p), target_p->name, target_p->username, target_p->host, "255.255.255.255", "<hidden> <hidden>", target_p->info); else sendto_one(source_p, form_str(RPL_ETRACEFULL), me.name, source_p->name, SeesOper(target_p, source_p) ? "Oper" : "User", get_client_class(target_p), target_p->name, target_p->username, target_p->host, target_p->sockhost, target_p->localClient->fullcaps, target_p->info);}
static voidm_chantrace(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]){ struct Client *target_p; struct Channel *chptr; struct membership *msptr; const char *sockhost; const char *name; rb_dlink_node *ptr; int operspy = 0;
name = parv[1];
if(IsOperSpy(source_p) && parv[1][0] == '!') { name++; operspy = 1;
if(EmptyString(name)) { sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS), me.name, source_p->name, "CHANTRACE"); return; } }
if((chptr = find_channel(name)) == NULL) { sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL, form_str(ERR_NOSUCHCHANNEL), name); return; }
/* dont report operspys for nonexistant channels. */ if(operspy) report_operspy(source_p, "CHANTRACE", chptr->chname);
if(!operspy && !IsMember(client_p, chptr)) { sendto_one_numeric(source_p, ERR_NOTONCHANNEL, form_str(ERR_NOTONCHANNEL), chptr->chname); return; }
begin_local_response_batch();
RB_DLINK_FOREACH(ptr, chptr->members.head) { msptr = ptr->data; target_p = msptr->client_p;
if(EmptyString(target_p->sockhost)) sockhost = empty_sockhost; else if(!show_ip(source_p, target_p)) sockhost = spoofed_sockhost; else sockhost = target_p->sockhost;
sendto_one(source_p, form_str(RPL_ETRACE), me.name, source_p->name, SeesOper(target_p, source_p) ? "Oper" : "User", /* class field -- pretend its server.. */ target_p->servptr->name, target_p->name, target_p->username, target_p->host, sockhost, target_p->info); }
sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), me.name);}
static voidmatch_masktrace(struct Client *source_p, rb_dlink_list *list, const char *username, const char *hostname, const char *name, const char *gecos){ struct Client *target_p; rb_dlink_node *ptr; const char *sockhost;
RB_DLINK_FOREACH(ptr, list->head) { target_p = ptr->data; if(!IsPerson(target_p)) continue;
if(EmptyString(target_p->sockhost)) sockhost = empty_sockhost; else if(!show_ip(source_p, target_p)) sockhost = spoofed_sockhost; else sockhost = target_p->sockhost;
if(match(username, target_p->username) && (match(hostname, target_p->host) || match(hostname, target_p->orighost) || match(hostname, sockhost) || match_ips(hostname, sockhost))) { if(name != NULL && !match(name, target_p->name)) continue;
if(gecos != NULL && !match_esc(gecos, target_p->info)) continue;
sendto_one(source_p, form_str(RPL_ETRACE), me.name, source_p->name, SeesOper(target_p, source_p) ? "Oper" : "User", /* class field -- pretend its server.. */ target_p->servptr->name, target_p->name, target_p->username, target_p->host, sockhost, target_p->info); } }}
static voidmo_masktrace(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]){ char *name, *username, *hostname, *gecos;
if(!IsOperGeneral(source_p)) { sendto_one(source_p, form_str(ERR_NOPRIVS), me.name, source_p->name, "general"); return; }
name = LOCAL_COPY(parv[1]); collapse(name);
if(parc > 2 && !EmptyString(parv[2])) { gecos = LOCAL_COPY(parv[2]); collapse_esc(gecos); } else gecos = NULL;
if((hostname = strchr(name, '@')) == NULL) { sendto_one_notice(source_p, ":Invalid parameters"); return; }
*hostname++ = '\0';
if((username = strchr(name, '!')) == NULL) { username = name; name = NULL; } else *username++ = '\0';
if(EmptyString(username) || EmptyString(hostname)) { sendto_one_notice(source_p, ":Invalid parameters"); return; }
begin_local_response_batch(); match_masktrace(source_p, &global_client_list, username, hostname, name, gecos); sendto_one_numeric(source_p, RPL_ENDOFTRACE, form_str(RPL_ENDOFTRACE), me.name);}