[solanum.git] / extensions / m_roleplay.c

/*
 * roleplay commands for charybdis.
 *
 * adds NPC, NPCA, and SCENE which allow users to send messages from 'fake'
 * nicknames. in the case of NPC and NPCA, the nickname will be underlined
 * to clearly show that it is fake. SCENE is a special case and not underlined.
 * these commands only work on channels set +N
 *
 * also adds oper commands FSAY and FACTION, which are like NPC and NPCA 
 * except without the underline.
 * 
 * all of these messages have the hostmask npc.fakeuser.invalid, and their ident
 * is the nickname of the user running the commands.
 */


#include "stdinc.h"
#include "ircd.h"
#include "client.h"
#include "modules.h"
#include "send.h"
#include "numeric.h"
#include "hash.h"
#include "s_serv.h"
#include "inline/stringops.h"
#include "chmode.h"
#include "tgchange.h"
#include "channel.h"
#include "packet.h"
#include "messages.h"

static int m_scene(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int m_fsay(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int m_faction(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int m_npc(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int m_npca(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static int m_displaymsg(struct Client *source_p, const char *channel, int underline, int action, const char *nick, const char *text);
static int me_roleplay(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
static unsigned int mymode;

static int
_modinit(void)
{
	/* initalize the +N cmode */
	mymode = cflag_add('N', chm_simple);
	if (mymode == 0)
		return -1;

	return 0;
}

static void
_moddeinit(void)
{
	/* orphan the +N cmode on modunload */
	cflag_orphan('N');
}


struct Message scene_msgtab = {
	"SCENE", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_scene, 3}, mg_ignore, mg_ignore, mg_ignore, {m_scene, 3}}
};

/* this serves as an alias for people who are used to inspircd/unreal m_roleplay */
struct Message ambiance_msgtab = {
	"AMBIANCE", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_scene, 3}, mg_ignore, mg_ignore, mg_ignore, {m_scene, 3}}
};  

struct Message fsay_msgtab = {
	"FSAY", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_npc, 4}, mg_ignore, mg_ignore, mg_ignore, {m_fsay, 4}}
};  

struct Message faction_msgtab = {
	"FACTION", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_npca, 4}, mg_ignore, mg_ignore, mg_ignore, {m_faction, 4}}
};  

struct Message npc_msgtab = {
	"NPC", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_npc, 4}, mg_ignore, mg_ignore, mg_ignore, {m_npc, 4}}
};  

struct Message npca_msgtab = {
	"NPCA", 0, 0, 0, MFLG_SLOW,
	{mg_unreg, {m_npca, 4}, mg_ignore, mg_ignore, mg_ignore, {m_npca, 4}}
};  

struct Message roleplay_msgtab = {
	"ROLEPLAY", 0, 0, 0, MFLG_SLOW,
	{mg_ignore, mg_ignore, mg_ignore, mg_ignore, {me_roleplay, 4}, mg_ignore}
};  

mapi_clist_av1 roleplay_clist[] = { &scene_msgtab, &ambiance_msgtab, &fsay_msgtab, &faction_msgtab, &npc_msgtab, &npca_msgtab, &roleplay_msgtab, NULL };

DECLARE_MODULE_AV1(roleplay, _modinit, _moddeinit, roleplay_clist, NULL, NULL, "$m_roleplay$");

static int
m_scene(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	m_displaymsg(source_p, parv[1], 0, 0, "=Scene=", parv[2]);
	return 0;
}

static int
m_fsay(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	m_displaymsg(source_p, parv[1], 0, 0, parv[2], parv[3]);
	return 0;
}

static int
m_faction(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	m_displaymsg(source_p, parv[1], 0, 1, parv[2], parv[3]);
	return 0;
}

static int
m_npc(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	m_displaymsg(source_p, parv[1], 1, 0, parv[2], parv[3]);
	return 0;
}

static int
m_npca(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	m_displaymsg(source_p, parv[1], 1, 1, parv[2], parv[3]);
	return 0;
}

static int
m_displaymsg(struct Client *source_p, const char *channel, int underline, int action, const char *nick, const char *text)
{
	struct Channel *chptr;
	struct membership *msptr;
	char nick2[NICKLEN+1];
	char *nick3 = rb_strdup(nick);
	char text3[BUFSIZE];
	char text2[BUFSIZE];

	if(!IsFloodDone(source_p))
		flood_endgrace(source_p);

	if((chptr = find_channel(channel)) == NULL)
	{
		sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL,
				form_str(ERR_NOSUCHCHANNEL), channel);
		return 0;
	}

	if(!(msptr = find_channel_membership(chptr, source_p)))
	{
		sendto_one_numeric(source_p, ERR_NOTONCHANNEL,
				   form_str(ERR_NOTONCHANNEL), chptr->chname);
		return 0;
	}

	if(!(chptr->mode.mode & chmode_flags['N']))
	{
		sendto_one_numeric(source_p, 573, "%s :Roleplay commands are not enabled on this channel.", chptr->chname);
		return 0;
	}

	if(!can_send(chptr, source_p, msptr))
	{
		sendto_one_numeric(source_p, 573, "%s :Cannot send to channel.", chptr->chname);
		return 0;
	}

	/* enforce flood stuff on roleplay commands */
	if(flood_attack_channel(0, source_p, chptr, chptr->chname))
		return 0;

	/* enforce target change on roleplay commands */
	if(!is_chanop_voiced(msptr) && !IsOper(source_p) && !add_channel_target(source_p, chptr))
	{
		sendto_one(source_p, form_str(ERR_TARGCHANGE),
			   me.name, source_p->name, chptr->chname);
		return 0;
	}

	if(underline)
		rb_snprintf(nick2, sizeof(nick2), "\x1F%s\x1F", strip_unprintable(nick3));
	else
		rb_snprintf(nick2, sizeof(nick2), "%s", strip_unprintable(nick3));

	/* don't allow nicks to be empty after stripping
	 * this prevents nastiness like fake factions, etc. */
	if(EmptyString(nick3))
	{
		sendto_one_numeric(source_p, 573, "%s :No visible non-stripped characters in nick.", chptr->chname);
		return 0;
	}

	rb_snprintf(text3, sizeof(text3), "%s (%s)", text, source_p->name);

	if(action)
		rb_snprintf(text2, sizeof(text2), "\1ACTION %s\1", text3);
	else
		rb_snprintf(text2, sizeof(text2), "%s", text3);

	sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@npc.fakeuser.invalid PRIVMSG %s :%s", nick2, source_p->name, channel, text2);
	sendto_match_servs(source_p, "*", CAP_ENCAP, NOCAPS, "ENCAP * ROLEPLAY %s %s :%s",
			channel, nick2, text2);
	return 0;
}

static int
me_roleplay(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
{
	struct Channel *chptr;

	/* Don't segfault if we get ROLEPLAY with an invalid channel.
	 * This shouldn't happen but it's best to be on the safe side. */
	if((chptr = find_channel(parv[1])) == NULL)
		return 0;

	sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@npc.fakeuser.invalid PRIVMSG %s :%s", parv[2], source_p->name, parv[1], parv[3]); 
	return 0;
}
Commit	Line	Data
8ffa8275 BG	1	/*
	2	* roleplay commands for charybdis.
	3	*
	4	* adds NPC, NPCA, and SCENE which allow users to send messages from 'fake'
	5	* nicknames. in the case of NPC and NPCA, the nickname will be underlined
	6	* to clearly show that it is fake. SCENE is a special case and not underlined.
	7	* these commands only work on channels set +N
	8	*
	9	* also adds oper commands FSAY and FACTION, which are like NPC and NPCA
	10	* except without the underline.
	11	*
	12	* all of these messages have the hostmask npc.fakeuser.invalid, and their ident
	13	* is the nickname of the user running the commands.
	14	*/
	15
	16
	17	#include "stdinc.h"
	18	#include "ircd.h"
	19	#include "client.h"
	20	#include "modules.h"
	21	#include "send.h"
	22	#include "numeric.h"
	23	#include "hash.h"
	24	#include "s_serv.h"
	25	#include "inline/stringops.h"
	26	#include "chmode.h"
	27	#include "tgchange.h"
	28	#include "channel.h"
23485ebe	29	#include "packet.h"
bd0d352f	30	#include "messages.h"
8ffa8275 BG	31
	32	static int m_scene(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	33	static int m_fsay(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	34	static int m_faction(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	35	static int m_npc(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	36	static int m_npca(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	37	static int m_displaymsg(struct Client source_p, const char channel, int underline, int action, const char nick, const char text);
	38	static int me_roleplay(struct Client client_p, struct Client source_p, int parc, const char *parv[]);
	39	static unsigned int mymode;
	40
	41	static int
	42	_modinit(void)
	43	{
	44	/* initalize the +N cmode */
	45	mymode = cflag_add('N', chm_simple);
	46	if (mymode == 0)
	47	return -1;
	48
	49	return 0;
	50	}
	51
	52	static void
	53	_moddeinit(void)
	54	{
	55	/* orphan the +N cmode on modunload */
	56	cflag_orphan('N');
	57	}
	58
	59
	60	struct Message scene_msgtab = {
	61	"SCENE", 0, 0, 0, MFLG_SLOW,
	62	{mg_unreg, {m_scene, 3}, mg_ignore, mg_ignore, mg_ignore, {m_scene, 3}}
	63	};
	64
	65	/* this serves as an alias for people who are used to inspircd/unreal m_roleplay */
	66	struct Message ambiance_msgtab = {
	67	"AMBIANCE", 0, 0, 0, MFLG_SLOW,
	68	{mg_unreg, {m_scene, 3}, mg_ignore, mg_ignore, mg_ignore, {m_scene, 3}}
	69	};
	70
	71	struct Message fsay_msgtab = {
	72	"FSAY", 0, 0, 0, MFLG_SLOW,
	73	{mg_unreg, {m_npc, 4}, mg_ignore, mg_ignore, mg_ignore, {m_fsay, 4}}
	74	};
	75
	76	struct Message faction_msgtab = {
	77	"FACTION", 0, 0, 0, MFLG_SLOW,
	78	{mg_unreg, {m_npca, 4}, mg_ignore, mg_ignore, mg_ignore, {m_faction, 4}}
	79	};
	80
	81	struct Message npc_msgtab = {
	82	"NPC", 0, 0, 0, MFLG_SLOW,
	83	{mg_unreg, {m_npc, 4}, mg_ignore, mg_ignore, mg_ignore, {m_npc, 4}}
	84	};
	85
	86	struct Message npca_msgtab = {
	87	"NPCA", 0, 0, 0, MFLG_SLOW,
	88	{mg_unreg, {m_npca, 4}, mg_ignore, mg_ignore, mg_ignore, {m_npca, 4}}
	89	};
	90
	91	struct Message roleplay_msgtab = {
	92	"ROLEPLAY", 0, 0, 0, MFLG_SLOW,
6816e338	93	{mg_ignore, mg_ignore, mg_ignore, mg_ignore, {me_roleplay, 4}, mg_ignore}
8ffa8275 BG	94	};
	95
	96	mapi_clist_av1 roleplay_clist[] = { &scene_msgtab, &ambiance_msgtab, &fsay_msgtab, &faction_msgtab, &npc_msgtab, &npca_msgtab, &roleplay_msgtab, NULL };
	97
	98	DECLARE_MODULE_AV1(roleplay, _modinit, _moddeinit, roleplay_clist, NULL, NULL, "$m_roleplay$");
	99
	100	static int
	101	m_scene(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	102	{
	103	m_displaymsg(source_p, parv[1], 0, 0, "=Scene=", parv[2]);
	104	return 0;
	105	}
	106
	107	static int
	108	m_fsay(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	109	{
	110	m_displaymsg(source_p, parv[1], 0, 0, parv[2], parv[3]);
	111	return 0;
	112	}
	113
	114	static int
	115	m_faction(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	116	{
	117	m_displaymsg(source_p, parv[1], 0, 1, parv[2], parv[3]);
	118	return 0;
	119	}
	120
	121	static int
	122	m_npc(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	123	{
	124	m_displaymsg(source_p, parv[1], 1, 0, parv[2], parv[3]);
	125	return 0;
	126	}
	127
	128	static int
	129	m_npca(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	130	{
	131	m_displaymsg(source_p, parv[1], 1, 1, parv[2], parv[3]);
	132	return 0;
	133	}
	134
	135	static int
	136	m_displaymsg(struct Client source_p, const char channel, int underline, int action, const char nick, const char text)
	137	{
	138	struct Channel *chptr;
	139	struct membership *msptr;
	140	char nick2[NICKLEN+1];
	141	char *nick3 = rb_strdup(nick);
e03fc000	142	char text3[BUFSIZE];
8ffa8275 BG	143	char text2[BUFSIZE];
8ffa8275 BG	144
23485ebe JT	145	if(!IsFloodDone(source_p))
	146	flood_endgrace(source_p);
	147
8ffa8275 BG	148	if((chptr = find_channel(channel)) == NULL)
8ffa8275 BG	149	{
b97e1bf6 JT	150	sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL,
b97e1bf6 JT	151	form_str(ERR_NOSUCHCHANNEL), channel);
8ffa8275 BG	152	return 0;
	153	}
	154
	155	if(!(msptr = find_channel_membership(chptr, source_p)))
	156	{
	157	sendto_one_numeric(source_p, ERR_NOTONCHANNEL,
	158	form_str(ERR_NOTONCHANNEL), chptr->chname);
	159	return 0;
	160	}
	161
	162	if(!(chptr->mode.mode & chmode_flags['N']))
	163	{
	164	sendto_one_numeric(source_p, 573, "%s :Roleplay commands are not enabled on this channel.", chptr->chname);
	165	return 0;
	166	}
	167
	168	if(!can_send(chptr, source_p, msptr))
	169	{
	170	sendto_one_numeric(source_p, 573, "%s :Cannot send to channel.", chptr->chname);
	171	return 0;
	172	}
	173
	174	/* enforce flood stuff on roleplay commands */
	175	if(flood_attack_channel(0, source_p, chptr, chptr->chname))
	176	return 0;
	177
	178	/* enforce target change on roleplay commands */
	179	if(!is_chanop_voiced(msptr) && !IsOper(source_p) && !add_channel_target(source_p, chptr))
	180	{
	181	sendto_one(source_p, form_str(ERR_TARGCHANGE),
	182	me.name, source_p->name, chptr->chname);
	183	return 0;
	184	}
	185
	186	if(underline)
	187	rb_snprintf(nick2, sizeof(nick2), "\x1F%s\x1F", strip_unprintable(nick3));
	188	else
	189	rb_snprintf(nick2, sizeof(nick2), "%s", strip_unprintable(nick3));
	190
	191	/* don't allow nicks to be empty after stripping
	192	* this prevents nastiness like fake factions, etc. */
	193	if(EmptyString(nick3))
	194	{
	195	sendto_one_numeric(source_p, 573, "%s :No visible non-stripped characters in nick.", chptr->chname);
	196	return 0;
	197	}
	198
e03fc000 AI	199	rb_snprintf(text3, sizeof(text3), "%s (%s)", text, source_p->name);
e03fc000 AI	200
8ffa8275	201	if(action)
e03fc000	202	rb_snprintf(text2, sizeof(text2), "\1ACTION %s\1", text3);
8ffa8275	203	else
e03fc000	204	rb_snprintf(text2, sizeof(text2), "%s", text3);
8ffa8275	205
e03fc000	206	sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@npc.fakeuser.invalid PRIVMSG %s :%s", nick2, source_p->name, channel, text2);
6816e338 BG	207	sendto_match_servs(source_p, "", CAP_ENCAP, NOCAPS, "ENCAP ROLEPLAY %s %s :%s",
6816e338 BG	208	channel, nick2, text2);
8ffa8275 BG	209	return 0;
	210	}
	211
	212	static int
	213	me_roleplay(struct Client client_p, struct Client source_p, int parc, const char *parv[])
	214	{
	215	struct Channel *chptr;
	216
	217	/* Don't segfault if we get ROLEPLAY with an invalid channel.
6816e338 BG	218	* This shouldn't happen but it's best to be on the safe side. */
6816e338 BG	219	if((chptr = find_channel(parv[1])) == NULL)
8ffa8275 BG	220	return 0;
8ffa8275 BG	221
6816e338	222	sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@npc.fakeuser.invalid PRIVMSG %s :%s", parv[2], source_p->name, parv[1], parv[3]);
8ffa8275 BG	223	return 0;
8ffa8275 BG	224	}