2 * net/sched/cls_fw.c Classifier mapping ipchains' fwmark to traffic class.
4 * This program is free software; you can redistribute 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.
9 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
12 * Karlis Peisenieks <karlis@mt.lv> : 990415 : fw_walk off by one
13 * Karlis Peisenieks <karlis@mt.lv> : 990415 : fw_delete killed all the filter (and kernel).
14 * Alex <alex@pilotsoft.com> : 2004xxyy: Added Action extension
16 * JHS: We should remove the CONFIG_NET_CLS_IND from here
17 * eventually when the meta match extension is made available
21 #include <linux/module.h>
22 #include <linux/slab.h>
23 #include <linux/types.h>
24 #include <linux/kernel.h>
25 #include <linux/string.h>
26 #include <linux/errno.h>
27 #include <linux/skbuff.h>
28 #include <net/netlink.h>
29 #include <net/act_api.h>
30 #include <net/pkt_cls.h>
36 struct fw_filter __rcu *ht[HTSIZE];
41 struct fw_filter __rcu *next;
43 struct tcf_result res;
44 #ifdef CONFIG_NET_CLS_IND
46 #endif /* CONFIG_NET_CLS_IND */
52 static u32 fw_hash(u32 handle)
54 handle ^= (handle >> 16);
55 handle ^= (handle >> 8);
56 return handle % HTSIZE;
59 static int fw_classify(struct sk_buff *skb, const struct tcf_proto *tp,
60 struct tcf_result *res)
62 struct fw_head *head = rcu_dereference_bh(tp->root);
70 for (f = rcu_dereference_bh(head->ht[fw_hash(id)]); f;
71 f = rcu_dereference_bh(f->next)) {
74 #ifdef CONFIG_NET_CLS_IND
75 if (!tcf_match_indev(skb, f->ifindex))
77 #endif /* CONFIG_NET_CLS_IND */
78 r = tcf_exts_exec(skb, &f->exts, res);
86 /* Old method: classify the packet using its skb mark. */
87 if (id && (TC_H_MAJ(id) == 0 ||
88 !(TC_H_MAJ(id ^ tp->q->handle)))) {
98 static unsigned long fw_get(struct tcf_proto *tp, u32 handle)
100 struct fw_head *head = rtnl_dereference(tp->root);
106 f = rtnl_dereference(head->ht[fw_hash(handle)]);
107 for (; f; f = rtnl_dereference(f->next)) {
109 return (unsigned long)f;
114 static int fw_init(struct tcf_proto *tp)
116 /* We don't allocate fw_head here, because in the old method
117 * we don't need it at all.
122 static void fw_delete_filter(struct rcu_head *head)
124 struct fw_filter *f = container_of(head, struct fw_filter, rcu);
126 tcf_exts_destroy(&f->exts);
130 static void fw_destroy(struct tcf_proto *tp)
132 struct fw_head *head = rtnl_dereference(tp->root);
139 for (h = 0; h < HTSIZE; h++) {
140 while ((f = rtnl_dereference(head->ht[h])) != NULL) {
141 RCU_INIT_POINTER(head->ht[h],
142 rtnl_dereference(f->next));
143 tcf_unbind_filter(tp, &f->res);
144 call_rcu(&f->rcu, fw_delete_filter);
147 kfree_rcu(head, rcu);
150 static int fw_delete(struct tcf_proto *tp, unsigned long arg, bool *last)
152 struct fw_head *head = rtnl_dereference(tp->root);
153 struct fw_filter *f = (struct fw_filter *)arg;
154 struct fw_filter __rcu **fp;
155 struct fw_filter *pfp;
159 if (head == NULL || f == NULL)
162 fp = &head->ht[fw_hash(f->id)];
164 for (pfp = rtnl_dereference(*fp); pfp;
165 fp = &pfp->next, pfp = rtnl_dereference(*fp)) {
167 RCU_INIT_POINTER(*fp, rtnl_dereference(f->next));
168 tcf_unbind_filter(tp, &f->res);
169 call_rcu(&f->rcu, fw_delete_filter);
176 for (h = 0; h < HTSIZE; h++) {
177 if (rcu_access_pointer(head->ht[h])) {
187 static const struct nla_policy fw_policy[TCA_FW_MAX + 1] = {
188 [TCA_FW_CLASSID] = { .type = NLA_U32 },
189 [TCA_FW_INDEV] = { .type = NLA_STRING, .len = IFNAMSIZ },
190 [TCA_FW_MASK] = { .type = NLA_U32 },
193 static int fw_set_parms(struct net *net, struct tcf_proto *tp,
194 struct fw_filter *f, struct nlattr **tb,
195 struct nlattr **tca, unsigned long base, bool ovr)
197 struct fw_head *head = rtnl_dereference(tp->root);
202 err = tcf_exts_init(&e, TCA_FW_ACT, TCA_FW_POLICE);
205 err = tcf_exts_validate(net, tp, tb, tca[TCA_RATE], &e, ovr);
209 if (tb[TCA_FW_CLASSID]) {
210 f->res.classid = nla_get_u32(tb[TCA_FW_CLASSID]);
211 tcf_bind_filter(tp, &f->res, base);
214 #ifdef CONFIG_NET_CLS_IND
215 if (tb[TCA_FW_INDEV]) {
217 ret = tcf_change_indev(net, tb[TCA_FW_INDEV]);
224 #endif /* CONFIG_NET_CLS_IND */
227 if (tb[TCA_FW_MASK]) {
228 mask = nla_get_u32(tb[TCA_FW_MASK]);
229 if (mask != head->mask)
231 } else if (head->mask != 0xFFFFFFFF)
234 tcf_exts_change(tp, &f->exts, &e);
238 tcf_exts_destroy(&e);
242 static int fw_change(struct net *net, struct sk_buff *in_skb,
243 struct tcf_proto *tp, unsigned long base,
244 u32 handle, struct nlattr **tca, unsigned long *arg,
247 struct fw_head *head = rtnl_dereference(tp->root);
248 struct fw_filter *f = (struct fw_filter *) *arg;
249 struct nlattr *opt = tca[TCA_OPTIONS];
250 struct nlattr *tb[TCA_FW_MAX + 1];
254 return handle ? -EINVAL : 0; /* Succeed if it is old method. */
256 err = nla_parse_nested(tb, TCA_FW_MAX, opt, fw_policy, NULL);
261 struct fw_filter *pfp, *fnew;
262 struct fw_filter __rcu **fp;
264 if (f->id != handle && handle)
267 fnew = kzalloc(sizeof(struct fw_filter), GFP_KERNEL);
273 #ifdef CONFIG_NET_CLS_IND
274 fnew->ifindex = f->ifindex;
275 #endif /* CONFIG_NET_CLS_IND */
278 err = tcf_exts_init(&fnew->exts, TCA_FW_ACT, TCA_FW_POLICE);
284 err = fw_set_parms(net, tp, fnew, tb, tca, base, ovr);
286 tcf_exts_destroy(&fnew->exts);
291 fp = &head->ht[fw_hash(fnew->id)];
292 for (pfp = rtnl_dereference(*fp); pfp;
293 fp = &pfp->next, pfp = rtnl_dereference(*fp))
297 RCU_INIT_POINTER(fnew->next, rtnl_dereference(pfp->next));
298 rcu_assign_pointer(*fp, fnew);
299 tcf_unbind_filter(tp, &f->res);
300 call_rcu(&f->rcu, fw_delete_filter);
302 *arg = (unsigned long)fnew;
310 u32 mask = 0xFFFFFFFF;
312 mask = nla_get_u32(tb[TCA_FW_MASK]);
314 head = kzalloc(sizeof(*head), GFP_KERNEL);
319 rcu_assign_pointer(tp->root, head);
322 f = kzalloc(sizeof(struct fw_filter), GFP_KERNEL);
326 err = tcf_exts_init(&f->exts, TCA_FW_ACT, TCA_FW_POLICE);
332 err = fw_set_parms(net, tp, f, tb, tca, base, ovr);
336 RCU_INIT_POINTER(f->next, head->ht[fw_hash(handle)]);
337 rcu_assign_pointer(head->ht[fw_hash(handle)], f);
339 *arg = (unsigned long)f;
343 tcf_exts_destroy(&f->exts);
348 static void fw_walk(struct tcf_proto *tp, struct tcf_walker *arg)
350 struct fw_head *head = rtnl_dereference(tp->root);
359 for (h = 0; h < HTSIZE; h++) {
362 for (f = rtnl_dereference(head->ht[h]); f;
363 f = rtnl_dereference(f->next)) {
364 if (arg->count < arg->skip) {
368 if (arg->fn(tp, (unsigned long)f, arg) < 0) {
377 static int fw_dump(struct net *net, struct tcf_proto *tp, unsigned long fh,
378 struct sk_buff *skb, struct tcmsg *t)
380 struct fw_head *head = rtnl_dereference(tp->root);
381 struct fw_filter *f = (struct fw_filter *)fh;
387 t->tcm_handle = f->id;
389 if (!f->res.classid && !tcf_exts_has_actions(&f->exts))
392 nest = nla_nest_start(skb, TCA_OPTIONS);
394 goto nla_put_failure;
396 if (f->res.classid &&
397 nla_put_u32(skb, TCA_FW_CLASSID, f->res.classid))
398 goto nla_put_failure;
399 #ifdef CONFIG_NET_CLS_IND
401 struct net_device *dev;
402 dev = __dev_get_by_index(net, f->ifindex);
403 if (dev && nla_put_string(skb, TCA_FW_INDEV, dev->name))
404 goto nla_put_failure;
406 #endif /* CONFIG_NET_CLS_IND */
407 if (head->mask != 0xFFFFFFFF &&
408 nla_put_u32(skb, TCA_FW_MASK, head->mask))
409 goto nla_put_failure;
411 if (tcf_exts_dump(skb, &f->exts) < 0)
412 goto nla_put_failure;
414 nla_nest_end(skb, nest);
416 if (tcf_exts_dump_stats(skb, &f->exts) < 0)
417 goto nla_put_failure;
422 nla_nest_cancel(skb, nest);
426 static struct tcf_proto_ops cls_fw_ops __read_mostly = {
428 .classify = fw_classify,
430 .destroy = fw_destroy,
436 .owner = THIS_MODULE,
439 static int __init init_fw(void)
441 return register_tcf_proto_ops(&cls_fw_ops);
444 static void __exit exit_fw(void)
446 unregister_tcf_proto_ops(&cls_fw_ops);
451 MODULE_LICENSE("GPL");