[irc/rqf/shadowircd.git] / modules / m_whois.c

/*
 *  ircd-ratbox: A slightly useful ircd.
 *  m_whois.c: Shows who a user is.
 *
 *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
 *  Copyright (C) 1996-2002 Hybrid Development Team
 *  Copyright (C) 2002-2005 ircd-ratbox development team
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 *  USA
 *
 *  $Id: m_whois.c 3536 2007-07-14 21:50:21Z jilles $
 */

#include "stdinc.h"
#include "common.h"
#include "client.h"
#include "hash.h"
#include "channel.h"
#include "hash.h"
#include "ircd.h"
#include "numeric.h"
#include "s_conf.h"
#include "s_serv.h"
#include "send.h"
#include "match.h"
#include "s_conf.h"
#include "logger.h"
#include "msg.h"
#include "parse.h"
#include "modules.h"
#include "hook.h"
#include "s_newconf.h"
#include "s_user.h"

static void do_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static void single_whois(struct Client *source_p, struct Client *target_p, int operspy);

static int m_whois(struct Client *, struct Client *, int, const char **);
static int ms_whois(struct Client *, struct Client *, int, const char **);

struct Message whois_msgtab = {
	"WHOIS", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_whois, 2}, {ms_whois, 2}, mg_ignore, mg_ignore, {m_whois, 2}}
};

int doing_whois_hook;
int doing_whois_global_hook;

mapi_clist_av1 whois_clist[] = { &whois_msgtab, NULL };
mapi_hlist_av1 whois_hlist[] = {
	{ "doing_whois",	&doing_whois_hook },
	{ "doing_whois_global",	&doing_whois_global_hook },
	{ NULL, NULL }
};

DECLARE_MODULE_AV1(whois, NULL, NULL, whois_clist, whois_hlist, NULL, "$Revision: 3536 $");

/*
 * m_whois
 *      parv[1] = nickname masklist
 */
static int
m_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	static time_t last_used = 0;

	if(parc > 2)
	{
		if(EmptyString(parv[2]))
		{
			sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
					me.name, source_p->name);
			return 0;
		}

		if(!IsOper(source_p))
		{
			/* seeing as this is going across servers, we should limit it */
			if((last_used + ConfigFileEntry.pace_wait_simple) > rb_current_time())
			{
				sendto_one(source_p, form_str(RPL_LOAD2HI),
					   me.name, source_p->name, "WHOIS");
				sendto_one_numeric(source_p, RPL_ENDOFWHOIS, 
						   form_str(RPL_ENDOFWHOIS), parv[2]);
				return 0;
			}
			else
				last_used = rb_current_time();
		}

		if(hunt_server(client_p, source_p, ":%s WHOIS %s :%s", 1, parc, parv) !=
		   HUNTED_ISME)
			return 0;

		parv[1] = parv[2];

	}
	do_whois(client_p, source_p, parc, parv);

	return 0;
}

/*
 * ms_whois
 *      parv[1] = server to reply
 *      parv[2] = nickname to whois
 */
static int
ms_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct Client *target_p;

	/* note: early versions of ratbox allowed users to issue a remote
	 * whois with a blank parv[2], so we cannot treat it as a protocol
	 * violation. --anfl
	 */
	if(parc < 3 || EmptyString(parv[2]))
	{
		sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
				me.name, source_p->name);
		return 0;
	}

	/* check if parv[1] exists */
	if((target_p = find_client(parv[1])) == NULL)
	{
		sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
				   form_str(ERR_NOSUCHSERVER), 
				   IsDigit(parv[1][0]) ? "*" : parv[1]);
		return 0;
	}

	/* if parv[1] isnt my client, or me, someone else is supposed
	 * to be handling the request.. so send it to them 
	 */
	if(!MyClient(target_p) && !IsMe(target_p))
	{
		sendto_one(target_p, ":%s WHOIS %s :%s", 
			   get_id(source_p, target_p), 
			   get_id(target_p, target_p), parv[2]);
		return 0;
	}

	/* ok, the target is either us, or a client on our server, so perform the whois
	 * but first, parv[1] == server to perform the whois on, parv[2] == person
	 * to whois, so make parv[1] = parv[2] so do_whois is ok -- fl_
	 */
	parv[1] = parv[2];
	do_whois(client_p, source_p, parc, parv);

	return 0;
}

/* do_whois
 *
 * inputs	- pointer to 
 * output	- 
 * side effects -
 */
static void
do_whois(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct Client *target_p;
	char *nick;
	char *p = NULL;
	int operspy = 0;

	nick = LOCAL_COPY(parv[1]);
	if((p = strchr(nick, ',')))
		*p = '\0';

	if(IsOperSpy(source_p) && *nick == '!')
	{
		operspy = 1;
		nick++;
	}

	if(MyClient(source_p))
		target_p = find_named_person(nick);
	else
		target_p = find_person(nick);

	if(target_p != NULL)
	{
		if(operspy)
		{
			char buffer[BUFSIZE];

			rb_snprintf(buffer, sizeof(buffer), "%s!%s@%s %s",
				target_p->name, target_p->username,
				target_p->host, target_p->servptr->name);
			report_operspy(source_p, "WHOIS", buffer);
		}

		single_whois(source_p, target_p, operspy);
	}
	else
		sendto_one_numeric(source_p, ERR_NOSUCHNICK,
				   form_str(ERR_NOSUCHNICK), 
				   nick);

	sendto_one_numeric(source_p, RPL_ENDOFWHOIS, 
			   form_str(RPL_ENDOFWHOIS), parv[1]);
	return;
}

/*
 * single_whois()
 *
 * Inputs	- source_p client to report to
 *		- target_p client to report on
 * Output	- if found return 1
 * Side Effects	- do a single whois on given client
 * 		  writing results to source_p
 */
static void
single_whois(struct Client *source_p, struct Client *target_p, int operspy)
{
	char buf[BUFSIZE];
	rb_dlink_node *ptr;
	struct membership *msptr;
	struct Channel *chptr;
	int cur_len = 0;
	int mlen;
	char *t;
	int tlen;
	hook_data_client hdata;
	int visible;
	int extra_space = 0;
	int i;
	char *m;
	int showsecret = 0;

	if(ConfigFileEntry.secret_channels_in_whois && IsOperSpy(source_p))
		showsecret = 1;

	if(target_p->user == NULL)
	{
		s_assert(0);
		return;
	}

	sendto_one_numeric(source_p, RPL_WHOISUSER, form_str(RPL_WHOISUSER),
			   target_p->name, target_p->username, 
			   target_p->host, target_p->info);

	cur_len = mlen = rb_sprintf(buf, form_str(RPL_WHOISCHANNELS), 
				    get_id(&me, source_p), get_id(source_p, source_p), 
				    target_p->name);

	/* Make sure it won't overflow when sending it to the client
	 * in full names; note that serverhiding may require more space
	 * for a different server name (not done here) -- jilles
	 */
	if (!MyConnect(source_p))
	{
		extra_space = strlen(source_p->name) - 9;
		if (extra_space < 0)
			extra_space = 0;
		extra_space += strlen(me.name) - 2; /* make sure >= 0 */
		cur_len += extra_space;
	}

	t = buf + mlen;

	if (!IsService(target_p))
	{
		RB_DLINK_FOREACH(ptr, target_p->user->channel.head)
		{
			msptr = ptr->data;
			chptr = msptr->chptr;

			visible = ShowChannel(source_p, chptr);

			if(visible || operspy || showsecret)
			{
				if((cur_len + strlen(chptr->chname) + 3) > (BUFSIZE - 5))
				{
					sendto_one(source_p, "%s", buf);
					cur_len = mlen + extra_space;
					t = buf + mlen;
				}

				tlen = rb_sprintf(t, "%s%s%s ",
						visible ? "" : "*",
						find_channel_status(msptr, 1),
						chptr->chname);
				t += tlen;
				cur_len += tlen;
			}
		}
	}

	if(cur_len > mlen + extra_space)
		sendto_one(source_p, "%s", buf);

	sendto_one_numeric(source_p, RPL_WHOISSERVER, form_str(RPL_WHOISSERVER),
			   target_p->name, target_p->servptr->name,
			   target_p->servptr->info);

	if(target_p->user->away)
		sendto_one_numeric(source_p, RPL_AWAY, form_str(RPL_AWAY),
				   target_p->name, target_p->user->away);

	if(IsOper(target_p))
	{
		sendto_one_numeric(source_p, RPL_WHOISOPERATOR, form_str(RPL_WHOISOPERATOR),
				   target_p->name,
				   IsService(target_p) ? ConfigFileEntry.servicestring :
				   (IsAdmin(target_p) ? GlobalSetOptions.adminstring :
				    GlobalSetOptions.operstring));
	}

	if(IsSSLClient(target_p))
		sendto_one_numeric(source_p, RPL_WHOISSECURE, form_str(RPL_WHOISSECURE),
				   target_p->name);
	if((source_p == target_p || IsOper(source_p)) &&
			target_p->certfp != NULL)
		sendto_one_numeric(source_p, RPL_WHOISCERTFP,
				form_str(RPL_WHOISCERTFP),
				target_p->name, target_p->certfp);

	if(IsSetBot(target_p))
		sendto_one_numeric(source_p, RPL_WHOISBOT,
				form_str(RPL_WHOISBOT),
				target_p->name);
	if(IsOper(source_p))
	{
		m = buf;
		*m++ = '+';

		for (i = 0; i < 128; i++) /* >= 127 is extended ascii */
			if (target_p->umodes & user_modes[i])
				*m++ = (char) i;
				*m = '\0';

		sendto_one_numeric(source_p, RPL_WHOISMODES,
				form_str(RPL_WHOISMODES),
				target_p->name, buf);
	}

	if(MyClient(target_p))
	{
		if (IsDynSpoof(target_p) && (IsOper(source_p) || source_p == target_p))
		{
			/* trick here: show a nonoper their own IP if
			 * dynamic spoofed but not if auth{} spoofed
			 * -- jilles */
			ClearDynSpoof(target_p);
			sendto_one_numeric(source_p, RPL_WHOISHOST,
					   form_str(RPL_WHOISHOST),
					   target_p->name, target_p->orighost,
					   show_ip(source_p, target_p) ? target_p->sockhost : "255.255.255.255");
			SetDynSpoof(target_p);
		}
		else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p))
			sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
					   form_str(RPL_WHOISACTUALLY),
					   target_p->name, target_p->sockhost);

		sendto_one_numeric(source_p, RPL_WHOISIDLE, form_str(RPL_WHOISIDLE),
				   target_p->name, 
				   rb_current_time() - target_p->localClient->last, 
				   target_p->localClient->firsttime);
	}
	else
	{
		if (IsDynSpoof(target_p) && (IsOper(source_p) || source_p == target_p))
		{
			ClearDynSpoof(target_p);
			sendto_one_numeric(source_p, RPL_WHOISHOST,
					   form_str(RPL_WHOISHOST),
					   target_p->name, target_p->orighost,
					   show_ip(source_p, target_p) && !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0")? target_p->sockhost : "255.255.255.255");
			SetDynSpoof(target_p);
		}
		else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p) &&
		   !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0"))
		{
			sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
					   form_str(RPL_WHOISACTUALLY),
					   target_p->name, target_p->sockhost);
			
		}
	}

	hdata.client = source_p;
	hdata.target = target_p;

	/* doing_whois_hook must only be called for local clients,
	 * doing_whois_global_hook must only be called for local targets
	 */
	/* it is important that these are called *before* RPL_ENDOFWHOIS is
	 * sent, services compatibility code depends on it. --anfl
	 */
	if(MyClient(source_p))
		call_hook(doing_whois_hook, &hdata);
	else
		call_hook(doing_whois_global_hook, &hdata);

	return;
}
Commit	Line	Data
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"
212380e3	28	#include "common.h"
	29	#include "client.h"
	30	#include "hash.h"
	31	#include "channel.h"
	32	#include "hash.h"
	33	#include "ircd.h"
	34	#include "numeric.h"
	35	#include "s_conf.h"
	36	#include "s_serv.h"
	37	#include "send.h"
13ae2f4b	38	#include "match.h"
212380e3	39	#include "s_conf.h"
d3455e2c	40	#include "logger.h"
212380e3	41	#include "msg.h"
	42	#include "parse.h"
	43	#include "modules.h"
	44	#include "hook.h"
	45	#include "s_newconf.h"
be2d3c11	46	#include "s_user.h"
212380e3	47
	48	static void do_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	49	static void single_whois(struct Client source_p, struct Client target_p, int operspy);
	50
	51	static int m_whois(struct Client , struct Client , int, const char **);
	52	static int ms_whois(struct Client , struct Client , int, const char **);
	53
	54	struct Message whois_msgtab = {
	55	"WHOIS", 0, 0, 0, MFLG_SLOW,
	56	{mg_unreg, {m_whois, 2}, {ms_whois, 2}, mg_ignore, mg_ignore, {m_whois, 2}}
	57	};
	58
	59	int doing_whois_hook;
	60	int doing_whois_global_hook;
	61
	62	mapi_clist_av1 whois_clist[] = { &whois_msgtab, NULL };
	63	mapi_hlist_av1 whois_hlist[] = {
	64	{ "doing_whois", &doing_whois_hook },
	65	{ "doing_whois_global", &doing_whois_global_hook },
	66	{ NULL, NULL }
	67	};
	68
f7eac53d	69	DECLARE_MODULE_AV1(whois, NULL, NULL, whois_clist, whois_hlist, NULL, "$Revision: 3536 $");
212380e3	70
	71	/*
	72	* m_whois
212380e3	73	* parv[1] = nickname masklist
	74	*/
	75	static int
	76	m_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	77	{
	78	static time_t last_used = 0;
	79
	80	if(parc > 2)
	81	{
	82	if(EmptyString(parv[2]))
	83	{
	84	sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
	85	me.name, source_p->name);
	86	return 0;
	87	}
	88
	89	if(!IsOper(source_p))
	90	{
	91	/* seeing as this is going across servers, we should limit it */
9f6bbe3c	92	if((last_used + ConfigFileEntry.pace_wait_simple) > rb_current_time())
212380e3	93	{
	94	sendto_one(source_p, form_str(RPL_LOAD2HI),
	95	me.name, source_p->name, "WHOIS");
	96	sendto_one_numeric(source_p, RPL_ENDOFWHOIS,
f7eac53d	97	form_str(RPL_ENDOFWHOIS), parv[2]);
212380e3	98	return 0;
	99	}
	100	else
9f6bbe3c	101	last_used = rb_current_time();
212380e3	102	}
	103
	104	if(hunt_server(client_p, source_p, ":%s WHOIS %s :%s", 1, parc, parv) !=
	105	HUNTED_ISME)
	106	return 0;
	107
	108	parv[1] = parv[2];
	109
	110	}
	111	do_whois(client_p, source_p, parc, parv);
	112
	113	return 0;
	114	}
	115
	116	/*
	117	* ms_whois
212380e3	118	* parv[1] = server to reply
	119	* parv[2] = nickname to whois
	120	*/
	121	static int
	122	ms_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	123	{
	124	struct Client *target_p;
	125
	126	/* note: early versions of ratbox allowed users to issue a remote
	127	* whois with a blank parv[2], so we cannot treat it as a protocol
	128	* violation. --anfl
	129	*/
	130	if(parc < 3 \|\| EmptyString(parv[2]))
	131	{
	132	sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
	133	me.name, source_p->name);
	134	return 0;
	135	}
	136
	137	/* check if parv[1] exists */
	138	if((target_p = find_client(parv[1])) == NULL)
	139	{
	140	sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
	141	form_str(ERR_NOSUCHSERVER),
	142	IsDigit(parv[1][0]) ? "*" : parv[1]);
	143	return 0;
	144	}
	145
	146	/* if parv[1] isnt my client, or me, someone else is supposed
	147	* to be handling the request.. so send it to them
	148	*/
	149	if(!MyClient(target_p) && !IsMe(target_p))
	150	{
	151	sendto_one(target_p, ":%s WHOIS %s :%s",
	152	get_id(source_p, target_p),
	153	get_id(target_p, target_p), parv[2]);
	154	return 0;
	155	}
	156
	157	/* ok, the target is either us, or a client on our server, so perform the whois
	158	* but first, parv[1] == server to perform the whois on, parv[2] == person
	159	* to whois, so make parv[1] = parv[2] so do_whois is ok -- fl_
	160	*/
	161	parv[1] = parv[2];
	162	do_whois(client_p, source_p, parc, parv);
	163
	164	return 0;
	165	}
	166
	167	/* do_whois
	168	*
	169	* inputs - pointer to
	170	* output -
	171	* side effects -
	172	*/
	173	static void
	174	do_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	175	{
	176	struct Client *target_p;
	177	char *nick;
	178	char *p = NULL;
	179	int operspy = 0;
	180
	181	nick = LOCAL_COPY(parv[1]);
182	if((p = strchr(nick, ',')))
183	*p = '\0';
184
185	if(IsOperSpy(source_p) && *nick == '!')
186	{
187	operspy = 1;
188	nick++;
189	}
190
42fa7846 WP	191	if(MyClient(source_p))
	192	target_p = find_named_person(nick);
	193	else
8db00894	194	target_p = find_person(nick);
212380e3	195
	196	if(target_p != NULL)
	197	{
	198	if(operspy)
	199	{
	200	char buffer[BUFSIZE];
	201
5b0a5279	202	rb_snprintf(buffer, sizeof(buffer), "%s!%s@%s %s",
212380e3	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	*/
	229	static void
	230	single_whois(struct Client source_p, struct Client target_p, int operspy)
	231	{
	232	char buf[BUFSIZE];
08d11e34	233	rb_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;
212380e3	241	int visible;
212380e3	242	int extra_space = 0;
88b63e65 G	243	int i;
88b63e65 G	244	char *m;
837a020a G	245	int showsecret = 0;
	246
	247	if(ConfigFileEntry.secret_channels_in_whois && IsOperSpy(source_p))
	248	showsecret = 1;
212380e3	249
212380e3	250	if(target_p->user == NULL)
	251	{
	252	s_assert(0);
	253	return;
	254	}
	255
212380e3	256	sendto_one_numeric(source_p, RPL_WHOISUSER, form_str(RPL_WHOISUSER),
	257	target_p->name, target_p->username,
	258	target_p->host, target_p->info);
	259
581fa5c4	260	cur_len = mlen = rb_sprintf(buf, form_str(RPL_WHOISCHANNELS),
212380e3	261	get_id(&me, source_p), get_id(source_p, source_p),
	262	target_p->name);
	263
	264	/* Make sure it won't overflow when sending it to the client
	265	* in full names; note that serverhiding may require more space
	266	* for a different server name (not done here) -- jilles
	267	*/
	268	if (!MyConnect(source_p))
	269	{
	270	extra_space = strlen(source_p->name) - 9;
	271	if (extra_space < 0)
	272	extra_space = 0;
	273	extra_space += strlen(me.name) - 2; /* make sure >= 0 */
	274	cur_len += extra_space;
	275	}
	276
	277	t = buf + mlen;
	278
04513cff	279	if (!IsService(target_p))
212380e3	280	{
08d11e34	281	RB_DLINK_FOREACH(ptr, target_p->user->channel.head)
04513cff	282	{
	283	msptr = ptr->data;
	284	chptr = msptr->chptr;
212380e3	285
04513cff	286	visible = ShowChannel(source_p, chptr);
212380e3	287
837a020a	288	if(visible \|\| operspy \|\| showsecret)
212380e3	289	{
04513cff	290	if((cur_len + strlen(chptr->chname) + 3) > (BUFSIZE - 5))
	291	{
	292	sendto_one(source_p, "%s", buf);
	293	cur_len = mlen + extra_space;
	294	t = buf + mlen;
	295	}
	296
581fa5c4	297	tlen = rb_sprintf(t, "%s%s%s ",
763e2baa	298	visible ? "" : "*",
04513cff	299	find_channel_status(msptr, 1),
	300	chptr->chname);
	301	t += tlen;
	302	cur_len += tlen;
212380e3	303	}
212380e3	304	}
	305	}
	306
	307	if(cur_len > mlen + extra_space)
	308	sendto_one(source_p, "%s", buf);
	309
	310	sendto_one_numeric(source_p, RPL_WHOISSERVER, form_str(RPL_WHOISSERVER),
c88cdb00	311	target_p->name, target_p->servptr->name,
1f8b58e7	312	target_p->servptr->info);
212380e3	313
c387fc41	314	if(target_p->user->away)
212380e3	315	sendto_one_numeric(source_p, RPL_AWAY, form_str(RPL_AWAY),
c387fc41	316	target_p->name, target_p->user->away);
212380e3	317
	318	if(IsOper(target_p))
	319	{
	320	sendto_one_numeric(source_p, RPL_WHOISOPERATOR, form_str(RPL_WHOISOPERATOR),
	321	target_p->name,
	322	IsService(target_p) ? ConfigFileEntry.servicestring :
	323	(IsAdmin(target_p) ? GlobalSetOptions.adminstring :
	324	GlobalSetOptions.operstring));
	325	}
	326
5da17c50 WP	327	if(IsSSLClient(target_p))
	328	sendto_one_numeric(source_p, RPL_WHOISSECURE, form_str(RPL_WHOISSECURE),
	329	target_p->name);
54656d76 JT	330	if((source_p == target_p \|\| IsOper(source_p)) &&
	331	target_p->certfp != NULL)
	332	sendto_one_numeric(source_p, RPL_WHOISCERTFP,
	333	form_str(RPL_WHOISCERTFP),
	334	target_p->name, target_p->certfp);
5da17c50	335
930629c5 G	336	if(IsSetBot(target_p))
	337	sendto_one_numeric(source_p, RPL_WHOISBOT,
	338	form_str(RPL_WHOISBOT),
	339	target_p->name);
6faf3f4d G	340	if(IsOper(source_p))
	341	{
	342	m = buf;
	343	*m++ = '+';
88b63e65	344
6faf3f4d G	345	for (i = 0; i < 128; i++) /* >= 127 is extended ascii */
	346	if (target_p->umodes & user_modes[i])
	347	*m++ = (char) i;
	348	*m = '\0';
88b63e65	349
6faf3f4d G	350	sendto_one_numeric(source_p, RPL_WHOISMODES,
	351	form_str(RPL_WHOISMODES),
	352	target_p->name, buf);
	353	}
88b63e65	354
212380e3	355	if(MyClient(target_p))
	356	{
	357	if (IsDynSpoof(target_p) && (IsOper(source_p) \|\| source_p == target_p))
	358	{
	359	/* trick here: show a nonoper their own IP if
	360	* dynamic spoofed but not if auth{} spoofed
	361	* -- jilles */
	362	ClearDynSpoof(target_p);
	363	sendto_one_numeric(source_p, RPL_WHOISHOST,
	364	form_str(RPL_WHOISHOST),
	365	target_p->name, target_p->orighost,
	366	show_ip(source_p, target_p) ? target_p->sockhost : "255.255.255.255");
	367	SetDynSpoof(target_p);
	368	}
	369	else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p))
	370	sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
	371	form_str(RPL_WHOISACTUALLY),
	372	target_p->name, target_p->sockhost);
	373
	374	sendto_one_numeric(source_p, RPL_WHOISIDLE, form_str(RPL_WHOISIDLE),
	375	target_p->name,
9f6bbe3c	376	rb_current_time() - target_p->localClient->last,
212380e3	377	target_p->localClient->firsttime);
	378	}
	379	else
	380	{
	381	if (IsDynSpoof(target_p) && (IsOper(source_p) \|\| source_p == target_p))
	382	{
	383	ClearDynSpoof(target_p);
	384	sendto_one_numeric(source_p, RPL_WHOISHOST,
	385	form_str(RPL_WHOISHOST),
	386	target_p->name, target_p->orighost,
	387	show_ip(source_p, target_p) && !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0")? target_p->sockhost : "255.255.255.255");
	388	SetDynSpoof(target_p);
	389	}
	390	else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p) &&
	391	!EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0"))
	392	{
	393	sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
	394	form_str(RPL_WHOISACTUALLY),
	395	target_p->name, target_p->sockhost);
	396
	397	}
212380e3	398	}
	399
	400	hdata.client = source_p;
	401	hdata.target = target_p;
	402
	403	/* doing_whois_hook must only be called for local clients,
	404	* doing_whois_global_hook must only be called for local targets
	405	*/
	406	/* it is important that these are called before RPL_ENDOFWHOIS is
	407	* sent, services compatibility code depends on it. --anfl
	408	*/
	409	if(MyClient(source_p))
	410	call_hook(doing_whois_hook, &hdata);
	411	else
	412	call_hook(doing_whois_global_hook, &hdata);
	413
	414	return;
	415	}
	416