[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
 *
 */

#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;
	struct Metadata *md;

	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))
	{
		if(md = user_metadata_find(target_p, "OPERSTRING"))
			sendto_one_numeric(source_p, 313, "%s :%s", target_p->name, md->value);
		else
			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(md = user_metadata_find(target_p, "SWHOIS"))
			sendto_one_numeric(source_p, 320, "%s :%s", target_p->name, md->value);
	}

	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	*
212380e3	24	*/
	25
	26	#include "stdinc.h"
212380e3	27	#include "common.h"
	28	#include "client.h"
	29	#include "hash.h"
	30	#include "channel.h"
	31	#include "hash.h"
	32	#include "ircd.h"
	33	#include "numeric.h"
	34	#include "s_conf.h"
	35	#include "s_serv.h"
	36	#include "send.h"
13ae2f4b	37	#include "match.h"
212380e3	38	#include "s_conf.h"
d3455e2c	39	#include "logger.h"
212380e3	40	#include "msg.h"
	41	#include "parse.h"
	42	#include "modules.h"
	43	#include "hook.h"
	44	#include "s_newconf.h"
be2d3c11	45	#include "s_user.h"
212380e3	46
	47	static void do_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	48	static void single_whois(struct Client source_p, struct Client target_p, int operspy);
	49
	50	static int m_whois(struct Client , struct Client , int, const char **);
	51	static int ms_whois(struct Client , struct Client , int, const char **);
	52
	53	struct Message whois_msgtab = {
	54	"WHOIS", 0, 0, 0, MFLG_SLOW,
	55	{mg_unreg, {m_whois, 2}, {ms_whois, 2}, mg_ignore, mg_ignore, {m_whois, 2}}
	56	};
	57
	58	int doing_whois_hook;
	59	int doing_whois_global_hook;
	60
	61	mapi_clist_av1 whois_clist[] = { &whois_msgtab, NULL };
	62	mapi_hlist_av1 whois_hlist[] = {
	63	{ "doing_whois", &doing_whois_hook },
	64	{ "doing_whois_global", &doing_whois_global_hook },
	65	{ NULL, NULL }
	66	};
	67
f7eac53d	68	DECLARE_MODULE_AV1(whois, NULL, NULL, whois_clist, whois_hlist, NULL, "$Revision: 3536 $");
212380e3	69
	70	/*
	71	* m_whois
212380e3	72	* parv[1] = nickname masklist
	73	*/
	74	static int
	75	m_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	76	{
	77	static time_t last_used = 0;
	78
	79	if(parc > 2)
	80	{
	81	if(EmptyString(parv[2]))
	82	{
	83	sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
	84	me.name, source_p->name);
	85	return 0;
	86	}
	87
	88	if(!IsOper(source_p))
	89	{
	90	/* seeing as this is going across servers, we should limit it */
9f6bbe3c	91	if((last_used + ConfigFileEntry.pace_wait_simple) > rb_current_time())
212380e3	92	{
	93	sendto_one(source_p, form_str(RPL_LOAD2HI),
	94	me.name, source_p->name, "WHOIS");
	95	sendto_one_numeric(source_p, RPL_ENDOFWHOIS,
f7eac53d	96	form_str(RPL_ENDOFWHOIS), parv[2]);
212380e3	97	return 0;
	98	}
	99	else
9f6bbe3c	100	last_used = rb_current_time();
212380e3	101	}
	102
	103	if(hunt_server(client_p, source_p, ":%s WHOIS %s :%s", 1, parc, parv) !=
	104	HUNTED_ISME)
	105	return 0;
	106
	107	parv[1] = parv[2];
	108
	109	}
	110	do_whois(client_p, source_p, parc, parv);
	111
	112	return 0;
	113	}
	114
	115	/*
	116	* ms_whois
212380e3	117	* parv[1] = server to reply
	118	* parv[2] = nickname to whois
	119	*/
	120	static int
	121	ms_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	122	{
	123	struct Client *target_p;
	124
	125	/* note: early versions of ratbox allowed users to issue a remote
	126	* whois with a blank parv[2], so we cannot treat it as a protocol
	127	* violation. --anfl
	128	*/
	129	if(parc < 3 \|\| EmptyString(parv[2]))
	130	{
	131	sendto_one(source_p, form_str(ERR_NONICKNAMEGIVEN),
	132	me.name, source_p->name);
	133	return 0;
	134	}
	135
	136	/* check if parv[1] exists */
	137	if((target_p = find_client(parv[1])) == NULL)
	138	{
	139	sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
	140	form_str(ERR_NOSUCHSERVER),
	141	IsDigit(parv[1][0]) ? "*" : parv[1]);
	142	return 0;
	143	}
	144
	145	/* if parv[1] isnt my client, or me, someone else is supposed
	146	* to be handling the request.. so send it to them
	147	*/
	148	if(!MyClient(target_p) && !IsMe(target_p))
	149	{
	150	sendto_one(target_p, ":%s WHOIS %s :%s",
	151	get_id(source_p, target_p),
	152	get_id(target_p, target_p), parv[2]);
	153	return 0;
	154	}
	155
	156	/* ok, the target is either us, or a client on our server, so perform the whois
	157	* but first, parv[1] == server to perform the whois on, parv[2] == person
	158	* to whois, so make parv[1] = parv[2] so do_whois is ok -- fl_
	159	*/
	160	parv[1] = parv[2];
	161	do_whois(client_p, source_p, parc, parv);
	162
	163	return 0;
	164	}
	165
	166	/* do_whois
	167	*
	168	* inputs - pointer to
	169	* output -
	170	* side effects -
	171	*/
	172	static void
	173	do_whois(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	174	{
	175	struct Client *target_p;
	176	char *nick;
	177	char *p = NULL;
	178	int operspy = 0;
	179
	180	nick = LOCAL_COPY(parv[1]);
181	if((p = strchr(nick, ',')))
182	*p = '\0';
183
184	if(IsOperSpy(source_p) && *nick == '!')
185	{
186	operspy = 1;
187	nick++;
188	}
189
42fa7846 WP	190	if(MyClient(source_p))
	191	target_p = find_named_person(nick);
	192	else
8db00894	193	target_p = find_person(nick);
212380e3	194
	195	if(target_p != NULL)
	196	{
	197	if(operspy)
	198	{
	199	char buffer[BUFSIZE];
	200
5b0a5279	201	rb_snprintf(buffer, sizeof(buffer), "%s!%s@%s %s",
212380e3	202	target_p->name, target_p->username,
c88cdb00	203	target_p->host, target_p->servptr->name);
212380e3	204	report_operspy(source_p, "WHOIS", buffer);
	205	}
	206
	207	single_whois(source_p, target_p, operspy);
	208	}
	209	else
	210	sendto_one_numeric(source_p, ERR_NOSUCHNICK,
	211	form_str(ERR_NOSUCHNICK),
8a1e143f	212	nick);
212380e3	213
	214	sendto_one_numeric(source_p, RPL_ENDOFWHOIS,
	215	form_str(RPL_ENDOFWHOIS), parv[1]);
	216	return;
	217	}
	218
	219	/*
	220	* single_whois()
	221	*
	222	* Inputs - source_p client to report to
	223	* - target_p client to report on
	224	* Output - if found return 1
	225	* Side Effects - do a single whois on given client
	226	* writing results to source_p
	227	*/
	228	static void
	229	single_whois(struct Client source_p, struct Client target_p, int operspy)
	230	{
	231	char buf[BUFSIZE];
08d11e34	232	rb_dlink_node *ptr;
212380e3	233	struct membership *msptr;
	234	struct Channel *chptr;
	235	int cur_len = 0;
	236	int mlen;
	237	char *t;
	238	int tlen;
	239	hook_data_client hdata;
212380e3	240	int visible;
212380e3	241	int extra_space = 0;
88b63e65 G	242	int i;
88b63e65 G	243	char *m;
837a020a	244	int showsecret = 0;
3e06a4c8	245	struct Metadata *md;
837a020a G	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	{
32d464fe G	320	if(md = user_metadata_find(target_p, "OPERSTRING"))
	321	sendto_one_numeric(source_p, 313, "%s :%s", target_p->name, md->value);
	322	else
	323	sendto_one_numeric(source_p, RPL_WHOISOPERATOR, form_str(RPL_WHOISOPERATOR),
	324	target_p->name,
	325	IsService(target_p) ? ConfigFileEntry.servicestring :
	326	(IsAdmin(target_p) ? GlobalSetOptions.adminstring :
	327	GlobalSetOptions.operstring));
3e06a4c8 G	328	if(md = user_metadata_find(target_p, "SWHOIS"))
3e06a4c8 G	329	sendto_one_numeric(source_p, 320, "%s :%s", target_p->name, md->value);
212380e3	330	}
212380e3	331
5da17c50 WP	332	if(IsSSLClient(target_p))
	333	sendto_one_numeric(source_p, RPL_WHOISSECURE, form_str(RPL_WHOISSECURE),
	334	target_p->name);
54656d76 JT	335	if((source_p == target_p \|\| IsOper(source_p)) &&
	336	target_p->certfp != NULL)
	337	sendto_one_numeric(source_p, RPL_WHOISCERTFP,
	338	form_str(RPL_WHOISCERTFP),
	339	target_p->name, target_p->certfp);
5da17c50	340
930629c5 G	341	if(IsSetBot(target_p))
	342	sendto_one_numeric(source_p, RPL_WHOISBOT,
	343	form_str(RPL_WHOISBOT),
	344	target_p->name);
6faf3f4d G	345	if(IsOper(source_p))
	346	{
	347	m = buf;
	348	*m++ = '+';
88b63e65	349
6faf3f4d G	350	for (i = 0; i < 128; i++) /* >= 127 is extended ascii */
	351	if (target_p->umodes & user_modes[i])
	352	*m++ = (char) i;
	353	*m = '\0';
88b63e65	354
6faf3f4d G	355	sendto_one_numeric(source_p, RPL_WHOISMODES,
	356	form_str(RPL_WHOISMODES),
	357	target_p->name, buf);
	358	}
88b63e65	359
212380e3	360	if(MyClient(target_p))
	361	{
	362	if (IsDynSpoof(target_p) && (IsOper(source_p) \|\| source_p == target_p))
	363	{
	364	/* trick here: show a nonoper their own IP if
	365	* dynamic spoofed but not if auth{} spoofed
	366	* -- jilles */
	367	ClearDynSpoof(target_p);
	368	sendto_one_numeric(source_p, RPL_WHOISHOST,
	369	form_str(RPL_WHOISHOST),
	370	target_p->name, target_p->orighost,
	371	show_ip(source_p, target_p) ? target_p->sockhost : "255.255.255.255");
	372	SetDynSpoof(target_p);
	373	}
	374	else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p))
	375	sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
	376	form_str(RPL_WHOISACTUALLY),
	377	target_p->name, target_p->sockhost);
	378
	379	sendto_one_numeric(source_p, RPL_WHOISIDLE, form_str(RPL_WHOISIDLE),
	380	target_p->name,
9f6bbe3c	381	rb_current_time() - target_p->localClient->last,
212380e3	382	target_p->localClient->firsttime);
	383	}
	384	else
	385	{
	386	if (IsDynSpoof(target_p) && (IsOper(source_p) \|\| source_p == target_p))
	387	{
	388	ClearDynSpoof(target_p);
	389	sendto_one_numeric(source_p, RPL_WHOISHOST,
	390	form_str(RPL_WHOISHOST),
	391	target_p->name, target_p->orighost,
	392	show_ip(source_p, target_p) && !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0")? target_p->sockhost : "255.255.255.255");
	393	SetDynSpoof(target_p);
	394	}
	395	else if(ConfigFileEntry.use_whois_actually && show_ip(source_p, target_p) &&
	396	!EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0"))
	397	{
	398	sendto_one_numeric(source_p, RPL_WHOISACTUALLY,
	399	form_str(RPL_WHOISACTUALLY),
	400	target_p->name, target_p->sockhost);
	401
	402	}
212380e3	403	}
	404
	405	hdata.client = source_p;
	406	hdata.target = target_p;
	407
	408	/* doing_whois_hook must only be called for local clients,
	409	* doing_whois_global_hook must only be called for local targets
	410	*/
	411	/* it is important that these are called before RPL_ENDOFWHOIS is
	412	* sent, services compatibility code depends on it. --anfl
	413	*/
	414	if(MyClient(source_p))
	415	call_hook(doing_whois_hook, &hdata);
	416	else
	417	call_hook(doing_whois_global_hook, &hdata);
	418
	419	return;
	420	}
	421