ViewVC Help

View File | Revision Log | Show Annotations | View Changeset | Root Listing

root/svn/ircd-hybrid/trunk/src/server.c

Comparing ircd-hybrid/trunk/src/server.c (file contents):
Revision 6428 by michael, Thu Aug 27 09:59:42 2015 UTC vs.
Revision 9003 by michael, Sun May 26 00:00:31 2019 UTC

#	Line 1 | Line 1
1		/*
2		*  ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
3		*
4	<	*  Copyright (c) 1997-2015 ircd-hybrid development team
4	>	*  Copyright (c) 1997-2019 ircd-hybrid development team
5		*
6		*  This program is free software; you can redistribute it and/or modify
7		*  it under the terms of the GNU General Public License as published by
#	Line 19 | Line 19
19		*  USA
20		*/
21
22	<	/*! \file s_serv.c
22	>	/*! \file server.c
23		* \brief Server related functions.
24		* \version $Id$
25		*/
26
27		#include "stdinc.h"
28	–	#ifdef HAVE_LIBCRYPTO
29	–	#include <openssl/rsa.h>
30	–	#include "rsa.h"
31	–	#endif
28		#include "list.h"
29		#include "client.h"
30		#include "event.h"
#	Line 37 | Line 33
33		#include "ircd.h"
34		#include "ircd_defs.h"
35		#include "s_bsd.h"
40	–	#include "numeric.h"
36		#include "packet.h"
37		#include "conf.h"
38		#include "server.h"
39	+	#include "server_capab.h"
40		#include "log.h"
45	–	#include "user.h"
41		#include "send.h"
42		#include "memory.h"
48	–	#include "channel.h"
43		#include "parse.h"
44
45	+
46		dlink_list flatten_links;
47	<	static dlink_list server_capabilities_list;
53	<	static void serv_connect_callback(fde_t *, int, void *);
47	>	static void server_connect_callback(fde_t *, int, void *);
48
49
50		/*
#	Line 65 | Line 59 | void
59		write_links_file(void *unused)
60		{
61		FILE *file = NULL;
62	<	dlink_node *node = NULL, *node_next = NULL;
62	>	dlink_node *node, *node_next;
63		char buff[IRCD_BUFSIZE] = "";
64
65	<	if ((file = fopen(LIPATH, "w")) == NULL)
65	>	if (EmptyString(ConfigServerHide.flatten_links_file))
66		return;
67
68	+	if ((file = fopen(ConfigServerHide.flatten_links_file, "w")) == NULL)
69	+	{
70	+	ilog(LOG_TYPE_IRCD, "Couldn't open \"%s\": %s", ConfigServerHide.flatten_links_file,
71	+	strerror(errno));
72	+	return;
73	+	}
74	+
75		DLINK_FOREACH_SAFE(node, node_next, flatten_links.head)
76		{
77		dlinkDelete(node, &flatten_links);
78	<	MyFree(node->data);
78	>	xfree(node->data);
79		free_dlink_node(node);
80		}
81
#	Line 117 | Line 118 | read_links_file(void)
118		char *p = NULL;
119		char buff[IRCD_BUFSIZE] = "";
120
121	<	if ((file = fopen(LIPATH, "r")) == NULL)
121	>	if (EmptyString(ConfigServerHide.flatten_links_file))
122		return;
123
124	+	if ((file = fopen(ConfigServerHide.flatten_links_file, "r")) == NULL)
125	+	{
126	+	ilog(LOG_TYPE_IRCD, "Couldn't open \"%s\": %s", ConfigServerHide.flatten_links_file,
127	+	strerror(errno));
128	+	return;
129	+	}
130	+
131		while (fgets(buff, sizeof(buff), file))
132		{
133		if ((p = strchr(buff, '\n')))
#	Line 131 | Line 139 | read_links_file(void)
139		fclose(file);
140		}
141
142	<	/* hunt_server()
142	>	/* server_hunt()
143		*      Do the basic thing in delivering the message (command)
144		*      across the relays to the specific server (server) for
145		*      actions.
#	Line 150 | Line 158 | read_links_file(void)
158		*
159		*      returns: (see #defines)
160		*/
161	<	int
162	<	hunt_server(struct Client *source_p, const char *command,
161	>	const struct server_hunt *
162	>	server_hunt(struct Client *source_p, const char *command,
163		const int server, const int parc, char *parv[])
164		{
165	<	struct Client *target_p = NULL;
166	<	dlink_node *node = NULL;
165	>	static struct server_hunt hunt;
166	>	struct server_hunt *const h = &hunt;
167	>	dlink_node *node;
168
169		/* Assume it's me, if no server */
170		if (parc <= server || EmptyString(parv[server]))
171	<	return HUNTED_ISME;
171	>	{
172	>	h->target_p = &me;
173	>	h->ret = HUNTED_ISME;
174	>	return h;
175	>	}
176
177	<	if ((target_p = find_person(source_p, parv[server])) == NULL)
178	<	target_p = hash_find_server(parv[server]);
177	>	if ((h->target_p = find_person(source_p, parv[server])) == NULL)
178	>	h->target_p = hash_find_server(parv[server]);
179
180		/*
181		* These are to pickup matches that would cause the following
182		* message to go in the wrong direction while doing quick fast
183		* non-matching lookups.
184		*/
185	<	if (target_p)
186	<	if (target_p->from == source_p->from && !MyConnect(target_p))
187	<	target_p = NULL;
185	>	if (h->target_p)
186	>	if (h->target_p->from == source_p->from && !MyConnect(h->target_p))
187	>	h->target_p = NULL;
188
189	<	if (!target_p && has_wildcards(parv[server]))
189	>	if (h->target_p == NULL && has_wildcards(parv[server]))
190		{
191		DLINK_FOREACH(node, global_server_list.head)
192		{
193		struct Client *tmp = node->data;
194
195		assert(IsMe(tmp) || IsServer(tmp));
196	<	if (!match(parv[server], tmp->name))
196	>	if (match(parv[server], tmp->name) == 0)
197		{
198		if (tmp->from == source_p->from && !MyConnect(tmp))
199		continue;
200
201	<	target_p = node->data;
201	>	h->target_p = tmp;
202		break;
203		}
204		}
205
206	<	if (!target_p)
206	>	if (h->target_p == NULL)
207		{
208		DLINK_FOREACH(node, global_client_list.head)
209		{
210		struct Client *tmp = node->data;
211
212	<	assert(IsMe(tmp) || IsServer(tmp) || IsClient(tmp));
213	<	if (!match(parv[server], tmp->name))
212	>	assert(IsClient(tmp));
213	>	if (match(parv[server], tmp->name) == 0)
214		{
215		if (tmp->from == source_p->from && !MyConnect(tmp))
216		continue;
217
218	<	target_p = node->data;
218	>	h->target_p = tmp;
219		break;
220		}
221		}
222		}
223		}
224
225	<	if (target_p)
225	>	if (h->target_p)
226		{
227	<	assert(IsMe(target_p) || IsServer(target_p) || IsClient(target_p));
228	<	if (IsMe(target_p) || MyClient(target_p))
229	<	return HUNTED_ISME;
227	>	assert(IsMe(h->target_p) || IsServer(h->target_p) || IsClient(h->target_p));
228	>	if (IsMe(h->target_p) || MyClient(h->target_p))
229	>	{
230	>	h->ret = HUNTED_ISME;
231	>	return h;
232	>	}
233
234	<	parv[server] = target_p->id;
235	<	sendto_one(target_p, command, source_p->id,
234	>	parv[server] = h->target_p->id;
235	>	sendto_one(h->target_p, command, source_p->id,
236		parv[1], parv[2], parv[3], parv[4],
237		parv[5], parv[6], parv[7], parv[8]);
238	<	return HUNTED_PASS;
238	>	h->ret = HUNTED_PASS;
239	>	return h;
240		}
241
242		sendto_one_numeric(source_p, &me, ERR_NOSUCHSERVER, parv[server]);
243	<	return HUNTED_NOSUCH;
243	>	h->ret = HUNTED_NOSUCH;
244	>	return h;
245		}
246
247		/* try_connections()
#	Line 239 | Line 257 | hunt_server(struct Client *source_p, con
257		void
258		try_connections(void *unused)
259		{
260	<	dlink_node *node = NULL;
260	>	dlink_node *node;
261
262	<	/* TODO: change this to set active flag to 0 when added to event! --Habeeb */
245	<	if (GlobalSetOptions.autoconn == 0)
262	>	if (GlobalSetOptions.autoconn == false)
263		return;
264
265	<	DLINK_FOREACH(node, server_items.head)
265	>	DLINK_FOREACH(node, connect_items.head)
266		{
267		struct MaskItem *conf = node->data;
268
269		assert(conf->type == CONF_SERVER);
270	+	assert(conf->class);
271
272	<	/* Also when already connecting! (update holdtimes) --SRB
273	<	*/
256	<	if (!conf->port || !IsConfAllowAutoConn(conf))
272	>	/* Also when already connecting! (update holdtimes) --SRB */
273	>	if (conf->port == 0 || !IsConfAllowAutoConn(conf))
274		continue;
275
276	<
277	<	/* Skip this entry if the use of it is still on hold until
276	>	/*
277	>	* Skip this entry if the use of it is still on hold until
278		* future. Otherwise handle this entry (and set it on hold
279		* until next time). Will reset only hold times, if already
280		* made one successfull connection... [this algorithm is
281		* a bit fuzzy... -- msa >;) ]
282		*/
283	<	if (conf->until > CurrentTime)
283	>	if (conf->until > event_base->time.sec_monotonic)
284		continue;
285
286	<	assert(conf->class);
270	<
271	<	conf->until = CurrentTime + conf->class->con_freq;
286	>	conf->until = event_base->time.sec_monotonic + conf->class->con_freq;
287
288		/*
289		* Found a CONNECT config with port specified, scan clients
#	Line 282 | Line 297 | try_connections(void *unused)
297		/* Move this entry to the end of the list, if not already last */
298		if (node->next)
299		{
300	<	dlinkDelete(node, &server_items);
301	<	dlinkAddTail(conf, &conf->node, &server_items);
300	>	dlinkDelete(node, &connect_items);
301	>	dlinkAddTail(conf, &conf->node, &connect_items);
302		}
303
304		if (find_servconn_in_progress(conf->name))
305		return;
306
307		/*
308	<	* We used to only print this if serv_connect() actually
308	>	* We used to only print this if server_connect() actually
309		* succeeded, but since comm_tcp_connect() can call the callback
310		* immediately if there is an error, we were getting error messages
311		* in the wrong order. SO, we just print out the activated line,
312	<	* and let serv_connect() / serv_connect_callback() print an
312	>	* and let server_connect() / server_connect_callback() print an
313		* error afterwards if it fails.
314		*   -- adrian
315		*/
#	Line 307 | Line 322 | try_connections(void *unused)
322		"Connection to %s[%s] activated.",
323		conf->name, conf->host);
324
325	<	serv_connect(conf, NULL);
325	>	server_connect(conf, NULL);
326		/* We connect only one at time... */
327		return;
328		}
329		}
330		}
331
332	<	int
333	<	valid_servname(const char *name)
332	>	bool
333	>	server_valid_name(const char *name)
334		{
335		unsigned int dots = 0;
336		const char *p = name;
#	Line 323 | Line 338 | valid_servname(const char *name)
338		for (; *p; ++p)
339		{
340		if (!IsServChar(*p))
341	<	return 0;
341	>	return false;
342
343		if (*p == '.')
344		++dots;
#	Line 332 | Line 347 | valid_servname(const char *name)
347		return dots && (p - name) <= HOSTLEN;
348		}
349
350	<	int
336	<	check_server(const char *name, struct Client *client_p)
337	<	{
338	<	dlink_node *node = NULL;
339	<	struct MaskItem *conf        = NULL;
340	<	struct MaskItem *server_conf = NULL;
341	<	int error = -1;
342	<
343	<	assert(client_p);
344	<
345	<	/* loop through looking for all possible connect items that might work */
346	<	DLINK_FOREACH(node, server_items.head)
347	<	{
348	<	conf = node->data;
349	<
350	<	if (match(name, conf->name))
351	<	continue;
352	<
353	<	error = -3;
354	<
355	<	/* XXX: Fix me for IPv6                    */
356	<	/* XXX sockhost is the IPv4 ip as a string */
357	<	if (!match(conf->host, client_p->host) ||
358	<	!match(conf->host, client_p->sockhost))
359	<	{
360	<	error = -2;
361	<
362	<	if (!match_conf_password(client_p->connection->password, conf))
363	<	return -2;
364	<
365	<	if (!EmptyString(conf->certfp))
366	<	if (EmptyString(client_p->certfp) || strcasecmp(client_p->certfp, conf->certfp))
367	<	return -4;
368	<
369	<	server_conf = conf;
370	<	}
371	<	}
372	<
373	<	if (server_conf == NULL)
374	<	return error;
375	<
376	<	attach_conf(client_p, server_conf);
377	<
378	<
379	<	if (server_conf)
380	<	{
381	<	struct sockaddr_in *v4;
382	<	struct sockaddr_in6 *v6;
383	<
384	<	switch (server_conf->aftype)
385	<	{
386	<	case AF_INET6:
387	<	v6 = (struct sockaddr_in6 *)&server_conf->addr;
388	<
389	<	if (IN6_IS_ADDR_UNSPECIFIED(&v6->sin6_addr))
390	<	memcpy(&server_conf->addr, &client_p->connection->ip, sizeof(struct irc_ssaddr));
391	<	break;
392	<	case AF_INET:
393	<	v4 = (struct sockaddr_in *)&server_conf->addr;
394	<
395	<	if (v4->sin_addr.s_addr == INADDR_NONE)
396	<	memcpy(&server_conf->addr, &client_p->connection->ip, sizeof(struct irc_ssaddr));
397	<	break;
398	<	}
399	<	}
400	<
401	<	return 0;
402	<	}
403	<
404	<	/* add_capability()
405	<	*
406	<	* inputs       - string name of CAPAB
407	<	*              - int flag of capability
408	<	* output       - NONE
409	<	* side effects - Adds given capability name and bit mask to
410	<	*                current supported capabilities. This allows
411	<	*                modules to dynamically add or subtract their capability.
412	<	*/
413	<	void
414	<	add_capability(const char *name, unsigned int flag)
415	<	{
416	<	struct Capability *cap = MyCalloc(sizeof(*cap));
417	<
418	<	cap->name = xstrdup(name);
419	<	cap->cap = flag;
420	<	dlinkAdd(cap, &cap->node, &server_capabilities_list);
421	<	}
422	<
423	<	/* delete_capability()
424	<	*
425	<	* inputs       - string name of CAPAB
426	<	* output       - NONE
427	<	* side effects - delete given capability from ones known.
428	<	*/
429	<	void
430	<	delete_capability(const char *name)
431	<	{
432	<	dlink_node *node = NULL, *node_next = NULL;
433	<
434	<	DLINK_FOREACH_SAFE(node, node_next, server_capabilities_list.head)
435	<	{
436	<	struct Capability *cap = node->data;
437	<
438	<	if (!irccmp(cap->name, name))
439	<	{
440	<	dlinkDelete(node, &server_capabilities_list);
441	<	MyFree(cap->name);
442	<	MyFree(cap);
443	<	}
444	<	}
445	<	}
446	<
447	<	/*
448	<	* find_capability()
449	<	*
450	<	* inputs       - string name of capab to find
451	<	* output       - 0 if not found CAPAB otherwise
452	<	* side effects - none
453	<	*/
454	<	unsigned int
455	<	find_capability(const char *name)
456	<	{
457	<	const dlink_node *node = NULL;
458	<
459	<	DLINK_FOREACH(node, server_capabilities_list.head)
460	<	{
461	<	const struct Capability *cap = node->data;
462	<
463	<	if (!irccmp(cap->name, name))
464	<	return cap->cap;
465	<	}
466	<
467	<	return 0;
468	<	}
469	<
470	<	/* send_capabilities()
471	<	*
472	<	* inputs       - Client pointer to send to
473	<	*              - int flag of capabilities that this server can send
474	<	* output       - NONE
475	<	* side effects - send the CAPAB line to a server  -orabidoo
476	<	*
477	<	*/
478	<	void
479	<	send_capabilities(struct Client *client_p)
480	<	{
481	<	char buf[IRCD_BUFSIZE] = "";
482	<	const dlink_node *node = NULL;
483	<
484	<	DLINK_FOREACH(node, server_capabilities_list.head)
485	<	{
486	<	const struct Capability *cap = node->data;
487	<
488	<	strlcat(buf, cap->name, sizeof(buf));
489	<
490	<	if (node->next)
491	<	strlcat(buf, " ", sizeof(buf));
492	<	}
493	<
494	<	sendto_one(client_p, "CAPAB :%s", buf);
495	<	}
496	<
497	<	/*
498	<	* show_capabilities - show current server capabilities
499	<	*
500	<	* inputs       - pointer to a struct Client
501	<	* output       - pointer to static string
502	<	* side effects - build up string representing capabilities of server listed
503	<	*/
504	<	const char *
505	<	show_capabilities(const struct Client *target_p)
506	<	{
507	<	static char msgbuf[IRCD_BUFSIZE] = "";
508	<	const dlink_node *node = NULL;
509	<
510	<	strlcpy(msgbuf, "TS", sizeof(msgbuf));
511	<
512	<	DLINK_FOREACH(node, server_capabilities_list.head)
513	<	{
514	<	const struct Capability *cap = node->data;
515	<
516	<	if (!IsCapable(target_p, cap->cap))
517	<	continue;
518	<
519	<	strlcat(msgbuf,       " ", sizeof(msgbuf));
520	<	strlcat(msgbuf, cap->name, sizeof(msgbuf));
521	<	}
522	<
523	<	return msgbuf;
524	<	}
525	<
526	<	/* make_server()
350	>	/* server_make()
351		*
352		* inputs       - pointer to client struct
353		* output       - pointer to struct Server
#	Line 531 | Line 355 | show_capabilities(const struct Client *t
355		*                if it was not previously allocated.
356		*/
357		struct Server *
358	<	make_server(struct Client *client_p)
358	>	server_make(struct Client *client_p)
359		{
360		if (client_p->serv == NULL)
361	<	client_p->serv = MyCalloc(sizeof(struct Server));
361	>	client_p->serv = xcalloc(sizeof(*client_p->serv));
362
363		return client_p->serv;
364		}
365
366	<	/* New server connection code
543	<	* Based upon the stuff floating about in s_bsd.c
544	<	*   -- adrian
545	<	*/
546	<
547	<	/* serv_connect() - initiate a server connection
366	>	/* server_connect() - initiate a server connection
367		*
368		* inputs       - pointer to conf
369		*              - pointer to client doing the connect
#	Line 560 | Line 379 | make_server(struct Client *client_p)
379		* We return 1 if the connection is attempted, since we don't know whether
380		* it suceeded or not, and 0 if it fails in here somewhere.
381		*/
382	<	int
383	<	serv_connect(struct MaskItem *conf, struct Client *by)
382	>	bool
383	>	server_connect(struct MaskItem *conf, struct Client *by)
384		{
566	–	struct Client *client_p = NULL;
385		char buf[HOSTIPLEN + 1] = "";
386
569	–	/* conversion structs */
570	–	struct sockaddr_in *v4;
571	–
387		/* Make sure conf is useful */
388		assert(conf);
389	<
390	<	getnameinfo((const struct sockaddr *)&conf->addr, conf->addr.ss_len,
576	<	buf, sizeof(buf), NULL, 0, NI_NUMERICHOST);
577	<	ilog(LOG_TYPE_IRCD, "Connect to %s[%s] @%s", conf->name, conf->host,
578	<	buf);
389	>	assert(conf->type == CONF_SERVER);
390	>	assert(hash_find_server(conf->name) == NULL);  /* This should have been checked by the caller */
391
392		/* Still processing a DNS lookup? -> exit */
393	<	if (conf->dns_pending)
393	>	if (conf->dns_pending == true)
394		{
395		sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
396		"Error connecting to %s: DNS lookup for connect{} in progress.",
397		conf->name);
398	<	return 0;
398	>	return false;
399		}
400
401	<	if (conf->dns_failed)
401	>	if (conf->dns_failed == true)
402		{
403		sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
404		"Error connecting to %s: DNS lookup for connect{} failed.",
405		conf->name);
406	<	return 0;
406	>	return false;
407		}
408
409	<	/* Make sure this server isn't already connected
410	<	* Note: conf should ALWAYS be a valid C: line
411	<	*/
412	<	if ((client_p = hash_find_server(conf->name)))
409	>	getnameinfo((const struct sockaddr *)conf->addr, conf->addr->ss_len,
410	>	buf, sizeof(buf), NULL, 0, NI_NUMERICHOST);
411	>	ilog(LOG_TYPE_IRCD, "Connect to %s[%s] @%s", conf->name, conf->host, buf);
412	>
413	>	/* Create a socket for the server connection */
414	>	int fd = comm_socket(conf->addr->ss.ss_family, SOCK_STREAM, 0);
415	>	if (fd == -1)
416		{
417	<	sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
418	<	"Server %s already present from %s",
419	<	conf->name, get_client_name(client_p, SHOW_IP));
605	<	sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
606	<	"Server %s already present from %s",
607	<	conf->name, get_client_name(client_p, MASK_IP));
608	<	if (by && IsClient(by) && !MyClient(by))
609	<	sendto_one_notice(by, &me, ":Server %s already present from %s",
610	<	conf->name, get_client_name(client_p, MASK_IP));
611	<	return 0;
417	>	/* Eek, failure to create the socket */
418	>	report_error(L_ALL, "opening stream socket to %s: %s", conf->name, errno);
419	>	return false;
420		}
421
422		/* Create a local client */
423	<	client_p = make_client(NULL);
423	>	struct Client *client_p = client_make(NULL);
424
425		/* Copy in the server, hostname, fd */
426		strlcpy(client_p->name, conf->name, sizeof(client_p->name));
#	Line 621 | Line 429 | serv_connect(struct MaskItem *conf, stru
429		/* We already converted the ip once, so lets use it - stu */
430		strlcpy(client_p->sockhost, buf, sizeof(client_p->sockhost));
431
432	<	/* create a socket for the server connection */
433	<	if (comm_open(&client_p->connection->fd, conf->addr.ss.ss_family, SOCK_STREAM, 0, NULL) < 0)
626	<	{
627	<	/* Eek, failure to create the socket */
628	<	report_error(L_ALL, "opening stream socket to %s: %s", conf->name, errno);
629	<
630	<	SetDead(client_p);
631	<	exit_client(client_p, "Connection failed");
632	<	return 0;
633	<	}
432	>	client_p->ip = *conf->addr;
433	>	client_p->connection->fd = fd_open(fd, true, NULL);
434
435	<	/* servernames are always guaranteed under HOSTLEN chars */
436	<	fd_note(&client_p->connection->fd, "Server: %s", conf->name);
435	>	/* Server names are always guaranteed under HOSTLEN chars */
436	>	fd_note(client_p->connection->fd, "Server: %s", client_p->name);
437
438	<	/* Attach config entries to client here rather than in
439	<	* serv_connect_callback(). This to avoid null pointer references.
438	>	/*
439	>	* Attach config entries to client here rather than in server_connect_callback().
440	>	* This to avoid null pointer references.
441		*/
442	<	if (!attach_connect_block(client_p, conf->name, conf->host))
642	<	{
643	<	sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
644	<	"Host %s is not enabled for connecting: no connect {} block",
645	<	conf->name);
646	<	if (by && IsClient(by) && !MyClient(by))
647	<	sendto_one_notice(by, &me, ":Connect to host %s failed: no connect {} block", client_p->name);
648	<
649	<	SetDead(client_p);
650	<	exit_client(client_p, "Connection failed");
651	<	return 0;
652	<	}
442	>	conf_attach(client_p, conf);
443
444	<	/* at this point we have a connection in progress and C/N lines
655	<	* attached to the client, the socket info should be saved in the
656	<	* client and it should either be resolved or have a valid address.
657	<	*
658	<	* The socket has been connected or connect is in progress.
659	<	*/
660	<	make_server(client_p);
444	>	server_make(client_p);
445
446		if (by && IsClient(by))
447		strlcpy(client_p->serv->by, by->name, sizeof(client_p->serv->by));
#	Line 665 | Line 449 | serv_connect(struct MaskItem *conf, stru
449		strlcpy(client_p->serv->by, "AutoConn.", sizeof(client_p->serv->by));
450
451		SetConnecting(client_p);
668	–	client_p->connection->aftype = conf->aftype;
452
453		/* Now, initiate the connection */
454	<	/* XXX assume that a non 0 type means a specific bind address
455	<	* for this connect.
673	<	*/
674	<	switch (conf->aftype)
675	<	{
676	<	case AF_INET:
677	<	v4 = (struct sockaddr_in*)&conf->bind;
678	<	if (v4->sin_addr.s_addr)
679	<	{
680	<	struct irc_ssaddr ipn;
681	<	memset(&ipn, 0, sizeof(struct irc_ssaddr));
682	<	ipn.ss.ss_family = AF_INET;
683	<	ipn.ss_port = 0;
684	<	memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
685	<	comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
686	<	(struct sockaddr *)&ipn, ipn.ss_len,
687	<	serv_connect_callback, client_p, conf->aftype,
688	<	CONNECTTIMEOUT);
689	<	}
690	<	else if (ConfigServerInfo.specific_ipv4_vhost)
691	<	{
692	<	struct irc_ssaddr ipn;
693	<	memset(&ipn, 0, sizeof(struct irc_ssaddr));
694	<	ipn.ss.ss_family = AF_INET;
695	<	ipn.ss_port = 0;
696	<	memcpy(&ipn, &ConfigServerInfo.ip, sizeof(struct irc_ssaddr));
697	<	comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
698	<	(struct sockaddr *)&ipn, ipn.ss_len,
699	<	serv_connect_callback, client_p, conf->aftype,
700	<	CONNECTTIMEOUT);
701	<	}
702	<	else
703	<	comm_connect_tcp(&client_p->connection->fd, conf->host, conf->port,
704	<	NULL, 0, serv_connect_callback, client_p, conf->aftype,
705	<	CONNECTTIMEOUT);
706	<	break;
707	<	case AF_INET6:
708	<	{
709	<	struct irc_ssaddr ipn;
710	<	struct sockaddr_in6 *v6;
711	<	struct sockaddr_in6 *v6conf;
712	<
713	<	memset(&ipn, 0, sizeof(struct irc_ssaddr));
714	<	v6conf = (struct sockaddr_in6 *)&conf->bind;
715	<	v6 = (struct sockaddr_in6 *)&ipn;
716	<
717	<	if (memcmp(&v6conf->sin6_addr, &v6->sin6_addr, sizeof(struct in6_addr)))
718	<	{
719	<	memcpy(&ipn, &conf->bind, sizeof(struct irc_ssaddr));
720	<	ipn.ss.ss_family = AF_INET6;
721	<	ipn.ss_port = 0;
722	<	comm_connect_tcp(&client_p->connection->fd,
723	<	conf->host, conf->port,
724	<	(struct sockaddr *)&ipn, ipn.ss_len,
725	<	serv_connect_callback, client_p,
726	<	conf->aftype, CONNECTTIMEOUT);
727	<	}
728	<	else if (ConfigServerInfo.specific_ipv6_vhost)
729	<	{
730	<	memcpy(&ipn, &ConfigServerInfo.ip6, sizeof(struct irc_ssaddr));
731	<	ipn.ss.ss_family = AF_INET6;
732	<	ipn.ss_port = 0;
733	<	comm_connect_tcp(&client_p->connection->fd,
734	<	conf->host, conf->port,
735	<	(struct sockaddr *)&ipn, ipn.ss_len,
736	<	serv_connect_callback, client_p,
737	<	conf->aftype, CONNECTTIMEOUT);
738	<	}
739	<	else
740	<	comm_connect_tcp(&client_p->connection->fd,
741	<	conf->host, conf->port,
742	<	NULL, 0, serv_connect_callback, client_p,
743	<	conf->aftype, CONNECTTIMEOUT);
744	<	}
745	<	}
454	>	comm_connect_tcp(client_p->connection->fd, conf->addr, conf->port, conf->bind,
455	>	server_connect_callback, client_p, CONNECTTIMEOUT);
456
457	<	return 1;
457	>	/*
458	>	* At this point we have a connection in progress and a connect {} block
459	>	* attached to the client, the socket info should be saved in the client
460	>	* and it should either be resolved or have a valid address.
461	>	*
462	>	* The socket has been connected or connect is in progress.
463	>	*/
464	>	return true;
465		}
466
750	–	#ifdef HAVE_LIBCRYPTO
467		static void
468	<	finish_ssl_server_handshake(struct Client *client_p)
468	>	server_finish_tls_handshake(struct Client *client_p)
469		{
470	<	struct MaskItem *conf = NULL;
471	<
472	<	conf = find_conf_name(&client_p->connection->confs,
757	<	client_p->name, CONF_SERVER);
758	<	if (conf == NULL)
470	>	const struct MaskItem *conf = find_conf_name(&client_p->connection->confs,
471	>	client_p->name, CONF_SERVER);
472	>	if (!conf)
473		{
474		sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
475	<	"Lost connect{} block for %s", get_client_name(client_p, SHOW_IP));
475	>	"Lost connect{} block for %s", client_get_name(client_p, SHOW_IP));
476		sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
477	<	"Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
477	>	"Lost connect{} block for %s", client_get_name(client_p, MASK_IP));
478
479		exit_client(client_p, "Lost connect{} block");
480		return;
481		}
482
483	<	sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
483	>	/* Next, send the initial handshake */
484	>	SetHandshake(client_p);
485	>
486	>	sendto_one(client_p, "PASS %s TS %u %s", conf->spasswd, TS_CURRENT, me.id);
487
488	<	send_capabilities(client_p);
488	>	sendto_one(client_p, "CAPAB :%s", capab_get(NULL));
489
490		sendto_one(client_p, "SERVER %s 1 :%s%s",
491		me.name, ConfigServerHide.hidden ? "(H) " : "",
492		me.info);
493
777	–	/*
778	–	* If we've been marked dead because a send failed, just exit
779	–	* here now and save everyone the trouble of us ever existing.
780	–	*/
781	–	if (IsDead(client_p))
782	–	{
783	–	sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
784	–	"%s went dead during handshake", get_client_name(client_p, SHOW_IP));
785	–	sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
786	–	"%s went dead during handshake", get_client_name(client_p, MASK_IP));
787	–	return;
788	–	}
789	–
790	–	/* don't move to serv_list yet -- we haven't sent a burst! */
494		/* If we get here, we're ok, so lets start reading some data */
495	<	comm_setselect(&client_p->connection->fd, COMM_SELECT_READ, read_packet, client_p, 0);
495	>	read_packet(client_p->connection->fd, client_p);
496		}
497
498		static void
499	<	ssl_server_handshake(fde_t *fd, void *data)
499	>	server_tls_handshake(fde_t *F, void *data)
500		{
501		struct Client *client_p = data;
502	<	X509 *cert = NULL;
503	<	int ret = 0;
502	>	const char *sslerr = NULL;
503	>
504	>	assert(client_p);
505	>	assert(client_p->connection);
506	>	assert(client_p->connection->fd);
507	>	assert(client_p->connection->fd == F);
508
509	<	if ((ret = SSL_connect(client_p->connection->fd.ssl)) <= 0)
509	>	tls_handshake_status_t ret = tls_handshake(&F->ssl, TLS_ROLE_CLIENT, &sslerr);
510	>	if (ret != TLS_HANDSHAKE_DONE)
511		{
512	<	if ((CurrentTime - client_p->connection->firsttime) > CONNECTTIMEOUT)
512	>	if ((event_base->time.sec_monotonic - client_p->connection->created_monotonic) > TLS_HANDSHAKE_TIMEOUT)
513		{
514	<	exit_client(client_p, "Timeout during SSL handshake");
514	>	exit_client(client_p, "Timeout during TLS handshake");
515		return;
516		}
517
518	<	switch (SSL_get_error(client_p->connection->fd.ssl, ret))
518	>	switch (ret)
519		{
520	<	case SSL_ERROR_WANT_WRITE:
521	<	comm_setselect(&client_p->connection->fd, COMM_SELECT_WRITE,
522	<	ssl_server_handshake, client_p, CONNECTTIMEOUT);
520	>	case TLS_HANDSHAKE_WANT_WRITE:
521	>	comm_setselect(F, COMM_SELECT_WRITE,
522	>	server_tls_handshake, client_p, TLS_HANDSHAKE_TIMEOUT);
523		return;
524	<	case SSL_ERROR_WANT_READ:
525	<	comm_setselect(&client_p->connection->fd, COMM_SELECT_READ,
526	<	ssl_server_handshake, client_p, CONNECTTIMEOUT);
524	>	case TLS_HANDSHAKE_WANT_READ:
525	>	comm_setselect(F, COMM_SELECT_READ,
526	>	server_tls_handshake, client_p, TLS_HANDSHAKE_TIMEOUT);
527		return;
528		default:
529		{
822	–	const char *sslerr = ERR_error_string(ERR_get_error(), NULL);
530		sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
531		"Error connecting to %s: %s", client_p->name,
532	<	sslerr ? sslerr : "unknown SSL error");
533	<	exit_client(client_p, "Error during SSL handshake");
532	>	sslerr ? sslerr : "unknown TLS error");
533	>	exit_client(client_p, "Error during TLS handshake");
534		return;
535		}
536		}
537		}
538
539	<	comm_settimeout(&client_p->connection->fd, 0, NULL, NULL);
539	>	comm_settimeout(F, 0, NULL, NULL);
540
541	<	if ((cert = SSL_get_peer_certificate(client_p->connection->fd.ssl)))
542	<	{
543	<	int res = SSL_get_verify_result(client_p->connection->fd.ssl);
837	<	char buf[EVP_MAX_MD_SIZE * 2 + 1] = "";
838	<	unsigned char md[EVP_MAX_MD_SIZE] = "";
541	>	if (tls_verify_cert(&F->ssl, ConfigServerInfo.message_digest_algorithm, &client_p->certfp) == false)
542	>	ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad TLS client certificate",
543	>	client_p->name, client_p->username, client_p->host);
544
545	<	if (res == X509_V_OK || res == X509_V_ERR_SELF_SIGNED_CERT_IN_CHAIN ||
841	<	res == X509_V_ERR_UNABLE_TO_VERIFY_LEAF_SIGNATURE ||
842	<	res == X509_V_ERR_DEPTH_ZERO_SELF_SIGNED_CERT)
843	<	{
844	<	unsigned int n = 0;
845	<
846	<	if (X509_digest(cert, ConfigServerInfo.message_digest_algorithm, md, &n))
847	<	{
848	<	binary_to_hex(md, buf, n);
849	<	client_p->certfp = xstrdup(buf);
850	<	}
851	<	}
852	<	else
853	<	ilog(LOG_TYPE_IRCD, "Server %s!%s@%s gave bad SSL client certificate: %d",
854	<	client_p->name, client_p->username, client_p->host, res);
855	<	X509_free(cert);
856	<	}
857	<
858	<	finish_ssl_server_handshake(client_p);
545	>	server_finish_tls_handshake(client_p);
546		}
547
548		static void
549	<	ssl_connect_init(struct Client *client_p, const struct MaskItem *conf, fde_t *fd)
549	>	server_tls_connect_init(struct Client *client_p, const struct MaskItem *conf, fde_t *F)
550		{
551	<	if ((client_p->connection->fd.ssl = SSL_new(ConfigServerInfo.client_ctx)) == NULL)
551	>	assert(client_p);
552	>	assert(client_p->connection);
553	>	assert(client_p->connection->fd);
554	>	assert(client_p->connection->fd == F);
555	>
556	>	if (tls_new(&F->ssl, F->fd, TLS_ROLE_CLIENT) == false)
557		{
866	–	ilog(LOG_TYPE_IRCD, "SSL_new() ERROR! -- %s",
867	–	ERR_error_string(ERR_get_error(), NULL));
558		SetDead(client_p);
559	<	exit_client(client_p, "SSL_new failed");
559	>	exit_client(client_p, "TLS context initialization failed");
560		return;
561		}
562
873	–	SSL_set_fd(fd->ssl, fd->fd);
874	–
563		if (!EmptyString(conf->cipher_list))
564	<	SSL_set_cipher_list(client_p->connection->fd.ssl, conf->cipher_list);
564	>	tls_set_ciphers(&F->ssl, conf->cipher_list);
565
566	<	ssl_server_handshake(NULL, client_p);
566	>	server_tls_handshake(F, client_p);
567		}
880	–	#endif
568
569	<	/* serv_connect_callback() - complete a server connection.
569	>	/* server_connect_callback() - complete a server connection.
570		*
571		* This routine is called after the server connection attempt has
572		* completed. If unsucessful, an error is sent to ops and the client
#	Line 888 | Line 575 | ssl_connect_init(struct Client *client_p
575		* marked for reading.
576		*/
577		static void
578	<	serv_connect_callback(fde_t *fd, int status, void *data)
578	>	server_connect_callback(fde_t *F, int status, void *data)
579		{
580		struct Client *const client_p = data;
894	–	const struct MaskItem *conf = NULL;
581
582		/* First, make sure it's a real client! */
583		assert(client_p);
584	<	assert(&client_p->connection->fd == fd);
585	<
586	<	/* Next, for backward purposes, record the ip of the server */
901	<	memcpy(&client_p->connection->ip, &fd->connect.hostaddr,
902	<	sizeof(struct irc_ssaddr));
584	>	assert(client_p->connection);
585	>	assert(client_p->connection->fd);
586	>	assert(client_p->connection->fd == F);
587
588		/* Check the status */
589		if (status != COMM_OK)
#	Line 907 | Line 591 | serv_connect_callback(fde_t *fd, int sta
591		/* We have an error, so report it and quit */
592		sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
593		"Error connecting to %s: %s",
594	<	get_client_name(client_p, SHOW_IP), comm_errstr(status));
594	>	client_get_name(client_p, SHOW_IP), comm_errstr(status));
595		sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
596		"Error connecting to %s: %s",
597	<	get_client_name(client_p, MASK_IP), comm_errstr(status));
597	>	client_get_name(client_p, MASK_IP), comm_errstr(status));
598
599		/*
600		* If a fd goes bad, call dead_link() the socket is no
#	Line 921 | Line 605 | serv_connect_callback(fde_t *fd, int sta
605		}
606
607		/* COMM_OK, so continue the connection procedure */
608	<	/* Get the C/N lines */
609	<	conf = find_conf_name(&client_p->connection->confs,
610	<	client_p->name, CONF_SERVER);
611	<	if (conf == NULL)
608	>	/* Get the connect {} block */
609	>	const struct MaskItem *conf = find_conf_name(&client_p->connection->confs,
610	>	client_p->name, CONF_SERVER);
611	>	if (!conf)
612		{
613		sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
614	<	"Lost connect{} block for %s", get_client_name(client_p, SHOW_IP));
614	>	"Lost connect{} block for %s", client_get_name(client_p, SHOW_IP));
615		sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
616	<	"Lost connect{} block for %s", get_client_name(client_p, MASK_IP));
616	>	"Lost connect{} block for %s", client_get_name(client_p, MASK_IP));
617
618		exit_client(client_p, "Lost connect{} block");
619		return;
620		}
621
938	–	/* Next, send the initial handshake */
939	–	SetHandshake(client_p);
940	–
941	–	#ifdef HAVE_LIBCRYPTO
622		if (IsConfSSL(conf))
623		{
624	<	ssl_connect_init(client_p, conf, fd);
624	>	server_tls_connect_init(client_p, conf, F);
625		return;
626		}
947	–	#endif
627
628	<	sendto_one(client_p, "PASS %s TS %d %s", conf->spasswd, TS_CURRENT, me.id);
628	>	/* Next, send the initial handshake */
629	>	SetHandshake(client_p);
630	>
631	>	sendto_one(client_p, "PASS %s TS %u %s", conf->spasswd, TS_CURRENT, me.id);
632
633	<	send_capabilities(client_p);
633	>	sendto_one(client_p, "CAPAB :%s", capab_get(NULL));
634
635		sendto_one(client_p, "SERVER %s 1 :%s%s", me.name,
636		ConfigServerHide.hidden ? "(H) " : "", me.info);
637
956	–	/*
957	–	* If we've been marked dead because a send failed, just exit
958	–	* here now and save everyone the trouble of us ever existing.
959	–	*/
960	–	if (IsDead(client_p))
961	–	{
962	–	sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
963	–	"%s went dead during handshake", get_client_name(client_p, SHOW_IP));
964	–	sendto_realops_flags(UMODE_SERVNOTICE, L_OPER, SEND_NOTICE,
965	–	"%s went dead during handshake", get_client_name(client_p, MASK_IP));
966	–	return;
967	–	}
968	–
969	–	/* don't move to serv_list yet -- we haven't sent a burst! */
638		/* If we get here, we're ok, so lets start reading some data */
639	<	comm_setselect(fd, COMM_SELECT_READ, read_packet, client_p, 0);
639	>	read_packet(client_p->connection->fd, client_p);
640		}
641
642		struct Client *
643		find_servconn_in_progress(const char *name)
644		{
645		dlink_node *ptr;
978	–	struct Client *cptr;
646
647		DLINK_FOREACH(ptr, unknown_list.head)
648		{
649	<	cptr = ptr->data;
649	>	struct Client *cptr = ptr->data;
650
651	<	if (cptr && cptr->name[0])
652	<	if (!match(name, cptr->name))
651	>	if (cptr->name[0])
652	>	if (!irccmp(name, cptr->name))
653		return cptr;
654		}
655

Comparing ircd-hybrid/trunk/src/server.c (property svn:keywords):
Revision 6428 by michael, Thu Aug 27 09:59:42 2015 UTC vs.
Revision 9003 by michael, Sun May 26 00:00:31 2019 UTC

#	Line 1 | Line 1
1	<	Id Revision
1	>	Id

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)