[mirror_iproute2.git] / tc / m_nat.c

/*
 * m_nat.c		NAT module
 *
 *		This program is free software; you can distribute 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:	Herbert Xu <herbert@gondor.apana.org.au>
 *
 */

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <fcntl.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <string.h>
#include "utils.h"
#include "tc_util.h"
#include <linux/tc_act/tc_nat.h>

static void
explain(void)
{
	fprintf(stderr, "Usage: ... nat NAT\n"
			"NAT := DIRECTION OLD NEW\n"
			"DIRECTION := { ingress | egress }\n"
			"OLD := PREFIX\n"
			"NEW := ADDRESS\n");
}

static void
usage(void)
{
	explain();
	exit(-1);
}

static int
parse_nat_args(int *argc_p, char ***argv_p, struct tc_nat *sel)
{
	int argc = *argc_p;
	char **argv = *argv_p;
	inet_prefix addr;

	if (argc <= 0)
		return -1;

	if (matches(*argv, "egress") == 0)
		sel->flags |= TCA_NAT_FLAG_EGRESS;
	else if (matches(*argv, "ingress") != 0)
		goto bad_val;

	NEXT_ARG();

	if (get_prefix_1(&addr, *argv, AF_INET))
		goto bad_val;

	sel->old_addr = addr.data[0];
	sel->mask = htonl(~0u << (32 - addr.bitlen));

	NEXT_ARG();

	if (get_prefix_1(&addr, *argv, AF_INET))
		goto bad_val;

	sel->new_addr = addr.data[0];

	argc--;
	argv++;

	*argc_p = argc;
	*argv_p = argv;
	return 0;

bad_val:
	return -1;
}

static int
parse_nat(struct action_util *a, int *argc_p, char ***argv_p, int tca_id, struct nlmsghdr *n)
{
	struct tc_nat sel = {};

	int argc = *argc_p;
	char **argv = *argv_p;
	int ok = 0;
	struct rtattr *tail;

	while (argc > 0) {
		if (matches(*argv, "nat") == 0) {
			NEXT_ARG();
			if (parse_nat_args(&argc, &argv, &sel)) {
				fprintf(stderr, "Illegal nat construct (%s)\n",
					*argv);
				explain();
				return -1;
			}
			ok++;
			continue;
		} else if (matches(*argv, "help") == 0) {
			usage();
		} else {
			break;
		}

	}

	if (!ok) {
		explain();
		return -1;
	}

	parse_action_control_dflt(&argc, &argv, &sel.action, false, TC_ACT_OK);

	if (argc) {
		if (matches(*argv, "index") == 0) {
			NEXT_ARG();
			if (get_u32(&sel.index, *argv, 10)) {
				fprintf(stderr, "Nat: Illegal \"index\"\n");
				return -1;
			}
			argc--;
			argv++;
		}
	}

	tail = addattr_nest(n, MAX_MSG, tca_id);
	addattr_l(n, MAX_MSG, TCA_NAT_PARMS, &sel, sizeof(sel));
	addattr_nest_end(n, tail);

	*argc_p = argc;
	*argv_p = argv;
	return 0;
}

static int
print_nat(struct action_util *au, FILE * f, struct rtattr *arg)
{
	struct tc_nat *sel;
	struct rtattr *tb[TCA_NAT_MAX + 1];
	SPRINT_BUF(buf1);
	SPRINT_BUF(buf2);
	int len;

	if (arg == NULL)
		return -1;

	parse_rtattr_nested(tb, TCA_NAT_MAX, arg);

	if (tb[TCA_NAT_PARMS] == NULL) {
		print_string(PRINT_FP, NULL, "%s", "[NULL nat parameters]");
		return -1;
	}
	sel = RTA_DATA(tb[TCA_NAT_PARMS]);

	len = ffs(sel->mask);
	len = len ? 33 - len : 0;

	print_string(PRINT_ANY, "type", " %s ", "nat");
	print_string(PRINT_ANY, "direction", "%s",
		     sel->flags & TCA_NAT_FLAG_EGRESS ? "egress" : "ingress");

	snprintf(buf2, sizeof(buf2), "%s/%d",
		 format_host_r(AF_INET, 4, &sel->old_addr, buf1, sizeof(buf1)),
		 len);
	print_string(PRINT_ANY, "old_addr", " %s", buf2);
	print_string(PRINT_ANY, "new_addr", " %s",
		     format_host_r(AF_INET, 4, &sel->new_addr, buf1, sizeof(buf1)));

	print_action_control(f, " ", sel->action, "");
	print_string(PRINT_FP, NULL, "%s", _SL_);
	print_uint(PRINT_ANY, "index", "\t index %u", sel->index);
	print_int(PRINT_ANY, "ref", " ref %d", sel->refcnt);
	print_int(PRINT_ANY, "bind", " bind %d", sel->bindcnt);

	if (show_stats) {
		if (tb[TCA_NAT_TM]) {
			struct tcf_t *tm = RTA_DATA(tb[TCA_NAT_TM]);

			print_tm(f, tm);
		}
	}

	print_string(PRINT_FP, NULL, "%s", _SL_);

	return 0;
}

struct action_util nat_action_util = {
	.id = "nat",
	.parse_aopt = parse_nat,
	.print_aopt = print_nat,
};
Commit	Line	Data
fc2d0206 HX	1	/*
	2	* m_nat.c NAT module
	3	*
	4	* This program is free software; you can distribute it and/or
	5	* modify it under the terms of the GNU General Public License
	6	* as published by the Free Software Foundation; either version
	7	* 2 of the License, or (at your option) any later version.
	8	*
	9	* Authors: Herbert Xu <herbert@gondor.apana.org.au>
	10	*
	11	*/
	12
	13	#include <stdio.h>
	14	#include <stdlib.h>
	15	#include <unistd.h>
fc2d0206 HX	16	#include <fcntl.h>
	17	#include <sys/socket.h>
	18	#include <netinet/in.h>
	19	#include <arpa/inet.h>
	20	#include <string.h>
fc2d0206 HX	21	#include "utils.h"
	22	#include "tc_util.h"
	23	#include <linux/tc_act/tc_nat.h>
	24
	25	static void
	26	explain(void)
	27	{
	28	fprintf(stderr, "Usage: ... nat NAT\n"
	29	"NAT := DIRECTION OLD NEW\n"
	30	"DIRECTION := { ingress \| egress }\n"
	31	"OLD := PREFIX\n"
	32	"NEW := ADDRESS\n");
	33	}
	34
	35	static void
	36	usage(void)
	37	{
	38	explain();
	39	exit(-1);
	40	}
	41
	42	static int
32a121cb	43	parse_nat_args(int argc_p, char *argv_p, struct tc_nat sel)
fc2d0206 HX	44	{
	45	int argc = *argc_p;
	46	char *argv = argv_p;
	47	inet_prefix addr;
	48
	49	if (argc <= 0)
	50	return -1;
	51
	52	if (matches(*argv, "egress") == 0)
	53	sel->flags \|= TCA_NAT_FLAG_EGRESS;
	54	else if (matches(*argv, "ingress") != 0)
	55	goto bad_val;
	56
	57	NEXT_ARG();
	58
	59	if (get_prefix_1(&addr, *argv, AF_INET))
	60	goto bad_val;
	61
	62	sel->old_addr = addr.data[0];
	63	sel->mask = htonl(~0u << (32 - addr.bitlen));
	64
	65	NEXT_ARG();
	66
	67	if (get_prefix_1(&addr, *argv, AF_INET))
	68	goto bad_val;
	69
	70	sel->new_addr = addr.data[0];
	71
	72	argc--;
	73	argv++;
	74
	75	*argc_p = argc;
	76	*argv_p = argv;
	77	return 0;
	78
	79	bad_val:
	80	return -1;
	81	}
	82
	83	static int
	84	parse_nat(struct action_util a, int argc_p, char **argv_p, int tca_id, struct nlmsghdr n)
	85	{
d17b136f	86	struct tc_nat sel = {};
fc2d0206 HX	87
	88	int argc = *argc_p;
	89	char *argv = argv_p;
	90	int ok = 0;
	91	struct rtattr *tail;
	92
fc2d0206 HX	93	while (argc > 0) {
	94	if (matches(*argv, "nat") == 0) {
	95	NEXT_ARG();
	96	if (parse_nat_args(&argc, &argv, &sel)) {
32a121cb	97	fprintf(stderr, "Illegal nat construct (%s)\n",
fc2d0206 HX	98	*argv);
	99	explain();
	100	return -1;
	101	}
	102	ok++;
	103	continue;
	104	} else if (matches(*argv, "help") == 0) {
	105	usage();
	106	} else {
	107	break;
	108	}
	109
	110	}
	111
	112	if (!ok) {
	113	explain();
	114	return -1;
	115	}
	116
e67aba55	117	parse_action_control_dflt(&argc, &argv, &sel.action, false, TC_ACT_OK);
fc2d0206 HX	118
	119	if (argc) {
	120	if (matches(*argv, "index") == 0) {
	121	NEXT_ARG();
	122	if (get_u32(&sel.index, *argv, 10)) {
e26520e5	123	fprintf(stderr, "Nat: Illegal \"index\"\n");
fc2d0206 HX	124	return -1;
	125	}
	126	argc--;
	127	argv++;
	128	}
	129	}
	130
c14f9d92	131	tail = addattr_nest(n, MAX_MSG, tca_id);
fc2d0206	132	addattr_l(n, MAX_MSG, TCA_NAT_PARMS, &sel, sizeof(sel));
c14f9d92	133	addattr_nest_end(n, tail);
fc2d0206 HX	134
	135	*argc_p = argc;
	136	*argv_p = argv;
	137	return 0;
	138	}
	139
	140	static int
32a121cb	141	print_nat(struct action_util au, FILE f, struct rtattr *arg)
fc2d0206 HX	142	{
	143	struct tc_nat *sel;
	144	struct rtattr *tb[TCA_NAT_MAX + 1];
4757a547 KL	145	SPRINT_BUF(buf1);
4757a547 KL	146	SPRINT_BUF(buf2);
fc2d0206 HX	147	int len;
	148
	149	if (arg == NULL)
	150	return -1;
	151
	152	parse_rtattr_nested(tb, TCA_NAT_MAX, arg);
	153
	154	if (tb[TCA_NAT_PARMS] == NULL) {
4757a547	155	print_string(PRINT_FP, NULL, "%s", "[NULL nat parameters]");
fc2d0206 HX	156	return -1;
	157	}
	158	sel = RTA_DATA(tb[TCA_NAT_PARMS]);
	159
	160	len = ffs(sel->mask);
	161	len = len ? 33 - len : 0;
	162
4757a547 KL	163	print_string(PRINT_ANY, "type", " %s ", "nat");
	164	print_string(PRINT_ANY, "direction", "%s",
	165	sel->flags & TCA_NAT_FLAG_EGRESS ? "egress" : "ingress");
fc2d0206	166
4757a547 KL	167	snprintf(buf2, sizeof(buf2), "%s/%d",
	168	format_host_r(AF_INET, 4, &sel->old_addr, buf1, sizeof(buf1)),
	169	len);
	170	print_string(PRINT_ANY, "old_addr", " %s", buf2);
	171	print_string(PRINT_ANY, "new_addr", " %s",
	172	format_host_r(AF_INET, 4, &sel->new_addr, buf1, sizeof(buf1)));
	173
	174	print_action_control(f, " ", sel->action, "");
	175	print_string(PRINT_FP, NULL, "%s", _SL_);
	176	print_uint(PRINT_ANY, "index", "\t index %u", sel->index);
	177	print_int(PRINT_ANY, "ref", " ref %d", sel->refcnt);
	178	print_int(PRINT_ANY, "bind", " bind %d", sel->bindcnt);
d64a22f3	179
fc2d0206 HX	180	if (show_stats) {
	181	if (tb[TCA_NAT_TM]) {
	182	struct tcf_t *tm = RTA_DATA(tb[TCA_NAT_TM]);
32a121cb SH	183
32a121cb SH	184	print_tm(f, tm);
fc2d0206 HX	185	}
	186	}
	187
4757a547	188	print_string(PRINT_FP, NULL, "%s", _SL_);
d64a22f3	189
fc2d0206 HX	190	return 0;
	191	}
	192
	193	struct action_util nat_action_util = {
	194	.id = "nat",
	195	.parse_aopt = parse_nat,
	196	.print_aopt = print_nat,
	197	};