/*

 * nametable.c	TIPC nametable functionality.

 *

 *		This program is free software; you can redistribute it and/or

 *		modify it under the terms of the GNU General Public License

 *		as published by the Free Software Foundation; either version

 *		2 of the License, or (at your option) any later version.

 *

 * Authors:	Richard Alpe <richard.alpe@ericsson.com>

 */

#include <stdio.h>

#include <errno.h>

#include <linux/tipc_netlink.h>

#include <linux/tipc.h>

#include <linux/genetlink.h>

#include <libmnl/libmnl.h>

#include "cmdl.h"

#include "msg.h"

#include "nametable.h"

#include "misc.h"

#include "utils.h"

#define PORTID_STR_LEN 45 /* Four u32 and five delimiter chars */

static int nametable_show_cb(const struct nlmsghdr *nlh, void *data)

{

	int *iteration = data;

	struct genlmsghdr *genl = mnl_nlmsg_get_payload(nlh);

	struct nlattr *info[TIPC_NLA_MAX + 1] = {};

	struct nlattr *attrs[TIPC_NLA_NAME_TABLE_MAX + 1] = {};

	struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1] = {};

	const char *scope[] = { "", "zone", "cluster", "node" };

	char str[33] = {0,};

	mnl_attr_parse(nlh, sizeof(*genl), parse_attrs, info);

	if (!info[TIPC_NLA_NAME_TABLE])

		return MNL_CB_ERROR;

	mnl_attr_parse_nested(info[TIPC_NLA_NAME_TABLE], parse_attrs, attrs);

	if (!attrs[TIPC_NLA_NAME_TABLE_PUBL])

		return MNL_CB_ERROR;

	mnl_attr_parse_nested(attrs[TIPC_NLA_NAME_TABLE_PUBL], parse_attrs, publ);

	if (!publ[TIPC_NLA_NAME_TABLE_PUBL])

		return MNL_CB_ERROR;

	if (!*iteration && !is_json_context())

		printf("%-10s %-10s %-10s %-8s %-10s %-33s\n",

		       "Type", "Lower", "Upper", "Scope", "Port",

		       "Node");

	(*iteration)++;

	hash2nodestr(mnl_attr_get_u32(publ[TIPC_NLA_PUBL_NODE]), str);

	open_json_object(NULL);

	print_uint(PRINT_ANY, "type", "%-10u",

			   mnl_attr_get_u32(publ[TIPC_NLA_PUBL_TYPE]));

	print_string(PRINT_FP, NULL, " ", "");

	print_uint(PRINT_ANY, "lower", "%-10u",

			   mnl_attr_get_u32(publ[TIPC_NLA_PUBL_LOWER]));

	print_string(PRINT_FP, NULL, " ", "");

	print_uint(PRINT_ANY, "upper", "%-10u",

			   mnl_attr_get_u32(publ[TIPC_NLA_PUBL_UPPER]));

	print_string(PRINT_FP, NULL, " ", "");

	print_string(PRINT_ANY, "scope", "%-8s",

			     scope[mnl_attr_get_u32(publ[TIPC_NLA_PUBL_SCOPE])]);

	print_string(PRINT_FP, NULL, " ", "");

	print_uint(PRINT_ANY, "port", "%-10u",

			   mnl_attr_get_u32(publ[TIPC_NLA_PUBL_REF]));

	print_string(PRINT_FP, NULL, " ", "");

	print_string(PRINT_ANY, "node", "%s", str);

	print_string(PRINT_FP, NULL, "\n", "");

	close_json_object();

	return MNL_CB_OK;

}

static int cmd_nametable_show(struct nlmsghdr *nlh, const struct cmd *cmd,

			      struct cmdl *cmdl, void *data)

{

	int iteration = 0;

	char buf[MNL_SOCKET_BUFFER_SIZE];

	int rc = 0;

	if (help_flag) {

		fprintf(stderr, "Usage: %s nametable show\n", cmdl->argv[0]);

		return -EINVAL;

	}

	if (!(nlh = msg_init(buf, TIPC_NL_NAME_TABLE_GET))) {

		fprintf(stderr, "error, message initialisation failed\n");

		return -1;

	}

	new_json_obj(json);

	rc = msg_dumpit(nlh, nametable_show_cb, &iteration);

	delete_json_obj();

	return rc;

}

void cmd_nametable_help(struct cmdl *cmdl)

{

	fprintf(stderr,

		"Usage: %s nametable COMMAND\n\n"

		"COMMANDS\n"

		" show                  - Show nametable\n",

		cmdl->argv[0]);

}

int cmd_nametable(struct nlmsghdr *nlh, const struct cmd *cmd, struct cmdl *cmdl,

		  void *data)

{

	const struct cmd cmds[] = {

		{ "show",	cmd_nametable_show,	NULL },

		{ NULL }

	};

	return run_cmd(nlh, cmd, cmds, cmdl, NULL);

}