/*      $OpenBSD: printconf.c,v 1.9 2024/05/17 06:50:14 florian Exp $   */

/*
 * Copyright (c) 2018 Florian Obser <florian@openbsd.org>
 * 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/types.h>
#include <sys/queue.h>
#include <sys/socket.h>
#include <sys/uio.h>

#include <netinet/in.h>
#include <netinet/icmp6.h>
#include <net/if.h>

#include <arpa/inet.h>

#include <event.h>
#include <imsg.h>
#include <stdio.h>

#include "rad.h"

const char*     yesno(int);
const char*     rtpref(int);
void            print_ra_options(const char*, const struct ra_options_conf*);
void            print_prefix_options(const char*, const struct ra_prefix_conf*);

const char*
yesno(int flag)
{
        return flag ? "yes" : "no";
}

const char*
rtpref(int rtpref)
{
        switch (rtpref & ND_RA_FLAG_RTPREF_MASK) {
        case ND_RA_FLAG_RTPREF_HIGH:
                return "high";
        case ND_RA_FLAG_RTPREF_MEDIUM:
                return "medium";
        case ND_RA_FLAG_RTPREF_LOW:
                return "low";
        default:
                return "invalid";
        }

}

void
print_ra_options(const char *indent, const struct ra_options_conf *ra_options)
{
        struct ra_rdnss_conf    *ra_rdnss;
        struct ra_dnssl_conf    *ra_dnssl;
        struct ra_pref64_conf   *pref64;
        char                     buf[INET6_ADDRSTRLEN];

        printf("%sdefault router %s\n", indent, yesno(ra_options->dfr));
        printf("%shop limit %d\n", indent, ra_options->cur_hl);
        printf("%smanaged address configuration %s\n", indent,
            yesno(ra_options->m_flag));
        printf("%sother configuration %s\n", indent, yesno(ra_options->o_flag));
        printf("%srouter preference %s\n", indent, rtpref(ra_options->rtpref));
        printf("%srouter lifetime %d\n", indent, ra_options->router_lifetime);
        printf("%sreachable time %u\n", indent, ra_options->reachable_time);
        printf("%sretrans timer %u\n", indent, ra_options->retrans_timer);
        printf("%ssource link-layer address %s\n", indent,
            yesno(ra_options->source_link_addr));
        if (ra_options->mtu > 0)
                printf("%smtu %u\n", indent, ra_options->mtu);

        if (!SIMPLEQ_EMPTY(&ra_options->ra_rdnss_list) ||
            !SIMPLEQ_EMPTY(&ra_options->ra_dnssl_list)) {
                printf("%sdns {\n", indent);
                printf("%s\tlifetime %u\n", indent, ra_options->rdns_lifetime);
                if (!SIMPLEQ_EMPTY(&ra_options->ra_rdnss_list)) {
                        printf("%s\tnameserver {\n", indent);
                        SIMPLEQ_FOREACH(ra_rdnss,
                            &ra_options->ra_rdnss_list, entry) {
                                inet_ntop(AF_INET6, &ra_rdnss->rdnss,
                                    buf, sizeof(buf));
                                printf("%s\t\t%s\n", indent, buf);
                        }
                        printf("%s\t}\n", indent);
                }
                if (!SIMPLEQ_EMPTY(&ra_options->ra_dnssl_list)) {
                        printf("%s\tsearch {\n", indent);
                        SIMPLEQ_FOREACH(ra_dnssl,
                            &ra_options->ra_dnssl_list, entry)
                                printf("%s\t\t%s\n", indent, ra_dnssl->search);
                        printf("%s\t}\n", indent);
                }
                printf("%s}\n", indent);
        }
        SIMPLEQ_FOREACH(pref64, &ra_options->ra_pref64_list, entry) {
                printf("%snat64 prefix %s/%d {\n", indent, inet_ntop(AF_INET6,
                    &pref64->prefix, buf, sizeof(buf)), pref64->prefixlen);
                printf("%s\tlifetime %u\n", indent, pref64->ltime);
                printf("%s}\n", indent);
        }

}

void
print_prefix_options(const char *indent, const struct ra_prefix_conf
    *ra_prefix_conf)
{
        printf("%svalid lifetime %u\n", indent, ra_prefix_conf->vltime);
        printf("%spreferred lifetime %u\n", indent, ra_prefix_conf->pltime);
        printf("%son-link %s\n", indent, yesno(ra_prefix_conf->lflag));
        printf("%sautonomous address-configuration %s\n", indent,
            yesno(ra_prefix_conf->aflag));
}

void
print_config(struct rad_conf *conf)
{
        struct ra_iface_conf    *iface;
        struct ra_prefix_conf   *prefix;
        char                     buf[INET6_ADDRSTRLEN];

        print_ra_options("", &conf->ra_options);
        printf("\n");

        SIMPLEQ_FOREACH(iface, &conf->ra_iface_list, entry) {
                printf("interface %s {\n", iface->name);

                print_ra_options("\t", &iface->ra_options);

                if (iface->autoprefix) {
                        printf("\tauto prefix {\n");
                        print_prefix_options("\t\t", iface->autoprefix);
                        printf("\t}\n");
                } else
                        printf("\tno auto prefix\n");

                SIMPLEQ_FOREACH(prefix, &iface->ra_prefix_list, entry) {
                        printf("\tprefix %s/%d {\n", inet_ntop(AF_INET6,
                            &prefix->prefix, buf, sizeof(buf)),
                            prefix->prefixlen);
                        print_prefix_options("\t\t", prefix);
                        printf("\t}\n");
                }

                printf("}\n");
        }
}