Blame tc/m_nat.c

Packit Service 3880ab
/*
Packit Service 3880ab
 * m_nat.c		NAT module
Packit Service 3880ab
 *
Packit Service 3880ab
 *		This program is free software; you can distribute it and/or
Packit Service 3880ab
 *		modify it under the terms of the GNU General Public License
Packit Service 3880ab
 *		as published by the Free Software Foundation; either version
Packit Service 3880ab
 *		2 of the License, or (at your option) any later version.
Packit Service 3880ab
 *
Packit Service 3880ab
 * Authors:	Herbert Xu <herbert@gondor.apana.org.au>
Packit Service 3880ab
 *
Packit Service 3880ab
 */
Packit Service 3880ab
Packit Service 3880ab
#include <stdio.h>
Packit Service 3880ab
#include <stdlib.h>
Packit Service 3880ab
#include <unistd.h>
Packit Service 3880ab
#include <fcntl.h>
Packit Service 3880ab
#include <sys/socket.h>
Packit Service 3880ab
#include <netinet/in.h>
Packit Service 3880ab
#include <arpa/inet.h>
Packit Service 3880ab
#include <string.h>
Packit Service 3880ab
#include "utils.h"
Packit Service 3880ab
#include "tc_util.h"
Packit Service 3880ab
#include <linux/tc_act/tc_nat.h>
Packit Service 3880ab
Packit Service 3880ab
static void
Packit Service 3880ab
explain(void)
Packit Service 3880ab
{
Packit Service 3880ab
	fprintf(stderr, "Usage: ... nat NAT\n"
Packit Service 3880ab
			"NAT := DIRECTION OLD NEW\n"
Packit Service 3880ab
			"DIRECTION := { ingress | egress }\n"
Packit Service 3880ab
			"OLD := PREFIX\n"
Packit Service 3880ab
			"NEW := ADDRESS\n");
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static void
Packit Service 3880ab
usage(void)
Packit Service 3880ab
{
Packit Service 3880ab
	explain();
Packit Service 3880ab
	exit(-1);
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static int
Packit Service 3880ab
parse_nat_args(int *argc_p, char ***argv_p, struct tc_nat *sel)
Packit Service 3880ab
{
Packit Service 3880ab
	int argc = *argc_p;
Packit Service 3880ab
	char **argv = *argv_p;
Packit Service 3880ab
	inet_prefix addr;
Packit Service 3880ab
Packit Service 3880ab
	if (argc <= 0)
Packit Service 3880ab
		return -1;
Packit Service 3880ab
Packit Service 3880ab
	if (matches(*argv, "egress") == 0)
Packit Service 3880ab
		sel->flags |= TCA_NAT_FLAG_EGRESS;
Packit Service 3880ab
	else if (matches(*argv, "ingress") != 0)
Packit Service 3880ab
		goto bad_val;
Packit Service 3880ab
Packit Service 3880ab
	NEXT_ARG();
Packit Service 3880ab
Packit Service 3880ab
	if (get_prefix_1(&addr, *argv, AF_INET))
Packit Service 3880ab
		goto bad_val;
Packit Service 3880ab
Packit Service 3880ab
	sel->old_addr = addr.data[0];
Packit Service 3880ab
	sel->mask = htonl(~0u << (32 - addr.bitlen));
Packit Service 3880ab
Packit Service 3880ab
	NEXT_ARG();
Packit Service 3880ab
Packit Service 3880ab
	if (get_prefix_1(&addr, *argv, AF_INET))
Packit Service 3880ab
		goto bad_val;
Packit Service 3880ab
Packit Service 3880ab
	sel->new_addr = addr.data[0];
Packit Service 3880ab
Packit Service 3880ab
	argc--;
Packit Service 3880ab
	argv++;
Packit Service 3880ab
Packit Service 3880ab
	*argc_p = argc;
Packit Service 3880ab
	*argv_p = argv;
Packit Service 3880ab
	return 0;
Packit Service 3880ab
Packit Service 3880ab
bad_val:
Packit Service 3880ab
	return -1;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static int
Packit Service 3880ab
parse_nat(struct action_util *a, int *argc_p, char ***argv_p, int tca_id, struct nlmsghdr *n)
Packit Service 3880ab
{
Packit Service 3880ab
	struct tc_nat sel = {};
Packit Service 3880ab
Packit Service 3880ab
	int argc = *argc_p;
Packit Service 3880ab
	char **argv = *argv_p;
Packit Service 3880ab
	int ok = 0;
Packit Service 3880ab
	struct rtattr *tail;
Packit Service 3880ab
Packit Service 3880ab
	while (argc > 0) {
Packit Service 3880ab
		if (matches(*argv, "nat") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (parse_nat_args(&argc, &argv, &sel)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal nat construct (%s)\n",
Packit Service 3880ab
					*argv);
Packit Service 3880ab
				explain();
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
			ok++;
Packit Service 3880ab
			continue;
Packit Service 3880ab
		} else if (matches(*argv, "help") == 0) {
Packit Service 3880ab
			usage();
Packit Service 3880ab
		} else {
Packit Service 3880ab
			break;
Packit Service 3880ab
		}
Packit Service 3880ab
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	if (!ok) {
Packit Service 3880ab
		explain();
Packit Service 3880ab
		return -1;
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	parse_action_control_dflt(&argc, &argv, &sel.action, false, TC_ACT_OK);
Packit Service 3880ab
Packit Service 3880ab
	if (argc) {
Packit Service 3880ab
		if (matches(*argv, "index") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_u32(&sel.index, *argv, 10)) {
Packit Service 3880ab
				fprintf(stderr, "Nat: Illegal \"index\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
			argc--;
Packit Service 3880ab
			argv++;
Packit Service 3880ab
		}
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	tail = addattr_nest(n, MAX_MSG, tca_id);
Packit Service 3880ab
	addattr_l(n, MAX_MSG, TCA_NAT_PARMS, &sel, sizeof(sel));
Packit Service 3880ab
	addattr_nest_end(n, tail);
Packit Service 3880ab
Packit Service 3880ab
	*argc_p = argc;
Packit Service 3880ab
	*argv_p = argv;
Packit Service 3880ab
	return 0;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static int
Packit Service 3880ab
print_nat(struct action_util *au, FILE * f, struct rtattr *arg)
Packit Service 3880ab
{
Packit Service 3880ab
	struct tc_nat *sel;
Packit Service 3880ab
	struct rtattr *tb[TCA_NAT_MAX + 1];
Packit Service 3880ab
	SPRINT_BUF(buf1);
Packit Service 3880ab
	SPRINT_BUF(buf2);
Packit Service 3880ab
	int len;
Packit Service 3880ab
Packit Service 3880ab
	if (arg == NULL)
Packit Service 3880ab
		return -1;
Packit Service 3880ab
Packit Service 3880ab
	parse_rtattr_nested(tb, TCA_NAT_MAX, arg);
Packit Service 3880ab
Packit Service 3880ab
	if (tb[TCA_NAT_PARMS] == NULL) {
Packit Service 3880ab
		fprintf(stderr, "Missing nat parameters\n");
Packit Service 3880ab
		return -1;
Packit Service 3880ab
	}
Packit Service 3880ab
	sel = RTA_DATA(tb[TCA_NAT_PARMS]);
Packit Service 3880ab
Packit Service 3880ab
	len = ffs(sel->mask);
Packit Service 3880ab
	len = len ? 33 - len : 0;
Packit Service 3880ab
Packit Service 3880ab
	print_string(PRINT_ANY, "type", " %s ", "nat");
Packit Service 3880ab
	print_string(PRINT_ANY, "direction", "%s",
Packit Service 3880ab
		     sel->flags & TCA_NAT_FLAG_EGRESS ? "egress" : "ingress");
Packit Service 3880ab
Packit Service 3880ab
	snprintf(buf2, sizeof(buf2), "%s/%d",
Packit Service 3880ab
		 format_host_r(AF_INET, 4, &sel->old_addr, buf1, sizeof(buf1)),
Packit Service 3880ab
		 len);
Packit Service 3880ab
	print_string(PRINT_ANY, "old_addr", " %s", buf2);
Packit Service 3880ab
	print_string(PRINT_ANY, "new_addr", " %s",
Packit Service 3880ab
		     format_host_r(AF_INET, 4, &sel->new_addr, buf1, sizeof(buf1)));
Packit Service 3880ab
Packit Service 3880ab
	print_action_control(f, " ", sel->action, "");
Packit Service 3880ab
	print_nl();
Packit Service 3880ab
	print_uint(PRINT_ANY, "index", "\t index %u", sel->index);
Packit Service 3880ab
	print_int(PRINT_ANY, "ref", " ref %d", sel->refcnt);
Packit Service 3880ab
	print_int(PRINT_ANY, "bind", " bind %d", sel->bindcnt);
Packit Service 3880ab
Packit Service 3880ab
	if (show_stats) {
Packit Service 3880ab
		if (tb[TCA_NAT_TM]) {
Packit Service 3880ab
			struct tcf_t *tm = RTA_DATA(tb[TCA_NAT_TM]);
Packit Service 3880ab
Packit Service 3880ab
			print_tm(f, tm);
Packit Service 3880ab
		}
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	print_nl();
Packit Service 3880ab
Packit Service 3880ab
	return 0;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
struct action_util nat_action_util = {
Packit Service 3880ab
	.id = "nat",
Packit Service 3880ab
	.parse_aopt = parse_nat,
Packit Service 3880ab
	.print_aopt = print_nat,
Packit Service 3880ab
};