[solanum.git] / authd / providers / ident.c

/* authd/providers/ident.c - ident lookup provider for authd
 * Copyright (c) 2016 Elizabeth Myers <elizabeth@interlinked.me>
 *
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice is present in all copies.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

/* Largely adapted from old s_auth.c, but reworked for authd. rDNS code
 * moved to its own provider.
 *
 * --Elizafox 13 March 2016
 */

#include "stdinc.h"
#include "match.h"
#include "authd.h"
#include "notice.h"
#include "provider.h"
#include "res.h"

#define IDENT_BUFSIZE 128

struct ident_query
{
	time_t timeout;				/* Timeout interval */
	rb_fde_t *F;				/* Our FD */
};

/* Goinked from old s_auth.c --Elizafox */
static const char *messages[] =
{
	"*** Checking Ident",
	"*** Got Ident response",
	"*** No Ident response",
	"*** Cannot verify ident validity, ignoring ident",
};

typedef enum
{
	REPORT_LOOKUP,
	REPORT_FOUND,
	REPORT_FAIL,
	REPORT_INVALID,
} ident_message;

static EVH timeout_ident_queries_event;
static CNCB ident_connected;
static PF read_ident_reply;

static void client_fail(struct auth_client *auth, ident_message message);
static void client_success(struct auth_client *auth);
static char * get_valid_ident(char *buf);

static struct ev_entry *timeout_ev;
static int ident_timeout = 5;
static bool ident_enable = true;


/* Timeout outstanding queries */
static void
timeout_ident_queries_event(void *notused __unused)
{
	struct auth_client *auth;
	rb_dictionary_iter iter;

	RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
	{
		struct ident_query *query = auth->data[PROVIDER_IDENT];

		if(query != NULL && query->timeout < rb_current_time())
			client_fail(auth, REPORT_FAIL);
	}
}

/*
 * ident_connected() - deal with the result of rb_connect_tcp()
 *
 * If the connection failed, we simply close the auth fd and report
 * a failure. If the connection suceeded send the ident server a query
 * giving "theirport , ourport". The write is only attempted *once* so
 * it is deemed to be a fail if the entire write doesn't write all the
 * data given.  This shouldnt be a problem since the socket should have
 * a write buffer far greater than this message to store it in should
 * problems arise. -avalon
 */
static void
ident_connected(rb_fde_t *F __unused, int error, void *data)
{
	struct auth_client *auth = data;
	struct ident_query *query;
	char authbuf[32];
	int authlen;

	if(auth == NULL)
		return;

	query = auth->data[PROVIDER_IDENT];

	if(query == NULL)
		return;

	/* Check the error */
	if(error != RB_OK)
	{
		/* We had an error during connection :( */
		client_fail(auth, REPORT_FAIL);
		return;
	}

	snprintf(authbuf, sizeof(authbuf), "%u , %u\r\n",
			auth->c_port, auth->l_port);
	authlen = strlen(authbuf);

	if(rb_write(query->F, authbuf, authlen) != authlen)
	{
		client_fail(auth, REPORT_FAIL);
		return;
	}

	read_ident_reply(query->F, auth);
}

static void
read_ident_reply(rb_fde_t *F, void *data)
{
	struct auth_client *auth = data;
	struct ident_query *query;
	char buf[IDENT_BUFSIZE + 1];	/* buffer to read auth reply into */
	ident_message message = REPORT_FAIL;
	char *s = NULL;
	char *t = NULL;
	ssize_t len;
	int count;

	if(auth == NULL)
		return;

	query = auth->data[PROVIDER_IDENT];

	if(query == NULL)
		return;

	len = rb_read(F, buf, IDENT_BUFSIZE);
	if(len < 0 && rb_ignore_errno(errno))
	{
		rb_setselect(F, RB_SELECT_READ, read_ident_reply, auth);
		return;
	}

	if(len > 0)
	{
		if((s = get_valid_ident(buf)) != NULL)
		{
			t = auth->username;

			while (*s == '~' || *s == '^')
				s++;

			for (count = USERLEN; *s && count; s++)
			{
				if(*s == '@' || *s == '\r' || *s == '\n')
					break;

				if(*s != ' ' && *s != ':' && *s != '[')
				{
					*t++ = *s;
					count--;
				}
			}
			*t = '\0';
		}
		else
			message = REPORT_INVALID;
	}

	if(s == NULL)
		client_fail(auth, message);
	else
		client_success(auth);
}

static void
client_fail(struct auth_client *auth, ident_message report)
{
	struct ident_query *query = auth->data[PROVIDER_IDENT];

	if(query == NULL)
		return;

	rb_strlcpy(auth->username, "*", sizeof(auth->username));

	if(query->F != NULL)
		rb_close(query->F);

	rb_free(query);
	auth->data[PROVIDER_IDENT] = NULL;

	notice_client(auth->cid, messages[report]);
	provider_done(auth, PROVIDER_IDENT);
}

static void
client_success(struct auth_client *auth)
{
	struct ident_query *query = auth->data[PROVIDER_IDENT];

	if(query == NULL)
		return;

	if(query->F != NULL)
		rb_close(query->F);

	rb_free(query);
	auth->data[PROVIDER_IDENT] = NULL;

	notice_client(auth->cid, messages[REPORT_FOUND]);
	provider_done(auth, PROVIDER_IDENT);
}

/* get_valid_ident
 * parse ident query reply from identd server
 *
 * Taken from old s_auth.c --Elizafox
 *
 * Inputs	- pointer to ident buf
 * Outputs	- NULL if no valid ident found, otherwise pointer to name
 * Side effects - None
 */
static char *
get_valid_ident(char *buf)
{
	int remp = 0;
	int locp = 0;
	char *colon1Ptr;
	char *colon2Ptr;
	char *colon3Ptr;
	char *commaPtr;
	char *remotePortString;

	/* All this to get rid of a sscanf() fun. */
	remotePortString = buf;

	colon1Ptr = strchr(remotePortString, ':');
	if(!colon1Ptr)
		return NULL;

	*colon1Ptr = '\0';
	colon1Ptr++;
	colon2Ptr = strchr(colon1Ptr, ':');
	if(!colon2Ptr)
		return NULL;

	*colon2Ptr = '\0';
	colon2Ptr++;
	commaPtr = strchr(remotePortString, ',');

	if(!commaPtr)
		return NULL;

	*commaPtr = '\0';
	commaPtr++;

	remp = atoi(remotePortString);
	if(!remp)
		return NULL;

	locp = atoi(commaPtr);
	if(!locp)
		return NULL;

	/* look for USERID bordered by first pair of colons */
	if(!strstr(colon1Ptr, "USERID"))
		return NULL;

	colon3Ptr = strchr(colon2Ptr, ':');
	if(!colon3Ptr)
		return NULL;

	*colon3Ptr = '\0';
	colon3Ptr++;
	return (colon3Ptr);
}

static bool
ident_init(void)
{
	timeout_ev = rb_event_addish("timeout_ident_queries_event", timeout_ident_queries_event, NULL, 1);
	return (timeout_ev != NULL);
}

static void
ident_destroy(void)
{
	struct auth_client *auth;
	rb_dictionary_iter iter;

	/* Nuke all ident queries */
	RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
	{
		if(auth->data[PROVIDER_IDENT] != NULL)
			client_fail(auth, REPORT_FAIL);
	}
}

static bool ident_start(struct auth_client *auth)
{
	struct ident_query *query = rb_malloc(sizeof(struct ident_query));
	struct rb_sockaddr_storage l_addr, c_addr;
	int family = GET_SS_FAMILY(&auth->c_addr);

	if(!ident_enable || auth->data[PROVIDER_IDENT] != NULL)
	{
		set_provider_done(auth, PROVIDER_IDENT); /* for blacklists */
		return true;
	}

	notice_client(auth->cid, messages[REPORT_LOOKUP]);

	auth->data[PROVIDER_IDENT] = query;
	query->timeout = rb_current_time() + ident_timeout;

	if((query->F = rb_socket(family, SOCK_STREAM, 0, "ident")) == NULL)
	{
		warn_opers(L_DEBUG, "Could not create ident socket: %s", strerror(errno));
		client_fail(auth, REPORT_FAIL);
		return true;	/* Not a fatal error */
	}

	/* Build sockaddr_storages for rb_connect_tcp below */
	memcpy(&l_addr, &auth->l_addr, sizeof(l_addr));
	memcpy(&c_addr, &auth->c_addr, sizeof(c_addr));

	/* Set the ports correctly */
#ifdef RB_IPV6
	if(GET_SS_FAMILY(&l_addr) == AF_INET6)
		((struct sockaddr_in6 *)&l_addr)->sin6_port = 0;
	else
#endif
		((struct sockaddr_in *)&l_addr)->sin_port = 0;

#ifdef RB_IPV6
	if(GET_SS_FAMILY(&c_addr) == AF_INET6)
		((struct sockaddr_in6 *)&c_addr)->sin6_port = htons(113);
	else
#endif
		((struct sockaddr_in *)&c_addr)->sin_port = htons(113);

	rb_connect_tcp(query->F, (struct sockaddr *)&c_addr,
			(struct sockaddr *)&l_addr,
			GET_SS_LEN(&l_addr), ident_connected,
			auth, ident_timeout);

	set_provider_on(auth, PROVIDER_IDENT);

	return true;
}

static void
ident_cancel(struct auth_client *auth)
{
	struct ident_query *query = auth->data[PROVIDER_IDENT];

	if(query != NULL)
		client_fail(auth, REPORT_FAIL);
}

static void
add_conf_ident_timeout(const char *key __unused, int parc __unused, const char **parv)
{
	int timeout = atoi(parv[0]);

	if(timeout < 0)
	{
		warn_opers(L_CRIT, "BUG: ident timeout < 0 (value: %d)", timeout);
		return;
	}

	ident_timeout = timeout;
}

static void
set_ident_enabled(const char *key __unused, int parc __unused, const char **parv)
{
	ident_enable = (strcasecmp(parv[0], "true") == 0 ||
			strcasecmp(parv[0], "1") == 0 ||
			strcasecmp(parv[0], "enable") == 0);
}

struct auth_opts_handler ident_options[] =
{
	{ "ident_timeout", 1, add_conf_ident_timeout },
	{ "ident_enabled", 1, set_ident_enabled },
	{ NULL, 0, NULL },
};


struct auth_provider ident_provider =
{
	.id = PROVIDER_IDENT,
	.init = ident_init,
	.destroy = ident_destroy,
	.start = ident_start,
	.cancel = ident_cancel,
	.completed = NULL,
	.opt_handlers = ident_options,
};
Commit	Line	Data
2b0cc3d3 EM	1	/* authd/providers/ident.c - ident lookup provider for authd
	2	* Copyright (c) 2016 Elizabeth Myers <elizabeth@interlinked.me>
	3	*
	4	* Permission to use, copy, modify, and/or distribute this software for any
	5	* purpose with or without fee is hereby granted, provided that the above
	6	* copyright notice and this permission notice is present in all copies.
	7	*
	8	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
	9	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
	10	* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
	11	* DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
	12	* INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
	13	* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
	14	* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	15	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
	16	* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
	17	* IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
	18	* POSSIBILITY OF SUCH DAMAGE.
	19	*/
	20
06f3496a EM	21	/* Largely adapted from old s_auth.c, but reworked for authd. rDNS code
	22	* moved to its own provider.
	23	*
	24	* --Elizafox 13 March 2016
	25	*/
	26
2b0cc3d3 EM	27	#include "stdinc.h"
	28	#include "match.h"
	29	#include "authd.h"
db821ee9	30	#include "notice.h"
2b0cc3d3 EM	31	#include "provider.h"
	32	#include "res.h"
	33
	34	#define IDENT_BUFSIZE 128
	35
	36	struct ident_query
	37	{
2b0cc3d3 EM	38	time_t timeout; /* Timeout interval */
	39	rb_fde_t F; / Our FD */
	40	};
	41
	42	/* Goinked from old s_auth.c --Elizafox */
	43	static const char *messages[] =
	44	{
f875cb84 EM	45	"*** Checking Ident",
	46	"*** Got Ident response",
	47	"*** No Ident response",
22946d30	48	"*** Cannot verify ident validity, ignoring ident",
2b0cc3d3 EM	49	};
	50
	51	typedef enum
	52	{
	53	REPORT_LOOKUP,
	54	REPORT_FOUND,
	55	REPORT_FAIL,
22946d30	56	REPORT_INVALID,
2b0cc3d3 EM	57	} ident_message;
	58
	59	static EVH timeout_ident_queries_event;
	60	static CNCB ident_connected;
	61	static PF read_ident_reply;
	62
3e875f62 EM	63	static void client_fail(struct auth_client *auth, ident_message message);
3e875f62 EM	64	static void client_success(struct auth_client *auth);
2b0cc3d3 EM	65	static char * get_valid_ident(char *buf);
2b0cc3d3 EM	66
2b0cc3d3 EM	67	static struct ev_entry *timeout_ev;
2b0cc3d3 EM	68	static int ident_timeout = 5;
54fb109d	69	static bool ident_enable = true;
2b0cc3d3 EM	70
2b0cc3d3 EM	71
2b0cc3d3	72	/* Timeout outstanding queries */
06f3496a	73	static void
d1b70e35	74	timeout_ident_queries_event(void *notused __unused)
2b0cc3d3	75	{
3e875f62	76	struct auth_client *auth;
aba29d5a	77	rb_dictionary_iter iter;
2b0cc3d3	78
ab33d608	79	RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
2b0cc3d3	80	{
3e875f62	81	struct ident_query *query = auth->data[PROVIDER_IDENT];
2b0cc3d3	82
3e875f62 EM	83	if(query != NULL && query->timeout < rb_current_time())
3e875f62 EM	84	client_fail(auth, REPORT_FAIL);
2b0cc3d3 EM	85	}
	86	}
	87
	88	/*
	89	* ident_connected() - deal with the result of rb_connect_tcp()
	90	*
	91	* If the connection failed, we simply close the auth fd and report
	92	* a failure. If the connection suceeded send the ident server a query
	93	* giving "theirport , ourport". The write is only attempted once so
	94	* it is deemed to be a fail if the entire write doesn't write all the
	95	* data given. This shouldnt be a problem since the socket should have
	96	* a write buffer far greater than this message to store it in should
	97	* problems arise. -avalon
	98	*/
06f3496a	99	static void
d1b70e35	100	ident_connected(rb_fde_t F __unused, int error, void data)
2b0cc3d3	101	{
3e875f62	102	struct auth_client *auth = data;
d1b70e35	103	struct ident_query *query;
2b0cc3d3 EM	104	char authbuf[32];
	105	int authlen;
	106
d1b70e35 EM	107	if(auth == NULL)
	108	return;
	109
	110	query = auth->data[PROVIDER_IDENT];
	111
f875cb84 EM	112	if(query == NULL)
	113	return;
	114
2b0cc3d3 EM	115	/* Check the error */
	116	if(error != RB_OK)
	117	{
	118	/* We had an error during connection :( */
3e875f62	119	client_fail(auth, REPORT_FAIL);
2b0cc3d3 EM	120	return;
	121	}
	122
	123	snprintf(authbuf, sizeof(authbuf), "%u , %u\r\n",
	124	auth->c_port, auth->l_port);
	125	authlen = strlen(authbuf);
	126
	127	if(rb_write(query->F, authbuf, authlen) != authlen)
	128	{
3e875f62	129	client_fail(auth, REPORT_FAIL);
2b0cc3d3 EM	130	return;
	131	}
	132
3e875f62	133	read_ident_reply(query->F, auth);
2b0cc3d3 EM	134	}
	135
	136	static void
	137	read_ident_reply(rb_fde_t F, void data)
	138	{
3e875f62	139	struct auth_client *auth = data;
d1b70e35	140	struct ident_query *query;
22946d30 EM	141	char buf[IDENT_BUFSIZE + 1]; /* buffer to read auth reply into */
22946d30 EM	142	ident_message message = REPORT_FAIL;
2b0cc3d3 EM	143	char *s = NULL;
2b0cc3d3 EM	144	char *t = NULL;
22946d30	145	ssize_t len;
2b0cc3d3	146	int count;
2b0cc3d3	147
d1b70e35 EM	148	if(auth == NULL)
	149	return;
	150
	151	query = auth->data[PROVIDER_IDENT];
	152
f875cb84 EM	153	if(query == NULL)
	154	return;
	155
2b0cc3d3 EM	156	len = rb_read(F, buf, IDENT_BUFSIZE);
	157	if(len < 0 && rb_ignore_errno(errno))
	158	{
d1b70e35	159	rb_setselect(F, RB_SELECT_READ, read_ident_reply, auth);
2b0cc3d3 EM	160	return;
	161	}
	162
	163	if(len > 0)
	164	{
22946d30	165	if((s = get_valid_ident(buf)) != NULL)
2b0cc3d3 EM	166	{
	167	t = auth->username;
	168
	169	while (s == '~' \|\| s == '^')
	170	s++;
	171
	172	for (count = USERLEN; *s && count; s++)
	173	{
22946d30	174	if(s == '@' \|\| s == '\r' \|\| *s == '\n')
2b0cc3d3	175	break;
22946d30	176
2b0cc3d3 EM	177	if(s != ' ' && s != ':' && *s != '[')
	178	{
	179	t++ = s;
	180	count--;
	181	}
	182	}
	183	*t = '\0';
	184	}
22946d30 EM	185	else
22946d30 EM	186	message = REPORT_INVALID;
2b0cc3d3 EM	187	}
	188
	189	if(s == NULL)
22946d30	190	client_fail(auth, message);
2b0cc3d3	191	else
3e875f62	192	client_success(auth);
2b0cc3d3 EM	193	}
2b0cc3d3 EM	194
06f3496a EM	195	static void
06f3496a EM	196	client_fail(struct auth_client *auth, ident_message report)
2b0cc3d3	197	{
3e875f62	198	struct ident_query *query = auth->data[PROVIDER_IDENT];
2b0cc3d3	199
f875cb84 EM	200	if(query == NULL)
	201	return;
	202
3e875f62	203	rb_strlcpy(auth->username, "*", sizeof(auth->username));
2b0cc3d3	204
f875cb84 EM	205	if(query->F != NULL)
	206	rb_close(query->F);
	207
3e875f62 EM	208	rb_free(query);
3e875f62 EM	209	auth->data[PROVIDER_IDENT] = NULL;
2b0cc3d3	210
db821ee9	211	notice_client(auth->cid, messages[report]);
3e875f62	212	provider_done(auth, PROVIDER_IDENT);
2b0cc3d3 EM	213	}
2b0cc3d3 EM	214
06f3496a EM	215	static void
06f3496a EM	216	client_success(struct auth_client *auth)
2b0cc3d3	217	{
3e875f62	218	struct ident_query *query = auth->data[PROVIDER_IDENT];
2b0cc3d3	219
f875cb84 EM	220	if(query == NULL)
	221	return;
	222
	223	if(query->F != NULL)
	224	rb_close(query->F);
	225
3e875f62 EM	226	rb_free(query);
3e875f62 EM	227	auth->data[PROVIDER_IDENT] = NULL;
2b0cc3d3	228
db821ee9	229	notice_client(auth->cid, messages[REPORT_FOUND]);
3e875f62	230	provider_done(auth, PROVIDER_IDENT);
2b0cc3d3 EM	231	}
	232
	233	/* get_valid_ident
	234	* parse ident query reply from identd server
	235	*
06f3496a	236	* Taken from old s_auth.c --Elizafox
2b0cc3d3 EM	237	*
	238	* Inputs - pointer to ident buf
	239	* Outputs - NULL if no valid ident found, otherwise pointer to name
	240	* Side effects - None
	241	*/
	242	static char *
	243	get_valid_ident(char *buf)
	244	{
	245	int remp = 0;
	246	int locp = 0;
	247	char *colon1Ptr;
	248	char *colon2Ptr;
	249	char *colon3Ptr;
	250	char *commaPtr;
	251	char *remotePortString;
	252
	253	/* All this to get rid of a sscanf() fun. */
	254	remotePortString = buf;
	255
	256	colon1Ptr = strchr(remotePortString, ':');
	257	if(!colon1Ptr)
22946d30	258	return NULL;
2b0cc3d3 EM	259
	260	*colon1Ptr = '\0';
	261	colon1Ptr++;
	262	colon2Ptr = strchr(colon1Ptr, ':');
	263	if(!colon2Ptr)
22946d30	264	return NULL;
2b0cc3d3 EM	265
	266	*colon2Ptr = '\0';
	267	colon2Ptr++;
	268	commaPtr = strchr(remotePortString, ',');
	269
	270	if(!commaPtr)
22946d30	271	return NULL;
2b0cc3d3 EM	272
	273	*commaPtr = '\0';
	274	commaPtr++;
	275
	276	remp = atoi(remotePortString);
	277	if(!remp)
22946d30	278	return NULL;
2b0cc3d3 EM	279
	280	locp = atoi(commaPtr);
	281	if(!locp)
22946d30	282	return NULL;
2b0cc3d3 EM	283
	284	/* look for USERID bordered by first pair of colons */
	285	if(!strstr(colon1Ptr, "USERID"))
22946d30	286	return NULL;
2b0cc3d3 EM	287
	288	colon3Ptr = strchr(colon2Ptr, ':');
	289	if(!colon3Ptr)
22946d30	290	return NULL;
2b0cc3d3 EM	291
	292	*colon3Ptr = '\0';
	293	colon3Ptr++;
	294	return (colon3Ptr);
	295	}
	296
06f3496a EM	297	static bool
	298	ident_init(void)
	299	{
	300	timeout_ev = rb_event_addish("timeout_ident_queries_event", timeout_ident_queries_event, NULL, 1);
	301	return (timeout_ev != NULL);
	302	}
	303
	304	static void
	305	ident_destroy(void)
	306	{
	307	struct auth_client *auth;
	308	rb_dictionary_iter iter;
	309
	310	/* Nuke all ident queries */
	311	RB_DICTIONARY_FOREACH(auth, &iter, auth_clients)
	312	{
	313	if(auth->data[PROVIDER_IDENT] != NULL)
	314	client_fail(auth, REPORT_FAIL);
	315	}
	316	}
	317
	318	static bool ident_start(struct auth_client *auth)
	319	{
	320	struct ident_query *query = rb_malloc(sizeof(struct ident_query));
	321	struct rb_sockaddr_storage l_addr, c_addr;
47ab6f6e EM	322	int family = GET_SS_FAMILY(&auth->c_addr);
47ab6f6e EM	323
54fb109d EM	324	if(!ident_enable \|\| auth->data[PROVIDER_IDENT] != NULL)
	325	{
	326	set_provider_done(auth, PROVIDER_IDENT); /* for blacklists */
f681e277	327	return true;
54fb109d	328	}
f681e277	329
47ab6f6e	330	notice_client(auth->cid, messages[REPORT_LOOKUP]);
06f3496a EM	331
	332	auth->data[PROVIDER_IDENT] = query;
	333	query->timeout = rb_current_time() + ident_timeout;
	334
47ab6f6e	335	if((query->F = rb_socket(family, SOCK_STREAM, 0, "ident")) == NULL)
06f3496a	336	{
47ab6f6e	337	warn_opers(L_DEBUG, "Could not create ident socket: %s", strerror(errno));
06f3496a EM	338	client_fail(auth, REPORT_FAIL);
	339	return true; /* Not a fatal error */
	340	}
	341
06f3496a EM	342	/* Build sockaddr_storages for rb_connect_tcp below */
	343	memcpy(&l_addr, &auth->l_addr, sizeof(l_addr));
	344	memcpy(&c_addr, &auth->c_addr, sizeof(c_addr));
	345
	346	/* Set the ports correctly */
	347	#ifdef RB_IPV6
	348	if(GET_SS_FAMILY(&l_addr) == AF_INET6)
	349	((struct sockaddr_in6 *)&l_addr)->sin6_port = 0;
	350	else
	351	#endif
	352	((struct sockaddr_in *)&l_addr)->sin_port = 0;
	353
	354	#ifdef RB_IPV6
	355	if(GET_SS_FAMILY(&c_addr) == AF_INET6)
	356	((struct sockaddr_in6 *)&c_addr)->sin6_port = htons(113);
	357	else
	358	#endif
	359	((struct sockaddr_in *)&c_addr)->sin_port = htons(113);
	360
47ab6f6e	361	rb_connect_tcp(query->F, (struct sockaddr *)&c_addr,
06f3496a EM	362	(struct sockaddr *)&l_addr,
06f3496a EM	363	GET_SS_LEN(&l_addr), ident_connected,
d1b70e35	364	auth, ident_timeout);
06f3496a	365
06f3496a EM	366	set_provider_on(auth, PROVIDER_IDENT);
	367
	368	return true;
	369	}
	370
	371	static void
	372	ident_cancel(struct auth_client *auth)
	373	{
	374	struct ident_query *query = auth->data[PROVIDER_IDENT];
	375
	376	if(query != NULL)
	377	client_fail(auth, REPORT_FAIL);
	378	}
	379
67acafca	380	static void
d1b70e35	381	add_conf_ident_timeout(const char key __unused, int parc __unused, const char *parv)
67acafca EM	382	{
	383	int timeout = atoi(parv[0]);
	384
	385	if(timeout < 0)
	386	{
	387	warn_opers(L_CRIT, "BUG: ident timeout < 0 (value: %d)", timeout);
	388	return;
	389	}
	390
	391	ident_timeout = timeout;
	392	}
	393
54fb109d EM	394	static void
	395	set_ident_enabled(const char key __unused, int parc __unused, const char *parv)
	396	{
8e001551	397	ident_enable = (strcasecmp(parv[0], "true") == 0 \|\|
54fb109d EM	398	strcasecmp(parv[0], "1") == 0 \|\|
	399	strcasecmp(parv[0], "enable") == 0);
	400	}
	401
67acafca EM	402	struct auth_opts_handler ident_options[] =
	403	{
	404	{ "ident_timeout", 1, add_conf_ident_timeout },
54fb109d	405	{ "ident_enabled", 1, set_ident_enabled },
67acafca EM	406	{ NULL, 0, NULL },
	407	};
	408
2b0cc3d3 EM	409
	410	struct auth_provider ident_provider =
	411	{
	412	.id = PROVIDER_IDENT,
	413	.init = ident_init,
	414	.destroy = ident_destroy,
	415	.start = ident_start,
	416	.cancel = ident_cancel,
	417	.completed = NULL,
67acafca	418	.opt_handlers = ident_options,
2b0cc3d3	419	};