]> git.ipfire.org Git - thirdparty/kernel/stable.git/blame - net/sched/cls_api.c
Merge branch 'netlink-extended-attribute-validation'
[thirdparty/kernel/stable.git] / net / sched / cls_api.c
CommitLineData
1da177e4
LT
1/*
2 * net/sched/cls_api.c Packet classifier API.
3 *
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.
8 *
9 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
10 *
11 * Changes:
12 *
13 * Eduardo J. Blanco <ejbs@netlabs.com.uy> :990222: kmod support
14 *
15 */
16
1da177e4
LT
17#include <linux/module.h>
18#include <linux/types.h>
19#include <linux/kernel.h>
1da177e4 20#include <linux/string.h>
1da177e4 21#include <linux/errno.h>
33a48927 22#include <linux/err.h>
1da177e4 23#include <linux/skbuff.h>
1da177e4
LT
24#include <linux/init.h>
25#include <linux/kmod.h>
5a0e3ad6 26#include <linux/slab.h>
48617387 27#include <linux/idr.h>
b854272b
DL
28#include <net/net_namespace.h>
29#include <net/sock.h>
dc5fc579 30#include <net/netlink.h>
1da177e4
LT
31#include <net/pkt_sched.h>
32#include <net/pkt_cls.h>
33
1da177e4 34/* The list of all installed classifier types */
36272874 35static LIST_HEAD(tcf_proto_base);
1da177e4
LT
36
37/* Protects list of registered TC modules. It is pure SMP lock. */
38static DEFINE_RWLOCK(cls_mod_lock);
39
40/* Find classifier type by string name */
41
f34e8bff 42static const struct tcf_proto_ops *__tcf_proto_lookup_ops(const char *kind)
1da177e4 43{
dcd76081 44 const struct tcf_proto_ops *t, *res = NULL;
1da177e4
LT
45
46 if (kind) {
47 read_lock(&cls_mod_lock);
36272874 48 list_for_each_entry(t, &tcf_proto_base, head) {
33a48927 49 if (strcmp(kind, t->kind) == 0) {
dcd76081
ED
50 if (try_module_get(t->owner))
51 res = t;
1da177e4
LT
52 break;
53 }
54 }
55 read_unlock(&cls_mod_lock);
56 }
dcd76081 57 return res;
1da177e4
LT
58}
59
f34e8bff
JP
60static const struct tcf_proto_ops *
61tcf_proto_lookup_ops(const char *kind, struct netlink_ext_ack *extack)
62{
63 const struct tcf_proto_ops *ops;
64
65 ops = __tcf_proto_lookup_ops(kind);
66 if (ops)
67 return ops;
68#ifdef CONFIG_MODULES
69 rtnl_unlock();
70 request_module("cls_%s", kind);
71 rtnl_lock();
72 ops = __tcf_proto_lookup_ops(kind);
73 /* We dropped the RTNL semaphore in order to perform
74 * the module load. So, even if we succeeded in loading
75 * the module we have to replay the request. We indicate
76 * this using -EAGAIN.
77 */
78 if (ops) {
79 module_put(ops->owner);
80 return ERR_PTR(-EAGAIN);
81 }
82#endif
83 NL_SET_ERR_MSG(extack, "TC classifier not found");
84 return ERR_PTR(-ENOENT);
85}
86
1da177e4
LT
87/* Register(unregister) new classifier type */
88
89int register_tcf_proto_ops(struct tcf_proto_ops *ops)
90{
36272874 91 struct tcf_proto_ops *t;
1da177e4
LT
92 int rc = -EEXIST;
93
94 write_lock(&cls_mod_lock);
36272874 95 list_for_each_entry(t, &tcf_proto_base, head)
1da177e4
LT
96 if (!strcmp(ops->kind, t->kind))
97 goto out;
98
36272874 99 list_add_tail(&ops->head, &tcf_proto_base);
1da177e4
LT
100 rc = 0;
101out:
102 write_unlock(&cls_mod_lock);
103 return rc;
104}
aa767bfe 105EXPORT_SYMBOL(register_tcf_proto_ops);
1da177e4 106
7aa0045d
CW
107static struct workqueue_struct *tc_filter_wq;
108
1da177e4
LT
109int unregister_tcf_proto_ops(struct tcf_proto_ops *ops)
110{
36272874 111 struct tcf_proto_ops *t;
1da177e4
LT
112 int rc = -ENOENT;
113
c78e1746
DB
114 /* Wait for outstanding call_rcu()s, if any, from a
115 * tcf_proto_ops's destroy() handler.
116 */
117 rcu_barrier();
7aa0045d 118 flush_workqueue(tc_filter_wq);
c78e1746 119
1da177e4 120 write_lock(&cls_mod_lock);
dcd76081
ED
121 list_for_each_entry(t, &tcf_proto_base, head) {
122 if (t == ops) {
123 list_del(&t->head);
124 rc = 0;
1da177e4 125 break;
dcd76081
ED
126 }
127 }
1da177e4
LT
128 write_unlock(&cls_mod_lock);
129 return rc;
130}
aa767bfe 131EXPORT_SYMBOL(unregister_tcf_proto_ops);
1da177e4 132
aaa908ff 133bool tcf_queue_work(struct rcu_work *rwork, work_func_t func)
7aa0045d 134{
aaa908ff
CW
135 INIT_RCU_WORK(rwork, func);
136 return queue_rcu_work(tc_filter_wq, rwork);
7aa0045d
CW
137}
138EXPORT_SYMBOL(tcf_queue_work);
139
1da177e4
LT
140/* Select new prio value from the range, managed by kernel. */
141
aa767bfe 142static inline u32 tcf_auto_prio(struct tcf_proto *tp)
1da177e4 143{
aa767bfe 144 u32 first = TC_H_MAKE(0xC0000000U, 0U);
1da177e4
LT
145
146 if (tp)
cc7ec456 147 first = tp->prio - 1;
1da177e4 148
7961973a 149 return TC_H_MAJ(first);
1da177e4
LT
150}
151
33a48927 152static struct tcf_proto *tcf_proto_create(const char *kind, u32 protocol,
c35a4acc
AA
153 u32 prio, struct tcf_chain *chain,
154 struct netlink_ext_ack *extack)
33a48927
JP
155{
156 struct tcf_proto *tp;
157 int err;
158
159 tp = kzalloc(sizeof(*tp), GFP_KERNEL);
160 if (!tp)
161 return ERR_PTR(-ENOBUFS);
162
f34e8bff
JP
163 tp->ops = tcf_proto_lookup_ops(kind, extack);
164 if (IS_ERR(tp->ops)) {
165 err = PTR_ERR(tp->ops);
d68d75fd 166 goto errout;
33a48927
JP
167 }
168 tp->classify = tp->ops->classify;
169 tp->protocol = protocol;
170 tp->prio = prio;
5bc17018 171 tp->chain = chain;
33a48927
JP
172
173 err = tp->ops->init(tp);
174 if (err) {
175 module_put(tp->ops->owner);
176 goto errout;
177 }
178 return tp;
179
180errout:
181 kfree(tp);
182 return ERR_PTR(err);
183}
184
715df5ec
JK
185static void tcf_proto_destroy(struct tcf_proto *tp,
186 struct netlink_ext_ack *extack)
cf1facda 187{
715df5ec 188 tp->ops->destroy(tp, extack);
763dbf63
WC
189 module_put(tp->ops->owner);
190 kfree_rcu(tp, rcu);
cf1facda
JP
191}
192
a9b19443
JP
193struct tcf_filter_chain_list_item {
194 struct list_head list;
195 tcf_chain_head_change_t *chain_head_change;
196 void *chain_head_change_priv;
197};
198
5bc17018
JP
199static struct tcf_chain *tcf_chain_create(struct tcf_block *block,
200 u32 chain_index)
2190d1d0 201{
5bc17018
JP
202 struct tcf_chain *chain;
203
204 chain = kzalloc(sizeof(*chain), GFP_KERNEL);
205 if (!chain)
206 return NULL;
207 list_add_tail(&chain->list, &block->chain_list);
208 chain->block = block;
209 chain->index = chain_index;
e2ef7544 210 chain->refcnt = 1;
f71e0ca4
JP
211 if (!chain->index)
212 block->chain0.chain = chain;
5bc17018 213 return chain;
2190d1d0
JP
214}
215
a9b19443
JP
216static void tcf_chain_head_change_item(struct tcf_filter_chain_list_item *item,
217 struct tcf_proto *tp_head)
218{
219 if (item->chain_head_change)
220 item->chain_head_change(tp_head, item->chain_head_change_priv);
221}
f71e0ca4
JP
222
223static void tcf_chain0_head_change(struct tcf_chain *chain,
224 struct tcf_proto *tp_head)
c7eb7d72 225{
a9b19443 226 struct tcf_filter_chain_list_item *item;
f71e0ca4 227 struct tcf_block *block = chain->block;
a9b19443 228
f71e0ca4
JP
229 if (chain->index)
230 return;
231 list_for_each_entry(item, &block->chain0.filter_chain_list, list)
a9b19443 232 tcf_chain_head_change_item(item, tp_head);
c7eb7d72
JP
233}
234
f93e1cdc
JP
235static void tcf_chain_destroy(struct tcf_chain *chain)
236{
efbf7897
CW
237 struct tcf_block *block = chain->block;
238
e2ef7544 239 list_del(&chain->list);
f71e0ca4
JP
240 if (!chain->index)
241 block->chain0.chain = NULL;
e2ef7544 242 kfree(chain);
cfebd7e2 243 if (list_empty(&block->chain_list) && !refcount_read(&block->refcnt))
0607e439 244 kfree_rcu(block, rcu);
e2ef7544 245}
744a4cf6 246
e2ef7544
CW
247static void tcf_chain_hold(struct tcf_chain *chain)
248{
249 ++chain->refcnt;
2190d1d0
JP
250}
251
3d32f4c5 252static bool tcf_chain_held_by_acts_only(struct tcf_chain *chain)
1f3ed383
JP
253{
254 /* In case all the references are action references, this
3d32f4c5 255 * chain should not be shown to the user.
1f3ed383
JP
256 */
257 return chain->refcnt == chain->action_refcnt;
258}
259
32a4f5ec
JP
260static struct tcf_chain *tcf_chain_lookup(struct tcf_block *block,
261 u32 chain_index)
5bc17018
JP
262{
263 struct tcf_chain *chain;
264
265 list_for_each_entry(chain, &block->chain_list, list) {
32a4f5ec 266 if (chain->index == chain_index)
e2ef7544 267 return chain;
32a4f5ec
JP
268 }
269 return NULL;
270}
271
272static int tc_chain_notify(struct tcf_chain *chain, struct sk_buff *oskb,
273 u32 seq, u16 flags, int event, bool unicast);
274
53681407
JP
275static struct tcf_chain *__tcf_chain_get(struct tcf_block *block,
276 u32 chain_index, bool create,
277 bool by_act)
32a4f5ec
JP
278{
279 struct tcf_chain *chain = tcf_chain_lookup(block, chain_index);
280
281 if (chain) {
282 tcf_chain_hold(chain);
53681407
JP
283 } else {
284 if (!create)
285 return NULL;
286 chain = tcf_chain_create(block, chain_index);
287 if (!chain)
288 return NULL;
5bc17018 289 }
80532384 290
53681407
JP
291 if (by_act)
292 ++chain->action_refcnt;
293
294 /* Send notification only in case we got the first
295 * non-action reference. Until then, the chain acts only as
296 * a placeholder for actions pointing to it and user ought
297 * not know about them.
298 */
299 if (chain->refcnt - chain->action_refcnt == 1 && !by_act)
300 tc_chain_notify(chain, NULL, 0, NLM_F_CREATE | NLM_F_EXCL,
301 RTM_NEWCHAIN, false);
302
32a4f5ec 303 return chain;
5bc17018 304}
53681407 305
290b1c8b
JP
306static struct tcf_chain *tcf_chain_get(struct tcf_block *block, u32 chain_index,
307 bool create)
53681407
JP
308{
309 return __tcf_chain_get(block, chain_index, create, false);
310}
5bc17018 311
1f3ed383
JP
312struct tcf_chain *tcf_chain_get_by_act(struct tcf_block *block, u32 chain_index)
313{
53681407 314 return __tcf_chain_get(block, chain_index, true, true);
1f3ed383
JP
315}
316EXPORT_SYMBOL(tcf_chain_get_by_act);
317
9f407f17
JP
318static void tc_chain_tmplt_del(struct tcf_chain *chain);
319
53681407 320static void __tcf_chain_put(struct tcf_chain *chain, bool by_act)
5bc17018 321{
53681407
JP
322 if (by_act)
323 chain->action_refcnt--;
324 chain->refcnt--;
325
326 /* The last dropped non-action reference will trigger notification. */
327 if (chain->refcnt - chain->action_refcnt == 0 && !by_act)
32a4f5ec 328 tc_chain_notify(chain, NULL, 0, 0, RTM_DELCHAIN, false);
53681407
JP
329
330 if (chain->refcnt == 0) {
9f407f17 331 tc_chain_tmplt_del(chain);
5bc17018 332 tcf_chain_destroy(chain);
32a4f5ec 333 }
5bc17018 334}
53681407 335
290b1c8b 336static void tcf_chain_put(struct tcf_chain *chain)
53681407
JP
337{
338 __tcf_chain_put(chain, false);
339}
5bc17018 340
1f3ed383
JP
341void tcf_chain_put_by_act(struct tcf_chain *chain)
342{
53681407 343 __tcf_chain_put(chain, true);
1f3ed383
JP
344}
345EXPORT_SYMBOL(tcf_chain_put_by_act);
346
32a4f5ec
JP
347static void tcf_chain_put_explicitly_created(struct tcf_chain *chain)
348{
349 if (chain->explicitly_created)
350 tcf_chain_put(chain);
351}
352
290b1c8b
JP
353static void tcf_chain_flush(struct tcf_chain *chain)
354{
355 struct tcf_proto *tp = rtnl_dereference(chain->filter_chain);
356
357 tcf_chain0_head_change(chain, NULL);
358 while (tp) {
359 RCU_INIT_POINTER(chain->filter_chain, tp->next);
360 tcf_proto_destroy(tp, NULL);
361 tp = rtnl_dereference(chain->filter_chain);
362 tcf_chain_put(chain);
363 }
364}
365
caa72601
JP
366static bool tcf_block_offload_in_use(struct tcf_block *block)
367{
368 return block->offloadcnt;
369}
370
371static int tcf_block_offload_cmd(struct tcf_block *block,
372 struct net_device *dev,
373 struct tcf_block_ext_info *ei,
60513bd8
JH
374 enum tc_block_command command,
375 struct netlink_ext_ack *extack)
8c4083b3 376{
8c4083b3
JP
377 struct tc_block_offload bo = {};
378
8c4083b3
JP
379 bo.command = command;
380 bo.binder_type = ei->binder_type;
381 bo.block = block;
60513bd8 382 bo.extack = extack;
caa72601 383 return dev->netdev_ops->ndo_setup_tc(dev, TC_SETUP_BLOCK, &bo);
8c4083b3
JP
384}
385
caa72601 386static int tcf_block_offload_bind(struct tcf_block *block, struct Qdisc *q,
60513bd8
JH
387 struct tcf_block_ext_info *ei,
388 struct netlink_ext_ack *extack)
8c4083b3 389{
caa72601
JP
390 struct net_device *dev = q->dev_queue->dev;
391 int err;
392
393 if (!dev->netdev_ops->ndo_setup_tc)
394 goto no_offload_dev_inc;
395
396 /* If tc offload feature is disabled and the block we try to bind
397 * to already has some offloaded filters, forbid to bind.
398 */
60513bd8
JH
399 if (!tc_can_offload(dev) && tcf_block_offload_in_use(block)) {
400 NL_SET_ERR_MSG(extack, "Bind to offloaded block failed as dev has offload disabled");
caa72601 401 return -EOPNOTSUPP;
60513bd8 402 }
caa72601 403
60513bd8 404 err = tcf_block_offload_cmd(block, dev, ei, TC_BLOCK_BIND, extack);
caa72601
JP
405 if (err == -EOPNOTSUPP)
406 goto no_offload_dev_inc;
407 return err;
408
409no_offload_dev_inc:
410 if (tcf_block_offload_in_use(block))
411 return -EOPNOTSUPP;
412 block->nooffloaddevcnt++;
413 return 0;
8c4083b3
JP
414}
415
416static void tcf_block_offload_unbind(struct tcf_block *block, struct Qdisc *q,
417 struct tcf_block_ext_info *ei)
418{
caa72601
JP
419 struct net_device *dev = q->dev_queue->dev;
420 int err;
421
422 if (!dev->netdev_ops->ndo_setup_tc)
423 goto no_offload_dev_dec;
60513bd8 424 err = tcf_block_offload_cmd(block, dev, ei, TC_BLOCK_UNBIND, NULL);
caa72601
JP
425 if (err == -EOPNOTSUPP)
426 goto no_offload_dev_dec;
427 return;
428
429no_offload_dev_dec:
430 WARN_ON(block->nooffloaddevcnt-- == 0);
8c4083b3
JP
431}
432
a9b19443 433static int
f71e0ca4
JP
434tcf_chain0_head_change_cb_add(struct tcf_block *block,
435 struct tcf_block_ext_info *ei,
436 struct netlink_ext_ack *extack)
a9b19443 437{
f71e0ca4 438 struct tcf_chain *chain0 = block->chain0.chain;
a9b19443
JP
439 struct tcf_filter_chain_list_item *item;
440
441 item = kmalloc(sizeof(*item), GFP_KERNEL);
442 if (!item) {
443 NL_SET_ERR_MSG(extack, "Memory allocation for head change callback item failed");
444 return -ENOMEM;
445 }
446 item->chain_head_change = ei->chain_head_change;
447 item->chain_head_change_priv = ei->chain_head_change_priv;
f71e0ca4
JP
448 if (chain0 && chain0->filter_chain)
449 tcf_chain_head_change_item(item, chain0->filter_chain);
450 list_add(&item->list, &block->chain0.filter_chain_list);
a9b19443
JP
451 return 0;
452}
453
454static void
f71e0ca4
JP
455tcf_chain0_head_change_cb_del(struct tcf_block *block,
456 struct tcf_block_ext_info *ei)
a9b19443 457{
f71e0ca4 458 struct tcf_chain *chain0 = block->chain0.chain;
a9b19443
JP
459 struct tcf_filter_chain_list_item *item;
460
f71e0ca4 461 list_for_each_entry(item, &block->chain0.filter_chain_list, list) {
a9b19443
JP
462 if ((!ei->chain_head_change && !ei->chain_head_change_priv) ||
463 (item->chain_head_change == ei->chain_head_change &&
464 item->chain_head_change_priv == ei->chain_head_change_priv)) {
f71e0ca4
JP
465 if (chain0)
466 tcf_chain_head_change_item(item, NULL);
a9b19443
JP
467 list_del(&item->list);
468 kfree(item);
469 return;
470 }
471 }
472 WARN_ON(1);
473}
474
48617387 475struct tcf_net {
ab281629 476 spinlock_t idr_lock; /* Protects idr */
48617387
JP
477 struct idr idr;
478};
479
480static unsigned int tcf_net_id;
481
482static int tcf_block_insert(struct tcf_block *block, struct net *net,
bb047ddd 483 struct netlink_ext_ack *extack)
a9b19443 484{
48617387 485 struct tcf_net *tn = net_generic(net, tcf_net_id);
ab281629
VB
486 int err;
487
488 idr_preload(GFP_KERNEL);
489 spin_lock(&tn->idr_lock);
490 err = idr_alloc_u32(&tn->idr, block, &block->index, block->index,
491 GFP_NOWAIT);
492 spin_unlock(&tn->idr_lock);
493 idr_preload_end();
48617387 494
ab281629 495 return err;
a9b19443
JP
496}
497
48617387
JP
498static void tcf_block_remove(struct tcf_block *block, struct net *net)
499{
500 struct tcf_net *tn = net_generic(net, tcf_net_id);
501
ab281629 502 spin_lock(&tn->idr_lock);
9c160941 503 idr_remove(&tn->idr, block->index);
ab281629 504 spin_unlock(&tn->idr_lock);
48617387
JP
505}
506
507static struct tcf_block *tcf_block_create(struct net *net, struct Qdisc *q,
bb047ddd 508 u32 block_index,
48617387 509 struct netlink_ext_ack *extack)
6529eaba 510{
48617387 511 struct tcf_block *block;
6529eaba 512
48617387 513 block = kzalloc(sizeof(*block), GFP_KERNEL);
8d1a77f9
AA
514 if (!block) {
515 NL_SET_ERR_MSG(extack, "Memory allocation for block failed");
48617387 516 return ERR_PTR(-ENOMEM);
8d1a77f9 517 }
5bc17018 518 INIT_LIST_HEAD(&block->chain_list);
acb67442 519 INIT_LIST_HEAD(&block->cb_list);
f36fe1c4 520 INIT_LIST_HEAD(&block->owner_list);
f71e0ca4 521 INIT_LIST_HEAD(&block->chain0.filter_chain_list);
acb67442 522
cfebd7e2 523 refcount_set(&block->refcnt, 1);
48617387 524 block->net = net;
bb047ddd
JP
525 block->index = block_index;
526
527 /* Don't store q pointer for blocks which are shared */
528 if (!tcf_block_shared(block))
529 block->q = q;
48617387 530 return block;
48617387
JP
531}
532
533static struct tcf_block *tcf_block_lookup(struct net *net, u32 block_index)
534{
535 struct tcf_net *tn = net_generic(net, tcf_net_id);
536
322d884b 537 return idr_find(&tn->idr, block_index);
48617387
JP
538}
539
0607e439
VB
540static struct tcf_block *tcf_block_refcnt_get(struct net *net, u32 block_index)
541{
542 struct tcf_block *block;
543
544 rcu_read_lock();
545 block = tcf_block_lookup(net, block_index);
546 if (block && !refcount_inc_not_zero(&block->refcnt))
547 block = NULL;
548 rcu_read_unlock();
549
550 return block;
551}
552
f0023436
VB
553static void tcf_block_flush_all_chains(struct tcf_block *block)
554{
555 struct tcf_chain *chain;
556
557 /* Hold a refcnt for all chains, so that they don't disappear
558 * while we are iterating.
559 */
560 list_for_each_entry(chain, &block->chain_list, list)
561 tcf_chain_hold(chain);
562
563 list_for_each_entry(chain, &block->chain_list, list)
564 tcf_chain_flush(chain);
565}
566
567static void tcf_block_put_all_chains(struct tcf_block *block)
568{
569 struct tcf_chain *chain, *tmp;
570
571 /* At this point, all the chains should have refcnt >= 1. */
572 list_for_each_entry_safe(chain, tmp, &block->chain_list, list) {
573 tcf_chain_put_explicitly_created(chain);
574 tcf_chain_put(chain);
575 }
576}
577
0607e439
VB
578static void __tcf_block_put(struct tcf_block *block, struct Qdisc *q,
579 struct tcf_block_ext_info *ei)
580{
581 if (refcount_dec_and_test(&block->refcnt)) {
582 /* Flushing/putting all chains will cause the block to be
583 * deallocated when last chain is freed. However, if chain_list
584 * is empty, block has to be manually deallocated. After block
585 * reference counter reached 0, it is no longer possible to
586 * increment it or add new chains to block.
587 */
588 bool free_block = list_empty(&block->chain_list);
589
590 if (tcf_block_shared(block))
591 tcf_block_remove(block, block->net);
592 if (!free_block)
593 tcf_block_flush_all_chains(block);
594
595 if (q)
596 tcf_block_offload_unbind(block, q, ei);
597
598 if (free_block)
599 kfree_rcu(block, rcu);
600 else
601 tcf_block_put_all_chains(block);
602 } else if (q) {
603 tcf_block_offload_unbind(block, q, ei);
604 }
605}
606
607static void tcf_block_refcnt_put(struct tcf_block *block)
608{
609 __tcf_block_put(block, NULL, NULL);
610}
611
c431f89b
VB
612/* Find tcf block.
613 * Set q, parent, cl when appropriate.
614 */
615
616static struct tcf_block *tcf_block_find(struct net *net, struct Qdisc **q,
617 u32 *parent, unsigned long *cl,
618 int ifindex, u32 block_index,
619 struct netlink_ext_ack *extack)
620{
621 struct tcf_block *block;
e368fdb6 622 int err = 0;
c431f89b
VB
623
624 if (ifindex == TCM_IFINDEX_MAGIC_BLOCK) {
787ce6d0 625 block = tcf_block_refcnt_get(net, block_index);
c431f89b
VB
626 if (!block) {
627 NL_SET_ERR_MSG(extack, "Block of given index was not found");
628 return ERR_PTR(-EINVAL);
629 }
630 } else {
631 const struct Qdisc_class_ops *cops;
632 struct net_device *dev;
633
e368fdb6
VB
634 rcu_read_lock();
635
c431f89b 636 /* Find link */
e368fdb6
VB
637 dev = dev_get_by_index_rcu(net, ifindex);
638 if (!dev) {
639 rcu_read_unlock();
c431f89b 640 return ERR_PTR(-ENODEV);
e368fdb6 641 }
c431f89b
VB
642
643 /* Find qdisc */
644 if (!*parent) {
645 *q = dev->qdisc;
646 *parent = (*q)->handle;
647 } else {
e368fdb6 648 *q = qdisc_lookup_rcu(dev, TC_H_MAJ(*parent));
c431f89b
VB
649 if (!*q) {
650 NL_SET_ERR_MSG(extack, "Parent Qdisc doesn't exists");
e368fdb6
VB
651 err = -EINVAL;
652 goto errout_rcu;
c431f89b
VB
653 }
654 }
655
e368fdb6
VB
656 *q = qdisc_refcount_inc_nz(*q);
657 if (!*q) {
658 NL_SET_ERR_MSG(extack, "Parent Qdisc doesn't exists");
659 err = -EINVAL;
660 goto errout_rcu;
661 }
662
c431f89b
VB
663 /* Is it classful? */
664 cops = (*q)->ops->cl_ops;
665 if (!cops) {
666 NL_SET_ERR_MSG(extack, "Qdisc not classful");
e368fdb6
VB
667 err = -EINVAL;
668 goto errout_rcu;
c431f89b
VB
669 }
670
671 if (!cops->tcf_block) {
672 NL_SET_ERR_MSG(extack, "Class doesn't support blocks");
e368fdb6
VB
673 err = -EOPNOTSUPP;
674 goto errout_rcu;
c431f89b
VB
675 }
676
e368fdb6
VB
677 /* At this point we know that qdisc is not noop_qdisc,
678 * which means that qdisc holds a reference to net_device
679 * and we hold a reference to qdisc, so it is safe to release
680 * rcu read lock.
681 */
682 rcu_read_unlock();
683
c431f89b
VB
684 /* Do we search for filter, attached to class? */
685 if (TC_H_MIN(*parent)) {
686 *cl = cops->find(*q, *parent);
687 if (*cl == 0) {
688 NL_SET_ERR_MSG(extack, "Specified class doesn't exist");
e368fdb6
VB
689 err = -ENOENT;
690 goto errout_qdisc;
c431f89b
VB
691 }
692 }
693
694 /* And the last stroke */
695 block = cops->tcf_block(*q, *cl, extack);
e368fdb6
VB
696 if (!block) {
697 err = -EINVAL;
698 goto errout_qdisc;
699 }
c431f89b
VB
700 if (tcf_block_shared(block)) {
701 NL_SET_ERR_MSG(extack, "This filter block is shared. Please use the block index to manipulate the filters");
e368fdb6
VB
702 err = -EOPNOTSUPP;
703 goto errout_qdisc;
c431f89b 704 }
787ce6d0
VB
705
706 /* Always take reference to block in order to support execution
707 * of rules update path of cls API without rtnl lock. Caller
708 * must release block when it is finished using it. 'if' block
709 * of this conditional obtain reference to block by calling
710 * tcf_block_refcnt_get().
711 */
712 refcount_inc(&block->refcnt);
c431f89b
VB
713 }
714
715 return block;
e368fdb6
VB
716
717errout_rcu:
718 rcu_read_unlock();
719errout_qdisc:
720 if (*q)
721 qdisc_put(*q);
722 return ERR_PTR(err);
723}
724
725static void tcf_block_release(struct Qdisc *q, struct tcf_block *block)
726{
787ce6d0
VB
727 if (!IS_ERR_OR_NULL(block))
728 tcf_block_refcnt_put(block);
729
e368fdb6
VB
730 if (q)
731 qdisc_put(q);
c431f89b
VB
732}
733
f36fe1c4
JP
734struct tcf_block_owner_item {
735 struct list_head list;
736 struct Qdisc *q;
737 enum tcf_block_binder_type binder_type;
738};
739
740static void
741tcf_block_owner_netif_keep_dst(struct tcf_block *block,
742 struct Qdisc *q,
743 enum tcf_block_binder_type binder_type)
744{
745 if (block->keep_dst &&
746 binder_type != TCF_BLOCK_BINDER_TYPE_CLSACT_INGRESS &&
747 binder_type != TCF_BLOCK_BINDER_TYPE_CLSACT_EGRESS)
748 netif_keep_dst(qdisc_dev(q));
749}
750
751void tcf_block_netif_keep_dst(struct tcf_block *block)
752{
753 struct tcf_block_owner_item *item;
754
755 block->keep_dst = true;
756 list_for_each_entry(item, &block->owner_list, list)
757 tcf_block_owner_netif_keep_dst(block, item->q,
758 item->binder_type);
759}
760EXPORT_SYMBOL(tcf_block_netif_keep_dst);
761
762static int tcf_block_owner_add(struct tcf_block *block,
763 struct Qdisc *q,
764 enum tcf_block_binder_type binder_type)
765{
766 struct tcf_block_owner_item *item;
767
768 item = kmalloc(sizeof(*item), GFP_KERNEL);
769 if (!item)
770 return -ENOMEM;
771 item->q = q;
772 item->binder_type = binder_type;
773 list_add(&item->list, &block->owner_list);
774 return 0;
775}
776
777static void tcf_block_owner_del(struct tcf_block *block,
778 struct Qdisc *q,
779 enum tcf_block_binder_type binder_type)
780{
781 struct tcf_block_owner_item *item;
782
783 list_for_each_entry(item, &block->owner_list, list) {
784 if (item->q == q && item->binder_type == binder_type) {
785 list_del(&item->list);
786 kfree(item);
787 return;
788 }
789 }
790 WARN_ON(1);
791}
792
48617387
JP
793int tcf_block_get_ext(struct tcf_block **p_block, struct Qdisc *q,
794 struct tcf_block_ext_info *ei,
795 struct netlink_ext_ack *extack)
796{
797 struct net *net = qdisc_net(q);
798 struct tcf_block *block = NULL;
48617387
JP
799 int err;
800
787ce6d0 801 if (ei->block_index)
48617387 802 /* block_index not 0 means the shared block is requested */
787ce6d0 803 block = tcf_block_refcnt_get(net, ei->block_index);
48617387
JP
804
805 if (!block) {
bb047ddd 806 block = tcf_block_create(net, q, ei->block_index, extack);
48617387
JP
807 if (IS_ERR(block))
808 return PTR_ERR(block);
bb047ddd
JP
809 if (tcf_block_shared(block)) {
810 err = tcf_block_insert(block, net, extack);
48617387
JP
811 if (err)
812 goto err_block_insert;
813 }
814 }
815
f36fe1c4
JP
816 err = tcf_block_owner_add(block, q, ei->binder_type);
817 if (err)
818 goto err_block_owner_add;
819
820 tcf_block_owner_netif_keep_dst(block, q, ei->binder_type);
821
f71e0ca4 822 err = tcf_chain0_head_change_cb_add(block, ei, extack);
a9b19443 823 if (err)
f71e0ca4 824 goto err_chain0_head_change_cb_add;
caa72601 825
60513bd8 826 err = tcf_block_offload_bind(block, q, ei, extack);
caa72601
JP
827 if (err)
828 goto err_block_offload_bind;
829
6529eaba
JP
830 *p_block = block;
831 return 0;
2190d1d0 832
caa72601 833err_block_offload_bind:
f71e0ca4
JP
834 tcf_chain0_head_change_cb_del(block, ei);
835err_chain0_head_change_cb_add:
f36fe1c4
JP
836 tcf_block_owner_del(block, q, ei->binder_type);
837err_block_owner_add:
48617387 838err_block_insert:
787ce6d0 839 tcf_block_refcnt_put(block);
2190d1d0 840 return err;
6529eaba 841}
8c4083b3
JP
842EXPORT_SYMBOL(tcf_block_get_ext);
843
c7eb7d72
JP
844static void tcf_chain_head_change_dflt(struct tcf_proto *tp_head, void *priv)
845{
846 struct tcf_proto __rcu **p_filter_chain = priv;
847
848 rcu_assign_pointer(*p_filter_chain, tp_head);
849}
850
8c4083b3 851int tcf_block_get(struct tcf_block **p_block,
8d1a77f9
AA
852 struct tcf_proto __rcu **p_filter_chain, struct Qdisc *q,
853 struct netlink_ext_ack *extack)
8c4083b3 854{
c7eb7d72
JP
855 struct tcf_block_ext_info ei = {
856 .chain_head_change = tcf_chain_head_change_dflt,
857 .chain_head_change_priv = p_filter_chain,
858 };
8c4083b3 859
c7eb7d72 860 WARN_ON(!p_filter_chain);
8d1a77f9 861 return tcf_block_get_ext(p_block, q, &ei, extack);
8c4083b3 862}
6529eaba
JP
863EXPORT_SYMBOL(tcf_block_get);
864
7aa0045d 865/* XXX: Standalone actions are not allowed to jump to any chain, and bound
a60b3f51 866 * actions should be all removed after flushing.
7aa0045d 867 */
c7eb7d72 868void tcf_block_put_ext(struct tcf_block *block, struct Qdisc *q,
e1ea2f98 869 struct tcf_block_ext_info *ei)
7aa0045d 870{
c30abd5e
DM
871 if (!block)
872 return;
f71e0ca4 873 tcf_chain0_head_change_cb_del(block, ei);
f36fe1c4 874 tcf_block_owner_del(block, q, ei->binder_type);
a60b3f51 875
0607e439 876 __tcf_block_put(block, q, ei);
6529eaba 877}
8c4083b3
JP
878EXPORT_SYMBOL(tcf_block_put_ext);
879
880void tcf_block_put(struct tcf_block *block)
881{
882 struct tcf_block_ext_info ei = {0, };
883
4853f128
JP
884 if (!block)
885 return;
c7eb7d72 886 tcf_block_put_ext(block, block->q, &ei);
8c4083b3 887}
e1ea2f98 888
6529eaba 889EXPORT_SYMBOL(tcf_block_put);
cf1facda 890
acb67442
JP
891struct tcf_block_cb {
892 struct list_head list;
893 tc_setup_cb_t *cb;
894 void *cb_ident;
895 void *cb_priv;
896 unsigned int refcnt;
897};
898
899void *tcf_block_cb_priv(struct tcf_block_cb *block_cb)
900{
901 return block_cb->cb_priv;
902}
903EXPORT_SYMBOL(tcf_block_cb_priv);
904
905struct tcf_block_cb *tcf_block_cb_lookup(struct tcf_block *block,
906 tc_setup_cb_t *cb, void *cb_ident)
907{ struct tcf_block_cb *block_cb;
908
909 list_for_each_entry(block_cb, &block->cb_list, list)
910 if (block_cb->cb == cb && block_cb->cb_ident == cb_ident)
911 return block_cb;
912 return NULL;
913}
914EXPORT_SYMBOL(tcf_block_cb_lookup);
915
916void tcf_block_cb_incref(struct tcf_block_cb *block_cb)
917{
918 block_cb->refcnt++;
919}
920EXPORT_SYMBOL(tcf_block_cb_incref);
921
922unsigned int tcf_block_cb_decref(struct tcf_block_cb *block_cb)
923{
924 return --block_cb->refcnt;
925}
926EXPORT_SYMBOL(tcf_block_cb_decref);
927
32636742
JH
928static int
929tcf_block_playback_offloads(struct tcf_block *block, tc_setup_cb_t *cb,
930 void *cb_priv, bool add, bool offload_in_use,
931 struct netlink_ext_ack *extack)
932{
933 struct tcf_chain *chain;
934 struct tcf_proto *tp;
935 int err;
936
937 list_for_each_entry(chain, &block->chain_list, list) {
938 for (tp = rtnl_dereference(chain->filter_chain); tp;
939 tp = rtnl_dereference(tp->next)) {
940 if (tp->ops->reoffload) {
941 err = tp->ops->reoffload(tp, add, cb, cb_priv,
942 extack);
943 if (err && add)
944 goto err_playback_remove;
945 } else if (add && offload_in_use) {
946 err = -EOPNOTSUPP;
947 NL_SET_ERR_MSG(extack, "Filter HW offload failed - classifier without re-offloading support");
948 goto err_playback_remove;
949 }
950 }
951 }
952
953 return 0;
954
955err_playback_remove:
956 tcf_block_playback_offloads(block, cb, cb_priv, false, offload_in_use,
957 extack);
958 return err;
959}
960
acb67442
JP
961struct tcf_block_cb *__tcf_block_cb_register(struct tcf_block *block,
962 tc_setup_cb_t *cb, void *cb_ident,
60513bd8
JH
963 void *cb_priv,
964 struct netlink_ext_ack *extack)
acb67442
JP
965{
966 struct tcf_block_cb *block_cb;
32636742 967 int err;
acb67442 968
32636742
JH
969 /* Replay any already present rules */
970 err = tcf_block_playback_offloads(block, cb, cb_priv, true,
971 tcf_block_offload_in_use(block),
972 extack);
973 if (err)
974 return ERR_PTR(err);
caa72601 975
acb67442
JP
976 block_cb = kzalloc(sizeof(*block_cb), GFP_KERNEL);
977 if (!block_cb)
caa72601 978 return ERR_PTR(-ENOMEM);
acb67442
JP
979 block_cb->cb = cb;
980 block_cb->cb_ident = cb_ident;
981 block_cb->cb_priv = cb_priv;
982 list_add(&block_cb->list, &block->cb_list);
983 return block_cb;
984}
985EXPORT_SYMBOL(__tcf_block_cb_register);
986
987int tcf_block_cb_register(struct tcf_block *block,
988 tc_setup_cb_t *cb, void *cb_ident,
60513bd8 989 void *cb_priv, struct netlink_ext_ack *extack)
acb67442
JP
990{
991 struct tcf_block_cb *block_cb;
992
60513bd8
JH
993 block_cb = __tcf_block_cb_register(block, cb, cb_ident, cb_priv,
994 extack);
baa2d2b1 995 return PTR_ERR_OR_ZERO(block_cb);
acb67442
JP
996}
997EXPORT_SYMBOL(tcf_block_cb_register);
998
32636742
JH
999void __tcf_block_cb_unregister(struct tcf_block *block,
1000 struct tcf_block_cb *block_cb)
acb67442 1001{
32636742
JH
1002 tcf_block_playback_offloads(block, block_cb->cb, block_cb->cb_priv,
1003 false, tcf_block_offload_in_use(block),
1004 NULL);
acb67442
JP
1005 list_del(&block_cb->list);
1006 kfree(block_cb);
1007}
1008EXPORT_SYMBOL(__tcf_block_cb_unregister);
1009
1010void tcf_block_cb_unregister(struct tcf_block *block,
1011 tc_setup_cb_t *cb, void *cb_ident)
1012{
1013 struct tcf_block_cb *block_cb;
1014
1015 block_cb = tcf_block_cb_lookup(block, cb, cb_ident);
1016 if (!block_cb)
1017 return;
32636742 1018 __tcf_block_cb_unregister(block, block_cb);
acb67442
JP
1019}
1020EXPORT_SYMBOL(tcf_block_cb_unregister);
1021
1022static int tcf_block_cb_call(struct tcf_block *block, enum tc_setup_type type,
1023 void *type_data, bool err_stop)
1024{
1025 struct tcf_block_cb *block_cb;
1026 int ok_count = 0;
1027 int err;
1028
9a99dc1c
DM
1029 /* Make sure all netdevs sharing this block are offload-capable. */
1030 if (block->nooffloaddevcnt && err_stop)
1031 return -EOPNOTSUPP;
1032
acb67442
JP
1033 list_for_each_entry(block_cb, &block->cb_list, list) {
1034 err = block_cb->cb(type, type_data, block_cb->cb_priv);
1035 if (err) {
1036 if (err_stop)
1037 return err;
1038 } else {
1039 ok_count++;
1040 }
1041 }
1042 return ok_count;
1043}
1044
87d83093
JP
1045/* Main classifier routine: scans classifier chain attached
1046 * to this qdisc, (optionally) tests for protocol and asks
1047 * specific classifiers.
1048 */
1049int tcf_classify(struct sk_buff *skb, const struct tcf_proto *tp,
1050 struct tcf_result *res, bool compat_mode)
1051{
1052 __be16 protocol = tc_skb_protocol(skb);
1053#ifdef CONFIG_NET_CLS_ACT
1054 const int max_reclassify_loop = 4;
ee538dce
JP
1055 const struct tcf_proto *orig_tp = tp;
1056 const struct tcf_proto *first_tp;
87d83093
JP
1057 int limit = 0;
1058
1059reclassify:
1060#endif
1061 for (; tp; tp = rcu_dereference_bh(tp->next)) {
1062 int err;
1063
1064 if (tp->protocol != protocol &&
1065 tp->protocol != htons(ETH_P_ALL))
1066 continue;
1067
1068 err = tp->classify(skb, tp, res);
1069#ifdef CONFIG_NET_CLS_ACT
db50514f 1070 if (unlikely(err == TC_ACT_RECLASSIFY && !compat_mode)) {
ee538dce 1071 first_tp = orig_tp;
87d83093 1072 goto reset;
db50514f 1073 } else if (unlikely(TC_ACT_EXT_CMP(err, TC_ACT_GOTO_CHAIN))) {
ee538dce 1074 first_tp = res->goto_tp;
db50514f
JP
1075 goto reset;
1076 }
87d83093
JP
1077#endif
1078 if (err >= 0)
1079 return err;
1080 }
1081
1082 return TC_ACT_UNSPEC; /* signal: continue lookup */
1083#ifdef CONFIG_NET_CLS_ACT
1084reset:
1085 if (unlikely(limit++ >= max_reclassify_loop)) {
9d3aaff3
JP
1086 net_notice_ratelimited("%u: reclassify loop, rule prio %u, protocol %02x\n",
1087 tp->chain->block->index,
1088 tp->prio & 0xffff,
87d83093
JP
1089 ntohs(tp->protocol));
1090 return TC_ACT_SHOT;
1091 }
1092
ee538dce 1093 tp = first_tp;
87d83093
JP
1094 protocol = tc_skb_protocol(skb);
1095 goto reclassify;
1096#endif
1097}
1098EXPORT_SYMBOL(tcf_classify);
1099
2190d1d0
JP
1100struct tcf_chain_info {
1101 struct tcf_proto __rcu **pprev;
1102 struct tcf_proto __rcu *next;
1103};
1104
1105static struct tcf_proto *tcf_chain_tp_prev(struct tcf_chain_info *chain_info)
1106{
1107 return rtnl_dereference(*chain_info->pprev);
1108}
1109
1110static void tcf_chain_tp_insert(struct tcf_chain *chain,
1111 struct tcf_chain_info *chain_info,
1112 struct tcf_proto *tp)
1113{
c7eb7d72 1114 if (*chain_info->pprev == chain->filter_chain)
f71e0ca4 1115 tcf_chain0_head_change(chain, tp);
2190d1d0
JP
1116 RCU_INIT_POINTER(tp->next, tcf_chain_tp_prev(chain_info));
1117 rcu_assign_pointer(*chain_info->pprev, tp);
e2ef7544 1118 tcf_chain_hold(chain);
2190d1d0
JP
1119}
1120
1121static void tcf_chain_tp_remove(struct tcf_chain *chain,
1122 struct tcf_chain_info *chain_info,
1123 struct tcf_proto *tp)
1124{
1125 struct tcf_proto *next = rtnl_dereference(chain_info->next);
1126
c7eb7d72 1127 if (tp == chain->filter_chain)
f71e0ca4 1128 tcf_chain0_head_change(chain, next);
2190d1d0 1129 RCU_INIT_POINTER(*chain_info->pprev, next);
e2ef7544 1130 tcf_chain_put(chain);
2190d1d0
JP
1131}
1132
1133static struct tcf_proto *tcf_chain_tp_find(struct tcf_chain *chain,
1134 struct tcf_chain_info *chain_info,
1135 u32 protocol, u32 prio,
1136 bool prio_allocate)
1137{
1138 struct tcf_proto **pprev;
1139 struct tcf_proto *tp;
1140
1141 /* Check the chain for existence of proto-tcf with this priority */
1142 for (pprev = &chain->filter_chain;
1143 (tp = rtnl_dereference(*pprev)); pprev = &tp->next) {
1144 if (tp->prio >= prio) {
1145 if (tp->prio == prio) {
1146 if (prio_allocate ||
1147 (tp->protocol != protocol && protocol))
1148 return ERR_PTR(-EINVAL);
1149 } else {
1150 tp = NULL;
1151 }
1152 break;
1153 }
1154 }
1155 chain_info->pprev = pprev;
1156 chain_info->next = tp ? tp->next : NULL;
1157 return tp;
1158}
1159
7120371c 1160static int tcf_fill_node(struct net *net, struct sk_buff *skb,
7960d1da
JP
1161 struct tcf_proto *tp, struct tcf_block *block,
1162 struct Qdisc *q, u32 parent, void *fh,
1163 u32 portid, u32 seq, u16 flags, int event)
7120371c
WC
1164{
1165 struct tcmsg *tcm;
1166 struct nlmsghdr *nlh;
1167 unsigned char *b = skb_tail_pointer(skb);
1168
1169 nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
1170 if (!nlh)
1171 goto out_nlmsg_trim;
1172 tcm = nlmsg_data(nlh);
1173 tcm->tcm_family = AF_UNSPEC;
1174 tcm->tcm__pad1 = 0;
1175 tcm->tcm__pad2 = 0;
7960d1da
JP
1176 if (q) {
1177 tcm->tcm_ifindex = qdisc_dev(q)->ifindex;
1178 tcm->tcm_parent = parent;
1179 } else {
1180 tcm->tcm_ifindex = TCM_IFINDEX_MAGIC_BLOCK;
1181 tcm->tcm_block_index = block->index;
1182 }
7120371c
WC
1183 tcm->tcm_info = TC_H_MAKE(tp->prio, tp->protocol);
1184 if (nla_put_string(skb, TCA_KIND, tp->ops->kind))
1185 goto nla_put_failure;
1186 if (nla_put_u32(skb, TCA_CHAIN, tp->chain->index))
1187 goto nla_put_failure;
1188 if (!fh) {
1189 tcm->tcm_handle = 0;
1190 } else {
1191 if (tp->ops->dump && tp->ops->dump(net, tp, fh, skb, tcm) < 0)
1192 goto nla_put_failure;
1193 }
1194 nlh->nlmsg_len = skb_tail_pointer(skb) - b;
1195 return skb->len;
1196
1197out_nlmsg_trim:
1198nla_put_failure:
1199 nlmsg_trim(skb, b);
1200 return -1;
1201}
1202
1203static int tfilter_notify(struct net *net, struct sk_buff *oskb,
1204 struct nlmsghdr *n, struct tcf_proto *tp,
7960d1da
JP
1205 struct tcf_block *block, struct Qdisc *q,
1206 u32 parent, void *fh, int event, bool unicast)
7120371c
WC
1207{
1208 struct sk_buff *skb;
1209 u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1210
1211 skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1212 if (!skb)
1213 return -ENOBUFS;
1214
7960d1da
JP
1215 if (tcf_fill_node(net, skb, tp, block, q, parent, fh, portid,
1216 n->nlmsg_seq, n->nlmsg_flags, event) <= 0) {
7120371c
WC
1217 kfree_skb(skb);
1218 return -EINVAL;
1219 }
1220
1221 if (unicast)
1222 return netlink_unicast(net->rtnl, skb, portid, MSG_DONTWAIT);
1223
1224 return rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1225 n->nlmsg_flags & NLM_F_ECHO);
1226}
1227
1228static int tfilter_del_notify(struct net *net, struct sk_buff *oskb,
1229 struct nlmsghdr *n, struct tcf_proto *tp,
7960d1da 1230 struct tcf_block *block, struct Qdisc *q,
c35a4acc
AA
1231 u32 parent, void *fh, bool unicast, bool *last,
1232 struct netlink_ext_ack *extack)
7120371c
WC
1233{
1234 struct sk_buff *skb;
1235 u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1236 int err;
1237
1238 skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1239 if (!skb)
1240 return -ENOBUFS;
1241
7960d1da
JP
1242 if (tcf_fill_node(net, skb, tp, block, q, parent, fh, portid,
1243 n->nlmsg_seq, n->nlmsg_flags, RTM_DELTFILTER) <= 0) {
c35a4acc 1244 NL_SET_ERR_MSG(extack, "Failed to build del event notification");
7120371c
WC
1245 kfree_skb(skb);
1246 return -EINVAL;
1247 }
1248
571acf21 1249 err = tp->ops->delete(tp, fh, last, extack);
7120371c
WC
1250 if (err) {
1251 kfree_skb(skb);
1252 return err;
1253 }
1254
1255 if (unicast)
1256 return netlink_unicast(net->rtnl, skb, portid, MSG_DONTWAIT);
1257
c35a4acc
AA
1258 err = rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1259 n->nlmsg_flags & NLM_F_ECHO);
1260 if (err < 0)
1261 NL_SET_ERR_MSG(extack, "Failed to send filter delete notification");
1262 return err;
7120371c
WC
1263}
1264
1265static void tfilter_notify_chain(struct net *net, struct sk_buff *oskb,
7960d1da
JP
1266 struct tcf_block *block, struct Qdisc *q,
1267 u32 parent, struct nlmsghdr *n,
7120371c
WC
1268 struct tcf_chain *chain, int event)
1269{
1270 struct tcf_proto *tp;
1271
1272 for (tp = rtnl_dereference(chain->filter_chain);
1273 tp; tp = rtnl_dereference(tp->next))
7960d1da 1274 tfilter_notify(net, oskb, n, tp, block,
53189183 1275 q, parent, NULL, event, false);
7120371c
WC
1276}
1277
c431f89b 1278static int tc_new_tfilter(struct sk_buff *skb, struct nlmsghdr *n,
c21ef3e3 1279 struct netlink_ext_ack *extack)
1da177e4 1280{
3b1e0a65 1281 struct net *net = sock_net(skb->sk);
add93b61 1282 struct nlattr *tca[TCA_MAX + 1];
1da177e4
LT
1283 struct tcmsg *t;
1284 u32 protocol;
1285 u32 prio;
9d36d9e5 1286 bool prio_allocate;
1da177e4 1287 u32 parent;
5bc17018 1288 u32 chain_index;
7960d1da 1289 struct Qdisc *q = NULL;
2190d1d0 1290 struct tcf_chain_info chain_info;
5bc17018 1291 struct tcf_chain *chain = NULL;
6529eaba 1292 struct tcf_block *block;
1da177e4 1293 struct tcf_proto *tp;
1da177e4 1294 unsigned long cl;
8113c095 1295 void *fh;
1da177e4 1296 int err;
628185cf 1297 int tp_created;
1da177e4 1298
c431f89b 1299 if (!netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
dfc47ef8 1300 return -EPERM;
de179c8c 1301
1da177e4 1302replay:
628185cf
DB
1303 tp_created = 0;
1304
c21ef3e3 1305 err = nlmsg_parse(n, sizeof(*t), tca, TCA_MAX, NULL, extack);
de179c8c
H
1306 if (err < 0)
1307 return err;
1308
942b8165 1309 t = nlmsg_data(n);
1da177e4
LT
1310 protocol = TC_H_MIN(t->tcm_info);
1311 prio = TC_H_MAJ(t->tcm_info);
9d36d9e5 1312 prio_allocate = false;
1da177e4
LT
1313 parent = t->tcm_parent;
1314 cl = 0;
1315
1316 if (prio == 0) {
c431f89b
VB
1317 /* If no priority is provided by the user,
1318 * we allocate one.
1319 */
1320 if (n->nlmsg_flags & NLM_F_CREATE) {
1321 prio = TC_H_MAKE(0x80000000U, 0U);
1322 prio_allocate = true;
1323 } else {
c35a4acc 1324 NL_SET_ERR_MSG(extack, "Invalid filter command with priority of zero");
1da177e4 1325 return -ENOENT;
ea7f8277 1326 }
1da177e4
LT
1327 }
1328
1329 /* Find head of filter chain. */
1330
c431f89b
VB
1331 block = tcf_block_find(net, &q, &parent, &cl,
1332 t->tcm_ifindex, t->tcm_block_index, extack);
1333 if (IS_ERR(block)) {
1334 err = PTR_ERR(block);
1335 goto errout;
6bb16e7a 1336 }
5bc17018
JP
1337
1338 chain_index = tca[TCA_CHAIN] ? nla_get_u32(tca[TCA_CHAIN]) : 0;
1339 if (chain_index > TC_ACT_EXT_VAL_MASK) {
c35a4acc 1340 NL_SET_ERR_MSG(extack, "Specified chain index exceeds upper limit");
5bc17018
JP
1341 err = -EINVAL;
1342 goto errout;
1343 }
c431f89b 1344 chain = tcf_chain_get(block, chain_index, true);
5bc17018 1345 if (!chain) {
d5ed72a5 1346 NL_SET_ERR_MSG(extack, "Cannot create specified filter chain");
c431f89b 1347 err = -ENOMEM;
ea7f8277
DB
1348 goto errout;
1349 }
1da177e4 1350
2190d1d0
JP
1351 tp = tcf_chain_tp_find(chain, &chain_info, protocol,
1352 prio, prio_allocate);
1353 if (IS_ERR(tp)) {
c35a4acc 1354 NL_SET_ERR_MSG(extack, "Filter with specified priority/protocol not found");
2190d1d0
JP
1355 err = PTR_ERR(tp);
1356 goto errout;
1da177e4
LT
1357 }
1358
1359 if (tp == NULL) {
1360 /* Proto-tcf does not exist, create new one */
1361
6bb16e7a 1362 if (tca[TCA_KIND] == NULL || !protocol) {
c35a4acc 1363 NL_SET_ERR_MSG(extack, "Filter kind and protocol must be specified");
6bb16e7a 1364 err = -EINVAL;
1da177e4 1365 goto errout;
6bb16e7a 1366 }
1da177e4 1367
c431f89b 1368 if (!(n->nlmsg_flags & NLM_F_CREATE)) {
c35a4acc 1369 NL_SET_ERR_MSG(extack, "Need both RTM_NEWTFILTER and NLM_F_CREATE to create a new filter");
6bb16e7a 1370 err = -ENOENT;
1da177e4 1371 goto errout;
6bb16e7a 1372 }
1da177e4 1373
9d36d9e5 1374 if (prio_allocate)
2190d1d0 1375 prio = tcf_auto_prio(tcf_chain_tp_prev(&chain_info));
1da177e4 1376
33a48927 1377 tp = tcf_proto_create(nla_data(tca[TCA_KIND]),
c35a4acc 1378 protocol, prio, chain, extack);
33a48927
JP
1379 if (IS_ERR(tp)) {
1380 err = PTR_ERR(tp);
1da177e4
LT
1381 goto errout;
1382 }
12186be7 1383 tp_created = 1;
6bb16e7a 1384 } else if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], tp->ops->kind)) {
c35a4acc 1385 NL_SET_ERR_MSG(extack, "Specified filter kind does not match existing one");
6bb16e7a 1386 err = -EINVAL;
1da177e4 1387 goto errout;
6bb16e7a 1388 }
1da177e4
LT
1389
1390 fh = tp->ops->get(tp, t->tcm_handle);
1391
8113c095 1392 if (!fh) {
c431f89b 1393 if (!(n->nlmsg_flags & NLM_F_CREATE)) {
c35a4acc 1394 NL_SET_ERR_MSG(extack, "Need both RTM_NEWTFILTER and NLM_F_CREATE to create a new filter");
6bb16e7a 1395 err = -ENOENT;
1da177e4 1396 goto errout;
6bb16e7a 1397 }
c431f89b
VB
1398 } else if (n->nlmsg_flags & NLM_F_EXCL) {
1399 NL_SET_ERR_MSG(extack, "Filter already exists");
1400 err = -EEXIST;
1401 goto errout;
1da177e4
LT
1402 }
1403
9f407f17
JP
1404 if (chain->tmplt_ops && chain->tmplt_ops != tp->ops) {
1405 NL_SET_ERR_MSG(extack, "Chain template is set to a different filter kind");
1406 err = -EINVAL;
1407 goto errout;
1408 }
1409
2f7ef2f8 1410 err = tp->ops->change(net, skb, tp, cl, t->tcm_handle, tca, &fh,
7306db38
AA
1411 n->nlmsg_flags & NLM_F_CREATE ? TCA_ACT_NOREPLACE : TCA_ACT_REPLACE,
1412 extack);
12186be7 1413 if (err == 0) {
2190d1d0
JP
1414 if (tp_created)
1415 tcf_chain_tp_insert(chain, &chain_info, tp);
7960d1da 1416 tfilter_notify(net, skb, n, tp, block, q, parent, fh,
a10fa201 1417 RTM_NEWTFILTER, false);
12186be7
MU
1418 } else {
1419 if (tp_created)
715df5ec 1420 tcf_proto_destroy(tp, NULL);
12186be7 1421 }
1da177e4
LT
1422
1423errout:
5bc17018
JP
1424 if (chain)
1425 tcf_chain_put(chain);
e368fdb6 1426 tcf_block_release(q, block);
1da177e4
LT
1427 if (err == -EAGAIN)
1428 /* Replay the request. */
1429 goto replay;
1430 return err;
1431}
1432
c431f89b
VB
1433static int tc_del_tfilter(struct sk_buff *skb, struct nlmsghdr *n,
1434 struct netlink_ext_ack *extack)
1435{
1436 struct net *net = sock_net(skb->sk);
1437 struct nlattr *tca[TCA_MAX + 1];
1438 struct tcmsg *t;
1439 u32 protocol;
1440 u32 prio;
1441 u32 parent;
1442 u32 chain_index;
1443 struct Qdisc *q = NULL;
1444 struct tcf_chain_info chain_info;
1445 struct tcf_chain *chain = NULL;
1446 struct tcf_block *block;
1447 struct tcf_proto *tp = NULL;
1448 unsigned long cl = 0;
1449 void *fh = NULL;
1450 int err;
1451
1452 if (!netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
1453 return -EPERM;
1454
1455 err = nlmsg_parse(n, sizeof(*t), tca, TCA_MAX, NULL, extack);
1456 if (err < 0)
1457 return err;
1458
1459 t = nlmsg_data(n);
1460 protocol = TC_H_MIN(t->tcm_info);
1461 prio = TC_H_MAJ(t->tcm_info);
1462 parent = t->tcm_parent;
1463
1464 if (prio == 0 && (protocol || t->tcm_handle || tca[TCA_KIND])) {
1465 NL_SET_ERR_MSG(extack, "Cannot flush filters with protocol, handle or kind set");
1466 return -ENOENT;
1467 }
1468
1469 /* Find head of filter chain. */
1470
1471 block = tcf_block_find(net, &q, &parent, &cl,
1472 t->tcm_ifindex, t->tcm_block_index, extack);
1473 if (IS_ERR(block)) {
1474 err = PTR_ERR(block);
1475 goto errout;
1476 }
1477
1478 chain_index = tca[TCA_CHAIN] ? nla_get_u32(tca[TCA_CHAIN]) : 0;
1479 if (chain_index > TC_ACT_EXT_VAL_MASK) {
1480 NL_SET_ERR_MSG(extack, "Specified chain index exceeds upper limit");
1481 err = -EINVAL;
1482 goto errout;
1483 }
1484 chain = tcf_chain_get(block, chain_index, false);
1485 if (!chain) {
5ca8a25c
JP
1486 /* User requested flush on non-existent chain. Nothing to do,
1487 * so just return success.
1488 */
1489 if (prio == 0) {
1490 err = 0;
1491 goto errout;
1492 }
c431f89b 1493 NL_SET_ERR_MSG(extack, "Cannot find specified filter chain");
b7b4247d 1494 err = -ENOENT;
c431f89b
VB
1495 goto errout;
1496 }
1497
1498 if (prio == 0) {
1499 tfilter_notify_chain(net, skb, block, q, parent, n,
1500 chain, RTM_DELTFILTER);
1501 tcf_chain_flush(chain);
1502 err = 0;
1503 goto errout;
1504 }
1505
1506 tp = tcf_chain_tp_find(chain, &chain_info, protocol,
1507 prio, false);
1508 if (!tp || IS_ERR(tp)) {
1509 NL_SET_ERR_MSG(extack, "Filter with specified priority/protocol not found");
0e399035 1510 err = tp ? PTR_ERR(tp) : -ENOENT;
c431f89b
VB
1511 goto errout;
1512 } else if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], tp->ops->kind)) {
1513 NL_SET_ERR_MSG(extack, "Specified filter kind does not match existing one");
1514 err = -EINVAL;
1515 goto errout;
1516 }
1517
1518 fh = tp->ops->get(tp, t->tcm_handle);
1519
1520 if (!fh) {
1521 if (t->tcm_handle == 0) {
1522 tcf_chain_tp_remove(chain, &chain_info, tp);
1523 tfilter_notify(net, skb, n, tp, block, q, parent, fh,
1524 RTM_DELTFILTER, false);
1525 tcf_proto_destroy(tp, extack);
1526 err = 0;
1527 } else {
1528 NL_SET_ERR_MSG(extack, "Specified filter handle not found");
1529 err = -ENOENT;
1530 }
1531 } else {
1532 bool last;
1533
1534 err = tfilter_del_notify(net, skb, n, tp, block,
1535 q, parent, fh, false, &last,
1536 extack);
1537 if (err)
1538 goto errout;
1539 if (last) {
1540 tcf_chain_tp_remove(chain, &chain_info, tp);
1541 tcf_proto_destroy(tp, extack);
1542 }
1543 }
1544
1545errout:
1546 if (chain)
1547 tcf_chain_put(chain);
e368fdb6 1548 tcf_block_release(q, block);
c431f89b
VB
1549 return err;
1550}
1551
1552static int tc_get_tfilter(struct sk_buff *skb, struct nlmsghdr *n,
1553 struct netlink_ext_ack *extack)
1554{
1555 struct net *net = sock_net(skb->sk);
1556 struct nlattr *tca[TCA_MAX + 1];
1557 struct tcmsg *t;
1558 u32 protocol;
1559 u32 prio;
1560 u32 parent;
1561 u32 chain_index;
1562 struct Qdisc *q = NULL;
1563 struct tcf_chain_info chain_info;
1564 struct tcf_chain *chain = NULL;
1565 struct tcf_block *block;
1566 struct tcf_proto *tp = NULL;
1567 unsigned long cl = 0;
1568 void *fh = NULL;
1569 int err;
1570
1571 err = nlmsg_parse(n, sizeof(*t), tca, TCA_MAX, NULL, extack);
1572 if (err < 0)
1573 return err;
1574
1575 t = nlmsg_data(n);
1576 protocol = TC_H_MIN(t->tcm_info);
1577 prio = TC_H_MAJ(t->tcm_info);
1578 parent = t->tcm_parent;
1579
1580 if (prio == 0) {
1581 NL_SET_ERR_MSG(extack, "Invalid filter command with priority of zero");
1582 return -ENOENT;
1583 }
1584
1585 /* Find head of filter chain. */
1586
1587 block = tcf_block_find(net, &q, &parent, &cl,
1588 t->tcm_ifindex, t->tcm_block_index, extack);
1589 if (IS_ERR(block)) {
1590 err = PTR_ERR(block);
1591 goto errout;
1592 }
1593
1594 chain_index = tca[TCA_CHAIN] ? nla_get_u32(tca[TCA_CHAIN]) : 0;
1595 if (chain_index > TC_ACT_EXT_VAL_MASK) {
1596 NL_SET_ERR_MSG(extack, "Specified chain index exceeds upper limit");
1597 err = -EINVAL;
1598 goto errout;
1599 }
1600 chain = tcf_chain_get(block, chain_index, false);
1601 if (!chain) {
1602 NL_SET_ERR_MSG(extack, "Cannot find specified filter chain");
1603 err = -EINVAL;
1604 goto errout;
1605 }
1606
1607 tp = tcf_chain_tp_find(chain, &chain_info, protocol,
1608 prio, false);
1609 if (!tp || IS_ERR(tp)) {
1610 NL_SET_ERR_MSG(extack, "Filter with specified priority/protocol not found");
0e399035 1611 err = tp ? PTR_ERR(tp) : -ENOENT;
c431f89b
VB
1612 goto errout;
1613 } else if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], tp->ops->kind)) {
1614 NL_SET_ERR_MSG(extack, "Specified filter kind does not match existing one");
1615 err = -EINVAL;
1616 goto errout;
1617 }
1618
1619 fh = tp->ops->get(tp, t->tcm_handle);
1620
1621 if (!fh) {
1622 NL_SET_ERR_MSG(extack, "Specified filter handle not found");
1623 err = -ENOENT;
1624 } else {
1625 err = tfilter_notify(net, skb, n, tp, block, q, parent,
1626 fh, RTM_NEWTFILTER, true);
1627 if (err < 0)
1628 NL_SET_ERR_MSG(extack, "Failed to send filter notify message");
1629 }
1630
1631errout:
1632 if (chain)
1633 tcf_chain_put(chain);
e368fdb6 1634 tcf_block_release(q, block);
c431f89b
VB
1635 return err;
1636}
1637
aa767bfe 1638struct tcf_dump_args {
1da177e4
LT
1639 struct tcf_walker w;
1640 struct sk_buff *skb;
1641 struct netlink_callback *cb;
7960d1da 1642 struct tcf_block *block;
a10fa201
JP
1643 struct Qdisc *q;
1644 u32 parent;
1da177e4
LT
1645};
1646
8113c095 1647static int tcf_node_dump(struct tcf_proto *tp, void *n, struct tcf_walker *arg)
1da177e4 1648{
aa767bfe 1649 struct tcf_dump_args *a = (void *)arg;
832d1d5b 1650 struct net *net = sock_net(a->skb->sk);
1da177e4 1651
7960d1da 1652 return tcf_fill_node(net, a->skb, tp, a->block, a->q, a->parent,
a10fa201 1653 n, NETLINK_CB(a->cb->skb).portid,
5a7a5555
JHS
1654 a->cb->nlh->nlmsg_seq, NLM_F_MULTI,
1655 RTM_NEWTFILTER);
1da177e4
LT
1656}
1657
a10fa201
JP
1658static bool tcf_chain_dump(struct tcf_chain *chain, struct Qdisc *q, u32 parent,
1659 struct sk_buff *skb, struct netlink_callback *cb,
acb31fae
JP
1660 long index_start, long *p_index)
1661{
1662 struct net *net = sock_net(skb->sk);
7960d1da 1663 struct tcf_block *block = chain->block;
acb31fae
JP
1664 struct tcmsg *tcm = nlmsg_data(cb->nlh);
1665 struct tcf_dump_args arg;
1666 struct tcf_proto *tp;
1667
1668 for (tp = rtnl_dereference(chain->filter_chain);
1669 tp; tp = rtnl_dereference(tp->next), (*p_index)++) {
1670 if (*p_index < index_start)
1671 continue;
1672 if (TC_H_MAJ(tcm->tcm_info) &&
1673 TC_H_MAJ(tcm->tcm_info) != tp->prio)
1674 continue;
1675 if (TC_H_MIN(tcm->tcm_info) &&
1676 TC_H_MIN(tcm->tcm_info) != tp->protocol)
1677 continue;
1678 if (*p_index > index_start)
1679 memset(&cb->args[1], 0,
1680 sizeof(cb->args) - sizeof(cb->args[0]));
1681 if (cb->args[1] == 0) {
53189183 1682 if (tcf_fill_node(net, skb, tp, block, q, parent, NULL,
acb31fae
JP
1683 NETLINK_CB(cb->skb).portid,
1684 cb->nlh->nlmsg_seq, NLM_F_MULTI,
1685 RTM_NEWTFILTER) <= 0)
5bc17018 1686 return false;
acb31fae
JP
1687
1688 cb->args[1] = 1;
1689 }
1690 if (!tp->ops->walk)
1691 continue;
1692 arg.w.fn = tcf_node_dump;
1693 arg.skb = skb;
1694 arg.cb = cb;
7960d1da 1695 arg.block = block;
a10fa201
JP
1696 arg.q = q;
1697 arg.parent = parent;
acb31fae
JP
1698 arg.w.stop = 0;
1699 arg.w.skip = cb->args[1] - 1;
1700 arg.w.count = 0;
01683a14 1701 arg.w.cookie = cb->args[2];
acb31fae 1702 tp->ops->walk(tp, &arg.w);
01683a14 1703 cb->args[2] = arg.w.cookie;
acb31fae
JP
1704 cb->args[1] = arg.w.count + 1;
1705 if (arg.w.stop)
5bc17018 1706 return false;
acb31fae 1707 }
5bc17018 1708 return true;
acb31fae
JP
1709}
1710
bd27a875 1711/* called with RTNL */
1da177e4
LT
1712static int tc_dump_tfilter(struct sk_buff *skb, struct netlink_callback *cb)
1713{
3b1e0a65 1714 struct net *net = sock_net(skb->sk);
5bc17018 1715 struct nlattr *tca[TCA_MAX + 1];
7960d1da 1716 struct Qdisc *q = NULL;
6529eaba 1717 struct tcf_block *block;
2190d1d0 1718 struct tcf_chain *chain;
942b8165 1719 struct tcmsg *tcm = nlmsg_data(cb->nlh);
acb31fae
JP
1720 long index_start;
1721 long index;
a10fa201 1722 u32 parent;
5bc17018 1723 int err;
1da177e4 1724
573ce260 1725 if (nlmsg_len(cb->nlh) < sizeof(*tcm))
1da177e4 1726 return skb->len;
5bc17018
JP
1727
1728 err = nlmsg_parse(cb->nlh, sizeof(*tcm), tca, TCA_MAX, NULL, NULL);
1729 if (err)
1730 return err;
1731
7960d1da 1732 if (tcm->tcm_ifindex == TCM_IFINDEX_MAGIC_BLOCK) {
787ce6d0 1733 block = tcf_block_refcnt_get(net, tcm->tcm_block_index);
7960d1da
JP
1734 if (!block)
1735 goto out;
d680b352
JP
1736 /* If we work with block index, q is NULL and parent value
1737 * will never be used in the following code. The check
1738 * in tcf_fill_node prevents it. However, compiler does not
1739 * see that far, so set parent to zero to silence the warning
1740 * about parent being uninitialized.
1741 */
1742 parent = 0;
a10fa201 1743 } else {
7960d1da
JP
1744 const struct Qdisc_class_ops *cops;
1745 struct net_device *dev;
1746 unsigned long cl = 0;
1747
1748 dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1749 if (!dev)
1750 return skb->len;
1751
1752 parent = tcm->tcm_parent;
1753 if (!parent) {
1754 q = dev->qdisc;
1755 parent = q->handle;
1756 } else {
1757 q = qdisc_lookup(dev, TC_H_MAJ(tcm->tcm_parent));
1758 }
1759 if (!q)
1760 goto out;
1761 cops = q->ops->cl_ops;
1762 if (!cops)
143976ce 1763 goto out;
7960d1da
JP
1764 if (!cops->tcf_block)
1765 goto out;
1766 if (TC_H_MIN(tcm->tcm_parent)) {
1767 cl = cops->find(q, tcm->tcm_parent);
1768 if (cl == 0)
1769 goto out;
1770 }
1771 block = cops->tcf_block(q, cl, NULL);
1772 if (!block)
1773 goto out;
1774 if (tcf_block_shared(block))
1775 q = NULL;
1da177e4 1776 }
1da177e4 1777
acb31fae
JP
1778 index_start = cb->args[0];
1779 index = 0;
5bc17018
JP
1780
1781 list_for_each_entry(chain, &block->chain_list, list) {
1782 if (tca[TCA_CHAIN] &&
1783 nla_get_u32(tca[TCA_CHAIN]) != chain->index)
1784 continue;
a10fa201 1785 if (!tcf_chain_dump(chain, q, parent, skb, cb,
5ae437ad
RK
1786 index_start, &index)) {
1787 err = -EMSGSIZE;
5bc17018 1788 break;
5ae437ad 1789 }
5bc17018
JP
1790 }
1791
787ce6d0
VB
1792 if (tcm->tcm_ifindex == TCM_IFINDEX_MAGIC_BLOCK)
1793 tcf_block_refcnt_put(block);
acb31fae 1794 cb->args[0] = index;
1da177e4 1795
1da177e4 1796out:
5ae437ad
RK
1797 /* If we did no progress, the error (EMSGSIZE) is real */
1798 if (skb->len == 0 && err)
1799 return err;
1da177e4
LT
1800 return skb->len;
1801}
1802
32a4f5ec
JP
1803static int tc_chain_fill_node(struct tcf_chain *chain, struct net *net,
1804 struct sk_buff *skb, struct tcf_block *block,
1805 u32 portid, u32 seq, u16 flags, int event)
1806{
1807 unsigned char *b = skb_tail_pointer(skb);
9f407f17 1808 const struct tcf_proto_ops *ops;
32a4f5ec
JP
1809 struct nlmsghdr *nlh;
1810 struct tcmsg *tcm;
9f407f17
JP
1811 void *priv;
1812
1813 ops = chain->tmplt_ops;
1814 priv = chain->tmplt_priv;
32a4f5ec
JP
1815
1816 nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
1817 if (!nlh)
1818 goto out_nlmsg_trim;
1819 tcm = nlmsg_data(nlh);
1820 tcm->tcm_family = AF_UNSPEC;
1821 tcm->tcm__pad1 = 0;
1822 tcm->tcm__pad2 = 0;
1823 tcm->tcm_handle = 0;
1824 if (block->q) {
1825 tcm->tcm_ifindex = qdisc_dev(block->q)->ifindex;
1826 tcm->tcm_parent = block->q->handle;
1827 } else {
1828 tcm->tcm_ifindex = TCM_IFINDEX_MAGIC_BLOCK;
1829 tcm->tcm_block_index = block->index;
1830 }
1831
1832 if (nla_put_u32(skb, TCA_CHAIN, chain->index))
1833 goto nla_put_failure;
1834
9f407f17
JP
1835 if (ops) {
1836 if (nla_put_string(skb, TCA_KIND, ops->kind))
1837 goto nla_put_failure;
1838 if (ops->tmplt_dump(skb, net, priv) < 0)
1839 goto nla_put_failure;
1840 }
1841
32a4f5ec
JP
1842 nlh->nlmsg_len = skb_tail_pointer(skb) - b;
1843 return skb->len;
1844
1845out_nlmsg_trim:
1846nla_put_failure:
1847 nlmsg_trim(skb, b);
1848 return -EMSGSIZE;
1849}
1850
1851static int tc_chain_notify(struct tcf_chain *chain, struct sk_buff *oskb,
1852 u32 seq, u16 flags, int event, bool unicast)
1853{
1854 u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1855 struct tcf_block *block = chain->block;
1856 struct net *net = block->net;
1857 struct sk_buff *skb;
1858
1859 skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1860 if (!skb)
1861 return -ENOBUFS;
1862
1863 if (tc_chain_fill_node(chain, net, skb, block, portid,
1864 seq, flags, event) <= 0) {
1865 kfree_skb(skb);
1866 return -EINVAL;
1867 }
1868
1869 if (unicast)
1870 return netlink_unicast(net->rtnl, skb, portid, MSG_DONTWAIT);
1871
1872 return rtnetlink_send(skb, net, portid, RTNLGRP_TC, flags & NLM_F_ECHO);
1873}
1874
9f407f17
JP
1875static int tc_chain_tmplt_add(struct tcf_chain *chain, struct net *net,
1876 struct nlattr **tca,
1877 struct netlink_ext_ack *extack)
1878{
1879 const struct tcf_proto_ops *ops;
1880 void *tmplt_priv;
1881
1882 /* If kind is not set, user did not specify template. */
1883 if (!tca[TCA_KIND])
1884 return 0;
1885
1886 ops = tcf_proto_lookup_ops(nla_data(tca[TCA_KIND]), extack);
1887 if (IS_ERR(ops))
1888 return PTR_ERR(ops);
1889 if (!ops->tmplt_create || !ops->tmplt_destroy || !ops->tmplt_dump) {
1890 NL_SET_ERR_MSG(extack, "Chain templates are not supported with specified classifier");
1891 return -EOPNOTSUPP;
1892 }
1893
1894 tmplt_priv = ops->tmplt_create(net, chain, tca, extack);
1895 if (IS_ERR(tmplt_priv)) {
1896 module_put(ops->owner);
1897 return PTR_ERR(tmplt_priv);
1898 }
1899 chain->tmplt_ops = ops;
1900 chain->tmplt_priv = tmplt_priv;
1901 return 0;
1902}
1903
1904static void tc_chain_tmplt_del(struct tcf_chain *chain)
1905{
1906 const struct tcf_proto_ops *ops = chain->tmplt_ops;
1907
1908 /* If template ops are set, no work to do for us. */
1909 if (!ops)
1910 return;
1911
1912 ops->tmplt_destroy(chain->tmplt_priv);
1913 module_put(ops->owner);
1914}
1915
32a4f5ec
JP
1916/* Add/delete/get a chain */
1917
1918static int tc_ctl_chain(struct sk_buff *skb, struct nlmsghdr *n,
1919 struct netlink_ext_ack *extack)
1920{
1921 struct net *net = sock_net(skb->sk);
1922 struct nlattr *tca[TCA_MAX + 1];
1923 struct tcmsg *t;
1924 u32 parent;
1925 u32 chain_index;
1926 struct Qdisc *q = NULL;
1927 struct tcf_chain *chain = NULL;
1928 struct tcf_block *block;
1929 unsigned long cl;
1930 int err;
1931
1932 if (n->nlmsg_type != RTM_GETCHAIN &&
1933 !netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
1934 return -EPERM;
1935
1936replay:
1937 err = nlmsg_parse(n, sizeof(*t), tca, TCA_MAX, NULL, extack);
1938 if (err < 0)
1939 return err;
1940
1941 t = nlmsg_data(n);
1942 parent = t->tcm_parent;
1943 cl = 0;
1944
1945 block = tcf_block_find(net, &q, &parent, &cl,
1946 t->tcm_ifindex, t->tcm_block_index, extack);
1947 if (IS_ERR(block))
1948 return PTR_ERR(block);
1949
1950 chain_index = tca[TCA_CHAIN] ? nla_get_u32(tca[TCA_CHAIN]) : 0;
1951 if (chain_index > TC_ACT_EXT_VAL_MASK) {
1952 NL_SET_ERR_MSG(extack, "Specified chain index exceeds upper limit");
e368fdb6
VB
1953 err = -EINVAL;
1954 goto errout_block;
32a4f5ec
JP
1955 }
1956 chain = tcf_chain_lookup(block, chain_index);
1957 if (n->nlmsg_type == RTM_NEWCHAIN) {
1958 if (chain) {
3d32f4c5 1959 if (tcf_chain_held_by_acts_only(chain)) {
1f3ed383 1960 /* The chain exists only because there is
3d32f4c5 1961 * some action referencing it.
1f3ed383
JP
1962 */
1963 tcf_chain_hold(chain);
1964 } else {
1965 NL_SET_ERR_MSG(extack, "Filter chain already exists");
e368fdb6
VB
1966 err = -EEXIST;
1967 goto errout_block;
1f3ed383
JP
1968 }
1969 } else {
1970 if (!(n->nlmsg_flags & NLM_F_CREATE)) {
1971 NL_SET_ERR_MSG(extack, "Need both RTM_NEWCHAIN and NLM_F_CREATE to create a new chain");
e368fdb6
VB
1972 err = -ENOENT;
1973 goto errout_block;
1f3ed383
JP
1974 }
1975 chain = tcf_chain_create(block, chain_index);
1976 if (!chain) {
1977 NL_SET_ERR_MSG(extack, "Failed to create filter chain");
e368fdb6
VB
1978 err = -ENOMEM;
1979 goto errout_block;
1f3ed383 1980 }
32a4f5ec
JP
1981 }
1982 } else {
3d32f4c5 1983 if (!chain || tcf_chain_held_by_acts_only(chain)) {
32a4f5ec 1984 NL_SET_ERR_MSG(extack, "Cannot find specified filter chain");
e368fdb6
VB
1985 err = -EINVAL;
1986 goto errout_block;
32a4f5ec
JP
1987 }
1988 tcf_chain_hold(chain);
1989 }
1990
1991 switch (n->nlmsg_type) {
1992 case RTM_NEWCHAIN:
9f407f17
JP
1993 err = tc_chain_tmplt_add(chain, net, tca, extack);
1994 if (err)
1995 goto errout;
32a4f5ec
JP
1996 /* In case the chain was successfully added, take a reference
1997 * to the chain. This ensures that an empty chain
1998 * does not disappear at the end of this function.
1999 */
2000 tcf_chain_hold(chain);
2001 chain->explicitly_created = true;
2002 tc_chain_notify(chain, NULL, 0, NLM_F_CREATE | NLM_F_EXCL,
2003 RTM_NEWCHAIN, false);
2004 break;
2005 case RTM_DELCHAIN:
f5b9bac7
CW
2006 tfilter_notify_chain(net, skb, block, q, parent, n,
2007 chain, RTM_DELTFILTER);
32a4f5ec
JP
2008 /* Flush the chain first as the user requested chain removal. */
2009 tcf_chain_flush(chain);
2010 /* In case the chain was successfully deleted, put a reference
2011 * to the chain previously taken during addition.
2012 */
2013 tcf_chain_put_explicitly_created(chain);
c921d7db 2014 chain->explicitly_created = false;
32a4f5ec
JP
2015 break;
2016 case RTM_GETCHAIN:
32a4f5ec
JP
2017 err = tc_chain_notify(chain, skb, n->nlmsg_seq,
2018 n->nlmsg_seq, n->nlmsg_type, true);
2019 if (err < 0)
2020 NL_SET_ERR_MSG(extack, "Failed to send chain notify message");
2021 break;
2022 default:
2023 err = -EOPNOTSUPP;
2024 NL_SET_ERR_MSG(extack, "Unsupported message type");
2025 goto errout;
2026 }
2027
2028errout:
2029 tcf_chain_put(chain);
e368fdb6
VB
2030errout_block:
2031 tcf_block_release(q, block);
32a4f5ec
JP
2032 if (err == -EAGAIN)
2033 /* Replay the request. */
2034 goto replay;
2035 return err;
2036}
2037
2038/* called with RTNL */
2039static int tc_dump_chain(struct sk_buff *skb, struct netlink_callback *cb)
2040{
2041 struct net *net = sock_net(skb->sk);
2042 struct nlattr *tca[TCA_MAX + 1];
2043 struct Qdisc *q = NULL;
2044 struct tcf_block *block;
2045 struct tcf_chain *chain;
2046 struct tcmsg *tcm = nlmsg_data(cb->nlh);
2047 long index_start;
2048 long index;
2049 u32 parent;
2050 int err;
2051
2052 if (nlmsg_len(cb->nlh) < sizeof(*tcm))
2053 return skb->len;
2054
2055 err = nlmsg_parse(cb->nlh, sizeof(*tcm), tca, TCA_MAX, NULL, NULL);
2056 if (err)
2057 return err;
2058
2059 if (tcm->tcm_ifindex == TCM_IFINDEX_MAGIC_BLOCK) {
787ce6d0 2060 block = tcf_block_refcnt_get(net, tcm->tcm_block_index);
32a4f5ec
JP
2061 if (!block)
2062 goto out;
2063 /* If we work with block index, q is NULL and parent value
2064 * will never be used in the following code. The check
2065 * in tcf_fill_node prevents it. However, compiler does not
2066 * see that far, so set parent to zero to silence the warning
2067 * about parent being uninitialized.
2068 */
2069 parent = 0;
2070 } else {
2071 const struct Qdisc_class_ops *cops;
2072 struct net_device *dev;
2073 unsigned long cl = 0;
2074
2075 dev = __dev_get_by_index(net, tcm->tcm_ifindex);
2076 if (!dev)
2077 return skb->len;
2078
2079 parent = tcm->tcm_parent;
2080 if (!parent) {
2081 q = dev->qdisc;
2082 parent = q->handle;
2083 } else {
2084 q = qdisc_lookup(dev, TC_H_MAJ(tcm->tcm_parent));
2085 }
2086 if (!q)
2087 goto out;
2088 cops = q->ops->cl_ops;
2089 if (!cops)
2090 goto out;
2091 if (!cops->tcf_block)
2092 goto out;
2093 if (TC_H_MIN(tcm->tcm_parent)) {
2094 cl = cops->find(q, tcm->tcm_parent);
2095 if (cl == 0)
2096 goto out;
2097 }
2098 block = cops->tcf_block(q, cl, NULL);
2099 if (!block)
2100 goto out;
2101 if (tcf_block_shared(block))
2102 q = NULL;
2103 }
2104
2105 index_start = cb->args[0];
2106 index = 0;
2107
2108 list_for_each_entry(chain, &block->chain_list, list) {
2109 if ((tca[TCA_CHAIN] &&
2110 nla_get_u32(tca[TCA_CHAIN]) != chain->index))
2111 continue;
2112 if (index < index_start) {
2113 index++;
2114 continue;
2115 }
3d32f4c5 2116 if (tcf_chain_held_by_acts_only(chain))
1f3ed383 2117 continue;
32a4f5ec
JP
2118 err = tc_chain_fill_node(chain, net, skb, block,
2119 NETLINK_CB(cb->skb).portid,
2120 cb->nlh->nlmsg_seq, NLM_F_MULTI,
2121 RTM_NEWCHAIN);
2122 if (err <= 0)
2123 break;
2124 index++;
2125 }
2126
787ce6d0
VB
2127 if (tcm->tcm_ifindex == TCM_IFINDEX_MAGIC_BLOCK)
2128 tcf_block_refcnt_put(block);
32a4f5ec
JP
2129 cb->args[0] = index;
2130
2131out:
2132 /* If we did no progress, the error (EMSGSIZE) is real */
2133 if (skb->len == 0 && err)
2134 return err;
2135 return skb->len;
2136}
2137
18d0264f 2138void tcf_exts_destroy(struct tcf_exts *exts)
1da177e4
LT
2139{
2140#ifdef CONFIG_NET_CLS_ACT
90b73b77 2141 tcf_action_destroy(exts->actions, TCA_ACT_UNBIND);
22dc13c8
WC
2142 kfree(exts->actions);
2143 exts->nr_actions = 0;
1da177e4
LT
2144#endif
2145}
aa767bfe 2146EXPORT_SYMBOL(tcf_exts_destroy);
1da177e4 2147
c1b52739 2148int tcf_exts_validate(struct net *net, struct tcf_proto *tp, struct nlattr **tb,
50a56190
AA
2149 struct nlattr *rate_tlv, struct tcf_exts *exts, bool ovr,
2150 struct netlink_ext_ack *extack)
1da177e4 2151{
1da177e4
LT
2152#ifdef CONFIG_NET_CLS_ACT
2153 {
1da177e4 2154 struct tc_action *act;
d04e6990 2155 size_t attr_size = 0;
1da177e4 2156
5da57f42 2157 if (exts->police && tb[exts->police]) {
9fb9f251
JP
2158 act = tcf_action_init_1(net, tp, tb[exts->police],
2159 rate_tlv, "police", ovr,
789871bb 2160 TCA_ACT_BIND, true, extack);
ab27cfb8
PM
2161 if (IS_ERR(act))
2162 return PTR_ERR(act);
1da177e4 2163
33be6271 2164 act->type = exts->type = TCA_OLD_COMPAT;
22dc13c8
WC
2165 exts->actions[0] = act;
2166 exts->nr_actions = 1;
5da57f42 2167 } else if (exts->action && tb[exts->action]) {
90b73b77 2168 int err;
22dc13c8 2169
9fb9f251
JP
2170 err = tcf_action_init(net, tp, tb[exts->action],
2171 rate_tlv, NULL, ovr, TCA_ACT_BIND,
90b73b77 2172 exts->actions, &attr_size, true,
789871bb 2173 extack);
90b73b77 2174 if (err < 0)
33be6271 2175 return err;
90b73b77 2176 exts->nr_actions = err;
1da177e4 2177 }
e4b95c41 2178 exts->net = net;
1da177e4 2179 }
1da177e4 2180#else
5da57f42 2181 if ((exts->action && tb[exts->action]) ||
50a56190
AA
2182 (exts->police && tb[exts->police])) {
2183 NL_SET_ERR_MSG(extack, "Classifier actions are not supported per compile options (CONFIG_NET_CLS_ACT)");
1da177e4 2184 return -EOPNOTSUPP;
50a56190 2185 }
1da177e4
LT
2186#endif
2187
2188 return 0;
2189}
aa767bfe 2190EXPORT_SYMBOL(tcf_exts_validate);
1da177e4 2191
9b0d4446 2192void tcf_exts_change(struct tcf_exts *dst, struct tcf_exts *src)
1da177e4
LT
2193{
2194#ifdef CONFIG_NET_CLS_ACT
22dc13c8
WC
2195 struct tcf_exts old = *dst;
2196
9b0d4446 2197 *dst = *src;
22dc13c8 2198 tcf_exts_destroy(&old);
1da177e4
LT
2199#endif
2200}
aa767bfe 2201EXPORT_SYMBOL(tcf_exts_change);
1da177e4 2202
22dc13c8
WC
2203#ifdef CONFIG_NET_CLS_ACT
2204static struct tc_action *tcf_exts_first_act(struct tcf_exts *exts)
2205{
2206 if (exts->nr_actions == 0)
2207 return NULL;
2208 else
2209 return exts->actions[0];
2210}
2211#endif
33be6271 2212
5da57f42 2213int tcf_exts_dump(struct sk_buff *skb, struct tcf_exts *exts)
1da177e4
LT
2214{
2215#ifdef CONFIG_NET_CLS_ACT
9cc63db5
CW
2216 struct nlattr *nest;
2217
978dfd8d 2218 if (exts->action && tcf_exts_has_actions(exts)) {
1da177e4
LT
2219 /*
2220 * again for backward compatible mode - we want
2221 * to work with both old and new modes of entering
2222 * tc data even if iproute2 was newer - jhs
2223 */
33be6271 2224 if (exts->type != TCA_OLD_COMPAT) {
5da57f42 2225 nest = nla_nest_start(skb, exts->action);
4b3550ef
PM
2226 if (nest == NULL)
2227 goto nla_put_failure;
22dc13c8 2228
90b73b77 2229 if (tcf_action_dump(skb, exts->actions, 0, 0) < 0)
add93b61 2230 goto nla_put_failure;
4b3550ef 2231 nla_nest_end(skb, nest);
5da57f42 2232 } else if (exts->police) {
33be6271 2233 struct tc_action *act = tcf_exts_first_act(exts);
5da57f42 2234 nest = nla_nest_start(skb, exts->police);
63acd680 2235 if (nest == NULL || !act)
4b3550ef 2236 goto nla_put_failure;
33be6271 2237 if (tcf_action_dump_old(skb, act, 0, 0) < 0)
add93b61 2238 goto nla_put_failure;
4b3550ef 2239 nla_nest_end(skb, nest);
1da177e4
LT
2240 }
2241 }
1da177e4 2242 return 0;
9cc63db5
CW
2243
2244nla_put_failure:
2245 nla_nest_cancel(skb, nest);
1da177e4 2246 return -1;
9cc63db5
CW
2247#else
2248 return 0;
2249#endif
1da177e4 2250}
aa767bfe 2251EXPORT_SYMBOL(tcf_exts_dump);
1da177e4 2252
aa767bfe 2253
5da57f42 2254int tcf_exts_dump_stats(struct sk_buff *skb, struct tcf_exts *exts)
1da177e4
LT
2255{
2256#ifdef CONFIG_NET_CLS_ACT
33be6271 2257 struct tc_action *a = tcf_exts_first_act(exts);
b057df24 2258 if (a != NULL && tcf_action_copy_stats(skb, a, 1) < 0)
33be6271 2259 return -1;
1da177e4
LT
2260#endif
2261 return 0;
1da177e4 2262}
aa767bfe 2263EXPORT_SYMBOL(tcf_exts_dump_stats);
1da177e4 2264
717503b9
JP
2265static int tc_exts_setup_cb_egdev_call(struct tcf_exts *exts,
2266 enum tc_setup_type type,
2267 void *type_data, bool err_stop)
b3f55bdd
JP
2268{
2269 int ok_count = 0;
2270#ifdef CONFIG_NET_CLS_ACT
2271 const struct tc_action *a;
2272 struct net_device *dev;
9d452ceb 2273 int i, ret;
b3f55bdd
JP
2274
2275 if (!tcf_exts_has_actions(exts))
2276 return 0;
2277
9d452ceb
OG
2278 for (i = 0; i < exts->nr_actions; i++) {
2279 a = exts->actions[i];
b3f55bdd
JP
2280 if (!a->ops->get_dev)
2281 continue;
2282 dev = a->ops->get_dev(a);
7612fb03 2283 if (!dev)
b3f55bdd
JP
2284 continue;
2285 ret = tc_setup_cb_egdev_call(dev, type, type_data, err_stop);
84a75b32 2286 a->ops->put_dev(dev);
b3f55bdd
JP
2287 if (ret < 0)
2288 return ret;
2289 ok_count += ret;
2290 }
2291#endif
2292 return ok_count;
2293}
717503b9 2294
208c0f4b
JP
2295int tc_setup_cb_call(struct tcf_block *block, struct tcf_exts *exts,
2296 enum tc_setup_type type, void *type_data, bool err_stop)
717503b9 2297{
9a99dc1c 2298 int ok_count;
208c0f4b
JP
2299 int ret;
2300
9a99dc1c
DM
2301 ret = tcf_block_cb_call(block, type, type_data, err_stop);
2302 if (ret < 0)
2303 return ret;
2304 ok_count = ret;
208c0f4b 2305
f8f4bef3 2306 if (!exts || ok_count)
9a99dc1c 2307 return ok_count;
208c0f4b
JP
2308 ret = tc_exts_setup_cb_egdev_call(exts, type, type_data, err_stop);
2309 if (ret < 0)
2310 return ret;
2311 ok_count += ret;
2312
2313 return ok_count;
717503b9
JP
2314}
2315EXPORT_SYMBOL(tc_setup_cb_call);
b3f55bdd 2316
48617387
JP
2317static __net_init int tcf_net_init(struct net *net)
2318{
2319 struct tcf_net *tn = net_generic(net, tcf_net_id);
2320
ab281629 2321 spin_lock_init(&tn->idr_lock);
48617387
JP
2322 idr_init(&tn->idr);
2323 return 0;
2324}
2325
2326static void __net_exit tcf_net_exit(struct net *net)
2327{
2328 struct tcf_net *tn = net_generic(net, tcf_net_id);
2329
2330 idr_destroy(&tn->idr);
2331}
2332
2333static struct pernet_operations tcf_net_ops = {
2334 .init = tcf_net_init,
2335 .exit = tcf_net_exit,
2336 .id = &tcf_net_id,
2337 .size = sizeof(struct tcf_net),
2338};
2339
1da177e4
LT
2340static int __init tc_filter_init(void)
2341{
48617387
JP
2342 int err;
2343
7aa0045d
CW
2344 tc_filter_wq = alloc_ordered_workqueue("tc_filter_workqueue", 0);
2345 if (!tc_filter_wq)
2346 return -ENOMEM;
2347
48617387
JP
2348 err = register_pernet_subsys(&tcf_net_ops);
2349 if (err)
2350 goto err_register_pernet_subsys;
2351
c431f89b
VB
2352 rtnl_register(PF_UNSPEC, RTM_NEWTFILTER, tc_new_tfilter, NULL, 0);
2353 rtnl_register(PF_UNSPEC, RTM_DELTFILTER, tc_del_tfilter, NULL, 0);
2354 rtnl_register(PF_UNSPEC, RTM_GETTFILTER, tc_get_tfilter,
b97bac64 2355 tc_dump_tfilter, 0);
32a4f5ec
JP
2356 rtnl_register(PF_UNSPEC, RTM_NEWCHAIN, tc_ctl_chain, NULL, 0);
2357 rtnl_register(PF_UNSPEC, RTM_DELCHAIN, tc_ctl_chain, NULL, 0);
2358 rtnl_register(PF_UNSPEC, RTM_GETCHAIN, tc_ctl_chain,
2359 tc_dump_chain, 0);
1da177e4 2360
1da177e4 2361 return 0;
48617387
JP
2362
2363err_register_pernet_subsys:
2364 destroy_workqueue(tc_filter_wq);
2365 return err;
1da177e4
LT
2366}
2367
2368subsys_initcall(tc_filter_init);