2 * net/sched/ife.c Inter-FE action based on ForCES WG InterFE LFB
5 * draft-ietf-forces-interfelfb-03
8 * "Distributing Linux Traffic Control Classifier-Action
10 * Authors: Jamal Hadi Salim and Damascene M. Joachimpillai
12 * This program is free software; you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License
14 * as published by the Free Software Foundation; either version
15 * 2 of the License, or (at your option) any later version.
17 * copyright Jamal Hadi Salim (2015)
21 #include <linux/types.h>
22 #include <linux/kernel.h>
23 #include <linux/string.h>
24 #include <linux/errno.h>
25 #include <linux/skbuff.h>
26 #include <linux/rtnetlink.h>
27 #include <linux/module.h>
28 #include <linux/init.h>
29 #include <net/net_namespace.h>
30 #include <net/netlink.h>
31 #include <net/pkt_sched.h>
32 #include <uapi/linux/tc_act/tc_ife.h>
33 #include <net/tc_act/tc_ife.h>
34 #include <linux/etherdevice.h>
37 static unsigned int ife_net_id
;
38 static int max_metacnt
= IFE_META_MAX
+ 1;
39 static struct tc_action_ops act_ife_ops
;
41 static const struct nla_policy ife_policy
[TCA_IFE_MAX
+ 1] = {
42 [TCA_IFE_PARMS
] = { .len
= sizeof(struct tc_ife
)},
43 [TCA_IFE_DMAC
] = { .len
= ETH_ALEN
},
44 [TCA_IFE_SMAC
] = { .len
= ETH_ALEN
},
45 [TCA_IFE_TYPE
] = { .type
= NLA_U16
},
48 int ife_encode_meta_u16(u16 metaval
, void *skbdata
, struct tcf_meta_info
*mi
)
53 edata
= *(u16
*)mi
->metaval
;
57 if (!edata
) /* will not encode */
61 return ife_tlv_meta_encode(skbdata
, mi
->metaid
, 2, &edata
);
63 EXPORT_SYMBOL_GPL(ife_encode_meta_u16
);
65 int ife_get_meta_u32(struct sk_buff
*skb
, struct tcf_meta_info
*mi
)
68 return nla_put_u32(skb
, mi
->metaid
, *(u32
*)mi
->metaval
);
70 return nla_put(skb
, mi
->metaid
, 0, NULL
);
72 EXPORT_SYMBOL_GPL(ife_get_meta_u32
);
74 int ife_check_meta_u32(u32 metaval
, struct tcf_meta_info
*mi
)
76 if (metaval
|| mi
->metaval
)
77 return 8; /* T+L+V == 2+2+4 */
81 EXPORT_SYMBOL_GPL(ife_check_meta_u32
);
83 int ife_check_meta_u16(u16 metaval
, struct tcf_meta_info
*mi
)
85 if (metaval
|| mi
->metaval
)
86 return 8; /* T+L+(V) == 2+2+(2+2bytepad) */
90 EXPORT_SYMBOL_GPL(ife_check_meta_u16
);
92 int ife_encode_meta_u32(u32 metaval
, void *skbdata
, struct tcf_meta_info
*mi
)
97 edata
= *(u32
*)mi
->metaval
;
101 if (!edata
) /* will not encode */
104 edata
= htonl(edata
);
105 return ife_tlv_meta_encode(skbdata
, mi
->metaid
, 4, &edata
);
107 EXPORT_SYMBOL_GPL(ife_encode_meta_u32
);
109 int ife_get_meta_u16(struct sk_buff
*skb
, struct tcf_meta_info
*mi
)
112 return nla_put_u16(skb
, mi
->metaid
, *(u16
*)mi
->metaval
);
114 return nla_put(skb
, mi
->metaid
, 0, NULL
);
116 EXPORT_SYMBOL_GPL(ife_get_meta_u16
);
118 int ife_alloc_meta_u32(struct tcf_meta_info
*mi
, void *metaval
, gfp_t gfp
)
120 mi
->metaval
= kmemdup(metaval
, sizeof(u32
), gfp
);
126 EXPORT_SYMBOL_GPL(ife_alloc_meta_u32
);
128 int ife_alloc_meta_u16(struct tcf_meta_info
*mi
, void *metaval
, gfp_t gfp
)
130 mi
->metaval
= kmemdup(metaval
, sizeof(u16
), gfp
);
136 EXPORT_SYMBOL_GPL(ife_alloc_meta_u16
);
138 void ife_release_meta_gen(struct tcf_meta_info
*mi
)
142 EXPORT_SYMBOL_GPL(ife_release_meta_gen
);
144 int ife_validate_meta_u32(void *val
, int len
)
146 if (len
== sizeof(u32
))
151 EXPORT_SYMBOL_GPL(ife_validate_meta_u32
);
153 int ife_validate_meta_u16(void *val
, int len
)
155 /* length will not include padding */
156 if (len
== sizeof(u16
))
161 EXPORT_SYMBOL_GPL(ife_validate_meta_u16
);
163 static LIST_HEAD(ifeoplist
);
164 static DEFINE_RWLOCK(ife_mod_lock
);
166 static struct tcf_meta_ops
*find_ife_oplist(u16 metaid
)
168 struct tcf_meta_ops
*o
;
170 read_lock(&ife_mod_lock
);
171 list_for_each_entry(o
, &ifeoplist
, list
) {
172 if (o
->metaid
== metaid
) {
173 if (!try_module_get(o
->owner
))
175 read_unlock(&ife_mod_lock
);
179 read_unlock(&ife_mod_lock
);
184 int register_ife_op(struct tcf_meta_ops
*mops
)
186 struct tcf_meta_ops
*m
;
188 if (!mops
->metaid
|| !mops
->metatype
|| !mops
->name
||
189 !mops
->check_presence
|| !mops
->encode
|| !mops
->decode
||
190 !mops
->get
|| !mops
->alloc
)
193 write_lock(&ife_mod_lock
);
195 list_for_each_entry(m
, &ifeoplist
, list
) {
196 if (m
->metaid
== mops
->metaid
||
197 (strcmp(mops
->name
, m
->name
) == 0)) {
198 write_unlock(&ife_mod_lock
);
204 mops
->release
= ife_release_meta_gen
;
206 list_add_tail(&mops
->list
, &ifeoplist
);
207 write_unlock(&ife_mod_lock
);
210 EXPORT_SYMBOL_GPL(unregister_ife_op
);
212 int unregister_ife_op(struct tcf_meta_ops
*mops
)
214 struct tcf_meta_ops
*m
;
217 write_lock(&ife_mod_lock
);
218 list_for_each_entry(m
, &ifeoplist
, list
) {
219 if (m
->metaid
== mops
->metaid
) {
220 list_del(&mops
->list
);
225 write_unlock(&ife_mod_lock
);
229 EXPORT_SYMBOL_GPL(register_ife_op
);
231 static int ife_validate_metatype(struct tcf_meta_ops
*ops
, void *val
, int len
)
234 /* XXX: unfortunately cant use nla_policy at this point
235 * because a length of 0 is valid in the case of
236 * "allow". "use" semantics do enforce for proper
237 * length and i couldve use nla_policy but it makes it hard
238 * to use it just for that..
241 return ops
->validate(val
, len
);
243 if (ops
->metatype
== NLA_U32
)
244 ret
= ife_validate_meta_u32(val
, len
);
245 else if (ops
->metatype
== NLA_U16
)
246 ret
= ife_validate_meta_u16(val
, len
);
251 #ifdef CONFIG_MODULES
252 static const char *ife_meta_id2name(u32 metaid
)
255 case IFE_META_SKBMARK
:
259 case IFE_META_TCINDEX
:
267 /* called when adding new meta information
268 * under ife->tcf_lock for existing action
270 static int load_metaops_and_vet(struct tcf_ife_info
*ife
, u32 metaid
,
271 void *val
, int len
, bool exists
)
273 struct tcf_meta_ops
*ops
= find_ife_oplist(metaid
);
278 #ifdef CONFIG_MODULES
280 spin_unlock_bh(&ife
->tcf_lock
);
282 request_module("ife-meta-%s", ife_meta_id2name(metaid
));
285 spin_lock_bh(&ife
->tcf_lock
);
286 ops
= find_ife_oplist(metaid
);
293 ret
= ife_validate_metatype(ops
, val
, len
);
295 module_put(ops
->owner
);
301 /* called when adding new meta information
302 * under ife->tcf_lock for existing action
304 static int add_metainfo(struct tcf_ife_info
*ife
, u32 metaid
, void *metaval
,
305 int len
, bool atomic
)
307 struct tcf_meta_info
*mi
= NULL
;
308 struct tcf_meta_ops
*ops
= find_ife_oplist(metaid
);
314 mi
= kzalloc(sizeof(*mi
), atomic
? GFP_ATOMIC
: GFP_KERNEL
);
316 /*put back what find_ife_oplist took */
317 module_put(ops
->owner
);
324 ret
= ops
->alloc(mi
, metaval
, atomic
? GFP_ATOMIC
: GFP_KERNEL
);
327 module_put(ops
->owner
);
332 list_add_tail(&mi
->metalist
, &ife
->metalist
);
337 static int use_all_metadata(struct tcf_ife_info
*ife
)
339 struct tcf_meta_ops
*o
;
343 read_lock(&ife_mod_lock
);
344 list_for_each_entry(o
, &ifeoplist
, list
) {
345 rc
= add_metainfo(ife
, o
->metaid
, NULL
, 0, true);
349 read_unlock(&ife_mod_lock
);
357 static int dump_metalist(struct sk_buff
*skb
, struct tcf_ife_info
*ife
)
359 struct tcf_meta_info
*e
;
361 unsigned char *b
= skb_tail_pointer(skb
);
362 int total_encoded
= 0;
364 /*can only happen on decode */
365 if (list_empty(&ife
->metalist
))
368 nest
= nla_nest_start(skb
, TCA_IFE_METALST
);
372 list_for_each_entry(e
, &ife
->metalist
, metalist
) {
373 if (!e
->ops
->get(skb
, e
))
380 nla_nest_end(skb
, nest
);
389 /* under ife->tcf_lock */
390 static void _tcf_ife_cleanup(struct tc_action
*a
, int bind
)
392 struct tcf_ife_info
*ife
= to_ife(a
);
393 struct tcf_meta_info
*e
, *n
;
395 list_for_each_entry_safe(e
, n
, &ife
->metalist
, metalist
) {
396 module_put(e
->ops
->owner
);
397 list_del(&e
->metalist
);
408 static void tcf_ife_cleanup(struct tc_action
*a
, int bind
)
410 struct tcf_ife_info
*ife
= to_ife(a
);
411 struct tcf_ife_params
*p
;
413 spin_lock_bh(&ife
->tcf_lock
);
414 _tcf_ife_cleanup(a
, bind
);
415 spin_unlock_bh(&ife
->tcf_lock
);
417 p
= rcu_dereference_protected(ife
->params
, 1);
421 /* under ife->tcf_lock for existing action */
422 static int populate_metalist(struct tcf_ife_info
*ife
, struct nlattr
**tb
,
430 for (i
= 1; i
< max_metacnt
; i
++) {
432 val
= nla_data(tb
[i
]);
433 len
= nla_len(tb
[i
]);
435 rc
= load_metaops_and_vet(ife
, i
, val
, len
, exists
);
439 rc
= add_metainfo(ife
, i
, val
, len
, exists
);
448 static int tcf_ife_init(struct net
*net
, struct nlattr
*nla
,
449 struct nlattr
*est
, struct tc_action
**a
,
452 struct tc_action_net
*tn
= net_generic(net
, ife_net_id
);
453 struct nlattr
*tb
[TCA_IFE_MAX
+ 1];
454 struct nlattr
*tb2
[IFE_META_MAX
+ 1];
455 struct tcf_ife_params
*p
, *p_old
;
456 struct tcf_ife_info
*ife
;
457 u16 ife_type
= ETH_P_IFE
;
465 err
= nla_parse_nested(tb
, TCA_IFE_MAX
, nla
, ife_policy
, NULL
);
469 if (!tb
[TCA_IFE_PARMS
])
472 parm
= nla_data(tb
[TCA_IFE_PARMS
]);
474 /* IFE_DECODE is 0 and indicates the opposite of IFE_ENCODE because
475 * they cannot run as the same time. Check on all other values which
476 * are not supported right now.
478 if (parm
->flags
& ~IFE_ENCODE
)
481 p
= kzalloc(sizeof(*p
), GFP_KERNEL
);
485 exists
= tcf_idr_check(tn
, parm
->index
, a
, bind
);
486 if (exists
&& bind
) {
492 ret
= tcf_idr_create(tn
, parm
->index
, est
, a
, &act_ife_ops
,
500 tcf_idr_release(*a
, bind
);
508 p
->flags
= parm
->flags
;
510 if (parm
->flags
& IFE_ENCODE
) {
511 if (tb
[TCA_IFE_TYPE
])
512 ife_type
= nla_get_u16(tb
[TCA_IFE_TYPE
]);
513 if (tb
[TCA_IFE_DMAC
])
514 daddr
= nla_data(tb
[TCA_IFE_DMAC
]);
515 if (tb
[TCA_IFE_SMAC
])
516 saddr
= nla_data(tb
[TCA_IFE_SMAC
]);
519 ife
->tcf_action
= parm
->action
;
521 if (parm
->flags
& IFE_ENCODE
) {
523 ether_addr_copy(p
->eth_dst
, daddr
);
525 eth_zero_addr(p
->eth_dst
);
528 ether_addr_copy(p
->eth_src
, saddr
);
530 eth_zero_addr(p
->eth_src
);
532 p
->eth_type
= ife_type
;
536 spin_lock_bh(&ife
->tcf_lock
);
538 if (ret
== ACT_P_CREATED
)
539 INIT_LIST_HEAD(&ife
->metalist
);
541 if (tb
[TCA_IFE_METALST
]) {
542 err
= nla_parse_nested(tb2
, IFE_META_MAX
, tb
[TCA_IFE_METALST
],
547 tcf_idr_release(*a
, bind
);
548 if (ret
== ACT_P_CREATED
)
549 _tcf_ife_cleanup(*a
, bind
);
552 spin_unlock_bh(&ife
->tcf_lock
);
557 err
= populate_metalist(ife
, tb2
, exists
);
559 goto metadata_parse_err
;
562 /* if no passed metadata allow list or passed allow-all
563 * then here we process by adding as many supported metadatum
564 * as we can. You better have at least one else we are
567 err
= use_all_metadata(ife
);
569 if (ret
== ACT_P_CREATED
)
570 _tcf_ife_cleanup(*a
, bind
);
573 spin_unlock_bh(&ife
->tcf_lock
);
580 spin_unlock_bh(&ife
->tcf_lock
);
582 p_old
= rtnl_dereference(ife
->params
);
583 rcu_assign_pointer(ife
->params
, p
);
585 kfree_rcu(p_old
, rcu
);
587 if (ret
== ACT_P_CREATED
)
588 tcf_idr_insert(tn
, *a
);
593 static int tcf_ife_dump(struct sk_buff
*skb
, struct tc_action
*a
, int bind
,
596 unsigned char *b
= skb_tail_pointer(skb
);
597 struct tcf_ife_info
*ife
= to_ife(a
);
598 struct tcf_ife_params
*p
= rtnl_dereference(ife
->params
);
599 struct tc_ife opt
= {
600 .index
= ife
->tcf_index
,
601 .refcnt
= ife
->tcf_refcnt
- ref
,
602 .bindcnt
= ife
->tcf_bindcnt
- bind
,
603 .action
= ife
->tcf_action
,
608 if (nla_put(skb
, TCA_IFE_PARMS
, sizeof(opt
), &opt
))
609 goto nla_put_failure
;
611 tcf_tm_dump(&t
, &ife
->tcf_tm
);
612 if (nla_put_64bit(skb
, TCA_IFE_TM
, sizeof(t
), &t
, TCA_IFE_PAD
))
613 goto nla_put_failure
;
615 if (!is_zero_ether_addr(p
->eth_dst
)) {
616 if (nla_put(skb
, TCA_IFE_DMAC
, ETH_ALEN
, p
->eth_dst
))
617 goto nla_put_failure
;
620 if (!is_zero_ether_addr(p
->eth_src
)) {
621 if (nla_put(skb
, TCA_IFE_SMAC
, ETH_ALEN
, p
->eth_src
))
622 goto nla_put_failure
;
625 if (nla_put(skb
, TCA_IFE_TYPE
, 2, &p
->eth_type
))
626 goto nla_put_failure
;
628 if (dump_metalist(skb
, ife
)) {
629 /*ignore failure to dump metalist */
630 pr_info("Failed to dump metalist\n");
640 static int find_decode_metaid(struct sk_buff
*skb
, struct tcf_ife_info
*ife
,
641 u16 metaid
, u16 mlen
, void *mdata
)
643 struct tcf_meta_info
*e
;
645 /* XXX: use hash to speed up */
646 list_for_each_entry(e
, &ife
->metalist
, metalist
) {
647 if (metaid
== e
->metaid
) {
649 /* We check for decode presence already */
650 return e
->ops
->decode(skb
, mdata
, mlen
);
658 static int tcf_ife_decode(struct sk_buff
*skb
, const struct tc_action
*a
,
659 struct tcf_result
*res
)
661 struct tcf_ife_info
*ife
= to_ife(a
);
662 int action
= ife
->tcf_action
;
667 bstats_cpu_update(this_cpu_ptr(ife
->common
.cpu_bstats
), skb
);
668 tcf_lastuse_update(&ife
->tcf_tm
);
670 if (skb_at_tc_ingress(skb
))
671 skb_push(skb
, skb
->dev
->hard_header_len
);
673 tlv_data
= ife_decode(skb
, &metalen
);
674 if (unlikely(!tlv_data
)) {
675 qstats_drop_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
679 ifehdr_end
= tlv_data
+ metalen
;
680 for (; tlv_data
< ifehdr_end
; tlv_data
= ife_tlv_meta_next(tlv_data
)) {
685 curr_data
= ife_tlv_meta_decode(tlv_data
, &mtype
, &dlen
, NULL
);
687 if (find_decode_metaid(skb
, ife
, mtype
, dlen
, curr_data
)) {
688 /* abuse overlimits to count when we receive metadata
689 * but dont have an ops for it
691 pr_info_ratelimited("Unknown metaid %d dlen %d\n",
693 qstats_overlimit_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
697 if (WARN_ON(tlv_data
!= ifehdr_end
)) {
698 qstats_drop_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
702 skb
->protocol
= eth_type_trans(skb
, skb
->dev
);
703 skb_reset_network_header(skb
);
708 /*XXX: check if we can do this at install time instead of current
711 static int ife_get_sz(struct sk_buff
*skb
, struct tcf_ife_info
*ife
)
713 struct tcf_meta_info
*e
, *n
;
714 int tot_run_sz
= 0, run_sz
= 0;
716 list_for_each_entry_safe(e
, n
, &ife
->metalist
, metalist
) {
717 if (e
->ops
->check_presence
) {
718 run_sz
= e
->ops
->check_presence(skb
, e
);
719 tot_run_sz
+= run_sz
;
726 static int tcf_ife_encode(struct sk_buff
*skb
, const struct tc_action
*a
,
727 struct tcf_result
*res
, struct tcf_ife_params
*p
)
729 struct tcf_ife_info
*ife
= to_ife(a
);
730 int action
= ife
->tcf_action
;
731 struct ethhdr
*oethh
; /* outer ether header */
732 struct tcf_meta_info
*e
;
734 OUTERHDR:TOTMETALEN:{TLVHDR:Metadatum:TLVHDR..}:ORIGDATA
735 where ORIGDATA = original ethernet header ...
737 u16 metalen
= ife_get_sz(skb
, ife
);
738 int hdrm
= metalen
+ skb
->dev
->hard_header_len
+ IFE_METAHDRLEN
;
739 unsigned int skboff
= 0;
740 int new_len
= skb
->len
+ hdrm
;
741 bool exceed_mtu
= false;
745 if (!skb_at_tc_ingress(skb
)) {
746 if (new_len
> skb
->dev
->mtu
)
750 bstats_cpu_update(this_cpu_ptr(ife
->common
.cpu_bstats
), skb
);
751 tcf_lastuse_update(&ife
->tcf_tm
);
753 if (!metalen
) { /* no metadata to send */
754 /* abuse overlimits to count when we allow packet
757 qstats_overlimit_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
760 /* could be stupid policy setup or mtu config
761 * so lets be conservative.. */
762 if ((action
== TC_ACT_SHOT
) || exceed_mtu
) {
763 qstats_drop_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
767 if (skb_at_tc_ingress(skb
))
768 skb_push(skb
, skb
->dev
->hard_header_len
);
770 ife_meta
= ife_encode(skb
, metalen
);
772 spin_lock(&ife
->tcf_lock
);
774 /* XXX: we dont have a clever way of telling encode to
775 * not repeat some of the computations that are done by
776 * ops->presence_check...
778 list_for_each_entry(e
, &ife
->metalist
, metalist
) {
779 if (e
->ops
->encode
) {
780 err
= e
->ops
->encode(skb
, (void *)(ife_meta
+ skboff
),
784 /* too corrupt to keep around if overwritten */
785 spin_unlock(&ife
->tcf_lock
);
786 qstats_drop_inc(this_cpu_ptr(ife
->common
.cpu_qstats
));
791 spin_unlock(&ife
->tcf_lock
);
792 oethh
= (struct ethhdr
*)skb
->data
;
794 if (!is_zero_ether_addr(p
->eth_src
))
795 ether_addr_copy(oethh
->h_source
, p
->eth_src
);
796 if (!is_zero_ether_addr(p
->eth_dst
))
797 ether_addr_copy(oethh
->h_dest
, p
->eth_dst
);
798 oethh
->h_proto
= htons(p
->eth_type
);
800 if (skb_at_tc_ingress(skb
))
801 skb_pull(skb
, skb
->dev
->hard_header_len
);
806 static int tcf_ife_act(struct sk_buff
*skb
, const struct tc_action
*a
,
807 struct tcf_result
*res
)
809 struct tcf_ife_info
*ife
= to_ife(a
);
810 struct tcf_ife_params
*p
;
814 p
= rcu_dereference(ife
->params
);
815 if (p
->flags
& IFE_ENCODE
) {
816 ret
= tcf_ife_encode(skb
, a
, res
, p
);
822 return tcf_ife_decode(skb
, a
, res
);
825 static int tcf_ife_walker(struct net
*net
, struct sk_buff
*skb
,
826 struct netlink_callback
*cb
, int type
,
827 const struct tc_action_ops
*ops
)
829 struct tc_action_net
*tn
= net_generic(net
, ife_net_id
);
831 return tcf_generic_walker(tn
, skb
, cb
, type
, ops
);
834 static int tcf_ife_search(struct net
*net
, struct tc_action
**a
, u32 index
)
836 struct tc_action_net
*tn
= net_generic(net
, ife_net_id
);
838 return tcf_idr_search(tn
, a
, index
);
841 static struct tc_action_ops act_ife_ops
= {
844 .owner
= THIS_MODULE
,
846 .dump
= tcf_ife_dump
,
847 .cleanup
= tcf_ife_cleanup
,
848 .init
= tcf_ife_init
,
849 .walk
= tcf_ife_walker
,
850 .lookup
= tcf_ife_search
,
851 .size
= sizeof(struct tcf_ife_info
),
854 static __net_init
int ife_init_net(struct net
*net
)
856 struct tc_action_net
*tn
= net_generic(net
, ife_net_id
);
858 return tc_action_net_init(tn
, &act_ife_ops
);
861 static void __net_exit
ife_exit_net(struct net
*net
)
863 struct tc_action_net
*tn
= net_generic(net
, ife_net_id
);
865 tc_action_net_exit(tn
);
868 static struct pernet_operations ife_net_ops
= {
869 .init
= ife_init_net
,
870 .exit
= ife_exit_net
,
872 .size
= sizeof(struct tc_action_net
),
875 static int __init
ife_init_module(void)
877 return tcf_register_action(&act_ife_ops
, &ife_net_ops
);
880 static void __exit
ife_cleanup_module(void)
882 tcf_unregister_action(&act_ife_ops
, &ife_net_ops
);
885 module_init(ife_init_module
);
886 module_exit(ife_cleanup_module
);
888 MODULE_AUTHOR("Jamal Hadi Salim(2015)");
889 MODULE_DESCRIPTION("Inter-FE LFB action");
890 MODULE_LICENSE("GPL");