Context Navigation

source: irc_commands.c @ 4d51c84

Last change on this file since 4d51c84 was b097945, checked in by Wilmer van der Gaast <github@…>, at 2017-04-06T20:25:08Z
Move canohost functions (diff licence) to separate file.
Property mode set to `100644`
File size: 26.8 KB

Rev	Line
[5ebff60]	1	/********************************************************************\
[0298d11]	2	* BitlBee -- An IRC to other IM-networks gateway *
	3	* *
[0e788f5]	4	* Copyright 2002-2012 Wilmer van der Gaast and others *
[0298d11]	5	\********************************************************************/
	6
	7	/* IRC commands */
	8
	9	/*
	10	This program is free software; you can redistribute it and/or modify
	11	it under the terms of the GNU General Public License as published by
	12	the Free Software Foundation; either version 2 of the License, or
	13	(at your option) any later version.
	14
	15	This program is distributed in the hope that it will be useful,
	16	but WITHOUT ANY WARRANTY; without even the implied warranty of
	17	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	18	GNU General Public License for more details.
	19
	20	You should have received a copy of the GNU General Public License with
	21	the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
[6f10697]	22	if not, write to the Free Software Foundation, Inc., 51 Franklin St.,
	23	Fifth Floor, Boston, MA 02110-1301 USA
[0298d11]	24	*/
	25
	26	#define BITLBEE_CORE
	27	#include "bitlbee.h"
[b097945]	28	#include "canohost.h"
[674a01d]	29	#include "help.h"
[0431ea1]	30	#include "ipc.h"
[58b63de6]	31	#include "base64.h"
[0298d11]	32
[5ebff60]	33	static void irc_cmd_pass(irc_t irc, char *cmd)
[0298d11]	34	{
[5ebff60]	35	if (irc->status & USTATUS_LOGGED_IN) {
[a199d33]	36	char *send_cmd[] = { "identify", cmd[1], NULL };
[5ebff60]	37
[a199d33]	38	/* We're already logged in, this client seems to send the PASS
	39	command last. (Possibly it won't send it at all if it turns
	40	out we don't require it, which will break this feature.)
	41	Try to identify using the given password. */
[5ebff60]	42	root_command(irc, send_cmd);
[daae10f]	43	return;
[a199d33]	44	}
	45	/* Handling in pre-logged-in state, first see if this server is
	46	password-protected: */
[5ebff60]	47	else if (global.conf->auth_pass &&
	48	(strncmp(global.conf->auth_pass, "md5:", 4) == 0 ?
	49	md5_verify_password(cmd[1], global.conf->auth_pass + 4) == 0 :
	50	strcmp(cmd[1], global.conf->auth_pass) == 0)) {
[79e826a]	51	irc->status \|= USTATUS_AUTHORIZED;
[5ebff60]	52	irc_check_login(irc);
	53	} else if (global.conf->auth_pass) {
	54	irc_send_num(irc, 464, ":Incorrect password");
	55	} else {
[a199d33]	56	/* Remember the password and try to identify after USER/NICK. */
[5ebff60]	57	irc_setpass(irc, cmd[1]);
	58	irc_check_login(irc);
[a199d33]	59	}
[0298d11]	60	}
	61
[d179fd90]	62	/* http://www.haproxy.org/download/1.8/doc/proxy-protocol.txt
	63
	64	This isn't actually IRC, it's used by for example stunnel4 to indicate
	65	the origin of the secured counterpart of the connection. It'll go wrong
	66	with arguments starting with : like for example "::1" but I guess I'm
	67	okay with that. */
	68	static void irc_cmd_proxy(irc_t irc, char *cmd)
	69	{
	70	struct addrinfo hints, *ai;
	71	struct sockaddr_storage sock;
	72	socklen_t socklen = sizeof(sock);
	73
	74	if (getpeername(irc->fd, (struct sockaddr*) &sock, &socklen) != 0) {
	75	return;
	76	}
	77
	78	ipv64_normalise_mapped(&sock, &socklen);
	79
	80	/* Only accept PROXY "command" on localhost sockets. */
	81	if (!((sock.ss_family == AF_INET &&
	82	ntohl(((struct sockaddr_in*)&sock)->sin_addr.s_addr) == INADDR_LOOPBACK) \|\|
	83	(sock.ss_family == AF_INET6 &&
	84	IN6_IS_ADDR_LOOPBACK(&((struct sockaddr_in6*)&sock)->sin6_addr)))) {
	85	return;
	86	}
	87
	88	/* And only once. Do this with a pretty dumb regex-match for
	89	now, maybe better to use some sort of flag.. */
	90	if (!g_regex_match_simple("^(ip6-)?localhost(.(localdomain.?)?)?$", irc->user->host, 0, 0)) {
	91	return;
	92	}
	93
	94	memset(&hints, 0, sizeof(hints));
	95	hints.ai_flags = AI_NUMERICHOST;
	96	if (getaddrinfo(cmd[2], NULL, &hints, &ai) != 0) {
	97	return;
	98	}
	99
	100	irc_set_hosts(irc, ai->ai_addr, ai->ai_addrlen);
	101	freeaddrinfo(ai);
	102	}
	103
[58b63de6]	104	static gboolean irc_sasl_plain_parse(char input, char user, char *pass)
	105	{
	106	int i, part, len;
	107	guint8 *decoded;
[c4e61db]	108	char *parts[3];
[58b63de6]	109
	110	/* bitlbee's base64_decode wrapper adds an extra null terminator at the end */
	111	len = base64_decode(input, &decoded);
	112
	113	/* this loop splits the decoded string into the parts array, like this:
	114	"username\0username\0password" -> {"username", "username", "password"} */
	115
	116	for (i = 0, part = 0; i < len && part < 3; part++) {
	117	/* set each of parts[] to point to the beginning of a string */
	118	parts[part] = (char *) decoded + i;
	119
	120	/* move the cursor forward to the next null terminator*/
	121	i += strlen(parts[part]) + 1;
	122	}
	123
	124	/* sanity checks */
[c788e15]	125	if (part != 3 \|\| i != (len + 1) \|\| (parts[0][0] && strcmp(parts[0], parts[1]) != 0)) {
[58b63de6]	126	g_free(decoded);
	127	return FALSE;
	128	} else {
[c788e15]	129	*user = g_strdup(parts[1]);
[58b63de6]	130	*pass = g_strdup(parts[2]);
	131	g_free(decoded);
	132	return TRUE;
	133	}
	134	}
	135
	136	static gboolean irc_sasl_check_pass(irc_t irc, char user, char *pass)
	137	{
	138	storage_status_t status;
	139
	140	/* just check the password here to be able to reply with useful numerics
	141	* the actual identification will be handled later */
[8e6ecfe]	142	status = auth_check_pass(irc, user, pass);
[58b63de6]	143
	144	if (status == STORAGE_OK) {
	145	if (!irc->user->nick) {
	146	/* set the nick here so we have it for the following numeric */
	147	irc->user->nick = g_strdup(user);
	148	}
	149	irc_send_num(irc, 903, ":Password accepted");
	150	return TRUE;
	151
	152	} else if (status == STORAGE_INVALID_PASSWORD) {
	153	irc_send_num(irc, 904, ":Incorrect password");
	154	} else if (status == STORAGE_NO_SUCH_USER) {
	155	irc_send_num(irc, 904, ":The nick is (probably) not registered");
	156	} else {
	157	irc_send_num(irc, 904, ":Unknown SASL authentication error");
	158	}
	159
	160	return FALSE;
	161	}
	162
	163	static void irc_cmd_authenticate(irc_t irc, char *cmd)
	164	{
	165	/* require the CAP to be enabled, and don't allow authentication before server password */
	166	if (!(irc->caps & CAP_SASL) \|\|
	167	(global.conf->authmode == AUTHMODE_CLOSED && !(irc->status & USTATUS_AUTHORIZED))) {
	168	return;
	169	}
	170
	171	if (irc->status & USTATUS_SASL_PLAIN_PENDING) {
	172	char user, pass;
	173
	174	irc->status &= ~USTATUS_SASL_PLAIN_PENDING;
	175
	176	if (!irc_sasl_plain_parse(cmd[1], &user, &pass)) {
	177	irc_send_num(irc, 904, ":SASL authentication failed");
	178	return;
	179	}
	180
	181	/* let's not support the nick != user case
	182	* if NICK is received after SASL, it will just fail after registration */
	183	if (user && irc->user->nick && strcmp(user, irc->user->nick) != 0) {
	184	irc_send_num(irc, 902, ":Your SASL username does not match your nickname");
	185
	186	} else if (irc_sasl_check_pass(irc, user, pass)) {
	187	/* and here we do the same thing as the PASS command*/
	188	if (irc->status & USTATUS_LOGGED_IN) {
	189	char *send_cmd[] = { "identify", pass, NULL };
	190	root_command(irc, send_cmd);
	191	} else {
	192	/* no check_login here - wait for CAP END */
	193	irc_setpass(irc, pass);
	194	}
	195	}
	196
	197	g_free(user);
	198	g_free(pass);
	199
	200	} else if (irc->status & USTATUS_IDENTIFIED) {
	201	irc_send_num(irc, 907, ":You have already authenticated");
	202
	203	} else if (strcmp(cmd[1], "*") == 0) {
	204	irc_send_num(irc, 906, ":SASL authentication aborted");
	205	irc->status &= ~USTATUS_SASL_PLAIN_PENDING;
	206
	207	} else if (g_strcasecmp(cmd[1], "PLAIN") == 0) {
	208	irc_write(irc, "AUTHENTICATE +");
	209	irc->status \|= USTATUS_SASL_PLAIN_PENDING;
	210
	211	} else {
	212	irc_send_num(irc, 908, "PLAIN :is the available SASL mechanism");
	213	irc_send_num(irc, 904, ":SASL authentication failed");
	214	irc->status &= ~USTATUS_SASL_PLAIN_PENDING;
	215	}
	216	}
	217
[5ebff60]	218	static void irc_cmd_user(irc_t irc, char *cmd)
[0298d11]	219	{
[5ebff60]	220	irc->user->user = g_strdup(cmd[1]);
	221	irc->user->fullname = g_strdup(cmd[4]);
	222
	223	irc_check_login(irc);
[0298d11]	224	}
	225
[5ebff60]	226	static void irc_cmd_nick(irc_t irc, char *cmd)
[0298d11]	227	{
[9a9b520]	228	irc_user_t *iu;
[5ebff60]	229
	230	if ((iu = irc_user_by_name(irc, cmd[1])) && iu != irc->user) {
	231	irc_send_num(irc, 433, "%s :This nick is already in use", cmd[1]);
	232	} else if (!nick_ok(NULL, cmd[1])) {
[0298d11]	233	/* [SH] Invalid characters. */
[5ebff60]	234	irc_send_num(irc, 432, "%s :This nick contains invalid characters", cmd[1]);
	235	} else if (irc->status & USTATUS_LOGGED_IN) {
[3558fea]	236	/* WATCH OUT: iu from the first if reused here to check if the
	237	new nickname is the same (other than case, possibly). If it
	238	is, no need to reset identify-status. */
[5ebff60]	239	if ((irc->status & USTATUS_IDENTIFIED) && iu != irc->user) {
	240	irc_setpass(irc, NULL);
[ffa1173]	241	irc->status &= ~USTATUS_IDENTIFIED;
[5ebff60]	242	irc_umode_set(irc, "-R", 1);
[58b63de6]	243
	244	if (irc->caps & CAP_SASL) {
	245	irc_send_num(irc, 901, "%s!%s@%s :You are now logged out",
	246	irc->user->nick, irc->user->user, irc->user->host);
	247	}
	248
[5ebff60]	249	irc_rootmsg(irc, "Changing nicks resets your identify status. "
	250	"Re-identify or register a new account if you want "
	251	"your configuration to be saved. See \x02help "
	252	"nick_changes\x02.");
[ffa1173]	253	}
[5ebff60]	254
	255	if (strcmp(cmd[1], irc->user->nick) != 0) {
	256	irc_user_set_nick(irc->user, cmd[1]);
	257	}
	258	} else {
	259	g_free(irc->user->nick);
	260	irc->user->nick = g_strdup(cmd[1]);
	261
	262	irc_check_login(irc);
[0298d11]	263	}
	264	}
	265
[5ebff60]	266	static void irc_cmd_quit(irc_t irc, char *cmd)
[0298d11]	267	{
[5ebff60]	268	if (cmd[1] && *cmd[1]) {
	269	irc_abort(irc, 0, "Quit: %s", cmd[1]);
	270	} else {
	271	irc_abort(irc, 0, "Leaving...");
	272	}
[0298d11]	273	}
	274
[5ebff60]	275	static void irc_cmd_ping(irc_t irc, char *cmd)
[0298d11]	276	{
[5ebff60]	277	irc_write(irc, ":%s PONG %s :%s", irc->root->host,
	278	irc->root->host, cmd[1] ? cmd[1] : irc->root->host);
[0298d11]	279	}
	280
[5ebff60]	281	static void irc_cmd_pong(irc_t irc, char *cmd)
[3923003]	282	{
	283	/* We could check the value we get back from the user, but in
	284	fact we don't care, we're just happy s/he's still alive. */
	285	irc->last_pong = gettime();
	286	irc->pinging = 0;
	287	}
	288
[5ebff60]	289	static void irc_cmd_join(irc_t irc, char *cmd)
[b9e020a]	290	{
[58646d9]	291	char comma, s = cmd[1];
[5ebff60]	292
	293	while (s) {
[58646d9]	294	irc_channel_t *ic;
[5ebff60]	295
	296	if ((comma = strchr(s, ','))) {
[58646d9]	297	*comma = '\0';
[5ebff60]	298	}
	299
	300	if ((ic = irc_channel_by_name(irc, s)) == NULL &&
	301	(ic = irc_channel_new(irc, s))) {
	302	if (strcmp(set_getstr(&ic->set, "type"), "control") != 0) {
[324c378]	303	/* Autoconfiguration is for control channels only ATM. */
[5ebff60]	304	} else if (bee_group_by_name(ic->irc->b, ic->name + 1, FALSE)) {
	305	set_setstr(&ic->set, "group", ic->name + 1);
	306	set_setstr(&ic->set, "fill_by", "group");
	307	} else if (set_setstr(&ic->set, "protocol", ic->name + 1)) {
	308	set_setstr(&ic->set, "fill_by", "protocol");
	309	} else if (set_setstr(&ic->set, "account", ic->name + 1)) {
	310	set_setstr(&ic->set, "fill_by", "account");
	311	} else {
[13fa2db]	312	/* The set commands above will run this already,
	313	but if we didn't hit any, we have to fill the
	314	channel with the default population. */
[5ebff60]	315	bee_irc_channel_update(ic->irc, ic, NULL);
[324c378]	316	}
[5ebff60]	317	} else if (ic == NULL) {
	318	irc_send_num(irc, 479, "%s :Invalid channel name", s);
[58646d9]	319	goto next;
	320	}
[5ebff60]	321
	322	if (ic->flags & IRC_CHANNEL_JOINED) {
[58646d9]	323	/* Dude, you're already there...
	324	RFC doesn't have any reply for that though? */
	325	goto next;
[5ebff60]	326	}
	327
	328	if (ic->f->join && !ic->f->join(ic)) {
[58646d9]	329	/* The story is: FALSE either means the handler
	330	showed an error message, or is doing some work
	331	before the join should be confirmed. (In the
	332	latter case, the caller should take care of that
	333	confirmation.) TRUE means all's good, let the
	334	user join the channel right away. */
	335	goto next;
[5ebff60]	336	}
	337
	338	irc_channel_add_user(ic, irc->user);
	339
[58646d9]	340	next:
[5ebff60]	341	if (comma) {
[58646d9]	342	s = comma + 1;
	343	*comma = ',';
[5ebff60]	344	} else {
[58646d9]	345	break;
[5ebff60]	346	}
[57119e8]	347	}
[b9e020a]	348	}
	349
[5ebff60]	350	static void irc_cmd_names(irc_t irc, char *cmd)
[b9e020a]	351	{
	352	irc_channel_t *ic;
[5ebff60]	353
	354	if (cmd[1] && (ic = irc_channel_by_name(irc, cmd[1]))) {
	355	irc_send_names(ic);
	356	}
[b9e020a]	357	/* With no args, we should show /names of all chans. Make the code
	358	below work well if necessary.
	359	else
	360	{
[5ebff60]	361	GSList *l;
	362
	363	for( l = irc->channels; l; l = l->next )
	364	irc_send_names( l->data );
[b9e020a]	365	}
	366	*/
	367	}
	368
[5ebff60]	369	static void irc_cmd_part(irc_t irc, char *cmd)
[b9e020a]	370	{
	371	irc_channel_t *ic;
[5ebff60]	372
	373	if ((ic = irc_channel_by_name(irc, cmd[1])) == NULL) {
	374	irc_send_num(irc, 403, "%s :No such channel", cmd[1]);
	375	} else if (irc_channel_del_user(ic, irc->user, IRC_CDU_PART, cmd[2])) {
	376	if (ic->f->part) {
	377	ic->f->part(ic, NULL);
	378	}
	379	} else {
	380	irc_send_num(irc, 442, "%s :You're not on that channel", cmd[1]);
[b9e020a]	381	}
	382	}
	383
[5ebff60]	384	static void irc_cmd_whois(irc_t irc, char *cmd)
[b95932e]	385	{
	386	char *nick = cmd[1];
[5ebff60]	387	irc_user_t *iu = irc_user_by_name(irc, nick);
	388
	389	if (iu) {
	390	irc_send_whois(iu);
	391	} else {
	392	irc_send_num(irc, 401, "%s :Nick does not exist", nick);
	393	}
[b95932e]	394	}
	395
[5ebff60]	396	static void irc_cmd_whowas(irc_t irc, char *cmd)
[b95932e]	397	{
	398	/* For some reason irssi tries a whowas when whois fails. We can
	399	ignore this, but then the user never gets a "user not found"
	400	message from irssi which is a bit annoying. So just respond
	401	with not-found and irssi users will get better error messages */
[5ebff60]	402
	403	irc_send_num(irc, 406, "%s :Nick does not exist", cmd[1]);
	404	irc_send_num(irc, 369, "%s :End of WHOWAS", cmd[1]);
[b95932e]	405	}
	406
[5ebff60]	407	static void irc_cmd_motd(irc_t irc, char *cmd)
[9b69eb7]	408	{
[5ebff60]	409	irc_send_motd(irc);
[9b69eb7]	410	}
	411
[5ebff60]	412	static void irc_cmd_mode(irc_t irc, char *cmd)
[0298d11]	413	{
[5ebff60]	414	if (irc_channel_name_ok(cmd[1])) {
[b919363]	415	irc_channel_t *ic;
[5ebff60]	416
	417	if ((ic = irc_channel_by_name(irc, cmd[1])) == NULL) {
	418	irc_send_num(irc, 403, "%s :No such channel", cmd[1]);
	419	} else if (cmd[2]) {
	420	if (cmd[2] == '+' \|\| cmd[2] == '-') {
	421	irc_send_num(irc, 477, "%s :Can't change channel modes", cmd[1]);
	422	} else if (*cmd[2] == 'b') {
	423	irc_send_num(irc, 368, "%s :No bans possible", cmd[1]);
	424	}
	425	} else {
	426	irc_send_num(irc, 324, "%s +%s", cmd[1], ic->mode);
[0298d11]	427	}
[5ebff60]	428	} else {
	429	if (nick_cmp(NULL, cmd[1], irc->user->nick) == 0) {
	430	if (cmd[2]) {
	431	irc_umode_set(irc, cmd[2], 0);
	432	} else {
	433	irc_send_num(irc, 221, "+%s", irc->umode);
	434	}
	435	} else {
	436	irc_send_num(irc, 502, ":Don't touch their modes");
[0298d11]	437	}
	438	}
	439	}
	440
[5ebff60]	441	static void irc_cmd_who(irc_t irc, char *cmd)
[2f53ada]	442	{
	443	char *channel = cmd[1];
	444	irc_channel_t *ic;
[a72af0d]	445	irc_user_t *iu;
[5ebff60]	446
	447	if (!channel \|\| channel == '0' \|\| channel == '' \|\| !channel) {
	448	irc_send_who(irc, irc->users, "**");
	449	} else if ((ic = irc_channel_by_name(irc, channel))) {
	450	irc_send_who(irc, ic->users, channel);
	451	} else if ((iu = irc_user_by_name(irc, channel))) {
[a72af0d]	452	/* Tiny hack! */
[5ebff60]	453	GSList *l = g_slist_append(NULL, iu);
	454	irc_send_who(irc, l, channel);
	455	g_slist_free(l);
	456	} else {
	457	irc_send_num(irc, 403, "%s :No such channel", channel);
[a72af0d]	458	}
[2f53ada]	459	}
	460
[5ebff60]	461	static void irc_cmd_privmsg(irc_t irc, char *cmd)
[b919363]	462	{
[280c56a]	463	irc_channel_t *ic;
	464	irc_user_t *iu;
[5ebff60]	465
	466	if (!cmd[2]) {
	467	irc_send_num(irc, 412, ":No text to send");
[24b8bbb]	468	return;
[280c56a]	469	}
[5ebff60]	470
[24b8bbb]	471	/* Don't treat CTCP actions as real CTCPs, just convert them right now. */
[5ebff60]	472	if (g_strncasecmp(cmd[2], "\001ACTION", 7) == 0) {
[24b8bbb]	473	cmd[2] += 4;
[5ebff60]	474	memcpy(cmd[2], "/me", 3);
	475	if (cmd[2][strlen(cmd[2]) - 1] == '\001') {
	476	cmd[2][strlen(cmd[2]) - 1] = '\0';
	477	}
[24b8bbb]	478	}
[5ebff60]	479
	480	if (irc_channel_name_ok(cmd[1]) &&
	481	(ic = irc_channel_by_name(irc, cmd[1]))) {
	482	if (cmd[2][0] == '\001') {
[a7dbf45]	483	/* CTCPs to channels? Nah. Maybe later. */
[5ebff60]	484	} else if (ic->f->privmsg) {
	485	ic->f->privmsg(ic, cmd[2]);
[a7dbf45]	486	}
[5ebff60]	487	} else if ((iu = irc_user_by_name(irc, cmd[1]))) {
	488	if (cmd[2][0] == '\001') {
[24b8bbb]	489	char **ctcp;
[5ebff60]	490
	491	if (iu->f->ctcp == NULL) {
[24b8bbb]	492	return;
[5ebff60]	493	}
	494	if (cmd[2][strlen(cmd[2]) - 1] == '\001') {
	495	cmd[2][strlen(cmd[2]) - 1] = '\0';
	496	}
	497
	498	ctcp = split_command_parts(cmd[2] + 1, 0);
	499	iu->f->ctcp(iu, ctcp);
	500	} else if (iu->f->privmsg) {
[92c8d41]	501	iu->last_channel = NULL;
[5ebff60]	502	iu->f->privmsg(iu, cmd[2]);
[bce78c8]	503	}
[5ebff60]	504	} else {
	505	irc_send_num(irc, 401, "%s :No such nick/channel", cmd[1]);
[b919363]	506	}
[280c56a]	507	}
	508
[5ebff60]	509	static void irc_cmd_notice(irc_t irc, char *cmd)
[d7f8500]	510	{
[bbc69f7]	511	irc_user_t *iu;
[5ebff60]	512
	513	if (!cmd[2]) {
	514	irc_send_num(irc, 412, ":No text to send");
[d7f8500]	515	return;
	516	}
[5ebff60]	517
[d7f8500]	518	/* At least for now just echo. IIRC some IRC clients use self-notices
	519	for lag checks, so try to support that. */
[5ebff60]	520	if (nick_cmp(NULL, cmd[1], irc->user->nick) == 0) {
	521	irc_send_msg(irc->user, "NOTICE", irc->user->nick, cmd[2], NULL);
	522	} else if ((iu = irc_user_by_name(irc, cmd[1]))) {
	523	iu->f->privmsg(iu, cmd[2]);
	524	}
[d7f8500]	525	}
	526
[5ebff60]	527	static void irc_cmd_nickserv(irc_t irc, char *cmd)
[d860a8d]	528	{
	529	/* [SH] This aliases the NickServ command to PRIVMSG root */
	530	/* [TV] This aliases the NS command to PRIVMSG root as well */
[5ebff60]	531	root_command(irc, cmd + 1);
[d860a8d]	532	}
	533
[5ebff60]	534	static void irc_cmd_oper_hack(irc_t irc, char *cmd);
[280c56a]	535
[5ebff60]	536	static void irc_cmd_oper(irc_t irc, char *cmd)
[280c56a]	537	{
[060d066]	538	/* Very non-standard evil but useful/secure hack, see below. */
[5ebff60]	539	if (irc->status & OPER_HACK_ANY) {
	540	return irc_cmd_oper_hack(irc, cmd);
[280c56a]	541	}
[5ebff60]	542
	543	if (global.conf->oper_pass &&
	544	(strncmp(global.conf->oper_pass, "md5:", 4) == 0 ?
	545	md5_verify_password(cmd[2], global.conf->oper_pass + 4) == 0 :
	546	strcmp(cmd[2], global.conf->oper_pass) == 0)) {
	547	irc_umode_set(irc, "+o", 1);
	548	irc_send_num(irc, 381, ":Password accepted");
	549	} else {
	550	irc_send_num(irc, 491, ":Incorrect password");
[280c56a]	551	}
	552	}
	553
[5ebff60]	554	static void irc_cmd_oper_hack(irc_t irc, char *cmd)
[060d066]	555	{
[5ebff60]	556	char *password = g_strjoinv(" ", cmd + 2);
	557
[060d066]	558	/* /OPER can now also be used to enter IM/identify passwords without
	559	echoing. It's a hack but the extra password security is worth it. */
[5ebff60]	560	if (irc->status & OPER_HACK_ACCOUNT_PASSWORD) {
[060d066]	561	account_t *a;
[5ebff60]	562
	563	for (a = irc->b->accounts; a; a = a->next) {
	564	if (strcmp(a->pass, PASSWORD_PENDING) == 0) {
	565	set_setstr(&a->set, "password", password);
	566	irc_rootmsg(irc, "Password added to IM account "
	567	"%s", a->tag);
[060d066]	568	/* The IRC client may expect this. 491 suggests the OPER
	569	password was wrong, so the client won't expect a +o.
	570	It may however repeat the password prompt. We'll see. */
[5ebff60]	571	irc_send_num(irc, 491, ":Password added to IM account "
	572	"%s", a->tag);
[060d066]	573	}
[5ebff60]	574	}
	575	} else if (irc->status & OPER_HACK_IDENTIFY) {
[fda194f]	576	char *send_cmd[] = { "identify", password, NULL, NULL };
	577	irc->status &= ~OPER_HACK_IDENTIFY;
[5ebff60]	578	if (irc->status & OPER_HACK_IDENTIFY_NOLOAD) {
[fda194f]	579	send_cmd[1] = "-noload";
	580	send_cmd[2] = password;
[5ebff60]	581	} else if (irc->status & OPER_HACK_IDENTIFY_FORCE) {
[fda194f]	582	send_cmd[1] = "-force";
	583	send_cmd[2] = password;
	584	}
[5ebff60]	585	irc_send_num(irc, 491, ":Trying to identify");
	586	root_command(irc, send_cmd);
	587	} else if (irc->status & OPER_HACK_REGISTER) {
[060d066]	588	char *send_cmd[] = { "register", password, NULL };
[5ebff60]	589	irc_send_num(irc, 491, ":Trying to identify");
	590	root_command(irc, send_cmd);
[060d066]	591	}
[5ebff60]	592
[060d066]	593	irc->status &= ~OPER_HACK_ANY;
[5ebff60]	594	g_free(password);
[060d066]	595	}
	596
[5ebff60]	597	static void irc_cmd_invite(irc_t irc, char *cmd)
[280c56a]	598	{
[66b9e36a]	599	irc_channel_t *ic;
	600	irc_user_t *iu;
[5ebff60]	601
	602	if ((iu = irc_user_by_name(irc, cmd[1])) == NULL) {
	603	irc_send_num(irc, 401, "%s :No such nick", cmd[1]);
[66b9e36a]	604	return;
[5ebff60]	605	} else if ((ic = irc_channel_by_name(irc, cmd[2])) == NULL) {
	606	irc_send_num(irc, 403, "%s :No such channel", cmd[2]);
[66b9e36a]	607	return;
	608	}
[5ebff60]	609
	610	if (!ic->f->invite) {
	611	irc_send_num(irc, 482, "%s :Can't invite people here", cmd[2]);
	612	} else if (ic->f->invite(ic, iu)) {
	613	irc_send_num(irc, 341, "%s %s", iu->nick, ic->name);
	614	}
[0298d11]	615	}
	616
[5ebff60]	617	static void irc_cmd_kick(irc_t irc, char *cmd)
[7821ee8]	618	{
	619	irc_channel_t *ic;
	620	irc_user_t *iu;
[5ebff60]	621
	622	if ((iu = irc_user_by_name(irc, cmd[2])) == NULL) {
	623	irc_send_num(irc, 401, "%s :No such nick", cmd[2]);
[7821ee8]	624	return;
[5ebff60]	625	} else if ((ic = irc_channel_by_name(irc, cmd[1])) == NULL) {
	626	irc_send_num(irc, 403, "%s :No such channel", cmd[1]);
[7821ee8]	627	return;
[5ebff60]	628	} else if (!ic->f->kick) {
	629	irc_send_num(irc, 482, "%s :Can't kick people here", cmd[1]);
[7821ee8]	630	return;
	631	}
[5ebff60]	632
	633	ic->f->kick(ic, iu, cmd[3] ? cmd[3] : NULL);
[7821ee8]	634	}
	635
[5ebff60]	636	static void irc_cmd_userhost(irc_t irc, char *cmd)
[0298d11]	637	{
	638	int i;
[5ebff60]	639
[0298d11]	640	/* [TV] Usable USERHOST-implementation according to
[5ebff60]	641	RFC1459. Without this, mIRC shows an error
	642	while connecting, and the used way of rejecting
	643	breaks standards.
[0298d11]	644	*/
[5ebff60]	645
	646	for (i = 1; cmd[i]; i++) {
	647	irc_user_t *iu = irc_user_by_name(irc, cmd[i]);
	648
	649	if (iu) {
	650	irc_send_num(irc, 302, ":%s=%c%s@%s", iu->nick,
	651	irc_user_get_away(iu) ? '-' : '+',
	652	iu->user, iu->host);
	653	}
[003a12b]	654	}
[0298d11]	655	}
	656
[5ebff60]	657	static void irc_cmd_ison(irc_t irc, char *cmd)
[0298d11]	658	{
[b4e4b95]	659	char buff[IRC_MAX_LINE];
[0298d11]	660	int lenleft, i;
[5ebff60]	661
[0298d11]	662	buff[0] = '\0';
[5ebff60]	663
[0298d11]	664	/* [SH] Leave room for : and \0 */
	665	lenleft = IRC_MAX_LINE - 2;
[5ebff60]	666
	667	for (i = 1; cmd[i]; i++) {
[42616d1]	668	char this, next;
[5ebff60]	669
[42616d1]	670	this = cmd[i];
[5ebff60]	671	while (*this) {
[003a12b]	672	irc_user_t *iu;
[5ebff60]	673
	674	if ((next = strchr(this, ' '))) {
[42616d1]	675	*next = 0;
[5ebff60]	676	}
	677
	678	if ((iu = irc_user_by_name(irc, this)) &&
	679	iu->bu && iu->bu->flags & BEE_USER_ONLINE) {
	680	lenleft -= strlen(iu->nick) + 1;
	681
	682	if (lenleft < 0) {
[42616d1]	683	break;
[5ebff60]	684	}
	685
	686	strcat(buff, iu->nick);
	687	strcat(buff, " ");
[0298d11]	688	}
[5ebff60]	689
	690	if (next) {
[42616d1]	691	*next = ' ';
	692	this = next + 1;
[5ebff60]	693	} else {
[42616d1]	694	break;
[5ebff60]	695	}
[0298d11]	696	}
[5ebff60]	697
[42616d1]	698	/* sigh */
[5ebff60]	699	if (lenleft < 0) {
[42616d1]	700	break;
[5ebff60]	701	}
	702	}
	703
	704	if (strlen(buff) > 0) {
	705	buff[strlen(buff) - 1] = '\0';
[0298d11]	706	}
[5ebff60]	707
	708	irc_send_num(irc, 303, ":%s", buff);
[0298d11]	709	}
	710
[5ebff60]	711	static void irc_cmd_watch(irc_t irc, char *cmd)
[0298d11]	712	{
	713	int i;
[5ebff60]	714
[0298d11]	715	/* Obviously we could also mark a user structure as being
	716	watched, but what if the WATCH command is sent right
	717	after connecting? The user won't exist yet then... */
[5ebff60]	718	for (i = 1; cmd[i]; i++) {
[0298d11]	719	char *nick;
[003a12b]	720	irc_user_t *iu;
[5ebff60]	721
	722	if (!cmd[i][0] \|\| !cmd[i][1]) {
[0298d11]	723	break;
	724	}
[5ebff60]	725
	726	nick = g_strdup(cmd[i] + 1);
	727	nick_lc(irc, nick);
	728
	729	iu = irc_user_by_name(irc, nick);
	730
	731	if (cmd[i][0] == '+') {
	732	if (!g_hash_table_lookup(irc->watches, nick)) {
	733	g_hash_table_insert(irc->watches, nick, nick);
	734	}
	735
	736	if (iu && iu->bu && iu->bu->flags & BEE_USER_ONLINE) {
	737	irc_send_num(irc, 604, "%s %s %s %d :%s", iu->nick, iu->user,
	738	iu->host, (int) time(NULL), "is online");
	739	} else {
	740	irc_send_num(irc, 605, "%s %s %s %d :%s", nick, "", "",
	741	(int) time(NULL), "is offline");
	742	}
	743	} else if (cmd[i][0] == '-') {
[0298d11]	744	gpointer okey, ovalue;
[5ebff60]	745
	746	if (g_hash_table_lookup_extended(irc->watches, nick, &okey, &ovalue)) {
	747	g_hash_table_remove(irc->watches, okey);
	748	g_free(okey);
	749
	750	irc_send_num(irc, 602, "%s %s %s %d :%s", nick, "", "", 0, "Stopped watching");
[0298d11]	751	}
	752	}
	753	}
	754	}
	755
[5ebff60]	756	static void irc_cmd_topic(irc_t irc, char *cmd)
[0298d11]	757	{
[5ebff60]	758	irc_channel_t *ic = irc_channel_by_name(irc, cmd[1]);
[4469e7e]	759	const char *new = cmd[2];
[5ebff60]	760
	761	if (ic == NULL) {
	762	irc_send_num(irc, 403, "%s :No such channel", cmd[1]);
	763	} else if (new) {
	764	if (ic->f->topic == NULL) {
	765	irc_send_num(irc, 482, "%s :Can't change this channel's topic", ic->name);
	766	} else if (ic->f->topic(ic, new)) {
	767	irc_send_topic(ic, TRUE);
	768	}
	769	} else {
	770	irc_send_topic(ic, FALSE);
[50e1776]	771	}
[0298d11]	772	}
	773
[5ebff60]	774	static void irc_cmd_away(irc_t irc, char *cmd)
[0298d11]	775	{
[5ebff60]	776	if (cmd[1] && *cmd[1]) {
	777	char away[strlen(cmd[1]) + 1];
[0298d11]	778	int i, j;
[5ebff60]	779
[0298d11]	780	/* Copy away string, but skip control chars. Mainly because
	781	Jabber really doesn't like them. */
[5ebff60]	782	for (i = j = 0; cmd[1][i]; i++) {
	783	if ((unsigned char) (away[j] = cmd[1][i]) >= ' ') {
	784	j++;
	785	}
	786	}
[81186cab]	787	away[j] = '\0';
[5ebff60]	788
	789	irc_send_num(irc, 306, ":You're now away: %s", away);
	790	set_setstr(&irc->b->set, "away", away);
	791	} else {
	792	irc_send_num(irc, 305, ":Welcome back");
	793	set_setstr(&irc->b->set, "away", NULL);
[0298d11]	794	}
	795	}
	796
[5ebff60]	797	static void irc_cmd_list(irc_t irc, char *cmd)
[23d6165]	798	{
	799	GSList *l;
[5ebff60]	800
	801	for (l = irc->channels; l; l = l->next) {
[23d6165]	802	irc_channel_t *ic = l->data;
[5ebff60]	803
	804	irc_send_num(irc, 322, "%s %d :%s",
	805	ic->name, g_slist_length(ic->users), ic->topic ? : "");
[23d6165]	806	}
[5ebff60]	807	irc_send_num(irc, 323, ":%s", "End of /LIST");
[23d6165]	808	}
	809
[5ebff60]	810	static void irc_cmd_version(irc_t irc, char *cmd)
[82898af]	811	{
[2e78f75]	812	irc_send_num(irc, 351, "%s-%s. %s :",
	813	PACKAGE, BITLBEE_VERSION, irc->root->host);
[82898af]	814	}
	815
[5ebff60]	816	static void irc_cmd_completions(irc_t irc, char *cmd)
[0298d11]	817	{
	818	help_t *h;
	819	set_t *s;
	820	int i;
[5ebff60]	821
	822	irc_send_msg_raw(irc->root, "NOTICE", irc->user->nick, "COMPLETIONS OK");
	823
	824	for (i = 0; root_commands[i].command; i++) {
	825	irc_send_msg_f(irc->root, "NOTICE", irc->user->nick, "COMPLETIONS %s", root_commands[i].command);
	826	}
	827
	828	for (h = global.help; h; h = h->next) {
	829	irc_send_msg_f(irc->root, "NOTICE", irc->user->nick, "COMPLETIONS help %s", h->title);
	830	}
	831
	832	for (s = irc->b->set; s; s = s->next) {
	833	irc_send_msg_f(irc->root, "NOTICE", irc->user->nick, "COMPLETIONS set %s", s->key);
	834	}
	835
	836	irc_send_msg_raw(irc->root, "NOTICE", irc->user->nick, "COMPLETIONS END");
[0298d11]	837	}
	838
[5ebff60]	839	static void irc_cmd_rehash(irc_t irc, char *cmd)
[f4a5940]	840	{
[5ebff60]	841	if (global.conf->runmode == RUNMODE_INETD) {
	842	ipc_master_cmd_rehash(NULL, NULL);
	843	} else {
	844	ipc_to_master(cmd);
	845	}
	846
	847	irc_send_num(irc, 382, "%s :Rehashing", global.conf_file);
[f4a5940]	848	}
	849
[0298d11]	850	static const command_t irc_commands[] = {
[0ef1c92]	851	{ "cap", 1, irc_cmd_cap, 0 },
[a199d33]	852	{ "pass", 1, irc_cmd_pass, 0 },
[d179fd90]	853	{ "proxy", 5, irc_cmd_proxy, IRC_CMD_PRE_LOGIN },
[0298d11]	854	{ "user", 4, irc_cmd_user, IRC_CMD_PRE_LOGIN },
	855	{ "nick", 1, irc_cmd_nick, 0 },
	856	{ "quit", 0, irc_cmd_quit, 0 },
	857	{ "ping", 0, irc_cmd_ping, 0 },
[3923003]	858	{ "pong", 0, irc_cmd_pong, IRC_CMD_LOGGED_IN },
[b9e020a]	859	{ "join", 1, irc_cmd_join, IRC_CMD_LOGGED_IN },
	860	{ "names", 1, irc_cmd_names, IRC_CMD_LOGGED_IN },
	861	{ "part", 1, irc_cmd_part, IRC_CMD_LOGGED_IN },
[b95932e]	862	{ "whois", 1, irc_cmd_whois, IRC_CMD_LOGGED_IN },
	863	{ "whowas", 1, irc_cmd_whowas, IRC_CMD_LOGGED_IN },
[9b69eb7]	864	{ "motd", 0, irc_cmd_motd, IRC_CMD_LOGGED_IN },
[b919363]	865	{ "mode", 1, irc_cmd_mode, IRC_CMD_LOGGED_IN },
[2f53ada]	866	{ "who", 0, irc_cmd_who, IRC_CMD_LOGGED_IN },
[280c56a]	867	{ "privmsg", 1, irc_cmd_privmsg, IRC_CMD_LOGGED_IN },
[d7f8500]	868	{ "notice", 1, irc_cmd_notice, IRC_CMD_LOGGED_IN },
[d860a8d]	869	{ "nickserv", 1, irc_cmd_nickserv, IRC_CMD_LOGGED_IN },
	870	{ "ns", 1, irc_cmd_nickserv, IRC_CMD_LOGGED_IN },
[81186cab]	871	{ "away", 0, irc_cmd_away, IRC_CMD_LOGGED_IN },
[d7d677d]	872	{ "version", 0, irc_cmd_version, IRC_CMD_LOGGED_IN },
	873	{ "completions", 0, irc_cmd_completions, IRC_CMD_LOGGED_IN },
[0298d11]	874	{ "userhost", 1, irc_cmd_userhost, IRC_CMD_LOGGED_IN },
	875	{ "ison", 1, irc_cmd_ison, IRC_CMD_LOGGED_IN },
	876	{ "watch", 1, irc_cmd_watch, IRC_CMD_LOGGED_IN },
[003a12b]	877	{ "invite", 2, irc_cmd_invite, IRC_CMD_LOGGED_IN },
[7821ee8]	878	{ "kick", 2, irc_cmd_kick, IRC_CMD_LOGGED_IN },
[4469e7e]	879	{ "topic", 1, irc_cmd_topic, IRC_CMD_LOGGED_IN },
[003a12b]	880	{ "oper", 2, irc_cmd_oper, IRC_CMD_LOGGED_IN },
[23d6165]	881	{ "list", 0, irc_cmd_list, IRC_CMD_LOGGED_IN },
[0431ea1]	882	{ "die", 0, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[565a1ea]	883	{ "deaf", 0, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[48721c3]	884	{ "wallops", 1, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[dfc8a46]	885	{ "wall", 1, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[f4a5940]	886	{ "rehash", 0, irc_cmd_rehash, IRC_CMD_OPER_ONLY },
[54879ab]	887	{ "restart", 0, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[48721c3]	888	{ "kill", 2, NULL, IRC_CMD_OPER_ONLY \| IRC_CMD_TO_MASTER },
[58b63de6]	889	{ "authenticate", 1, irc_cmd_authenticate, 0 },
[0298d11]	890	{ NULL }
	891	};
	892
[5ebff60]	893	void irc_exec(irc_t irc, char cmd[])
	894	{
[f1d38f2]	895	int i, n_arg;
[5ebff60]	896
	897	if (!cmd[0]) {
[f73b969]	898	return;
[5ebff60]	899	}
	900
	901	for (i = 0; irc_commands[i].command; i++) {
	902	if (g_strcasecmp(irc_commands[i].command, cmd[0]) == 0) {
[f1d38f2]	903	/* There should be no typo in the next line: */
[5ebff60]	904	for (n_arg = 0; cmd[n_arg]; n_arg++) {
[25c4c78]	905	;
[edf9657]	906	}
[5ebff60]	907	n_arg--;
	908
	909	if (irc_commands[i].flags & IRC_CMD_PRE_LOGIN && irc->status & USTATUS_LOGGED_IN) {
	910	irc_send_num(irc, 462, ":Only allowed before logging in");
	911	} else if (irc_commands[i].flags & IRC_CMD_LOGGED_IN && !(irc->status & USTATUS_LOGGED_IN)) {
	912	irc_send_num(irc, 451, ":Register first");
	913	} else if (irc_commands[i].flags & IRC_CMD_OPER_ONLY && !strchr(irc->umode, 'o')) {
	914	irc_send_num(irc, 481, ":Permission denied - You're not an IRC operator");
	915	} else if (n_arg < irc_commands[i].required_parameters) {
	916	irc_send_num(irc, 461, "%s :Need more parameters", cmd[0]);
	917	} else if (irc_commands[i].flags & IRC_CMD_TO_MASTER) {
[5424c76]	918	/* IPC doesn't make sense in inetd mode,
	919	but the function will catch that. */
[5ebff60]	920	ipc_to_master(cmd);
	921	} else {
	922	irc_commands[i].execute(irc, cmd);
[f73b969]	923	}
[5ebff60]	924
[2f13222]	925	return;
[0298d11]	926	}
[5ebff60]	927	}
	928
	929	if (irc->status & USTATUS_LOGGED_IN) {
	930	irc_send_num(irc, 421, "%s :Unknown command", cmd[0]);
	931	}
[0298d11]	932	}

Note: See TracBrowser for help on using the repository browser.

Download in other formats: