/*	$OpenBSD: printconf.c,v 1.22 2020/01/21 20:38:52 remi Exp $ */

/*
 * Copyright (c) 2004, 2005 Esben Norby <norby@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/queue.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>

#include <stdio.h>

#include "ospf.h"
#include "ospfd.h"
#include "ospfe.h"

void	print_mainconf(struct ospfd_conf *);
const char *print_no(u_int16_t);
void	print_redistribute(struct redist_list *);
void	print_rtlabel(struct ospfd_conf *);
void	print_iface(struct iface *);

void
print_mainconf(struct ospfd_conf *conf)
{
	printf("router-id %s\n", inet_ntoa(conf->rtr_id));

	if (conf->flags & OSPFD_FLAG_NO_FIB_UPDATE)
		printf("fib-update no\n");
	else
		printf("fib-update yes\n");

	printf("fib-priority %hhu\n", conf->fib_priority);

	if (conf->rdomain)
		printf("rdomain %d\n", conf->rdomain);

	if (conf->rfc1583compat)
		printf("rfc1583compat yes\n");
	else
		printf("rfc1583compat no\n");

	if (conf->flags & OSPFD_FLAG_STUB_ROUTER)
		printf("stub router yes\n");

	print_redistribute(&conf->redist_list);
	print_rtlabel(conf);

	printf("spf-delay msec %u\n", conf->spf_delay);
	printf("spf-holdtime msec %u\n", conf->spf_hold_time);
}

const char *
print_no(u_int16_t type)
{
	if (type & REDIST_NO)
		return ("no ");
	else
		return ("");
}

void
print_redistribute(struct redist_list *rlh)
{
	struct redistribute	*r;

	SIMPLEQ_FOREACH(r, rlh, entry) {
		switch (r->type & ~REDIST_NO) {
		case REDIST_STATIC:
			printf("%sredistribute static ", print_no(r->type));
			break;
		case REDIST_CONNECTED:
			printf("%sredistribute connected ", print_no(r->type));
			break;
		case REDIST_LABEL:
			printf("%sredistribute rtlabel %s ",
			    print_no(r->type), rtlabel_id2name(r->label));
			break;
		case REDIST_ADDR:
			printf("%sredistribute %s/%d ",
			    print_no(r->type), inet_ntoa(r->addr),
			    mask2prefixlen(r->mask.s_addr));
			break;
		case REDIST_DEFAULT:
			printf("%sredistribute default ", print_no(r->type));
			break;
		}
		printf("set { metric %d type %d }",
		    (r->metric & LSA_METRIC_MASK),
		    ((r->metric & LSA_ASEXT_E_FLAG) == 0 ? 1 : 2));
		if (r->dependon[0])
			printf(" depend on %s", r->dependon);
		printf("\n");
	}
}

void
print_rtlabel(struct ospfd_conf *conf)
{
	struct n2id_label	*label;

	TAILQ_FOREACH(label, &rt_labels, entry)
		if (label->ext_tag)
			printf("rtlabel \"%s\" external-tag %u\n",
			    label->name, label->ext_tag);
}

void
print_iface(struct iface *iface)
{
	struct auth_md	*md;

	printf("\tinterface %s:%s {\n", iface->name, inet_ntoa(iface->addr));

	printf("\t\tmetric %d\n", iface->metric);

	if (iface->demote_group[0] != '\0')
		printf("\t\tdemote %s\n", iface->demote_group);
	if (iface->dependon[0] != '\0')
		printf("\t\tdepend on %s\n", iface->dependon);
	if (iface->passive)
		printf("\t\tpassive\n");
	else {
		printf("\t\tretransmit-interval %d\n", iface->rxmt_interval);
		if (iface->dead_interval == FAST_RTR_DEAD_TIME) {
			printf("\t\trouter-dead-time minimal\n");
			printf("\t\tfast-hello-interval msec %u\n",
			    iface->fast_hello_interval);
		} else {
			printf("\t\trouter-dead-time %d\n",
			    iface->dead_interval);
			printf("\t\thello-interval %d\n",
			    iface->hello_interval);
		}
		printf("\t\trouter-priority %d\n", iface->priority);
		printf("\t\ttransmit-delay %d\n", iface->transmit_delay);

		if (iface->type == IF_TYPE_POINTOPOINT)
			printf("\t\ttype p2p\n");

		printf("\t\tauth-type %s\n", if_auth_name(iface->auth_type));
		switch (iface->auth_type) {
		case AUTH_TYPE_NONE:
			break;
		case AUTH_TYPE_SIMPLE:
			printf("\t\tauth-key XXXXXX\n");
			break;
		case AUTH_TYPE_CRYPT:
			printf("\t\tauth-md-keyid %d\n", iface->auth_keyid);
			TAILQ_FOREACH(md, &iface->auth_md_list, entry)
				printf("\t\tauth-md %d XXXXXX\n", md->keyid);
			break;
		default:
			printf("\t\tunknown auth type!\n");
			break;
		}
	}

	printf("\t}\n");
}

void
print_config(struct ospfd_conf *conf)
{
	struct area	*area;
	struct iface	*iface;

	printf("\n");
	print_mainconf(conf);
	printf("\n");

	LIST_FOREACH(area, &conf->area_list, entry) {
		printf("area %s {\n", inet_ntoa(area->id));
		if (area->stub) {
			printf("\tstub");
			if (SIMPLEQ_EMPTY(&area->redist_list))
				printf("\n");
			else {
				printf(" ");
				print_redistribute(&area->redist_list);
			}
		}
		if (*area->demote_group)
			printf("\tdemote %s %d\n", area->demote_group,
			area->demote_level);
		LIST_FOREACH(iface, &area->iface_list, entry) {
			print_iface(iface);
		}
		printf("}\n\n");
	}
}