[net-next-2.6.git] / net / decnet / dn_rules.c


/*
 * DECnet       An implementation of the DECnet protocol suite for the LINUX
 *              operating system.  DECnet is implemented using the  BSD Socket
 *              interface as the means of communication with the user level.
 *
 *              DECnet Routing Forwarding Information Base (Rules)
 *
 * Author:      Steve Whitehouse <SteveW@ACM.org>
 *              Mostly copied from Alexey Kuznetsov's ipv4/fib_rules.c
 *
 *
 * Changes:
 *              Steve Whitehouse <steve@chygwyn.com>
 *              Updated for Thomas Graf's generic rules
 *
 */
#include <linux/net.h>
#include <linux/init.h>
#include <linux/netlink.h>
#include <linux/rtnetlink.h>
#include <linux/netdevice.h>
#include <linux/spinlock.h>
#include <linux/list.h>
#include <linux/rcupdate.h>
#include <net/neighbour.h>
#include <net/dst.h>
#include <net/flow.h>
#include <net/fib_rules.h>
#include <net/dn.h>
#include <net/dn_fib.h>
#include <net/dn_neigh.h>
#include <net/dn_dev.h>
#include <net/dn_route.h>

static struct fib_rules_ops dn_fib_rules_ops;

struct dn_fib_rule
{
	struct fib_rule		common;
	unsigned char		dst_len;
	unsigned char		src_len;
	__le16			src;
	__le16			srcmask;
	__le16			dst;
	__le16			dstmask;
	__le16			srcmap;
	u8			flags;
};

static struct dn_fib_rule default_rule = {
	.common = {
		.refcnt =		ATOMIC_INIT(2),
		.pref =			0x7fff,
		.table =		RT_TABLE_MAIN,
		.action =		FR_ACT_TO_TBL,
	},
};


int dn_fib_lookup(struct flowi *flp, struct dn_fib_res *res)
{
	struct fib_lookup_arg arg = {
		.result = res,
	};
	int err;

	err = fib_rules_lookup(&dn_fib_rules_ops, flp, 0, &arg);
	res->r = arg.rule;

	return err;
}

static int dn_fib_rule_action(struct fib_rule *rule, struct flowi *flp,
			      int flags, struct fib_lookup_arg *arg)
{
	int err = -EAGAIN;
	struct dn_fib_table *tbl;

	switch(rule->action) {
	case FR_ACT_TO_TBL:
		break;

	case FR_ACT_UNREACHABLE:
		err = -ENETUNREACH;
		goto errout;

	case FR_ACT_PROHIBIT:
		err = -EACCES;
		goto errout;

	case FR_ACT_BLACKHOLE:
	default:
		err = -EINVAL;
		goto errout;
	}

	tbl = dn_fib_get_table(rule->table, 0);
	if (tbl == NULL)
		goto errout;

	err = tbl->lookup(tbl, flp, (struct dn_fib_res *)arg->result);
	if (err > 0)
		err = -EAGAIN;
errout:
	return err;
}

static const struct nla_policy dn_fib_rule_policy[FRA_MAX+1] = {
	FRA_GENERIC_POLICY,
};

static int dn_fib_rule_match(struct fib_rule *rule, struct flowi *fl, int flags)
{
	struct dn_fib_rule *r = (struct dn_fib_rule *)rule;
	__le16 daddr = fl->fld_dst;
	__le16 saddr = fl->fld_src;

	if (((saddr ^ r->src) & r->srcmask) ||
	    ((daddr ^ r->dst) & r->dstmask))
		return 0;

	return 1;
}

static int dn_fib_rule_configure(struct fib_rule *rule, struct sk_buff *skb,
				 struct nlmsghdr *nlh, struct fib_rule_hdr *frh,
				 struct nlattr **tb)
{
	int err = -EINVAL;
	struct dn_fib_rule *r = (struct dn_fib_rule *)rule;

	if (frh->tos)
		goto  errout;

	if (rule->table == RT_TABLE_UNSPEC) {
		if (rule->action == FR_ACT_TO_TBL) {
			struct dn_fib_table *table;

			table = dn_fib_empty_table();
			if (table == NULL) {
				err = -ENOBUFS;
				goto errout;
			}

			rule->table = table->n;
		}
	}

	if (frh->src_len)
		r->src = nla_get_le16(tb[FRA_SRC]);

	if (frh->dst_len)
		r->dst = nla_get_le16(tb[FRA_DST]);

	r->src_len = frh->src_len;
	r->srcmask = dnet_make_mask(r->src_len);
	r->dst_len = frh->dst_len;
	r->dstmask = dnet_make_mask(r->dst_len);
	err = 0;
errout:
	return err;
}

static int dn_fib_rule_compare(struct fib_rule *rule, struct fib_rule_hdr *frh,
			       struct nlattr **tb)
{
	struct dn_fib_rule *r = (struct dn_fib_rule *)rule;

	if (frh->src_len && (r->src_len != frh->src_len))
		return 0;

	if (frh->dst_len && (r->dst_len != frh->dst_len))
		return 0;

	if (frh->src_len && (r->src != nla_get_le16(tb[FRA_SRC])))
		return 0;

	if (frh->dst_len && (r->dst != nla_get_le16(tb[FRA_DST])))
		return 0;

	return 1;
}

unsigned dnet_addr_type(__le16 addr)
{
	struct flowi fl = { .nl_u = { .dn_u = { .daddr = addr } } };
	struct dn_fib_res res;
	unsigned ret = RTN_UNICAST;
	struct dn_fib_table *tb = dn_fib_get_table(RT_TABLE_LOCAL, 0);

	res.r = NULL;

	if (tb) {
		if (!tb->lookup(tb, &fl, &res)) {
			ret = res.type;
			dn_fib_res_put(&res);
		}
	}
	return ret;
}

static int dn_fib_rule_fill(struct fib_rule *rule, struct sk_buff *skb,
			    struct nlmsghdr *nlh, struct fib_rule_hdr *frh)
{
	struct dn_fib_rule *r = (struct dn_fib_rule *)rule;

	frh->family = AF_DECnet;
	frh->dst_len = r->dst_len;
	frh->src_len = r->src_len;
	frh->tos = 0;

	if (r->dst_len)
		NLA_PUT_LE16(skb, FRA_DST, r->dst);
	if (r->src_len)
		NLA_PUT_LE16(skb, FRA_SRC, r->src);

	return 0;

nla_put_failure:
	return -ENOBUFS;
}

static u32 dn_fib_rule_default_pref(void)
{
	struct list_head *pos;
	struct fib_rule *rule;

	if (!list_empty(&dn_fib_rules_ops.rules_list)) {
		pos = dn_fib_rules_ops.rules_list.next;
		if (pos->next != &dn_fib_rules_ops.rules_list) {
			rule = list_entry(pos->next, struct fib_rule, list);
			if (rule->pref)
				return rule->pref - 1;
		}
	}

	return 0;
}

static void dn_fib_rule_flush_cache(void)
{
	dn_rt_cache_flush(-1);
}

static struct fib_rules_ops dn_fib_rules_ops = {
	.family		= AF_DECnet,
	.rule_size	= sizeof(struct dn_fib_rule),
	.addr_size	= sizeof(u16),
	.action		= dn_fib_rule_action,
	.match		= dn_fib_rule_match,
	.configure	= dn_fib_rule_configure,
	.compare	= dn_fib_rule_compare,
	.fill		= dn_fib_rule_fill,
	.default_pref	= dn_fib_rule_default_pref,
	.flush_cache	= dn_fib_rule_flush_cache,
	.nlgroup	= RTNLGRP_DECnet_RULE,
	.policy		= dn_fib_rule_policy,
	.rules_list	= LIST_HEAD_INIT(dn_fib_rules_ops.rules_list),
	.owner		= THIS_MODULE,
};

void __init dn_fib_rules_init(void)
{
	list_add_tail(&default_rule.common.list,
			&dn_fib_rules_ops.rules_list);
	fib_rules_register(&dn_fib_rules_ops);
}

void __exit dn_fib_rules_cleanup(void)
{
	fib_rules_unregister(&dn_fib_rules_ops);
}
Commit	Line	Data
1da177e4 LT	1
	2	/*
	3	* DECnet An implementation of the DECnet protocol suite for the LINUX
	4	* operating system. DECnet is implemented using the BSD Socket
	5	* interface as the means of communication with the user level.
	6	*
	7	* DECnet Routing Forwarding Information Base (Rules)
	8	*
	9	* Author: Steve Whitehouse <SteveW@ACM.org>
	10	* Mostly copied from Alexey Kuznetsov's ipv4/fib_rules.c
	11	*
	12	*
	13	* Changes:
a8731cbf SW	14	* Steve Whitehouse <steve@chygwyn.com>
a8731cbf SW	15	* Updated for Thomas Graf's generic rules
1da177e4 LT	16	*
1da177e4 LT	17	*/
1da177e4	18	#include <linux/net.h>
1da177e4	19	#include <linux/init.h>
1da177e4 LT	20	#include <linux/netlink.h>
1da177e4 LT	21	#include <linux/rtnetlink.h>
1da177e4	22	#include <linux/netdevice.h>
1da177e4	23	#include <linux/spinlock.h>
ecba320f SW	24	#include <linux/list.h>
ecba320f SW	25	#include <linux/rcupdate.h>
1da177e4 LT	26	#include <net/neighbour.h>
	27	#include <net/dst.h>
	28	#include <net/flow.h>
a8731cbf	29	#include <net/fib_rules.h>
1da177e4 LT	30	#include <net/dn.h>
	31	#include <net/dn_fib.h>
	32	#include <net/dn_neigh.h>
	33	#include <net/dn_dev.h>
73417f61	34	#include <net/dn_route.h>
1da177e4	35
a8731cbf SW	36	static struct fib_rules_ops dn_fib_rules_ops;
a8731cbf SW	37
1da177e4 LT	38	struct dn_fib_rule
1da177e4 LT	39	{
a8731cbf SW	40	struct fib_rule common;
	41	unsigned char dst_len;
	42	unsigned char src_len;
	43	__le16 src;
	44	__le16 srcmask;
	45	__le16 dst;
	46	__le16 dstmask;
	47	__le16 srcmap;
	48	u8 flags;
1da177e4 LT	49	};
	50
	51	static struct dn_fib_rule default_rule = {
a8731cbf SW	52	.common = {
	53	.refcnt = ATOMIC_INIT(2),
	54	.pref = 0x7fff,
	55	.table = RT_TABLE_MAIN,
	56	.action = FR_ACT_TO_TBL,
	57	},
1da177e4 LT	58	};
1da177e4 LT	59
1da177e4	60
a8731cbf	61	int dn_fib_lookup(struct flowi flp, struct dn_fib_res res)
1da177e4	62	{
a8731cbf SW	63	struct fib_lookup_arg arg = {
	64	.result = res,
	65	};
	66	int err;
	67
	68	err = fib_rules_lookup(&dn_fib_rules_ops, flp, 0, &arg);
	69	res->r = arg.rule;
1da177e4 LT	70
	71	return err;
	72	}
	73
2aa7f36c AB	74	static int dn_fib_rule_action(struct fib_rule rule, struct flowi flp,
2aa7f36c AB	75	int flags, struct fib_lookup_arg *arg)
ecba320f	76	{
a8731cbf SW	77	int err = -EAGAIN;
a8731cbf SW	78	struct dn_fib_table *tbl;
ecba320f	79
a8731cbf SW	80	switch(rule->action) {
	81	case FR_ACT_TO_TBL:
	82	break;
	83
	84	case FR_ACT_UNREACHABLE:
	85	err = -ENETUNREACH;
	86	goto errout;
	87
	88	case FR_ACT_PROHIBIT:
	89	err = -EACCES;
	90	goto errout;
	91
	92	case FR_ACT_BLACKHOLE:
	93	default:
	94	err = -EINVAL;
	95	goto errout;
1da177e4	96	}
a8731cbf SW	97
	98	tbl = dn_fib_get_table(rule->table, 0);
	99	if (tbl == NULL)
	100	goto errout;
	101
	102	err = tbl->lookup(tbl, flp, (struct dn_fib_res *)arg->result);
	103	if (err > 0)
	104	err = -EAGAIN;
	105	errout:
	106	return err;
1da177e4 LT	107	}
1da177e4 LT	108
ef7c79ed	109	static const struct nla_policy dn_fib_rule_policy[FRA_MAX+1] = {
1f6c9557	110	FRA_GENERIC_POLICY,
a8731cbf	111	};
1da177e4	112
a8731cbf	113	static int dn_fib_rule_match(struct fib_rule rule, struct flowi fl, int flags)
1da177e4	114	{
a8731cbf	115	struct dn_fib_rule r = (struct dn_fib_rule )rule;
375d9d71 SW	116	__le16 daddr = fl->fld_dst;
375d9d71 SW	117	__le16 saddr = fl->fld_src;
a8731cbf SW	118
	119	if (((saddr ^ r->src) & r->srcmask) \|\|
	120	((daddr ^ r->dst) & r->dstmask))
	121	return 0;
1da177e4	122
a8731cbf SW	123	return 1;
	124	}
	125
	126	static int dn_fib_rule_configure(struct fib_rule rule, struct sk_buff skb,
	127	struct nlmsghdr nlh, struct fib_rule_hdr frh,
	128	struct nlattr **tb)
	129	{
	130	int err = -EINVAL;
	131	struct dn_fib_rule r = (struct dn_fib_rule )rule;
	132
e1701c68	133	if (frh->tos)
a8731cbf SW	134	goto errout;
	135
	136	if (rule->table == RT_TABLE_UNSPEC) {
	137	if (rule->action == FR_ACT_TO_TBL) {
	138	struct dn_fib_table *table;
	139
	140	table = dn_fib_empty_table();
	141	if (table == NULL) {
	142	err = -ENOBUFS;
	143	goto errout;
	144	}
	145
	146	rule->table = table->n;
1da177e4 LT	147	}
	148	}
	149
e1701c68	150	if (frh->src_len)
2835fdfa	151	r->src = nla_get_le16(tb[FRA_SRC]);
ecba320f	152
e1701c68	153	if (frh->dst_len)
2835fdfa	154	r->dst = nla_get_le16(tb[FRA_DST]);
1da177e4	155
a8731cbf SW	156	r->src_len = frh->src_len;
	157	r->srcmask = dnet_make_mask(r->src_len);
	158	r->dst_len = frh->dst_len;
	159	r->dstmask = dnet_make_mask(r->dst_len);
	160	err = 0;
	161	errout:
	162	return err;
	163	}
1da177e4	164
a8731cbf SW	165	static int dn_fib_rule_compare(struct fib_rule rule, struct fib_rule_hdr frh,
a8731cbf SW	166	struct nlattr **tb)
1da177e4	167	{
a8731cbf SW	168	struct dn_fib_rule r = (struct dn_fib_rule )rule;
	169
	170	if (frh->src_len && (r->src_len != frh->src_len))
	171	return 0;
1da177e4	172
a8731cbf SW	173	if (frh->dst_len && (r->dst_len != frh->dst_len))
a8731cbf SW	174	return 0;
ecba320f	175
e1701c68	176	if (frh->src_len && (r->src != nla_get_le16(tb[FRA_SRC])))
a8731cbf SW	177	return 0;
a8731cbf SW	178
e1701c68	179	if (frh->dst_len && (r->dst != nla_get_le16(tb[FRA_DST])))
a8731cbf	180	return 0;
1da177e4	181
a8731cbf	182	return 1;
1da177e4 LT	183	}
1da177e4 LT	184
c4ea94ab	185	unsigned dnet_addr_type(__le16 addr)
1da177e4 LT	186	{
	187	struct flowi fl = { .nl_u = { .dn_u = { .daddr = addr } } };
	188	struct dn_fib_res res;
	189	unsigned ret = RTN_UNICAST;
abcab268	190	struct dn_fib_table *tb = dn_fib_get_table(RT_TABLE_LOCAL, 0);
1da177e4 LT	191
	192	res.r = NULL;
	193
	194	if (tb) {
	195	if (!tb->lookup(tb, &fl, &res)) {
	196	ret = res.type;
	197	dn_fib_res_put(&res);
	198	}
	199	}
	200	return ret;
	201	}
	202
a8731cbf SW	203	static int dn_fib_rule_fill(struct fib_rule rule, struct sk_buff skb,
a8731cbf SW	204	struct nlmsghdr nlh, struct fib_rule_hdr frh)
1da177e4	205	{
a8731cbf	206	struct dn_fib_rule r = (struct dn_fib_rule )rule;
1da177e4	207
a8731cbf SW	208	frh->family = AF_DECnet;
	209	frh->dst_len = r->dst_len;
	210	frh->src_len = r->src_len;
	211	frh->tos = 0;
1da177e4	212
a8731cbf	213	if (r->dst_len)
2835fdfa	214	NLA_PUT_LE16(skb, FRA_DST, r->dst);
a8731cbf	215	if (r->src_len)
2835fdfa	216	NLA_PUT_LE16(skb, FRA_SRC, r->src);
1da177e4	217
a8731cbf	218	return 0;
1da177e4	219
a8731cbf SW	220	nla_put_failure:
a8731cbf SW	221	return -ENOBUFS;
1da177e4 LT	222	}
1da177e4 LT	223
a8731cbf	224	static u32 dn_fib_rule_default_pref(void)
1da177e4	225	{
a8731cbf SW	226	struct list_head *pos;
	227	struct fib_rule *rule;
	228
76c72d4f DL	229	if (!list_empty(&dn_fib_rules_ops.rules_list)) {
	230	pos = dn_fib_rules_ops.rules_list.next;
	231	if (pos->next != &dn_fib_rules_ops.rules_list) {
a8731cbf SW	232	rule = list_entry(pos->next, struct fib_rule, list);
	233	if (rule->pref)
	234	return rule->pref - 1;
	235	}
1da177e4 LT	236	}
1da177e4 LT	237
a8731cbf	238	return 0;
1da177e4 LT	239	}
1da177e4 LT	240
73417f61 TG	241	static void dn_fib_rule_flush_cache(void)
73417f61 TG	242	{
4b19ca44	243	dn_rt_cache_flush(-1);
73417f61 TG	244	}
73417f61 TG	245
a8731cbf SW	246	static struct fib_rules_ops dn_fib_rules_ops = {
	247	.family = AF_DECnet,
	248	.rule_size = sizeof(struct dn_fib_rule),
e1701c68	249	.addr_size = sizeof(u16),
a8731cbf SW	250	.action = dn_fib_rule_action,
	251	.match = dn_fib_rule_match,
	252	.configure = dn_fib_rule_configure,
	253	.compare = dn_fib_rule_compare,
	254	.fill = dn_fib_rule_fill,
	255	.default_pref = dn_fib_rule_default_pref,
73417f61	256	.flush_cache = dn_fib_rule_flush_cache,
a8731cbf SW	257	.nlgroup = RTNLGRP_DECnet_RULE,
a8731cbf SW	258	.policy = dn_fib_rule_policy,
76c72d4f	259	.rules_list = LIST_HEAD_INIT(dn_fib_rules_ops.rules_list),
a8731cbf SW	260	.owner = THIS_MODULE,
	261	};
	262
1da177e4 LT	263	void __init dn_fib_rules_init(void)
1da177e4 LT	264	{
76c72d4f DL	265	list_add_tail(&default_rule.common.list,
76c72d4f DL	266	&dn_fib_rules_ops.rules_list);
a8731cbf	267	fib_rules_register(&dn_fib_rules_ops);
1da177e4 LT	268	}
	269
	270	void __exit dn_fib_rules_cleanup(void)
	271	{
a8731cbf	272	fib_rules_unregister(&dn_fib_rules_ops);
1da177e4 LT	273	}
	274
	275