Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	usr.sbin/ospf6d/ospf6d.c	Lines:	0	366	0.0 %
Date:	2017-11-07	Branches:	0	277	0.0 %


/*	$OpenBSD: ospf6d.c,v 1.34 2017/08/12 16:27:50 benno Exp $ */

/*
 * Copyright (c) 2005 Claudio Jeker <claudio@openbsd.org>
 * Copyright (c) 2004, 2007 Esben Norby <norby@openbsd.org>
 * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <sys/types.h>
#include <sys/socket.h>
#include <sys/queue.h>
#include <sys/time.h>
#include <sys/stat.h>
#include <sys/wait.h>
#include <sys/sysctl.h>
#include <syslog.h>

#include <netinet/in.h>
#include <arpa/inet.h>

#include <event.h>
#include <err.h>
#include <errno.h>
#include <pwd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <signal.h>
#include <unistd.h>

#include "ospf6d.h"
#include "ospf6.h"
#include "ospfe.h"
#include "control.h"
#include "log.h"
#include "rde.h"

void		main_sig_handler(int, short, void *);
__dead void	usage(void);
__dead void	ospfd_shutdown(void);

void	main_dispatch_ospfe(int, short, void *);
void	main_dispatch_rde(int, short, void *);

int	ospf_reload(void);
int	ospf_sendboth(enum imsg_type, void *, u_int16_t);
int	merge_interfaces(struct area *, struct area *);
struct iface *iface_lookup(struct area *, struct iface *);

int	pipe_parent2ospfe[2];
int	pipe_parent2rde[2];
int	pipe_ospfe2rde[2];

struct ospfd_conf	*ospfd_conf = NULL;
struct imsgev		*iev_ospfe;
struct imsgev		*iev_rde;
char			*conffile;

pid_t			 ospfe_pid = 0;
pid_t			 rde_pid = 0;

/* ARGSUSED */
void
main_sig_handler(int sig, short event, void *arg)
{
	/* signal handler rules don't apply, libevent decouples for us */
	switch (sig) {
	case SIGTERM:
	case SIGINT:
		ospfd_shutdown();
		/* NOTREACHED */
	case SIGHUP:
		if (ospf_reload() == -1)
			log_warnx("configuration reload failed");
		else
			log_debug("configuration reloaded");
		break;
	default:
		fatalx("unexpected signal");
		/* NOTREACHED */
	}
}

__dead void
usage(void)
{
	extern char *__progname;

	fprintf(stderr, "usage: %s [-dnv] [-D macro=value]"
	    " [-f file] [-s socket]\n",
	    __progname);
	exit(1);
}

int
main(int argc, char *argv[])
{
	struct event		 ev_sigint, ev_sigterm, ev_sighup;
	int			 ch, opts = 0;
	int			 debug = 0;
	int			 ipforwarding;
	int			 mib[4];
	size_t			 len;
	char			*sockname;

	conffile = CONF_FILE;
	ospfd_process = PROC_MAIN;
	sockname = OSPF6D_SOCKET;

	log_init(1, LOG_DAEMON);	/* log to stderr until daemonized */
	log_procinit(log_procnames[ospfd_process]);
	log_setverbose(1);

	while ((ch = getopt(argc, argv, "cdD:f:s:nv")) != -1) {
		switch (ch) {
		case 'c':
			opts |= OSPFD_OPT_FORCE_DEMOTE;
			break;
		case 'd':
			debug = 1;
			break;
		case 'D':
			if (cmdline_symset(optarg) < 0)
				log_warnx("could not parse macro definition %s",
				    optarg);
			break;
		case 'f':
			conffile = optarg;
			break;
		case 'n':
			opts |= OSPFD_OPT_NOACTION;
			break;
		case 's':
			sockname = optarg;
			break;
		case 'v':
			if (opts & OSPFD_OPT_VERBOSE)
				opts |= OSPFD_OPT_VERBOSE2;
			opts |= OSPFD_OPT_VERBOSE;
			log_setverbose(1);
			break;
		default:
			usage();
			/* NOTREACHED */
		}
	}

	argc -= optind;
	argv += optind;
	if (argc > 0)
		usage();

	mib[0] = CTL_NET;
	mib[1] = PF_INET6;
	mib[2] = IPPROTO_IPV6;
	mib[3] = IPCTL_FORWARDING;
	len = sizeof(ipforwarding);
	if (sysctl(mib, 4, &ipforwarding, &len, NULL, 0) == -1)
		err(1, "sysctl");

	if (ipforwarding != 1) {
		log_warnx("WARNING: IPv6 forwarding NOT enabled, "
		    "running as stub router");
		opts |= OSPFD_OPT_STUB_ROUTER;
	}

	/* prepare and fetch interfaces early */
	if_init();

	/* parse config file */
	if ((ospfd_conf = parse_config(conffile, opts)) == NULL )
		exit(1);
	ospfd_conf->csock = sockname;

	if (ospfd_conf->opts & OSPFD_OPT_NOACTION) {
		if (ospfd_conf->opts & OSPFD_OPT_VERBOSE)
			print_config(ospfd_conf);
		else
			fprintf(stderr, "configuration OK\n");
		exit(0);
	}

	/* check for root privileges  */
	if (geteuid())
		errx(1, "need root privileges");

	/* check for ospfd user */
	if (getpwnam(OSPF6D_USER) == NULL)
		errx(1, "unknown user %s", OSPF6D_USER);

	log_init(debug, LOG_DAEMON);
	log_setverbose(ospfd_conf->opts & OSPFD_OPT_VERBOSE);

	if (!debug)
		daemon(1, 0);

	log_info("startup");

	if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC | SOCK_NONBLOCK,
	    PF_UNSPEC, pipe_parent2ospfe) == -1)
		fatal("socketpair");
	if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC | SOCK_NONBLOCK,
	    PF_UNSPEC, pipe_parent2rde) == -1)
		fatal("socketpair");
	if (socketpair(AF_UNIX, SOCK_STREAM | SOCK_CLOEXEC | SOCK_NONBLOCK,
	    PF_UNSPEC, pipe_ospfe2rde) == -1)
		fatal("socketpair");

	/* start children */
	rde_pid = rde(ospfd_conf, pipe_parent2rde, pipe_ospfe2rde,
	    pipe_parent2ospfe);
	ospfe_pid = ospfe(ospfd_conf, pipe_parent2ospfe, pipe_ospfe2rde,
	    pipe_parent2rde);

	event_init();

	/* setup signal handler */
	signal_set(&ev_sigint, SIGINT, main_sig_handler, NULL);
	signal_set(&ev_sigterm, SIGTERM, main_sig_handler, NULL);
	signal_set(&ev_sighup, SIGHUP, main_sig_handler, NULL);
	signal_add(&ev_sigint, NULL);
	signal_add(&ev_sigterm, NULL);
	signal_add(&ev_sighup, NULL);
	signal(SIGPIPE, SIG_IGN);

	/* setup pipes to children */
	close(pipe_parent2ospfe[1]);
	close(pipe_parent2rde[1]);
	close(pipe_ospfe2rde[0]);
	close(pipe_ospfe2rde[1]);

	if ((iev_ospfe = malloc(sizeof(struct imsgev))) == NULL ||
	    (iev_rde = malloc(sizeof(struct imsgev))) == NULL)
		fatal(NULL);
	imsg_init(&iev_ospfe->ibuf, pipe_parent2ospfe[0]);
	iev_ospfe->handler = main_dispatch_ospfe;
	imsg_init(&iev_rde->ibuf, pipe_parent2rde[0]);
	iev_rde->handler = main_dispatch_rde;

	/* setup event handler */
	iev_ospfe->events = EV_READ;
	event_set(&iev_ospfe->ev, iev_ospfe->ibuf.fd, iev_ospfe->events,
	    iev_ospfe->handler, iev_ospfe);
	event_add(&iev_ospfe->ev, NULL);

	iev_rde->events = EV_READ;
	event_set(&iev_rde->ev, iev_rde->ibuf.fd, iev_rde->events,
	    iev_rde->handler, iev_rde);
	event_add(&iev_rde->ev, NULL);

	if (kr_init(!(ospfd_conf->flags & OSPFD_FLAG_NO_FIB_UPDATE)) == -1)
		fatalx("kr_init failed");

	event_dispatch();

	ospfd_shutdown();
	/* NOTREACHED */
	return (0);
}

__dead void
ospfd_shutdown(void)
{
	pid_t	pid;
	int	status;

	/* close pipes */
	msgbuf_clear(&iev_ospfe->ibuf.w);
	close(iev_ospfe->ibuf.fd);
	msgbuf_clear(&iev_rde->ibuf.w);
	close(iev_rde->ibuf.fd);

	control_cleanup(ospfd_conf->csock);
	kr_shutdown();
	carp_demote_shutdown();

	log_debug("waiting for children to terminate");
	do {
		pid = wait(&status);
		if (pid == -1) {
			if (errno != EINTR && errno != ECHILD)
				fatal("wait");
		} else if (WIFSIGNALED(status))
			log_warnx("%s terminated; signal %d",
			    (pid == rde_pid) ? "route decision engine" :
			    "ospf engine", WTERMSIG(status));
	} while (pid != -1 || (pid == -1 && errno == EINTR));

	free(iev_ospfe);
	free(iev_rde);
	free(ospfd_conf);

	log_info("terminating");
	exit(0);
}

/* imsg handling */
/* ARGSUSED */
void
main_dispatch_ospfe(int fd, short event, void *bula)
{
	struct imsgev		*iev = bula;
	struct imsgbuf		*ibuf = &iev->ibuf;
	struct imsg		 imsg;
	struct demote_msg	 dmsg;
	ssize_t			 n;
	int			 shut = 0, verbose;

	if (event & EV_READ) {
		if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
			fatal("imsg_read error");
		if (n == 0)	/* connection closed */
			shut = 1;
	}
	if (event & EV_WRITE) {
		if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN)
			fatal("msgbuf_write");
		if (n == 0)	/* connection closed */
			shut = 1;
	}

	for (;;) {
		if ((n = imsg_get(ibuf, &imsg)) == -1)
			fatal("imsg_get");

		if (n == 0)
			break;

		switch (imsg.hdr.type) {
		case IMSG_CTL_RELOAD:
			if (ospf_reload() == -1)
				log_warnx("configuration reload failed");
			else
				log_debug("configuration reloaded");
			break;
		case IMSG_CTL_FIB_COUPLE:
			kr_fib_couple();
			break;
		case IMSG_CTL_FIB_DECOUPLE:
			kr_fib_decouple();
			break;
		case IMSG_CTL_KROUTE:
		case IMSG_CTL_KROUTE_ADDR:
			kr_show_route(&imsg);
			break;
		case IMSG_DEMOTE:
			if (imsg.hdr.len - IMSG_HEADER_SIZE != sizeof(dmsg))
				fatalx("invalid size of OE request");
			memcpy(&dmsg, imsg.data, sizeof(dmsg));
			carp_demote_set(dmsg.demote_group, dmsg.level);
			break;
		case IMSG_CTL_LOG_VERBOSE:
			/* already checked by ospfe */
			memcpy(&verbose, imsg.data, sizeof(verbose));
			log_setverbose(verbose);
			break;
		default:
			log_debug("main_dispatch_ospfe: error handling imsg %d",
			    imsg.hdr.type);
			break;
		}
		imsg_free(&imsg);
	}
	if (!shut)
		imsg_event_add(iev);
	else {
		/* this pipe is dead, so remove the event handler */
		event_del(&iev->ev);
		event_loopexit(NULL);
	}
}

/* ARGSUSED */
void
main_dispatch_rde(int fd, short event, void *bula)
{
	struct imsgev	*iev = bula;
	struct imsgbuf	*ibuf = &iev->ibuf;
	struct imsg	 imsg;
	ssize_t		 n;
	int		 count, shut = 0;

	if (event & EV_READ) {
		if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
			fatal("imsg_read error");
		if (n == 0)	/* connection closed */
			shut = 1;
	}
	if (event & EV_WRITE) {
		if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN)
			fatal("msgbuf_write");
		if (n == 0)	/* connection closed */
			shut = 1;
	}

	for (;;) {
		if ((n = imsg_get(ibuf, &imsg)) == -1)
			fatal("imsg_get");

		if (n == 0)
			break;

		switch (imsg.hdr.type) {
		case IMSG_KROUTE_CHANGE:
			count = (imsg.hdr.len - IMSG_HEADER_SIZE) /
			    sizeof(struct kroute);
			if (kr_change(imsg.data, count))
				log_warn("main_dispatch_rde: error changing "
				    "route");
			break;
		case IMSG_KROUTE_DELETE:
			if (kr_delete(imsg.data))
				log_warn("main_dispatch_rde: error deleting "
				    "route");
			break;
		default:
			log_debug("main_dispatch_rde: error handling imsg %d",
			    imsg.hdr.type);
			break;
		}
		imsg_free(&imsg);
	}
	if (!shut)
		imsg_event_add(iev);
	else {
		/* this pipe is dead, so remove the event handler */
		event_del(&iev->ev);
		event_loopexit(NULL);
	}
}

void
main_imsg_compose_ospfe(int type, pid_t pid, void *data, u_int16_t datalen)
{
	if (iev_ospfe == NULL)
		return;
	imsg_compose_event(iev_ospfe, type, 0, pid, -1, data, datalen);
}

void
main_imsg_compose_rde(int type, pid_t pid, void *data, u_int16_t datalen)
{
	if (iev_rde == NULL)
		return;
	imsg_compose_event(iev_rde, type, 0, pid, -1, data, datalen);
}

void
imsg_event_add(struct imsgev *iev)
{
	iev->events = EV_READ;
	if (iev->ibuf.w.queued)
		iev->events |= EV_WRITE;

	event_del(&iev->ev);
	event_set(&iev->ev, iev->ibuf.fd, iev->events, iev->handler, iev);
	event_add(&iev->ev, NULL);
}

int
imsg_compose_event(struct imsgev *iev, u_int16_t type, u_int32_t peerid,
    pid_t pid, int fd, void *data, u_int16_t datalen)
{
	int	ret;

	if ((ret = imsg_compose(&iev->ibuf, type, peerid,
	    pid, fd, data, datalen)) != -1)
		imsg_event_add(iev);
	return (ret);
}

int
ospf_redistribute(struct kroute *kr, u_int32_t *metric)
{
	struct redistribute	*r;
	struct in6_addr		 ina, inb;
	u_int8_t		 is_default = 0;

	/* only allow ::/0 via REDIST_DEFAULT */
	if (IN6_IS_ADDR_UNSPECIFIED(&kr->prefix) && kr->prefixlen == 0)
		is_default = 1;

	SIMPLEQ_FOREACH(r, &ospfd_conf->redist_list, entry) {
		switch (r->type & ~REDIST_NO) {
		case REDIST_LABEL:
			if (kr->rtlabel == r->label) {
				*metric = r->metric;
				return (r->type & REDIST_NO ? 0 : 1);
			}
			break;
		case REDIST_STATIC:
			/*
			 * Dynamic routes are not redistributable. Placed here
			 * so that link local addresses can be redistributed
			 * via a rtlabel.
			 */
			if (is_default)
				continue;
			if (kr->flags & F_DYNAMIC)
				continue;
			if (kr->flags & F_STATIC) {
				*metric = r->metric;
				return (r->type & REDIST_NO ? 0 : 1);
			}
			break;
		case REDIST_CONNECTED:
			if (is_default)
				continue;
			if (kr->flags & F_DYNAMIC)
				continue;
			if (kr->flags & F_CONNECTED) {
				*metric = r->metric;
				return (r->type & REDIST_NO ? 0 : 1);
			}
			break;
		case REDIST_ADDR:
			if (kr->flags & F_DYNAMIC)
				continue;

			if (IN6_IS_ADDR_UNSPECIFIED(&r->addr) &&
			    r->prefixlen == 0) {
				if (is_default) {
					*metric = r->metric;
					return (r->type & REDIST_NO ? 0 : 1);
				} else
					return (0);
			}

			inet6applymask(&ina, &kr->prefix, r->prefixlen);
			inet6applymask(&inb, &r->addr, r->prefixlen);
			if (IN6_ARE_ADDR_EQUAL(&ina, &inb) &&
			    kr->prefixlen >= r->prefixlen) {
				*metric = r->metric;
				return (r->type & REDIST_NO ? 0 : 1);
			}
			break;
		case REDIST_DEFAULT:
			if (is_default) {
				*metric = r->metric;
				return (r->type & REDIST_NO ? 0 : 1);
			}
			break;
		}
	}

	return (0);
}

int
ospf_reload(void)
{
	struct area		*area;
	struct ospfd_conf	*xconf;

	if ((xconf = parse_config(conffile, ospfd_conf->opts)) == NULL)
		return (-1);

	/* send config to childs */
	if (ospf_sendboth(IMSG_RECONF_CONF, xconf, sizeof(*xconf)) == -1)
		return (-1);

	/* send areas, interfaces happen out of band */
	LIST_FOREACH(area, &xconf->area_list, entry) {
		if (ospf_sendboth(IMSG_RECONF_AREA, area, sizeof(*area)) == -1)
			return (-1);
	}

	if (ospf_sendboth(IMSG_RECONF_END, NULL, 0) == -1)
		return (-1);

	/* XXX send newly available interfaces to the childs */

	merge_config(ospfd_conf, xconf);
	/* update redistribute lists */
	kr_reload();
	return (0);
}

int
ospf_sendboth(enum imsg_type type, void *buf, u_int16_t len)
{
	if (imsg_compose_event(iev_ospfe, type, 0, 0, -1, buf, len) == -1)
		return (-1);
	if (imsg_compose_event(iev_rde, type, 0, 0, -1, buf, len) == -1)
		return (-1);
	return (0);
}

void
merge_config(struct ospfd_conf *conf, struct ospfd_conf *xconf)
{
	struct area		*a, *xa, *na;
	struct iface		*iface;
	struct redistribute	*r;

	/* change of rtr_id needs a restart */
	conf->flags = xconf->flags;
	conf->spf_delay = xconf->spf_delay;
	conf->spf_hold_time = xconf->spf_hold_time;
	conf->redistribute = xconf->redistribute;

	if (ospfd_process == PROC_MAIN) {
		/* main process does neither use areas nor interfaces */
		while ((r = SIMPLEQ_FIRST(&conf->redist_list)) != NULL) {
			SIMPLEQ_REMOVE_HEAD(&conf->redist_list, entry);
			free(r);
		}
		while ((r = SIMPLEQ_FIRST(&xconf->redist_list)) != NULL) {
			SIMPLEQ_REMOVE_HEAD(&xconf->redist_list, entry);
			SIMPLEQ_INSERT_TAIL(&conf->redist_list, r, entry);
		}
		goto done;
	}

	/* merge areas and interfaces */
	for (a = LIST_FIRST(&conf->area_list); a != NULL; a = na) {
		na = LIST_NEXT(a, entry);
		/* find deleted areas */
		if ((xa = area_find(xconf, a->id)) == NULL) {
			if (ospfd_process == PROC_OSPF_ENGINE) {
				LIST_FOREACH(iface, &a->iface_list, entry)
					if_fsm(iface, IF_EVT_DOWN);
			}
			LIST_REMOVE(a, entry);
			area_del(a);
		}
	}

	for (xa = LIST_FIRST(&xconf->area_list); xa != NULL; xa = na) {
		na = LIST_NEXT(xa, entry);
		if ((a = area_find(conf, xa->id)) == NULL) {
			LIST_REMOVE(xa, entry);
			LIST_INSERT_HEAD(&conf->area_list, xa, entry);
			if (ospfd_process == PROC_OSPF_ENGINE) {
				/* start interfaces */
				ospfe_demote_area(xa, 0);
				LIST_FOREACH(iface, &xa->iface_list, entry)
					if_start(conf, iface);
			}
			/* no need to merge interfaces */
			continue;
		}
		/*
		 * stub is not yet used but switching between stub and normal
		 * will be another painful job.
		 */
		a->stub = xa->stub;
		a->stub_default_cost = xa->stub_default_cost;
		if (ospfd_process == PROC_RDE_ENGINE)
			a->dirty = 1; /* force SPF tree recalculation */

		/* merge interfaces */
		if (merge_interfaces(a, xa) &&
		    ospfd_process == PROC_OSPF_ENGINE)
			a->dirty = 1; /* force rtr LSA update */
	}

	if (ospfd_process == PROC_OSPF_ENGINE) {
		LIST_FOREACH(a, &conf->area_list, entry) {
			LIST_FOREACH(iface, &a->iface_list, entry) {
				if (iface->state == IF_STA_NEW) {
					iface->state = IF_STA_DOWN;
					if_start(conf, iface);
				}
			}
			if (a->dirty) {
				a->dirty = 0;
				orig_rtr_lsa(LIST_FIRST(&a->iface_list));
			}
		}
	}

done:
	while ((a = LIST_FIRST(&xconf->area_list)) != NULL) {
		LIST_REMOVE(a, entry);
		area_del(a);
	}
	free(xconf);
}

int
merge_interfaces(struct area *a, struct area *xa)
{
	struct iface	*i, *xi, *ni;
	int		 dirty = 0;

	/* problems:
	 * - new interfaces (easy)
	 * - deleted interfaces (needs to be done via fsm?)
	 * - changing passive (painful?)
	 */
	for (i = LIST_FIRST(&a->iface_list); i != NULL; i = ni) {
		ni = LIST_NEXT(i, entry);
		if (iface_lookup(xa, i) == NULL) {
			log_debug("merge_interfaces: proc %d area %s removing "
			    "interface %s", ospfd_process, inet_ntoa(a->id),
			    i->name);
			if (ospfd_process == PROC_OSPF_ENGINE)
				if_fsm(i, IF_EVT_DOWN);
			LIST_REMOVE(i, entry);
			if_del(i);
		}
	}

	for (xi = LIST_FIRST(&xa->iface_list); xi != NULL; xi = ni) {
		ni = LIST_NEXT(xi, entry);
		if ((i = iface_lookup(a, xi)) == NULL) {
			/* new interface but delay initialisation */
			log_debug("merge_interfaces: proc %d area %s adding "
			    "interface %s", ospfd_process, inet_ntoa(a->id),
			    xi->name);
			LIST_REMOVE(xi, entry);
			LIST_INSERT_HEAD(&a->iface_list, xi, entry);
			if (ospfd_process == PROC_OSPF_ENGINE)
				xi->state = IF_STA_NEW;
			continue;
		}
		log_debug("merge_interfaces: proc %d area %s merging "
		    "interface %s", ospfd_process, inet_ntoa(a->id), i->name);
		i->addr = xi->addr;
		i->dst = xi->dst;
		i->abr_id = xi->abr_id;
		i->baudrate = xi->baudrate;
		i->dead_interval = xi->dead_interval;
		i->mtu = xi->mtu;
		i->transmit_delay = xi->transmit_delay;
		i->hello_interval = xi->hello_interval;
		i->rxmt_interval = xi->rxmt_interval;
		if (i->metric != xi->metric)
			dirty = 1;
		i->metric = xi->metric;
		i->priority = xi->priority;
		i->flags = xi->flags; /* needed? */
		i->type = xi->type; /* needed? */
		i->if_type = xi->if_type; /* needed? */
		i->linkstate = xi->linkstate; /* needed? */

#if 0 /* XXX needs some kind of love */
		if (i->passive != xi->passive) {
			/* need to restart interface to cope with this change */
			if (ospfd_process == PROC_OSPF_ENGINE)
				if_fsm(i, IF_EVT_DOWN);
			i->passive = xi->passive;
			if (ospfd_process == PROC_OSPF_ENGINE)
				if_fsm(i, IF_EVT_UP);
		}
#endif
	}
	return (dirty);
}

struct iface *
iface_lookup(struct area *area, struct iface *iface)
{
	struct iface	*i;

	LIST_FOREACH(i, &area->iface_list, entry)
		if (i->ifindex == iface->ifindex)
			return (i);
	return (NULL);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: ospf6d.c,v 1.34 2017/08/12 16:27:50 benno Exp $ */
2
3			/*
4			* Copyright (c) 2005 Claudio Jeker <claudio@openbsd.org>
5			* Copyright (c) 2004, 2007 Esben Norby <norby@openbsd.org>
6			* Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
7			*
8			* Permission to use, copy, modify, and distribute this software for any
9			* purpose with or without fee is hereby granted, provided that the above
10			* copyright notice and this permission notice appear in all copies.
11			*
12			* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13			* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14			* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15			* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16			* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17			* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18			* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19			*/
20
21			#include <sys/types.h>
22			#include <sys/socket.h>
23			#include <sys/queue.h>
24			#include <sys/time.h>
25			#include <sys/stat.h>
26			#include <sys/wait.h>
27			#include <sys/sysctl.h>
28			#include <syslog.h>
29
30			#include <netinet/in.h>
31			#include <arpa/inet.h>
32
33			#include <event.h>
34			#include <err.h>
35			#include <errno.h>
36			#include <pwd.h>
37			#include <stdio.h>
38			#include <stdlib.h>
39			#include <string.h>
40			#include <signal.h>
41			#include <unistd.h>
42
43			#include "ospf6d.h"
44			#include "ospf6.h"
45			#include "ospfe.h"
46			#include "control.h"
47			#include "log.h"
48			#include "rde.h"
49
50			void main_sig_handler(int, short, void *);
51			__dead void usage(void);
52			__dead void ospfd_shutdown(void);
53
54			void main_dispatch_ospfe(int, short, void *);
55			void main_dispatch_rde(int, short, void *);
56
57			int ospf_reload(void);
58			int ospf_sendboth(enum imsg_type, void *, u_int16_t);
59			int merge_interfaces(struct area , struct area );
60			struct iface iface_lookup(struct area , struct iface *);
61
62			int pipe_parent2ospfe[2];
63			int pipe_parent2rde[2];
64			int pipe_ospfe2rde[2];
65
66			struct ospfd_conf *ospfd_conf = NULL;
67			struct imsgev *iev_ospfe;
68			struct imsgev *iev_rde;
69			char *conffile;
70
71			pid_t ospfe_pid = 0;
72			pid_t rde_pid = 0;
73
74			/* ARGSUSED */
75			void
76			main_sig_handler(int sig, short event, void *arg)
77			{
78			/* signal handler rules don't apply, libevent decouples for us */
79			switch (sig) {
80			case SIGTERM:
81			case SIGINT:
82			ospfd_shutdown();
83			/* NOTREACHED */
84			case SIGHUP:
85			if (ospf_reload() == -1)
86			log_warnx("configuration reload failed");
87			else
88			log_debug("configuration reloaded");
89			break;
90			default:
91			fatalx("unexpected signal");
92			/* NOTREACHED */
93			}
94			}
95
96			__dead void
97			usage(void)
98			{
99			extern char *__progname;
100
101			fprintf(stderr, "usage: %s [-dnv] [-D macro=value]"
102			" [-f file] [-s socket]\n",
103			__progname);
104			exit(1);
105			}
106
107			int
108			main(int argc, char *argv[])
109			{
110			struct event ev_sigint, ev_sigterm, ev_sighup;
111			int ch, opts = 0;
112			int debug = 0;
113			int ipforwarding;
114			int mib[4];
115			size_t len;
116			char *sockname;
117
118			conffile = CONF_FILE;
119			ospfd_process = PROC_MAIN;
120			sockname = OSPF6D_SOCKET;
121
122			log_init(1, LOG_DAEMON); /* log to stderr until daemonized */
123			log_procinit(log_procnames[ospfd_process]);
124			log_setverbose(1);
125
126			while ((ch = getopt(argc, argv, "cdD:f:s:nv")) != -1) {
127			switch (ch) {
128			case 'c':
129			opts \|= OSPFD_OPT_FORCE_DEMOTE;
130			break;
131			case 'd':
132			debug = 1;
133			break;
134			case 'D':
135			if (cmdline_symset(optarg) < 0)
136			log_warnx("could not parse macro definition %s",
137			optarg);
138			break;
139			case 'f':
140			conffile = optarg;
141			break;
142			case 'n':
143			opts \|= OSPFD_OPT_NOACTION;
144			break;
145			case 's':
146			sockname = optarg;
147			break;
148			case 'v':
149			if (opts & OSPFD_OPT_VERBOSE)
150			opts \|= OSPFD_OPT_VERBOSE2;
151			opts \|= OSPFD_OPT_VERBOSE;
152			log_setverbose(1);
153			break;
154			default:
155			usage();
156			/* NOTREACHED */
157			}
158			}
159
160			argc -= optind;
161			argv += optind;
162			if (argc > 0)
163			usage();
164
165			mib[0] = CTL_NET;
166			mib[1] = PF_INET6;
167			mib[2] = IPPROTO_IPV6;
168			mib[3] = IPCTL_FORWARDING;
169			len = sizeof(ipforwarding);
170			if (sysctl(mib, 4, &ipforwarding, &len, NULL, 0) == -1)
171			err(1, "sysctl");
172
173			if (ipforwarding != 1) {
174			log_warnx("WARNING: IPv6 forwarding NOT enabled, "
175			"running as stub router");
176			opts \|= OSPFD_OPT_STUB_ROUTER;
177			}
178
179			/* prepare and fetch interfaces early */
180			if_init();
181
182			/* parse config file */
183			if ((ospfd_conf = parse_config(conffile, opts)) == NULL )
184			exit(1);
185			ospfd_conf->csock = sockname;
186
187			if (ospfd_conf->opts & OSPFD_OPT_NOACTION) {
188			if (ospfd_conf->opts & OSPFD_OPT_VERBOSE)
189			print_config(ospfd_conf);
190			else
191			fprintf(stderr, "configuration OK\n");
192			exit(0);
193			}
194
195			/* check for root privileges */
196			if (geteuid())
197			errx(1, "need root privileges");
198
199			/* check for ospfd user */
200			if (getpwnam(OSPF6D_USER) == NULL)
201			errx(1, "unknown user %s", OSPF6D_USER);
202
203			log_init(debug, LOG_DAEMON);
204			log_setverbose(ospfd_conf->opts & OSPFD_OPT_VERBOSE);
205
206			if (!debug)
207			daemon(1, 0);
208
209			log_info("startup");
210
211			if (socketpair(AF_UNIX, SOCK_STREAM \| SOCK_CLOEXEC \| SOCK_NONBLOCK,
212			PF_UNSPEC, pipe_parent2ospfe) == -1)
213			fatal("socketpair");
214			if (socketpair(AF_UNIX, SOCK_STREAM \| SOCK_CLOEXEC \| SOCK_NONBLOCK,
215			PF_UNSPEC, pipe_parent2rde) == -1)
216			fatal("socketpair");
217			if (socketpair(AF_UNIX, SOCK_STREAM \| SOCK_CLOEXEC \| SOCK_NONBLOCK,
218			PF_UNSPEC, pipe_ospfe2rde) == -1)
219			fatal("socketpair");
220
221			/* start children */
222			rde_pid = rde(ospfd_conf, pipe_parent2rde, pipe_ospfe2rde,
223			pipe_parent2ospfe);
224			ospfe_pid = ospfe(ospfd_conf, pipe_parent2ospfe, pipe_ospfe2rde,
225			pipe_parent2rde);
226
227			event_init();
228
229			/* setup signal handler */
230			signal_set(&ev_sigint, SIGINT, main_sig_handler, NULL);
231			signal_set(&ev_sigterm, SIGTERM, main_sig_handler, NULL);
232			signal_set(&ev_sighup, SIGHUP, main_sig_handler, NULL);
233			signal_add(&ev_sigint, NULL);
234			signal_add(&ev_sigterm, NULL);
235			signal_add(&ev_sighup, NULL);
236			signal(SIGPIPE, SIG_IGN);
237
238			/* setup pipes to children */
239			close(pipe_parent2ospfe[1]);
240			close(pipe_parent2rde[1]);
241			close(pipe_ospfe2rde[0]);
242			close(pipe_ospfe2rde[1]);
243
244			if ((iev_ospfe = malloc(sizeof(struct imsgev))) == NULL \|\|
245			(iev_rde = malloc(sizeof(struct imsgev))) == NULL)
246			fatal(NULL);
247			imsg_init(&iev_ospfe->ibuf, pipe_parent2ospfe[0]);
248			iev_ospfe->handler = main_dispatch_ospfe;
249			imsg_init(&iev_rde->ibuf, pipe_parent2rde[0]);
250			iev_rde->handler = main_dispatch_rde;
251
252			/* setup event handler */
253			iev_ospfe->events = EV_READ;
254			event_set(&iev_ospfe->ev, iev_ospfe->ibuf.fd, iev_ospfe->events,
255			iev_ospfe->handler, iev_ospfe);
256			event_add(&iev_ospfe->ev, NULL);
257
258			iev_rde->events = EV_READ;
259			event_set(&iev_rde->ev, iev_rde->ibuf.fd, iev_rde->events,
260			iev_rde->handler, iev_rde);
261			event_add(&iev_rde->ev, NULL);
262
263			if (kr_init(!(ospfd_conf->flags & OSPFD_FLAG_NO_FIB_UPDATE)) == -1)
264			fatalx("kr_init failed");
265
266			event_dispatch();
267
268			ospfd_shutdown();
269			/* NOTREACHED */
270			return (0);
271			}
272
273			__dead void
274			ospfd_shutdown(void)
275			{
276			pid_t pid;
277			int status;
278
279			/* close pipes */
280			msgbuf_clear(&iev_ospfe->ibuf.w);
281			close(iev_ospfe->ibuf.fd);
282			msgbuf_clear(&iev_rde->ibuf.w);
283			close(iev_rde->ibuf.fd);
284
285			control_cleanup(ospfd_conf->csock);
286			kr_shutdown();
287			carp_demote_shutdown();
288
289			log_debug("waiting for children to terminate");
290			do {
291			pid = wait(&status);
292			if (pid == -1) {
293			if (errno != EINTR && errno != ECHILD)
294			fatal("wait");
295			} else if (WIFSIGNALED(status))
296			log_warnx("%s terminated; signal %d",
297			(pid == rde_pid) ? "route decision engine" :
298			"ospf engine", WTERMSIG(status));
299			} while (pid != -1 \|\| (pid == -1 && errno == EINTR));
300
301			free(iev_ospfe);
302			free(iev_rde);
303			free(ospfd_conf);
304
305			log_info("terminating");
306			exit(0);
307			}
308
309			/* imsg handling */
310			/* ARGSUSED */
311			void
312			main_dispatch_ospfe(int fd, short event, void *bula)
313			{
314			struct imsgev *iev = bula;
315			struct imsgbuf *ibuf = &iev->ibuf;
316			struct imsg imsg;
317			struct demote_msg dmsg;
318			ssize_t n;
319			int shut = 0, verbose;
320
321			if (event & EV_READ) {
322			if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
323			fatal("imsg_read error");
324			if (n == 0) /* connection closed */
325			shut = 1;
326			}
327			if (event & EV_WRITE) {
328			if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN)
329			fatal("msgbuf_write");
330			if (n == 0) /* connection closed */
331			shut = 1;
332			}
333
334			for (;;) {
335			if ((n = imsg_get(ibuf, &imsg)) == -1)
336			fatal("imsg_get");
337
338			if (n == 0)
339			break;
340
341			switch (imsg.hdr.type) {
342			case IMSG_CTL_RELOAD:
343			if (ospf_reload() == -1)
344			log_warnx("configuration reload failed");
345			else
346			log_debug("configuration reloaded");
347			break;
348			case IMSG_CTL_FIB_COUPLE:
349			kr_fib_couple();
350			break;
351			case IMSG_CTL_FIB_DECOUPLE:
352			kr_fib_decouple();
353			break;
354			case IMSG_CTL_KROUTE:
355			case IMSG_CTL_KROUTE_ADDR:
356			kr_show_route(&imsg);
357			break;
358			case IMSG_DEMOTE:
359			if (imsg.hdr.len - IMSG_HEADER_SIZE != sizeof(dmsg))
360			fatalx("invalid size of OE request");
361			memcpy(&dmsg, imsg.data, sizeof(dmsg));
362			carp_demote_set(dmsg.demote_group, dmsg.level);
363			break;
364			case IMSG_CTL_LOG_VERBOSE:
365			/* already checked by ospfe */
366			memcpy(&verbose, imsg.data, sizeof(verbose));
367			log_setverbose(verbose);
368			break;
369			default:
370			log_debug("main_dispatch_ospfe: error handling imsg %d",
371			imsg.hdr.type);
372			break;
373			}
374			imsg_free(&imsg);
375			}
376			if (!shut)
377			imsg_event_add(iev);
378			else {
379			/* this pipe is dead, so remove the event handler */
380			event_del(&iev->ev);
381			event_loopexit(NULL);
382			}
383			}
384
385			/* ARGSUSED */
386			void
387			main_dispatch_rde(int fd, short event, void *bula)
388			{
389			struct imsgev *iev = bula;
390			struct imsgbuf *ibuf = &iev->ibuf;
391			struct imsg imsg;
392			ssize_t n;
393			int count, shut = 0;
394
395			if (event & EV_READ) {
396			if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
397			fatal("imsg_read error");
398			if (n == 0) /* connection closed */
399			shut = 1;
400			}
401			if (event & EV_WRITE) {
402			if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN)
403			fatal("msgbuf_write");
404			if (n == 0) /* connection closed */
405			shut = 1;
406			}
407
408			for (;;) {
409			if ((n = imsg_get(ibuf, &imsg)) == -1)
410			fatal("imsg_get");
411
412			if (n == 0)
413			break;
414
415			switch (imsg.hdr.type) {
416			case IMSG_KROUTE_CHANGE:
417			count = (imsg.hdr.len - IMSG_HEADER_SIZE) /
418			sizeof(struct kroute);
419			if (kr_change(imsg.data, count))
420			log_warn("main_dispatch_rde: error changing "
421			"route");
422			break;
423			case IMSG_KROUTE_DELETE:
424			if (kr_delete(imsg.data))
425			log_warn("main_dispatch_rde: error deleting "
426			"route");
427			break;
428			default:
429			log_debug("main_dispatch_rde: error handling imsg %d",
430			imsg.hdr.type);
431			break;
432			}
433			imsg_free(&imsg);
434			}
435			if (!shut)
436			imsg_event_add(iev);
437			else {
438			/* this pipe is dead, so remove the event handler */
439			event_del(&iev->ev);
440			event_loopexit(NULL);
441			}
442			}
443
444			void
445			main_imsg_compose_ospfe(int type, pid_t pid, void *data, u_int16_t datalen)
446			{
447			if (iev_ospfe == NULL)
448			return;
449			imsg_compose_event(iev_ospfe, type, 0, pid, -1, data, datalen);
450			}
451
452			void
453			main_imsg_compose_rde(int type, pid_t pid, void *data, u_int16_t datalen)
454			{
455			if (iev_rde == NULL)
456			return;
457			imsg_compose_event(iev_rde, type, 0, pid, -1, data, datalen);
458			}
459
460			void
461			imsg_event_add(struct imsgev *iev)
462			{
463			iev->events = EV_READ;
464			if (iev->ibuf.w.queued)
465			iev->events \|= EV_WRITE;
466
467			event_del(&iev->ev);
468			event_set(&iev->ev, iev->ibuf.fd, iev->events, iev->handler, iev);
469			event_add(&iev->ev, NULL);
470			}
471
472			int
473			imsg_compose_event(struct imsgev *iev, u_int16_t type, u_int32_t peerid,
474			pid_t pid, int fd, void *data, u_int16_t datalen)
475			{
476			int ret;
477
478			if ((ret = imsg_compose(&iev->ibuf, type, peerid,
479			pid, fd, data, datalen)) != -1)
480			imsg_event_add(iev);
481			return (ret);
482			}
483
484			int
485			ospf_redistribute(struct kroute kr, u_int32_t metric)
486			{
487			struct redistribute *r;
488			struct in6_addr ina, inb;
489			u_int8_t is_default = 0;
490
491			/* only allow ::/0 via REDIST_DEFAULT */
492			if (IN6_IS_ADDR_UNSPECIFIED(&kr->prefix) && kr->prefixlen == 0)
493			is_default = 1;
494
495			SIMPLEQ_FOREACH(r, &ospfd_conf->redist_list, entry) {
496			switch (r->type & ~REDIST_NO) {
497			case REDIST_LABEL:
498			if (kr->rtlabel == r->label) {
499			*metric = r->metric;
500			return (r->type & REDIST_NO ? 0 : 1);
501			}
502			break;
503			case REDIST_STATIC:
504			/*
505			* Dynamic routes are not redistributable. Placed here
506			* so that link local addresses can be redistributed
507			* via a rtlabel.
508			*/
509			if (is_default)
510			continue;
511			if (kr->flags & F_DYNAMIC)
512			continue;
513			if (kr->flags & F_STATIC) {
514			*metric = r->metric;
515			return (r->type & REDIST_NO ? 0 : 1);
516			}
517			break;
518			case REDIST_CONNECTED:
519			if (is_default)
520			continue;
521			if (kr->flags & F_DYNAMIC)
522			continue;
523			if (kr->flags & F_CONNECTED) {
524			*metric = r->metric;
525			return (r->type & REDIST_NO ? 0 : 1);
526			}
527			break;
528			case REDIST_ADDR:
529			if (kr->flags & F_DYNAMIC)
530			continue;
531
532			if (IN6_IS_ADDR_UNSPECIFIED(&r->addr) &&
533			r->prefixlen == 0) {
534			if (is_default) {
535			*metric = r->metric;
536			return (r->type & REDIST_NO ? 0 : 1);
537			} else
538			return (0);
539			}
540
541			inet6applymask(&ina, &kr->prefix, r->prefixlen);
542			inet6applymask(&inb, &r->addr, r->prefixlen);
543			if (IN6_ARE_ADDR_EQUAL(&ina, &inb) &&
544			kr->prefixlen >= r->prefixlen) {
545			*metric = r->metric;
546			return (r->type & REDIST_NO ? 0 : 1);
547			}
548			break;
549			case REDIST_DEFAULT:
550			if (is_default) {
551			*metric = r->metric;
552			return (r->type & REDIST_NO ? 0 : 1);
553			}
554			break;
555			}
556			}
557
558			return (0);
559			}
560
561			int
562			ospf_reload(void)
563			{
564			struct area *area;
565			struct ospfd_conf *xconf;
566
567			if ((xconf = parse_config(conffile, ospfd_conf->opts)) == NULL)
568			return (-1);
569
570			/* send config to childs */
571			if (ospf_sendboth(IMSG_RECONF_CONF, xconf, sizeof(*xconf)) == -1)
572			return (-1);
573
574			/* send areas, interfaces happen out of band */
575			LIST_FOREACH(area, &xconf->area_list, entry) {
576			if (ospf_sendboth(IMSG_RECONF_AREA, area, sizeof(*area)) == -1)
577			return (-1);
578			}
579
580			if (ospf_sendboth(IMSG_RECONF_END, NULL, 0) == -1)
581			return (-1);
582
583			/* XXX send newly available interfaces to the childs */
584
585			merge_config(ospfd_conf, xconf);
586			/* update redistribute lists */
587			kr_reload();
588			return (0);
589			}
590
591			int
592			ospf_sendboth(enum imsg_type type, void *buf, u_int16_t len)
593			{
594			if (imsg_compose_event(iev_ospfe, type, 0, 0, -1, buf, len) == -1)
595			return (-1);
596			if (imsg_compose_event(iev_rde, type, 0, 0, -1, buf, len) == -1)
597			return (-1);
598			return (0);
599			}
600
601			void
602			merge_config(struct ospfd_conf conf, struct ospfd_conf xconf)
603			{
604			struct area a, xa, *na;
605			struct iface *iface;
606			struct redistribute *r;
607
608			/* change of rtr_id needs a restart */
609			conf->flags = xconf->flags;
610			conf->spf_delay = xconf->spf_delay;
611			conf->spf_hold_time = xconf->spf_hold_time;
612			conf->redistribute = xconf->redistribute;
613
614			if (ospfd_process == PROC_MAIN) {
615			/* main process does neither use areas nor interfaces */
616			while ((r = SIMPLEQ_FIRST(&conf->redist_list)) != NULL) {
617			SIMPLEQ_REMOVE_HEAD(&conf->redist_list, entry);
618			free(r);
619			}
620			while ((r = SIMPLEQ_FIRST(&xconf->redist_list)) != NULL) {
621			SIMPLEQ_REMOVE_HEAD(&xconf->redist_list, entry);
622			SIMPLEQ_INSERT_TAIL(&conf->redist_list, r, entry);
623			}
624			goto done;
625			}
626
627			/* merge areas and interfaces */
628			for (a = LIST_FIRST(&conf->area_list); a != NULL; a = na) {
629			na = LIST_NEXT(a, entry);
630			/* find deleted areas */
631			if ((xa = area_find(xconf, a->id)) == NULL) {
632			if (ospfd_process == PROC_OSPF_ENGINE) {
633			LIST_FOREACH(iface, &a->iface_list, entry)
634			if_fsm(iface, IF_EVT_DOWN);
635			}
636			LIST_REMOVE(a, entry);
637			area_del(a);
638			}
639			}
640
641			for (xa = LIST_FIRST(&xconf->area_list); xa != NULL; xa = na) {
642			na = LIST_NEXT(xa, entry);
643			if ((a = area_find(conf, xa->id)) == NULL) {
644			LIST_REMOVE(xa, entry);
645			LIST_INSERT_HEAD(&conf->area_list, xa, entry);
646			if (ospfd_process == PROC_OSPF_ENGINE) {
647			/* start interfaces */
648			ospfe_demote_area(xa, 0);
649			LIST_FOREACH(iface, &xa->iface_list, entry)
650			if_start(conf, iface);
651			}
652			/* no need to merge interfaces */
653			continue;
654			}
655			/*
656			* stub is not yet used but switching between stub and normal
657			* will be another painful job.
658			*/
659			a->stub = xa->stub;
660			a->stub_default_cost = xa->stub_default_cost;
661			if (ospfd_process == PROC_RDE_ENGINE)
662			a->dirty = 1; /* force SPF tree recalculation */
663
664			/* merge interfaces */
665			if (merge_interfaces(a, xa) &&
666			ospfd_process == PROC_OSPF_ENGINE)
667			a->dirty = 1; /* force rtr LSA update */
668			}
669
670			if (ospfd_process == PROC_OSPF_ENGINE) {
671			LIST_FOREACH(a, &conf->area_list, entry) {
672			LIST_FOREACH(iface, &a->iface_list, entry) {
673			if (iface->state == IF_STA_NEW) {
674			iface->state = IF_STA_DOWN;
675			if_start(conf, iface);
676			}
677			}
678			if (a->dirty) {
679			a->dirty = 0;
680			orig_rtr_lsa(LIST_FIRST(&a->iface_list));
681			}
682			}
683			}
684
685			done:
686			while ((a = LIST_FIRST(&xconf->area_list)) != NULL) {
687			LIST_REMOVE(a, entry);
688			area_del(a);
689			}
690			free(xconf);
691			}
692
693			int
694			merge_interfaces(struct area a, struct area xa)
695			{
696			struct iface i, xi, *ni;
697			int dirty = 0;
698
699			/* problems:
700			* - new interfaces (easy)
701			* - deleted interfaces (needs to be done via fsm?)
702			* - changing passive (painful?)
703			*/
704			for (i = LIST_FIRST(&a->iface_list); i != NULL; i = ni) {
705			ni = LIST_NEXT(i, entry);
706			if (iface_lookup(xa, i) == NULL) {
707			log_debug("merge_interfaces: proc %d area %s removing "
708			"interface %s", ospfd_process, inet_ntoa(a->id),
709			i->name);
710			if (ospfd_process == PROC_OSPF_ENGINE)
711			if_fsm(i, IF_EVT_DOWN);
712			LIST_REMOVE(i, entry);
713			if_del(i);
714			}
715			}
716
717			for (xi = LIST_FIRST(&xa->iface_list); xi != NULL; xi = ni) {
718			ni = LIST_NEXT(xi, entry);
719			if ((i = iface_lookup(a, xi)) == NULL) {
720			/* new interface but delay initialisation */
721			log_debug("merge_interfaces: proc %d area %s adding "
722			"interface %s", ospfd_process, inet_ntoa(a->id),
723			xi->name);
724			LIST_REMOVE(xi, entry);
725			LIST_INSERT_HEAD(&a->iface_list, xi, entry);
726			if (ospfd_process == PROC_OSPF_ENGINE)
727			xi->state = IF_STA_NEW;
728			continue;
729			}
730			log_debug("merge_interfaces: proc %d area %s merging "
731			"interface %s", ospfd_process, inet_ntoa(a->id), i->name);
732			i->addr = xi->addr;
733			i->dst = xi->dst;
734			i->abr_id = xi->abr_id;
735			i->baudrate = xi->baudrate;
736			i->dead_interval = xi->dead_interval;
737			i->mtu = xi->mtu;
738			i->transmit_delay = xi->transmit_delay;
739			i->hello_interval = xi->hello_interval;
740			i->rxmt_interval = xi->rxmt_interval;
741			if (i->metric != xi->metric)
742			dirty = 1;
743			i->metric = xi->metric;
744			i->priority = xi->priority;
745			i->flags = xi->flags; /* needed? */
746			i->type = xi->type; /* needed? */
747			i->if_type = xi->if_type; /* needed? */
748			i->linkstate = xi->linkstate; /* needed? */
749
750			#if 0 /* XXX needs some kind of love */
751			if (i->passive != xi->passive) {
752			/* need to restart interface to cope with this change */
753			if (ospfd_process == PROC_OSPF_ENGINE)
754			if_fsm(i, IF_EVT_DOWN);
755			i->passive = xi->passive;
756			if (ospfd_process == PROC_OSPF_ENGINE)
757			if_fsm(i, IF_EVT_UP);
758			}
759			#endif
760			}
761			return (dirty);
762			}
763
764			struct iface *
765			iface_lookup(struct area area, struct iface iface)
766			{
767			struct iface *i;
768
769			LIST_FOREACH(i, &area->iface_list, entry)
770			if (i->ifindex == iface->ifindex)
771			return (i);
772			return (NULL);
773			}