Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	usr.sbin/ripctl/ripctl.c	Lines:	0	233	0.0 %
Date:	2017-11-07	Branches:	0	142	0.0 %


/*	$OpenBSD: ripctl.c,v 1.17 2016/08/02 16:05:32 jca Exp $
 *
 * Copyright (c) 2006 Michele Marchetto <mydecay@openbeer.it>
 * Copyright (c) 2005 Claudio Jeker <claudio@openbsd.org>
 * Copyright (c) 2004, 2005 Esben Norby <norby@openbsd.org>
 * Copyright (c) 2003 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/un.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <net/if_media.h>
#include <net/if_types.h>

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

#include "rip.h"
#include "ripd.h"
#include "ripe.h"
#include "parser.h"

__dead void	 usage(void);
const char	*fmt_timeframe_core(time_t);
const char	*get_linkstate(uint8_t, int);
int		 show_interface_msg(struct imsg *);
uint64_t	 get_ifms_type(uint8_t);
int		 show_rib_msg(struct imsg *);
int		 show_nbr_msg(struct imsg *);
void		 show_fib_head(void);
int		 show_fib_msg(struct imsg *);
void		 show_interface_head(void);
int		 show_fib_interface_msg(struct imsg *);
const char	*get_media_descr(uint64_t);
void		 print_baudrate(uint64_t);

struct imsgbuf	*ibuf;

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

	fprintf(stderr, "usage: %s [-s socket] command [argument ...]\n",
	    __progname);
	exit(1);
}

int
main(int argc, char *argv[])
{
	struct sockaddr_un	 sun;
	struct parse_result	*res;
	struct imsg		 imsg;
	unsigned int		 ifidx = 0;
	int			 ctl_sock;
	int			 done = 0, verbose = 0;
	int			 n;
	int			 ch;
	char			*sockname = RIPD_SOCKET;

	while ((ch = getopt(argc, argv, "s:")) != -1) {
		switch (ch) {
		case 's':
			sockname = optarg;
			break;
		default:
			usage();
			/* NOTREACHED */
		}
	}

	argc -= optind;
	argv += optind;

	/* parse options */
	if ((res = parse(argc, argv)) == NULL)
		exit(1);

	/* connect to ripd control socket */
	if ((ctl_sock = socket(AF_UNIX, SOCK_STREAM, 0)) == -1)
		err(1, "socket");

	bzero(&sun, sizeof(sun));
	sun.sun_family = AF_UNIX;
	strlcpy(sun.sun_path, sockname, sizeof(sun.sun_path));
	if (connect(ctl_sock, (struct sockaddr *)&sun, sizeof(sun)) == -1)
		err(1, "connect: %s", sockname);

	if (pledge("stdio flock rpath cpath wpath", NULL) == -1)
		err(1, "pledge");

	if ((ibuf = malloc(sizeof(struct imsgbuf))) == NULL)
		err(1, NULL);
	imsg_init(ibuf, ctl_sock);
	done = 0;

	/* process user request */
	switch (res->action) {
	case NONE:
		usage();
		/* not reached */
	case SHOW:
	case SHOW_IFACE:
		printf("%-11s %-18s %-10s %-10s %-8s\n",
		    "Interface", "Address", "State", "Linkstate",
		    "Uptime");
		if (*res->ifname) {
			ifidx = if_nametoindex(res->ifname);
			if (ifidx == 0)
				errx(1, "no such interface %s", res->ifname);
		}
		imsg_compose(ibuf, IMSG_CTL_SHOW_INTERFACE, 0, 0, -1,
		    &ifidx, sizeof(ifidx));
		break;
	case SHOW_NBR:
		printf("%-15s %-15s %-15s %-9s %-10s\n", "ID",
		    "State", "Address", "Iface", "Uptime");
		imsg_compose(ibuf, IMSG_CTL_SHOW_NBR, 0, 0, -1, NULL, 0);
		break;
	case SHOW_RIB:
		printf("%-20s %-17s %-7s\n", "Destination",
		    "Nexthop", "Cost");
		imsg_compose(ibuf, IMSG_CTL_SHOW_RIB, 0, 0, -1, NULL, 0);
		break;
	case SHOW_FIB:
		if (!res->addr.s_addr)
			imsg_compose(ibuf, IMSG_CTL_KROUTE, 0, 0, -1,
			    &res->flags, sizeof(res->flags));
		else
			imsg_compose(ibuf, IMSG_CTL_KROUTE_ADDR, 0, 0, -1,
			    &res->addr, sizeof(res->addr));
		show_fib_head();
		break;
	case SHOW_FIB_IFACE:
		if (*res->ifname)
			imsg_compose(ibuf, IMSG_CTL_IFINFO, 0, 0, -1,
			    res->ifname, sizeof(res->ifname));
		else
			imsg_compose(ibuf, IMSG_CTL_IFINFO, 0, 0, -1, NULL, 0);
		show_interface_head();
		break;
	case FIB:
		errx(1, "fib couple|decouple");
		break;
	case FIB_COUPLE:
		imsg_compose(ibuf, IMSG_CTL_FIB_COUPLE, 0, 0, -1, NULL, 0);
		printf("couple request sent.\n");
		done = 1;
		break;
	case FIB_DECOUPLE:
		imsg_compose(ibuf, IMSG_CTL_FIB_DECOUPLE, 0, 0, -1, NULL, 0);
		printf("decouple request sent.\n");
		done = 1;
		break;
	case LOG_VERBOSE:
		verbose = 1;
		/* FALLTHROUGH */
	case LOG_BRIEF:
		imsg_compose(ibuf, IMSG_CTL_LOG_VERBOSE, 0, 0, -1,
		    &verbose, sizeof(verbose));
		printf("logging request sent.\n");
		done = 1;
		break;
	case RELOAD:
		imsg_compose(ibuf, IMSG_CTL_RELOAD, 0, 0, -1, NULL, 0);
		printf("reload request sent.\n");
		done = 1;
		break;
	}

	while (ibuf->w.queued)
		if (msgbuf_write(&ibuf->w) <= 0 && errno != EAGAIN)
			err(1, "write error");

	while (!done) {
		if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
			errx(1, "imsg_read error");
		if (n == 0)
			errx(1, "pipe closed");

		while (!done) {
			if ((n = imsg_get(ibuf, &imsg)) == -1)
				errx(1, "imsg_get error");
			if (n == 0)
				break;
			switch (res->action) {
			case SHOW:
			case SHOW_IFACE:
				done = show_interface_msg(&imsg);
				break;
			case SHOW_NBR:
				done = show_nbr_msg(&imsg);
				break;
			case SHOW_RIB:
				done = show_rib_msg(&imsg);
				break;
			case SHOW_FIB:
				done = show_fib_msg(&imsg);
				break;
			case SHOW_FIB_IFACE:
				done = show_fib_interface_msg(&imsg);
				break;
			case NONE:
			case FIB:
			case FIB_COUPLE:
			case FIB_DECOUPLE:
			case LOG_VERBOSE:
			case LOG_BRIEF:
			case RELOAD:
				break;
			}
			imsg_free(&imsg);
		}
	}
	close(ctl_sock);
	free(ibuf);

	return (0);
}

uint64_t
get_ifms_type(uint8_t if_type)
{
	switch (if_type) {
	case IFT_ETHER:
		return (IFM_ETHER);
		break;
	case IFT_FDDI:
		return (IFM_FDDI);
		break;
	case IFT_CARP:
		return (IFM_CARP);
		break;
	default:
		return (0);
		break;
	}
}

#define	TF_BUFS	8
#define	TF_LEN	9

const char *
fmt_timeframe_core(time_t t)
{
	char		*buf;
	static char	 tfbuf[TF_BUFS][TF_LEN];	/* ring buffer */
	static int	 idx = 0;
	unsigned int	 sec, min, hrs, day;
	unsigned long long	week;

	if (t == 0)
		return ("Stopped");

	buf = tfbuf[idx++];
	if (idx == TF_BUFS)
		idx = 0;

	week = t;

	sec = week % 60;
	week /= 60;
	min = week % 60;
	week /= 60;
	hrs = week % 24;
	week /= 24;
	day = week % 7;
	week /= 7;

	if (week > 0)
		snprintf(buf, TF_LEN, "%02lluw%01ud%02uh", week, day, hrs);
	else if (day > 0)
		snprintf(buf, TF_LEN, "%01ud%02uh%02um", day, hrs, min);
	else
		snprintf(buf, TF_LEN, "%02u:%02u:%02u", hrs, min, sec);

	return (buf);
}

/* prototype defined in ripd.h and shared with the kroute.c version */
u_int8_t
mask2prefixlen(in_addr_t ina)
{
	if (ina == 0)
		return (0);
	else
		return (33 - ffs(ntohl(ina)));
}

int
show_interface_msg(struct imsg *imsg)
{
	struct ctl_iface	*iface;
	char			*netid;

	switch (imsg->hdr.type) {
	case IMSG_CTL_SHOW_IFACE:
		iface = imsg->data;

		if (asprintf(&netid, "%s/%d", inet_ntoa(iface->addr),
		    mask2prefixlen(iface->mask.s_addr)) == -1)
			err(1, NULL);
		printf("%-11s %-18s %-10s %-10s %-8s\n",
		    iface->name, netid, if_state_name(iface->state),
		    get_linkstate(iface->if_type, iface->linkstate),
		    iface->uptime == 0 ? "00:00:00" :
		    fmt_timeframe_core(iface->uptime));
		free(netid);
		break;
	case IMSG_CTL_END:
		printf("\n");
		return (1);
	default:
		break;
	}

	return (0);
}

int
show_rib_msg(struct imsg *imsg)
{
	struct ctl_rt	*rt;
	char		*dstnet;

	switch (imsg->hdr.type) {
	case IMSG_CTL_SHOW_RIB:
		rt = imsg->data;
		if (asprintf(&dstnet, "%s/%d", inet_ntoa(rt->prefix),
		    mask2prefixlen(rt->netmask.s_addr)) == -1)
			err(1, NULL);

		printf("%-20s %-17s %-7d\n", dstnet,
		    inet_ntoa(rt->nexthop),
		    rt->metric);
		free(dstnet);

		break;
	case IMSG_CTL_END:
		printf("\n");
		return (1);
	default:
		break;
	}

	return (0);
}

int
show_nbr_msg(struct imsg *imsg)
{
	struct ctl_nbr	*nbr;
	char		*state;

	switch (imsg->hdr.type) {
	case IMSG_CTL_SHOW_NBR:
		nbr = imsg->data;
		if (asprintf(&state, "%s/%s", nbr_state_name(nbr->nbr_state),
		    if_state_name(nbr->iface_state)) == -1)
			err(1, NULL);
		printf("%-15s %-16s", inet_ntoa(nbr->id),
		    state);
		printf("%-15s %-10s", inet_ntoa(nbr->addr), nbr->name);
		printf("%-15s\n", nbr->uptime == 0 ? "-" :
		    fmt_timeframe_core(nbr->uptime));
		free(state);
		break;
	case IMSG_CTL_END:
		printf("\n");
		return (1);
	default:
		break;
	}

	return (0);
}

void
show_fib_head(void)
{
	printf("flags: * = valid, R = RIP, C = Connected, S = Static\n");
	printf("%-6s %-20s %-17s\n", "Flags", "Destination", "Nexthop");
}

int
show_fib_msg(struct imsg *imsg)
{
	struct kroute		*k;
	char			*p;

	switch (imsg->hdr.type) {
	case IMSG_CTL_KROUTE:
		if (imsg->hdr.len < IMSG_HEADER_SIZE + sizeof(struct kroute))
			errx(1, "wrong imsg len");
		k = imsg->data;

		if (k->flags & F_DOWN)
			printf(" ");
		else
			printf("*");

		if (k->flags & F_RIPD_INSERTED)
			printf("R");
		else if (k->flags & F_CONNECTED)
			printf("C");
		else if (k->flags & F_STATIC)
			printf("S");
		else
			printf(" ");

		printf("     ");
		if (asprintf(&p, "%s/%u", inet_ntoa(k->prefix),
		    mask2prefixlen(k->netmask.s_addr)) == -1)
			err(1, NULL);
		printf("%-20s ", p);
		free(p);

		if (k->nexthop.s_addr)
			printf("%s", inet_ntoa(k->nexthop));
		else if (k->flags & F_CONNECTED)
			printf("link#%u", k->ifindex);
		printf("\n");

		break;
	case IMSG_CTL_END:
		printf("\n");
		return (1);
	default:
		break;
	}

	return (0);
}

void
show_interface_head(void)
{
	printf("%-15s%-15s%s\n", "Interface", "Flags",
	    "Link state");
}

int
show_fib_interface_msg(struct imsg *imsg)
{
	struct kif	*k;
	uint64_t	 ifms_type;

	switch (imsg->hdr.type) {
	case IMSG_CTL_IFINFO:
		k = imsg->data;
		printf("%-15s", k->ifname);
		printf("%-15s", k->flags & IFF_UP ? "UP" : "");
		ifms_type = get_ifms_type(k->if_type);
		if (ifms_type)
			printf("%s, ", get_media_descr(ifms_type));

		printf("%s", get_linkstate(k->if_type, k->link_state));

		if (k->link_state != LINK_STATE_DOWN && k->baudrate > 0) {
			printf(", ");
			print_baudrate(k->baudrate);
		}
		printf("\n");
		break;
	case IMSG_CTL_END:
		printf("\n");
		return (1);
	default:
		break;
	}

	return (0);
}

const struct if_status_description
		if_status_descriptions[] = LINK_STATE_DESCRIPTIONS;
const struct ifmedia_description
		ifm_type_descriptions[] = IFM_TYPE_DESCRIPTIONS;

const char *
get_media_descr(uint64_t media_type)
{
	const struct ifmedia_description	*p;

	for (p = ifm_type_descriptions; p->ifmt_string != NULL; p++)
		if (media_type == p->ifmt_word)
			return (p->ifmt_string);

	return ("unknown");
}

const char *
get_linkstate(uint8_t if_type, int link_state)
{
	const struct if_status_description *p;
	static char buf[8];

	for (p = if_status_descriptions; p->ifs_string != NULL; p++) {
		if (LINK_STATE_DESC_MATCH(p, if_type, link_state))
			return (p->ifs_string);
	}
	snprintf(buf, sizeof(buf), "[#%d]", link_state);
	return (buf);
}

void
print_baudrate(uint64_t baudrate)
{
	if (baudrate > IF_Gbps(1))
		printf("%llu GBit/s", baudrate / IF_Gbps(1));
	else if (baudrate > IF_Mbps(1))
		printf("%llu MBit/s", baudrate / IF_Mbps(1));
	else if (baudrate > IF_Kbps(1))
		printf("%llu KBit/s", baudrate / IF_Kbps(1));
	else
		printf("%llu Bit/s", baudrate);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: ripctl.c,v 1.17 2016/08/02 16:05:32 jca Exp $
2			*
3			* Copyright (c) 2006 Michele Marchetto <mydecay@openbeer.it>
4			* Copyright (c) 2005 Claudio Jeker <claudio@openbsd.org>
5			* Copyright (c) 2004, 2005 Esben Norby <norby@openbsd.org>
6			* Copyright (c) 2003 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/un.h>
24			#include <netinet/in.h>
25			#include <arpa/inet.h>
26			#include <net/if_media.h>
27			#include <net/if_types.h>
28
29			#include <err.h>
30			#include <errno.h>
31			#include <stdio.h>
32			#include <stdlib.h>
33			#include <string.h>
34			#include <unistd.h>
35
36			#include "rip.h"
37			#include "ripd.h"
38			#include "ripe.h"
39			#include "parser.h"
40
41			__dead void usage(void);
42			const char *fmt_timeframe_core(time_t);
43			const char *get_linkstate(uint8_t, int);
44			int show_interface_msg(struct imsg *);
45			uint64_t get_ifms_type(uint8_t);
46			int show_rib_msg(struct imsg *);
47			int show_nbr_msg(struct imsg *);
48			void show_fib_head(void);
49			int show_fib_msg(struct imsg *);
50			void show_interface_head(void);
51			int show_fib_interface_msg(struct imsg *);
52			const char *get_media_descr(uint64_t);
53			void print_baudrate(uint64_t);
54
55			struct imsgbuf *ibuf;
56
57			__dead void
58			usage(void)
59			{
60			extern char *__progname;
61
62			fprintf(stderr, "usage: %s [-s socket] command [argument ...]\n",
63			__progname);
64			exit(1);
65			}
66
67			int
68			main(int argc, char *argv[])
69			{
70			struct sockaddr_un sun;
71			struct parse_result *res;
72			struct imsg imsg;
73			unsigned int ifidx = 0;
74			int ctl_sock;
75			int done = 0, verbose = 0;
76			int n;
77			int ch;
78			char *sockname = RIPD_SOCKET;
79
80			while ((ch = getopt(argc, argv, "s:")) != -1) {
81			switch (ch) {
82			case 's':
83			sockname = optarg;
84			break;
85			default:
86			usage();
87			/* NOTREACHED */
88			}
89			}
90
91			argc -= optind;
92			argv += optind;
93
94			/* parse options */
95			if ((res = parse(argc, argv)) == NULL)
96			exit(1);
97
98			/* connect to ripd control socket */
99			if ((ctl_sock = socket(AF_UNIX, SOCK_STREAM, 0)) == -1)
100			err(1, "socket");
101
102			bzero(&sun, sizeof(sun));
103			sun.sun_family = AF_UNIX;
104			strlcpy(sun.sun_path, sockname, sizeof(sun.sun_path));
105			if (connect(ctl_sock, (struct sockaddr *)&sun, sizeof(sun)) == -1)
106			err(1, "connect: %s", sockname);
107
108			if (pledge("stdio flock rpath cpath wpath", NULL) == -1)
109			err(1, "pledge");
110
111			if ((ibuf = malloc(sizeof(struct imsgbuf))) == NULL)
112			err(1, NULL);
113			imsg_init(ibuf, ctl_sock);
114			done = 0;
115
116			/* process user request */
117			switch (res->action) {
118			case NONE:
119			usage();
120			/* not reached */
121			case SHOW:
122			case SHOW_IFACE:
123			printf("%-11s %-18s %-10s %-10s %-8s\n",
124			"Interface", "Address", "State", "Linkstate",
125			"Uptime");
126			if (*res->ifname) {
127			ifidx = if_nametoindex(res->ifname);
128			if (ifidx == 0)
129			errx(1, "no such interface %s", res->ifname);
130			}
131			imsg_compose(ibuf, IMSG_CTL_SHOW_INTERFACE, 0, 0, -1,
132			&ifidx, sizeof(ifidx));
133			break;
134			case SHOW_NBR:
135			printf("%-15s %-15s %-15s %-9s %-10s\n", "ID",
136			"State", "Address", "Iface", "Uptime");
137			imsg_compose(ibuf, IMSG_CTL_SHOW_NBR, 0, 0, -1, NULL, 0);
138			break;
139			case SHOW_RIB:
140			printf("%-20s %-17s %-7s\n", "Destination",
141			"Nexthop", "Cost");
142			imsg_compose(ibuf, IMSG_CTL_SHOW_RIB, 0, 0, -1, NULL, 0);
143			break;
144			case SHOW_FIB:
145			if (!res->addr.s_addr)
146			imsg_compose(ibuf, IMSG_CTL_KROUTE, 0, 0, -1,
147			&res->flags, sizeof(res->flags));
148			else
149			imsg_compose(ibuf, IMSG_CTL_KROUTE_ADDR, 0, 0, -1,
150			&res->addr, sizeof(res->addr));
151			show_fib_head();
152			break;
153			case SHOW_FIB_IFACE:
154			if (*res->ifname)
155			imsg_compose(ibuf, IMSG_CTL_IFINFO, 0, 0, -1,
156			res->ifname, sizeof(res->ifname));
157			else
158			imsg_compose(ibuf, IMSG_CTL_IFINFO, 0, 0, -1, NULL, 0);
159			show_interface_head();
160			break;
161			case FIB:
162			errx(1, "fib couple\|decouple");
163			break;
164			case FIB_COUPLE:
165			imsg_compose(ibuf, IMSG_CTL_FIB_COUPLE, 0, 0, -1, NULL, 0);
166			printf("couple request sent.\n");
167			done = 1;
168			break;
169			case FIB_DECOUPLE:
170			imsg_compose(ibuf, IMSG_CTL_FIB_DECOUPLE, 0, 0, -1, NULL, 0);
171			printf("decouple request sent.\n");
172			done = 1;
173			break;
174			case LOG_VERBOSE:
175			verbose = 1;
176			/* FALLTHROUGH */
177			case LOG_BRIEF:
178			imsg_compose(ibuf, IMSG_CTL_LOG_VERBOSE, 0, 0, -1,
179			&verbose, sizeof(verbose));
180			printf("logging request sent.\n");
181			done = 1;
182			break;
183			case RELOAD:
184			imsg_compose(ibuf, IMSG_CTL_RELOAD, 0, 0, -1, NULL, 0);
185			printf("reload request sent.\n");
186			done = 1;
187			break;
188			}
189
190			while (ibuf->w.queued)
191			if (msgbuf_write(&ibuf->w) <= 0 && errno != EAGAIN)
192			err(1, "write error");
193
194			while (!done) {
195			if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN)
196			errx(1, "imsg_read error");
197			if (n == 0)
198			errx(1, "pipe closed");
199
200			while (!done) {
201			if ((n = imsg_get(ibuf, &imsg)) == -1)
202			errx(1, "imsg_get error");
203			if (n == 0)
204			break;
205			switch (res->action) {
206			case SHOW:
207			case SHOW_IFACE:
208			done = show_interface_msg(&imsg);
209			break;
210			case SHOW_NBR:
211			done = show_nbr_msg(&imsg);
212			break;
213			case SHOW_RIB:
214			done = show_rib_msg(&imsg);
215			break;
216			case SHOW_FIB:
217			done = show_fib_msg(&imsg);
218			break;
219			case SHOW_FIB_IFACE:
220			done = show_fib_interface_msg(&imsg);
221			break;
222			case NONE:
223			case FIB:
224			case FIB_COUPLE:
225			case FIB_DECOUPLE:
226			case LOG_VERBOSE:
227			case LOG_BRIEF:
228			case RELOAD:
229			break;
230			}
231			imsg_free(&imsg);
232			}
233			}
234			close(ctl_sock);
235			free(ibuf);
236
237			return (0);
238			}
239
240			uint64_t
241			get_ifms_type(uint8_t if_type)
242			{
243			switch (if_type) {
244			case IFT_ETHER:
245			return (IFM_ETHER);
246			break;
247			case IFT_FDDI:
248			return (IFM_FDDI);
249			break;
250			case IFT_CARP:
251			return (IFM_CARP);
252			break;
253			default:
254			return (0);
255			break;
256			}
257			}
258
259			#define TF_BUFS 8
260			#define TF_LEN 9
261
262			const char *
263			fmt_timeframe_core(time_t t)
264			{
265			char *buf;
266			static char tfbuf[TF_BUFS][TF_LEN]; /* ring buffer */
267			static int idx = 0;
268			unsigned int sec, min, hrs, day;
269			unsigned long long week;
270
271			if (t == 0)
272			return ("Stopped");
273
274			buf = tfbuf[idx++];
275			if (idx == TF_BUFS)
276			idx = 0;
277
278			week = t;
279
280			sec = week % 60;
281			week /= 60;
282			min = week % 60;
283			week /= 60;
284			hrs = week % 24;
285			week /= 24;
286			day = week % 7;
287			week /= 7;
288
289			if (week > 0)
290			snprintf(buf, TF_LEN, "%02lluw%01ud%02uh", week, day, hrs);
291			else if (day > 0)
292			snprintf(buf, TF_LEN, "%01ud%02uh%02um", day, hrs, min);
293			else
294			snprintf(buf, TF_LEN, "%02u:%02u:%02u", hrs, min, sec);
295
296			return (buf);
297			}
298
299			/* prototype defined in ripd.h and shared with the kroute.c version */
300			u_int8_t
301			mask2prefixlen(in_addr_t ina)
302			{
303			if (ina == 0)
304			return (0);
305			else
306			return (33 - ffs(ntohl(ina)));
307			}
308
309			int
310			show_interface_msg(struct imsg *imsg)
311			{
312			struct ctl_iface *iface;
313			char *netid;
314
315			switch (imsg->hdr.type) {
316			case IMSG_CTL_SHOW_IFACE:
317			iface = imsg->data;
318
319			if (asprintf(&netid, "%s/%d", inet_ntoa(iface->addr),
320			mask2prefixlen(iface->mask.s_addr)) == -1)
321			err(1, NULL);
322			printf("%-11s %-18s %-10s %-10s %-8s\n",
323			iface->name, netid, if_state_name(iface->state),
324			get_linkstate(iface->if_type, iface->linkstate),
325			iface->uptime == 0 ? "00:00:00" :
326			fmt_timeframe_core(iface->uptime));
327			free(netid);
328			break;
329			case IMSG_CTL_END:
330			printf("\n");
331			return (1);
332			default:
333			break;
334			}
335
336			return (0);
337			}
338
339			int
340			show_rib_msg(struct imsg *imsg)
341			{
342			struct ctl_rt *rt;
343			char *dstnet;
344
345			switch (imsg->hdr.type) {
346			case IMSG_CTL_SHOW_RIB:
347			rt = imsg->data;
348			if (asprintf(&dstnet, "%s/%d", inet_ntoa(rt->prefix),
349			mask2prefixlen(rt->netmask.s_addr)) == -1)
350			err(1, NULL);
351
352			printf("%-20s %-17s %-7d\n", dstnet,
353			inet_ntoa(rt->nexthop),
354			rt->metric);
355			free(dstnet);
356
357			break;
358			case IMSG_CTL_END:
359			printf("\n");
360			return (1);
361			default:
362			break;
363			}
364
365			return (0);
366			}
367
368			int
369			show_nbr_msg(struct imsg *imsg)
370			{
371			struct ctl_nbr *nbr;
372			char *state;
373
374			switch (imsg->hdr.type) {
375			case IMSG_CTL_SHOW_NBR:
376			nbr = imsg->data;
377			if (asprintf(&state, "%s/%s", nbr_state_name(nbr->nbr_state),
378			if_state_name(nbr->iface_state)) == -1)
379			err(1, NULL);
380			printf("%-15s %-16s", inet_ntoa(nbr->id),
381			state);
382			printf("%-15s %-10s", inet_ntoa(nbr->addr), nbr->name);
383			printf("%-15s\n", nbr->uptime == 0 ? "-" :
384			fmt_timeframe_core(nbr->uptime));
385			free(state);
386			break;
387			case IMSG_CTL_END:
388			printf("\n");
389			return (1);
390			default:
391			break;
392			}
393
394			return (0);
395			}
396
397			void
398			show_fib_head(void)
399			{
400			printf("flags: * = valid, R = RIP, C = Connected, S = Static\n");
401			printf("%-6s %-20s %-17s\n", "Flags", "Destination", "Nexthop");
402			}
403
404			int
405			show_fib_msg(struct imsg *imsg)
406			{
407			struct kroute *k;
408			char *p;
409
410			switch (imsg->hdr.type) {
411			case IMSG_CTL_KROUTE:
412			if (imsg->hdr.len < IMSG_HEADER_SIZE + sizeof(struct kroute))
413			errx(1, "wrong imsg len");
414			k = imsg->data;
415
416			if (k->flags & F_DOWN)
417			printf(" ");
418			else
419			printf("*");
420
421			if (k->flags & F_RIPD_INSERTED)
422			printf("R");
423			else if (k->flags & F_CONNECTED)
424			printf("C");
425			else if (k->flags & F_STATIC)
426			printf("S");
427			else
428			printf(" ");
429
430			printf(" ");
431			if (asprintf(&p, "%s/%u", inet_ntoa(k->prefix),
432			mask2prefixlen(k->netmask.s_addr)) == -1)
433			err(1, NULL);
434			printf("%-20s ", p);
435			free(p);
436
437			if (k->nexthop.s_addr)
438			printf("%s", inet_ntoa(k->nexthop));
439			else if (k->flags & F_CONNECTED)
440			printf("link#%u", k->ifindex);
441			printf("\n");
442
443			break;
444			case IMSG_CTL_END:
445			printf("\n");
446			return (1);
447			default:
448			break;
449			}
450
451			return (0);
452			}
453
454			void
455			show_interface_head(void)
456			{
457			printf("%-15s%-15s%s\n", "Interface", "Flags",
458			"Link state");
459			}
460
461			int
462			show_fib_interface_msg(struct imsg *imsg)
463			{
464			struct kif *k;
465			uint64_t ifms_type;
466
467			switch (imsg->hdr.type) {
468			case IMSG_CTL_IFINFO:
469			k = imsg->data;
470			printf("%-15s", k->ifname);
471			printf("%-15s", k->flags & IFF_UP ? "UP" : "");
472			ifms_type = get_ifms_type(k->if_type);
473			if (ifms_type)
474			printf("%s, ", get_media_descr(ifms_type));
475
476			printf("%s", get_linkstate(k->if_type, k->link_state));
477
478			if (k->link_state != LINK_STATE_DOWN && k->baudrate > 0) {
479			printf(", ");
480			print_baudrate(k->baudrate);
481			}
482			printf("\n");
483			break;
484			case IMSG_CTL_END:
485			printf("\n");
486			return (1);
487			default:
488			break;
489			}
490
491			return (0);
492			}
493
494			const struct if_status_description
495			if_status_descriptions[] = LINK_STATE_DESCRIPTIONS;
496			const struct ifmedia_description
497			ifm_type_descriptions[] = IFM_TYPE_DESCRIPTIONS;
498
499			const char *
500			get_media_descr(uint64_t media_type)
501			{
502			const struct ifmedia_description *p;
503
504			for (p = ifm_type_descriptions; p->ifmt_string != NULL; p++)
505			if (media_type == p->ifmt_word)
506			return (p->ifmt_string);
507
508			return ("unknown");
509			}
510
511			const char *
512			get_linkstate(uint8_t if_type, int link_state)
513			{
514			const struct if_status_description *p;
515			static char buf[8];
516
517			for (p = if_status_descriptions; p->ifs_string != NULL; p++) {
518			if (LINK_STATE_DESC_MATCH(p, if_type, link_state))
519			return (p->ifs_string);
520			}
521			snprintf(buf, sizeof(buf), "[#%d]", link_state);
522			return (buf);
523			}
524
525			void
526			print_baudrate(uint64_t baudrate)
527			{
528			if (baudrate > IF_Gbps(1))
529			printf("%llu GBit/s", baudrate / IF_Gbps(1));
530			else if (baudrate > IF_Mbps(1))
531			printf("%llu MBit/s", baudrate / IF_Mbps(1));
532			else if (baudrate > IF_Kbps(1))
533			printf("%llu KBit/s", baudrate / IF_Kbps(1));
534			else
535			printf("%llu Bit/s", baudrate);
536			}