net: sched: cls: add extack support for tcf_change_indev
[linux-2.6-block.git] / net / sched / cls_flower.c
1 /*
2  * net/sched/cls_flower.c               Flower classifier
3  *
4  * Copyright (c) 2015 Jiri Pirko <jiri@resnulli.us>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  */
11
12 #include <linux/kernel.h>
13 #include <linux/init.h>
14 #include <linux/module.h>
15 #include <linux/rhashtable.h>
16 #include <linux/workqueue.h>
17
18 #include <linux/if_ether.h>
19 #include <linux/in6.h>
20 #include <linux/ip.h>
21 #include <linux/mpls.h>
22
23 #include <net/sch_generic.h>
24 #include <net/pkt_cls.h>
25 #include <net/ip.h>
26 #include <net/flow_dissector.h>
27
28 #include <net/dst.h>
29 #include <net/dst_metadata.h>
30
31 struct fl_flow_key {
32         int     indev_ifindex;
33         struct flow_dissector_key_control control;
34         struct flow_dissector_key_control enc_control;
35         struct flow_dissector_key_basic basic;
36         struct flow_dissector_key_eth_addrs eth;
37         struct flow_dissector_key_vlan vlan;
38         union {
39                 struct flow_dissector_key_ipv4_addrs ipv4;
40                 struct flow_dissector_key_ipv6_addrs ipv6;
41         };
42         struct flow_dissector_key_ports tp;
43         struct flow_dissector_key_icmp icmp;
44         struct flow_dissector_key_arp arp;
45         struct flow_dissector_key_keyid enc_key_id;
46         union {
47                 struct flow_dissector_key_ipv4_addrs enc_ipv4;
48                 struct flow_dissector_key_ipv6_addrs enc_ipv6;
49         };
50         struct flow_dissector_key_ports enc_tp;
51         struct flow_dissector_key_mpls mpls;
52         struct flow_dissector_key_tcp tcp;
53         struct flow_dissector_key_ip ip;
54 } __aligned(BITS_PER_LONG / 8); /* Ensure that we can do comparisons as longs. */
55
56 struct fl_flow_mask_range {
57         unsigned short int start;
58         unsigned short int end;
59 };
60
61 struct fl_flow_mask {
62         struct fl_flow_key key;
63         struct fl_flow_mask_range range;
64         struct rcu_head rcu;
65 };
66
67 struct cls_fl_head {
68         struct rhashtable ht;
69         struct fl_flow_mask mask;
70         struct flow_dissector dissector;
71         bool mask_assigned;
72         struct list_head filters;
73         struct rhashtable_params ht_params;
74         union {
75                 struct work_struct work;
76                 struct rcu_head rcu;
77         };
78         struct idr handle_idr;
79 };
80
81 struct cls_fl_filter {
82         struct rhash_head ht_node;
83         struct fl_flow_key mkey;
84         struct tcf_exts exts;
85         struct tcf_result res;
86         struct fl_flow_key key;
87         struct list_head list;
88         u32 handle;
89         u32 flags;
90         union {
91                 struct work_struct work;
92                 struct rcu_head rcu;
93         };
94         struct net_device *hw_dev;
95 };
96
97 static unsigned short int fl_mask_range(const struct fl_flow_mask *mask)
98 {
99         return mask->range.end - mask->range.start;
100 }
101
102 static void fl_mask_update_range(struct fl_flow_mask *mask)
103 {
104         const u8 *bytes = (const u8 *) &mask->key;
105         size_t size = sizeof(mask->key);
106         size_t i, first = 0, last = size - 1;
107
108         for (i = 0; i < sizeof(mask->key); i++) {
109                 if (bytes[i]) {
110                         if (!first && i)
111                                 first = i;
112                         last = i;
113                 }
114         }
115         mask->range.start = rounddown(first, sizeof(long));
116         mask->range.end = roundup(last + 1, sizeof(long));
117 }
118
119 static void *fl_key_get_start(struct fl_flow_key *key,
120                               const struct fl_flow_mask *mask)
121 {
122         return (u8 *) key + mask->range.start;
123 }
124
125 static void fl_set_masked_key(struct fl_flow_key *mkey, struct fl_flow_key *key,
126                               struct fl_flow_mask *mask)
127 {
128         const long *lkey = fl_key_get_start(key, mask);
129         const long *lmask = fl_key_get_start(&mask->key, mask);
130         long *lmkey = fl_key_get_start(mkey, mask);
131         int i;
132
133         for (i = 0; i < fl_mask_range(mask); i += sizeof(long))
134                 *lmkey++ = *lkey++ & *lmask++;
135 }
136
137 static void fl_clear_masked_range(struct fl_flow_key *key,
138                                   struct fl_flow_mask *mask)
139 {
140         memset(fl_key_get_start(key, mask), 0, fl_mask_range(mask));
141 }
142
143 static struct cls_fl_filter *fl_lookup(struct cls_fl_head *head,
144                                        struct fl_flow_key *mkey)
145 {
146         return rhashtable_lookup_fast(&head->ht,
147                                       fl_key_get_start(mkey, &head->mask),
148                                       head->ht_params);
149 }
150
151 static int fl_classify(struct sk_buff *skb, const struct tcf_proto *tp,
152                        struct tcf_result *res)
153 {
154         struct cls_fl_head *head = rcu_dereference_bh(tp->root);
155         struct cls_fl_filter *f;
156         struct fl_flow_key skb_key;
157         struct fl_flow_key skb_mkey;
158
159         if (!atomic_read(&head->ht.nelems))
160                 return -1;
161
162         fl_clear_masked_range(&skb_key, &head->mask);
163
164         skb_key.indev_ifindex = skb->skb_iif;
165         /* skb_flow_dissect() does not set n_proto in case an unknown protocol,
166          * so do it rather here.
167          */
168         skb_key.basic.n_proto = skb->protocol;
169         skb_flow_dissect_tunnel_info(skb, &head->dissector, &skb_key);
170         skb_flow_dissect(skb, &head->dissector, &skb_key, 0);
171
172         fl_set_masked_key(&skb_mkey, &skb_key, &head->mask);
173
174         f = fl_lookup(head, &skb_mkey);
175         if (f && !tc_skip_sw(f->flags)) {
176                 *res = f->res;
177                 return tcf_exts_exec(skb, &f->exts, res);
178         }
179         return -1;
180 }
181
182 static int fl_init(struct tcf_proto *tp)
183 {
184         struct cls_fl_head *head;
185
186         head = kzalloc(sizeof(*head), GFP_KERNEL);
187         if (!head)
188                 return -ENOBUFS;
189
190         INIT_LIST_HEAD_RCU(&head->filters);
191         rcu_assign_pointer(tp->root, head);
192         idr_init(&head->handle_idr);
193
194         return 0;
195 }
196
197 static void __fl_destroy_filter(struct cls_fl_filter *f)
198 {
199         tcf_exts_destroy(&f->exts);
200         tcf_exts_put_net(&f->exts);
201         kfree(f);
202 }
203
204 static void fl_destroy_filter_work(struct work_struct *work)
205 {
206         struct cls_fl_filter *f = container_of(work, struct cls_fl_filter, work);
207
208         rtnl_lock();
209         __fl_destroy_filter(f);
210         rtnl_unlock();
211 }
212
213 static void fl_destroy_filter(struct rcu_head *head)
214 {
215         struct cls_fl_filter *f = container_of(head, struct cls_fl_filter, rcu);
216
217         INIT_WORK(&f->work, fl_destroy_filter_work);
218         tcf_queue_work(&f->work);
219 }
220
221 static void fl_hw_destroy_filter(struct tcf_proto *tp, struct cls_fl_filter *f)
222 {
223         struct tc_cls_flower_offload cls_flower = {};
224         struct tcf_block *block = tp->chain->block;
225
226         tc_cls_common_offload_init(&cls_flower.common, tp);
227         cls_flower.command = TC_CLSFLOWER_DESTROY;
228         cls_flower.cookie = (unsigned long) f;
229
230         tc_setup_cb_call(block, &f->exts, TC_SETUP_CLSFLOWER,
231                          &cls_flower, false);
232         tcf_block_offload_dec(block, &f->flags);
233 }
234
235 static int fl_hw_replace_filter(struct tcf_proto *tp,
236                                 struct flow_dissector *dissector,
237                                 struct fl_flow_key *mask,
238                                 struct cls_fl_filter *f)
239 {
240         struct tc_cls_flower_offload cls_flower = {};
241         struct tcf_block *block = tp->chain->block;
242         bool skip_sw = tc_skip_sw(f->flags);
243         int err;
244
245         tc_cls_common_offload_init(&cls_flower.common, tp);
246         cls_flower.command = TC_CLSFLOWER_REPLACE;
247         cls_flower.cookie = (unsigned long) f;
248         cls_flower.dissector = dissector;
249         cls_flower.mask = mask;
250         cls_flower.key = &f->mkey;
251         cls_flower.exts = &f->exts;
252         cls_flower.classid = f->res.classid;
253
254         err = tc_setup_cb_call(block, &f->exts, TC_SETUP_CLSFLOWER,
255                                &cls_flower, skip_sw);
256         if (err < 0) {
257                 fl_hw_destroy_filter(tp, f);
258                 return err;
259         } else if (err > 0) {
260                 tcf_block_offload_inc(block, &f->flags);
261         }
262
263         if (skip_sw && !(f->flags & TCA_CLS_FLAGS_IN_HW))
264                 return -EINVAL;
265
266         return 0;
267 }
268
269 static void fl_hw_update_stats(struct tcf_proto *tp, struct cls_fl_filter *f)
270 {
271         struct tc_cls_flower_offload cls_flower = {};
272         struct tcf_block *block = tp->chain->block;
273
274         tc_cls_common_offload_init(&cls_flower.common, tp);
275         cls_flower.command = TC_CLSFLOWER_STATS;
276         cls_flower.cookie = (unsigned long) f;
277         cls_flower.exts = &f->exts;
278         cls_flower.classid = f->res.classid;
279
280         tc_setup_cb_call(block, &f->exts, TC_SETUP_CLSFLOWER,
281                          &cls_flower, false);
282 }
283
284 static void __fl_delete(struct tcf_proto *tp, struct cls_fl_filter *f)
285 {
286         struct cls_fl_head *head = rtnl_dereference(tp->root);
287
288         idr_remove_ext(&head->handle_idr, f->handle);
289         list_del_rcu(&f->list);
290         if (!tc_skip_hw(f->flags))
291                 fl_hw_destroy_filter(tp, f);
292         tcf_unbind_filter(tp, &f->res);
293         if (tcf_exts_get_net(&f->exts))
294                 call_rcu(&f->rcu, fl_destroy_filter);
295         else
296                 __fl_destroy_filter(f);
297 }
298
299 static void fl_destroy_sleepable(struct work_struct *work)
300 {
301         struct cls_fl_head *head = container_of(work, struct cls_fl_head,
302                                                 work);
303         if (head->mask_assigned)
304                 rhashtable_destroy(&head->ht);
305         kfree(head);
306         module_put(THIS_MODULE);
307 }
308
309 static void fl_destroy_rcu(struct rcu_head *rcu)
310 {
311         struct cls_fl_head *head = container_of(rcu, struct cls_fl_head, rcu);
312
313         INIT_WORK(&head->work, fl_destroy_sleepable);
314         schedule_work(&head->work);
315 }
316
317 static void fl_destroy(struct tcf_proto *tp)
318 {
319         struct cls_fl_head *head = rtnl_dereference(tp->root);
320         struct cls_fl_filter *f, *next;
321
322         list_for_each_entry_safe(f, next, &head->filters, list)
323                 __fl_delete(tp, f);
324         idr_destroy(&head->handle_idr);
325
326         __module_get(THIS_MODULE);
327         call_rcu(&head->rcu, fl_destroy_rcu);
328 }
329
330 static void *fl_get(struct tcf_proto *tp, u32 handle)
331 {
332         struct cls_fl_head *head = rtnl_dereference(tp->root);
333
334         return idr_find_ext(&head->handle_idr, handle);
335 }
336
337 static const struct nla_policy fl_policy[TCA_FLOWER_MAX + 1] = {
338         [TCA_FLOWER_UNSPEC]             = { .type = NLA_UNSPEC },
339         [TCA_FLOWER_CLASSID]            = { .type = NLA_U32 },
340         [TCA_FLOWER_INDEV]              = { .type = NLA_STRING,
341                                             .len = IFNAMSIZ },
342         [TCA_FLOWER_KEY_ETH_DST]        = { .len = ETH_ALEN },
343         [TCA_FLOWER_KEY_ETH_DST_MASK]   = { .len = ETH_ALEN },
344         [TCA_FLOWER_KEY_ETH_SRC]        = { .len = ETH_ALEN },
345         [TCA_FLOWER_KEY_ETH_SRC_MASK]   = { .len = ETH_ALEN },
346         [TCA_FLOWER_KEY_ETH_TYPE]       = { .type = NLA_U16 },
347         [TCA_FLOWER_KEY_IP_PROTO]       = { .type = NLA_U8 },
348         [TCA_FLOWER_KEY_IPV4_SRC]       = { .type = NLA_U32 },
349         [TCA_FLOWER_KEY_IPV4_SRC_MASK]  = { .type = NLA_U32 },
350         [TCA_FLOWER_KEY_IPV4_DST]       = { .type = NLA_U32 },
351         [TCA_FLOWER_KEY_IPV4_DST_MASK]  = { .type = NLA_U32 },
352         [TCA_FLOWER_KEY_IPV6_SRC]       = { .len = sizeof(struct in6_addr) },
353         [TCA_FLOWER_KEY_IPV6_SRC_MASK]  = { .len = sizeof(struct in6_addr) },
354         [TCA_FLOWER_KEY_IPV6_DST]       = { .len = sizeof(struct in6_addr) },
355         [TCA_FLOWER_KEY_IPV6_DST_MASK]  = { .len = sizeof(struct in6_addr) },
356         [TCA_FLOWER_KEY_TCP_SRC]        = { .type = NLA_U16 },
357         [TCA_FLOWER_KEY_TCP_DST]        = { .type = NLA_U16 },
358         [TCA_FLOWER_KEY_UDP_SRC]        = { .type = NLA_U16 },
359         [TCA_FLOWER_KEY_UDP_DST]        = { .type = NLA_U16 },
360         [TCA_FLOWER_KEY_VLAN_ID]        = { .type = NLA_U16 },
361         [TCA_FLOWER_KEY_VLAN_PRIO]      = { .type = NLA_U8 },
362         [TCA_FLOWER_KEY_VLAN_ETH_TYPE]  = { .type = NLA_U16 },
363         [TCA_FLOWER_KEY_ENC_KEY_ID]     = { .type = NLA_U32 },
364         [TCA_FLOWER_KEY_ENC_IPV4_SRC]   = { .type = NLA_U32 },
365         [TCA_FLOWER_KEY_ENC_IPV4_SRC_MASK] = { .type = NLA_U32 },
366         [TCA_FLOWER_KEY_ENC_IPV4_DST]   = { .type = NLA_U32 },
367         [TCA_FLOWER_KEY_ENC_IPV4_DST_MASK] = { .type = NLA_U32 },
368         [TCA_FLOWER_KEY_ENC_IPV6_SRC]   = { .len = sizeof(struct in6_addr) },
369         [TCA_FLOWER_KEY_ENC_IPV6_SRC_MASK] = { .len = sizeof(struct in6_addr) },
370         [TCA_FLOWER_KEY_ENC_IPV6_DST]   = { .len = sizeof(struct in6_addr) },
371         [TCA_FLOWER_KEY_ENC_IPV6_DST_MASK] = { .len = sizeof(struct in6_addr) },
372         [TCA_FLOWER_KEY_TCP_SRC_MASK]   = { .type = NLA_U16 },
373         [TCA_FLOWER_KEY_TCP_DST_MASK]   = { .type = NLA_U16 },
374         [TCA_FLOWER_KEY_UDP_SRC_MASK]   = { .type = NLA_U16 },
375         [TCA_FLOWER_KEY_UDP_DST_MASK]   = { .type = NLA_U16 },
376         [TCA_FLOWER_KEY_SCTP_SRC_MASK]  = { .type = NLA_U16 },
377         [TCA_FLOWER_KEY_SCTP_DST_MASK]  = { .type = NLA_U16 },
378         [TCA_FLOWER_KEY_SCTP_SRC]       = { .type = NLA_U16 },
379         [TCA_FLOWER_KEY_SCTP_DST]       = { .type = NLA_U16 },
380         [TCA_FLOWER_KEY_ENC_UDP_SRC_PORT]       = { .type = NLA_U16 },
381         [TCA_FLOWER_KEY_ENC_UDP_SRC_PORT_MASK]  = { .type = NLA_U16 },
382         [TCA_FLOWER_KEY_ENC_UDP_DST_PORT]       = { .type = NLA_U16 },
383         [TCA_FLOWER_KEY_ENC_UDP_DST_PORT_MASK]  = { .type = NLA_U16 },
384         [TCA_FLOWER_KEY_FLAGS]          = { .type = NLA_U32 },
385         [TCA_FLOWER_KEY_FLAGS_MASK]     = { .type = NLA_U32 },
386         [TCA_FLOWER_KEY_ICMPV4_TYPE]    = { .type = NLA_U8 },
387         [TCA_FLOWER_KEY_ICMPV4_TYPE_MASK] = { .type = NLA_U8 },
388         [TCA_FLOWER_KEY_ICMPV4_CODE]    = { .type = NLA_U8 },
389         [TCA_FLOWER_KEY_ICMPV4_CODE_MASK] = { .type = NLA_U8 },
390         [TCA_FLOWER_KEY_ICMPV6_TYPE]    = { .type = NLA_U8 },
391         [TCA_FLOWER_KEY_ICMPV6_TYPE_MASK] = { .type = NLA_U8 },
392         [TCA_FLOWER_KEY_ICMPV6_CODE]    = { .type = NLA_U8 },
393         [TCA_FLOWER_KEY_ICMPV6_CODE_MASK] = { .type = NLA_U8 },
394         [TCA_FLOWER_KEY_ARP_SIP]        = { .type = NLA_U32 },
395         [TCA_FLOWER_KEY_ARP_SIP_MASK]   = { .type = NLA_U32 },
396         [TCA_FLOWER_KEY_ARP_TIP]        = { .type = NLA_U32 },
397         [TCA_FLOWER_KEY_ARP_TIP_MASK]   = { .type = NLA_U32 },
398         [TCA_FLOWER_KEY_ARP_OP]         = { .type = NLA_U8 },
399         [TCA_FLOWER_KEY_ARP_OP_MASK]    = { .type = NLA_U8 },
400         [TCA_FLOWER_KEY_ARP_SHA]        = { .len = ETH_ALEN },
401         [TCA_FLOWER_KEY_ARP_SHA_MASK]   = { .len = ETH_ALEN },
402         [TCA_FLOWER_KEY_ARP_THA]        = { .len = ETH_ALEN },
403         [TCA_FLOWER_KEY_ARP_THA_MASK]   = { .len = ETH_ALEN },
404         [TCA_FLOWER_KEY_MPLS_TTL]       = { .type = NLA_U8 },
405         [TCA_FLOWER_KEY_MPLS_BOS]       = { .type = NLA_U8 },
406         [TCA_FLOWER_KEY_MPLS_TC]        = { .type = NLA_U8 },
407         [TCA_FLOWER_KEY_MPLS_LABEL]     = { .type = NLA_U32 },
408         [TCA_FLOWER_KEY_TCP_FLAGS]      = { .type = NLA_U16 },
409         [TCA_FLOWER_KEY_TCP_FLAGS_MASK] = { .type = NLA_U16 },
410         [TCA_FLOWER_KEY_IP_TOS]         = { .type = NLA_U8 },
411         [TCA_FLOWER_KEY_IP_TOS_MASK]    = { .type = NLA_U8 },
412         [TCA_FLOWER_KEY_IP_TTL]         = { .type = NLA_U8 },
413         [TCA_FLOWER_KEY_IP_TTL_MASK]    = { .type = NLA_U8 },
414 };
415
416 static void fl_set_key_val(struct nlattr **tb,
417                            void *val, int val_type,
418                            void *mask, int mask_type, int len)
419 {
420         if (!tb[val_type])
421                 return;
422         memcpy(val, nla_data(tb[val_type]), len);
423         if (mask_type == TCA_FLOWER_UNSPEC || !tb[mask_type])
424                 memset(mask, 0xff, len);
425         else
426                 memcpy(mask, nla_data(tb[mask_type]), len);
427 }
428
429 static int fl_set_key_mpls(struct nlattr **tb,
430                            struct flow_dissector_key_mpls *key_val,
431                            struct flow_dissector_key_mpls *key_mask)
432 {
433         if (tb[TCA_FLOWER_KEY_MPLS_TTL]) {
434                 key_val->mpls_ttl = nla_get_u8(tb[TCA_FLOWER_KEY_MPLS_TTL]);
435                 key_mask->mpls_ttl = MPLS_TTL_MASK;
436         }
437         if (tb[TCA_FLOWER_KEY_MPLS_BOS]) {
438                 u8 bos = nla_get_u8(tb[TCA_FLOWER_KEY_MPLS_BOS]);
439
440                 if (bos & ~MPLS_BOS_MASK)
441                         return -EINVAL;
442                 key_val->mpls_bos = bos;
443                 key_mask->mpls_bos = MPLS_BOS_MASK;
444         }
445         if (tb[TCA_FLOWER_KEY_MPLS_TC]) {
446                 u8 tc = nla_get_u8(tb[TCA_FLOWER_KEY_MPLS_TC]);
447
448                 if (tc & ~MPLS_TC_MASK)
449                         return -EINVAL;
450                 key_val->mpls_tc = tc;
451                 key_mask->mpls_tc = MPLS_TC_MASK;
452         }
453         if (tb[TCA_FLOWER_KEY_MPLS_LABEL]) {
454                 u32 label = nla_get_u32(tb[TCA_FLOWER_KEY_MPLS_LABEL]);
455
456                 if (label & ~MPLS_LABEL_MASK)
457                         return -EINVAL;
458                 key_val->mpls_label = label;
459                 key_mask->mpls_label = MPLS_LABEL_MASK;
460         }
461         return 0;
462 }
463
464 static void fl_set_key_vlan(struct nlattr **tb,
465                             struct flow_dissector_key_vlan *key_val,
466                             struct flow_dissector_key_vlan *key_mask)
467 {
468 #define VLAN_PRIORITY_MASK      0x7
469
470         if (tb[TCA_FLOWER_KEY_VLAN_ID]) {
471                 key_val->vlan_id =
472                         nla_get_u16(tb[TCA_FLOWER_KEY_VLAN_ID]) & VLAN_VID_MASK;
473                 key_mask->vlan_id = VLAN_VID_MASK;
474         }
475         if (tb[TCA_FLOWER_KEY_VLAN_PRIO]) {
476                 key_val->vlan_priority =
477                         nla_get_u8(tb[TCA_FLOWER_KEY_VLAN_PRIO]) &
478                         VLAN_PRIORITY_MASK;
479                 key_mask->vlan_priority = VLAN_PRIORITY_MASK;
480         }
481 }
482
483 static void fl_set_key_flag(u32 flower_key, u32 flower_mask,
484                             u32 *dissector_key, u32 *dissector_mask,
485                             u32 flower_flag_bit, u32 dissector_flag_bit)
486 {
487         if (flower_mask & flower_flag_bit) {
488                 *dissector_mask |= dissector_flag_bit;
489                 if (flower_key & flower_flag_bit)
490                         *dissector_key |= dissector_flag_bit;
491         }
492 }
493
494 static int fl_set_key_flags(struct nlattr **tb,
495                             u32 *flags_key, u32 *flags_mask)
496 {
497         u32 key, mask;
498
499         /* mask is mandatory for flags */
500         if (!tb[TCA_FLOWER_KEY_FLAGS_MASK])
501                 return -EINVAL;
502
503         key = be32_to_cpu(nla_get_u32(tb[TCA_FLOWER_KEY_FLAGS]));
504         mask = be32_to_cpu(nla_get_u32(tb[TCA_FLOWER_KEY_FLAGS_MASK]));
505
506         *flags_key  = 0;
507         *flags_mask = 0;
508
509         fl_set_key_flag(key, mask, flags_key, flags_mask,
510                         TCA_FLOWER_KEY_FLAGS_IS_FRAGMENT, FLOW_DIS_IS_FRAGMENT);
511
512         return 0;
513 }
514
515 static void fl_set_key_ip(struct nlattr **tb,
516                           struct flow_dissector_key_ip *key,
517                           struct flow_dissector_key_ip *mask)
518 {
519                 fl_set_key_val(tb, &key->tos, TCA_FLOWER_KEY_IP_TOS,
520                                &mask->tos, TCA_FLOWER_KEY_IP_TOS_MASK,
521                                sizeof(key->tos));
522
523                 fl_set_key_val(tb, &key->ttl, TCA_FLOWER_KEY_IP_TTL,
524                                &mask->ttl, TCA_FLOWER_KEY_IP_TTL_MASK,
525                                sizeof(key->ttl));
526 }
527
528 static int fl_set_key(struct net *net, struct nlattr **tb,
529                       struct fl_flow_key *key, struct fl_flow_key *mask,
530                       struct netlink_ext_ack *extack)
531 {
532         __be16 ethertype;
533         int ret = 0;
534 #ifdef CONFIG_NET_CLS_IND
535         if (tb[TCA_FLOWER_INDEV]) {
536                 int err = tcf_change_indev(net, tb[TCA_FLOWER_INDEV], extack);
537                 if (err < 0)
538                         return err;
539                 key->indev_ifindex = err;
540                 mask->indev_ifindex = 0xffffffff;
541         }
542 #endif
543
544         fl_set_key_val(tb, key->eth.dst, TCA_FLOWER_KEY_ETH_DST,
545                        mask->eth.dst, TCA_FLOWER_KEY_ETH_DST_MASK,
546                        sizeof(key->eth.dst));
547         fl_set_key_val(tb, key->eth.src, TCA_FLOWER_KEY_ETH_SRC,
548                        mask->eth.src, TCA_FLOWER_KEY_ETH_SRC_MASK,
549                        sizeof(key->eth.src));
550
551         if (tb[TCA_FLOWER_KEY_ETH_TYPE]) {
552                 ethertype = nla_get_be16(tb[TCA_FLOWER_KEY_ETH_TYPE]);
553
554                 if (ethertype == htons(ETH_P_8021Q)) {
555                         fl_set_key_vlan(tb, &key->vlan, &mask->vlan);
556                         fl_set_key_val(tb, &key->basic.n_proto,
557                                        TCA_FLOWER_KEY_VLAN_ETH_TYPE,
558                                        &mask->basic.n_proto, TCA_FLOWER_UNSPEC,
559                                        sizeof(key->basic.n_proto));
560                 } else {
561                         key->basic.n_proto = ethertype;
562                         mask->basic.n_proto = cpu_to_be16(~0);
563                 }
564         }
565
566         if (key->basic.n_proto == htons(ETH_P_IP) ||
567             key->basic.n_proto == htons(ETH_P_IPV6)) {
568                 fl_set_key_val(tb, &key->basic.ip_proto, TCA_FLOWER_KEY_IP_PROTO,
569                                &mask->basic.ip_proto, TCA_FLOWER_UNSPEC,
570                                sizeof(key->basic.ip_proto));
571                 fl_set_key_ip(tb, &key->ip, &mask->ip);
572         }
573
574         if (tb[TCA_FLOWER_KEY_IPV4_SRC] || tb[TCA_FLOWER_KEY_IPV4_DST]) {
575                 key->control.addr_type = FLOW_DISSECTOR_KEY_IPV4_ADDRS;
576                 mask->control.addr_type = ~0;
577                 fl_set_key_val(tb, &key->ipv4.src, TCA_FLOWER_KEY_IPV4_SRC,
578                                &mask->ipv4.src, TCA_FLOWER_KEY_IPV4_SRC_MASK,
579                                sizeof(key->ipv4.src));
580                 fl_set_key_val(tb, &key->ipv4.dst, TCA_FLOWER_KEY_IPV4_DST,
581                                &mask->ipv4.dst, TCA_FLOWER_KEY_IPV4_DST_MASK,
582                                sizeof(key->ipv4.dst));
583         } else if (tb[TCA_FLOWER_KEY_IPV6_SRC] || tb[TCA_FLOWER_KEY_IPV6_DST]) {
584                 key->control.addr_type = FLOW_DISSECTOR_KEY_IPV6_ADDRS;
585                 mask->control.addr_type = ~0;
586                 fl_set_key_val(tb, &key->ipv6.src, TCA_FLOWER_KEY_IPV6_SRC,
587                                &mask->ipv6.src, TCA_FLOWER_KEY_IPV6_SRC_MASK,
588                                sizeof(key->ipv6.src));
589                 fl_set_key_val(tb, &key->ipv6.dst, TCA_FLOWER_KEY_IPV6_DST,
590                                &mask->ipv6.dst, TCA_FLOWER_KEY_IPV6_DST_MASK,
591                                sizeof(key->ipv6.dst));
592         }
593
594         if (key->basic.ip_proto == IPPROTO_TCP) {
595                 fl_set_key_val(tb, &key->tp.src, TCA_FLOWER_KEY_TCP_SRC,
596                                &mask->tp.src, TCA_FLOWER_KEY_TCP_SRC_MASK,
597                                sizeof(key->tp.src));
598                 fl_set_key_val(tb, &key->tp.dst, TCA_FLOWER_KEY_TCP_DST,
599                                &mask->tp.dst, TCA_FLOWER_KEY_TCP_DST_MASK,
600                                sizeof(key->tp.dst));
601                 fl_set_key_val(tb, &key->tcp.flags, TCA_FLOWER_KEY_TCP_FLAGS,
602                                &mask->tcp.flags, TCA_FLOWER_KEY_TCP_FLAGS_MASK,
603                                sizeof(key->tcp.flags));
604         } else if (key->basic.ip_proto == IPPROTO_UDP) {
605                 fl_set_key_val(tb, &key->tp.src, TCA_FLOWER_KEY_UDP_SRC,
606                                &mask->tp.src, TCA_FLOWER_KEY_UDP_SRC_MASK,
607                                sizeof(key->tp.src));
608                 fl_set_key_val(tb, &key->tp.dst, TCA_FLOWER_KEY_UDP_DST,
609                                &mask->tp.dst, TCA_FLOWER_KEY_UDP_DST_MASK,
610                                sizeof(key->tp.dst));
611         } else if (key->basic.ip_proto == IPPROTO_SCTP) {
612                 fl_set_key_val(tb, &key->tp.src, TCA_FLOWER_KEY_SCTP_SRC,
613                                &mask->tp.src, TCA_FLOWER_KEY_SCTP_SRC_MASK,
614                                sizeof(key->tp.src));
615                 fl_set_key_val(tb, &key->tp.dst, TCA_FLOWER_KEY_SCTP_DST,
616                                &mask->tp.dst, TCA_FLOWER_KEY_SCTP_DST_MASK,
617                                sizeof(key->tp.dst));
618         } else if (key->basic.n_proto == htons(ETH_P_IP) &&
619                    key->basic.ip_proto == IPPROTO_ICMP) {
620                 fl_set_key_val(tb, &key->icmp.type, TCA_FLOWER_KEY_ICMPV4_TYPE,
621                                &mask->icmp.type,
622                                TCA_FLOWER_KEY_ICMPV4_TYPE_MASK,
623                                sizeof(key->icmp.type));
624                 fl_set_key_val(tb, &key->icmp.code, TCA_FLOWER_KEY_ICMPV4_CODE,
625                                &mask->icmp.code,
626                                TCA_FLOWER_KEY_ICMPV4_CODE_MASK,
627                                sizeof(key->icmp.code));
628         } else if (key->basic.n_proto == htons(ETH_P_IPV6) &&
629                    key->basic.ip_proto == IPPROTO_ICMPV6) {
630                 fl_set_key_val(tb, &key->icmp.type, TCA_FLOWER_KEY_ICMPV6_TYPE,
631                                &mask->icmp.type,
632                                TCA_FLOWER_KEY_ICMPV6_TYPE_MASK,
633                                sizeof(key->icmp.type));
634                 fl_set_key_val(tb, &key->icmp.code, TCA_FLOWER_KEY_ICMPV6_CODE,
635                                &mask->icmp.code,
636                                TCA_FLOWER_KEY_ICMPV6_CODE_MASK,
637                                sizeof(key->icmp.code));
638         } else if (key->basic.n_proto == htons(ETH_P_MPLS_UC) ||
639                    key->basic.n_proto == htons(ETH_P_MPLS_MC)) {
640                 ret = fl_set_key_mpls(tb, &key->mpls, &mask->mpls);
641                 if (ret)
642                         return ret;
643         } else if (key->basic.n_proto == htons(ETH_P_ARP) ||
644                    key->basic.n_proto == htons(ETH_P_RARP)) {
645                 fl_set_key_val(tb, &key->arp.sip, TCA_FLOWER_KEY_ARP_SIP,
646                                &mask->arp.sip, TCA_FLOWER_KEY_ARP_SIP_MASK,
647                                sizeof(key->arp.sip));
648                 fl_set_key_val(tb, &key->arp.tip, TCA_FLOWER_KEY_ARP_TIP,
649                                &mask->arp.tip, TCA_FLOWER_KEY_ARP_TIP_MASK,
650                                sizeof(key->arp.tip));
651                 fl_set_key_val(tb, &key->arp.op, TCA_FLOWER_KEY_ARP_OP,
652                                &mask->arp.op, TCA_FLOWER_KEY_ARP_OP_MASK,
653                                sizeof(key->arp.op));
654                 fl_set_key_val(tb, key->arp.sha, TCA_FLOWER_KEY_ARP_SHA,
655                                mask->arp.sha, TCA_FLOWER_KEY_ARP_SHA_MASK,
656                                sizeof(key->arp.sha));
657                 fl_set_key_val(tb, key->arp.tha, TCA_FLOWER_KEY_ARP_THA,
658                                mask->arp.tha, TCA_FLOWER_KEY_ARP_THA_MASK,
659                                sizeof(key->arp.tha));
660         }
661
662         if (tb[TCA_FLOWER_KEY_ENC_IPV4_SRC] ||
663             tb[TCA_FLOWER_KEY_ENC_IPV4_DST]) {
664                 key->enc_control.addr_type = FLOW_DISSECTOR_KEY_IPV4_ADDRS;
665                 mask->enc_control.addr_type = ~0;
666                 fl_set_key_val(tb, &key->enc_ipv4.src,
667                                TCA_FLOWER_KEY_ENC_IPV4_SRC,
668                                &mask->enc_ipv4.src,
669                                TCA_FLOWER_KEY_ENC_IPV4_SRC_MASK,
670                                sizeof(key->enc_ipv4.src));
671                 fl_set_key_val(tb, &key->enc_ipv4.dst,
672                                TCA_FLOWER_KEY_ENC_IPV4_DST,
673                                &mask->enc_ipv4.dst,
674                                TCA_FLOWER_KEY_ENC_IPV4_DST_MASK,
675                                sizeof(key->enc_ipv4.dst));
676         }
677
678         if (tb[TCA_FLOWER_KEY_ENC_IPV6_SRC] ||
679             tb[TCA_FLOWER_KEY_ENC_IPV6_DST]) {
680                 key->enc_control.addr_type = FLOW_DISSECTOR_KEY_IPV6_ADDRS;
681                 mask->enc_control.addr_type = ~0;
682                 fl_set_key_val(tb, &key->enc_ipv6.src,
683                                TCA_FLOWER_KEY_ENC_IPV6_SRC,
684                                &mask->enc_ipv6.src,
685                                TCA_FLOWER_KEY_ENC_IPV6_SRC_MASK,
686                                sizeof(key->enc_ipv6.src));
687                 fl_set_key_val(tb, &key->enc_ipv6.dst,
688                                TCA_FLOWER_KEY_ENC_IPV6_DST,
689                                &mask->enc_ipv6.dst,
690                                TCA_FLOWER_KEY_ENC_IPV6_DST_MASK,
691                                sizeof(key->enc_ipv6.dst));
692         }
693
694         fl_set_key_val(tb, &key->enc_key_id.keyid, TCA_FLOWER_KEY_ENC_KEY_ID,
695                        &mask->enc_key_id.keyid, TCA_FLOWER_UNSPEC,
696                        sizeof(key->enc_key_id.keyid));
697
698         fl_set_key_val(tb, &key->enc_tp.src, TCA_FLOWER_KEY_ENC_UDP_SRC_PORT,
699                        &mask->enc_tp.src, TCA_FLOWER_KEY_ENC_UDP_SRC_PORT_MASK,
700                        sizeof(key->enc_tp.src));
701
702         fl_set_key_val(tb, &key->enc_tp.dst, TCA_FLOWER_KEY_ENC_UDP_DST_PORT,
703                        &mask->enc_tp.dst, TCA_FLOWER_KEY_ENC_UDP_DST_PORT_MASK,
704                        sizeof(key->enc_tp.dst));
705
706         if (tb[TCA_FLOWER_KEY_FLAGS])
707                 ret = fl_set_key_flags(tb, &key->control.flags, &mask->control.flags);
708
709         return ret;
710 }
711
712 static bool fl_mask_eq(struct fl_flow_mask *mask1,
713                        struct fl_flow_mask *mask2)
714 {
715         const long *lmask1 = fl_key_get_start(&mask1->key, mask1);
716         const long *lmask2 = fl_key_get_start(&mask2->key, mask2);
717
718         return !memcmp(&mask1->range, &mask2->range, sizeof(mask1->range)) &&
719                !memcmp(lmask1, lmask2, fl_mask_range(mask1));
720 }
721
722 static const struct rhashtable_params fl_ht_params = {
723         .key_offset = offsetof(struct cls_fl_filter, mkey), /* base offset */
724         .head_offset = offsetof(struct cls_fl_filter, ht_node),
725         .automatic_shrinking = true,
726 };
727
728 static int fl_init_hashtable(struct cls_fl_head *head,
729                              struct fl_flow_mask *mask)
730 {
731         head->ht_params = fl_ht_params;
732         head->ht_params.key_len = fl_mask_range(mask);
733         head->ht_params.key_offset += mask->range.start;
734
735         return rhashtable_init(&head->ht, &head->ht_params);
736 }
737
738 #define FL_KEY_MEMBER_OFFSET(member) offsetof(struct fl_flow_key, member)
739 #define FL_KEY_MEMBER_SIZE(member) (sizeof(((struct fl_flow_key *) 0)->member))
740
741 #define FL_KEY_IS_MASKED(mask, member)                                          \
742         memchr_inv(((char *)mask) + FL_KEY_MEMBER_OFFSET(member),               \
743                    0, FL_KEY_MEMBER_SIZE(member))                               \
744
745 #define FL_KEY_SET(keys, cnt, id, member)                                       \
746         do {                                                                    \
747                 keys[cnt].key_id = id;                                          \
748                 keys[cnt].offset = FL_KEY_MEMBER_OFFSET(member);                \
749                 cnt++;                                                          \
750         } while(0);
751
752 #define FL_KEY_SET_IF_MASKED(mask, keys, cnt, id, member)                       \
753         do {                                                                    \
754                 if (FL_KEY_IS_MASKED(mask, member))                             \
755                         FL_KEY_SET(keys, cnt, id, member);                      \
756         } while(0);
757
758 static void fl_init_dissector(struct cls_fl_head *head,
759                               struct fl_flow_mask *mask)
760 {
761         struct flow_dissector_key keys[FLOW_DISSECTOR_KEY_MAX];
762         size_t cnt = 0;
763
764         FL_KEY_SET(keys, cnt, FLOW_DISSECTOR_KEY_CONTROL, control);
765         FL_KEY_SET(keys, cnt, FLOW_DISSECTOR_KEY_BASIC, basic);
766         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
767                              FLOW_DISSECTOR_KEY_ETH_ADDRS, eth);
768         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
769                              FLOW_DISSECTOR_KEY_IPV4_ADDRS, ipv4);
770         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
771                              FLOW_DISSECTOR_KEY_IPV6_ADDRS, ipv6);
772         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
773                              FLOW_DISSECTOR_KEY_PORTS, tp);
774         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
775                              FLOW_DISSECTOR_KEY_IP, ip);
776         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
777                              FLOW_DISSECTOR_KEY_TCP, tcp);
778         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
779                              FLOW_DISSECTOR_KEY_ICMP, icmp);
780         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
781                              FLOW_DISSECTOR_KEY_ARP, arp);
782         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
783                              FLOW_DISSECTOR_KEY_MPLS, mpls);
784         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
785                              FLOW_DISSECTOR_KEY_VLAN, vlan);
786         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
787                              FLOW_DISSECTOR_KEY_ENC_KEYID, enc_key_id);
788         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
789                              FLOW_DISSECTOR_KEY_ENC_IPV4_ADDRS, enc_ipv4);
790         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
791                              FLOW_DISSECTOR_KEY_ENC_IPV6_ADDRS, enc_ipv6);
792         if (FL_KEY_IS_MASKED(&mask->key, enc_ipv4) ||
793             FL_KEY_IS_MASKED(&mask->key, enc_ipv6))
794                 FL_KEY_SET(keys, cnt, FLOW_DISSECTOR_KEY_ENC_CONTROL,
795                            enc_control);
796         FL_KEY_SET_IF_MASKED(&mask->key, keys, cnt,
797                              FLOW_DISSECTOR_KEY_ENC_PORTS, enc_tp);
798
799         skb_flow_dissector_init(&head->dissector, keys, cnt);
800 }
801
802 static int fl_check_assign_mask(struct cls_fl_head *head,
803                                 struct fl_flow_mask *mask)
804 {
805         int err;
806
807         if (head->mask_assigned) {
808                 if (!fl_mask_eq(&head->mask, mask))
809                         return -EINVAL;
810                 else
811                         return 0;
812         }
813
814         /* Mask is not assigned yet. So assign it and init hashtable
815          * according to that.
816          */
817         err = fl_init_hashtable(head, mask);
818         if (err)
819                 return err;
820         memcpy(&head->mask, mask, sizeof(head->mask));
821         head->mask_assigned = true;
822
823         fl_init_dissector(head, mask);
824
825         return 0;
826 }
827
828 static int fl_set_parms(struct net *net, struct tcf_proto *tp,
829                         struct cls_fl_filter *f, struct fl_flow_mask *mask,
830                         unsigned long base, struct nlattr **tb,
831                         struct nlattr *est, bool ovr,
832                         struct netlink_ext_ack *extack)
833 {
834         int err;
835
836         err = tcf_exts_validate(net, tp, tb, est, &f->exts, ovr, extack);
837         if (err < 0)
838                 return err;
839
840         if (tb[TCA_FLOWER_CLASSID]) {
841                 f->res.classid = nla_get_u32(tb[TCA_FLOWER_CLASSID]);
842                 tcf_bind_filter(tp, &f->res, base);
843         }
844
845         err = fl_set_key(net, tb, &f->key, &mask->key, extack);
846         if (err)
847                 return err;
848
849         fl_mask_update_range(mask);
850         fl_set_masked_key(&f->mkey, &f->key, mask);
851
852         return 0;
853 }
854
855 static int fl_change(struct net *net, struct sk_buff *in_skb,
856                      struct tcf_proto *tp, unsigned long base,
857                      u32 handle, struct nlattr **tca,
858                      void **arg, bool ovr, struct netlink_ext_ack *extack)
859 {
860         struct cls_fl_head *head = rtnl_dereference(tp->root);
861         struct cls_fl_filter *fold = *arg;
862         struct cls_fl_filter *fnew;
863         struct nlattr **tb;
864         struct fl_flow_mask mask = {};
865         unsigned long idr_index;
866         int err;
867
868         if (!tca[TCA_OPTIONS])
869                 return -EINVAL;
870
871         tb = kcalloc(TCA_FLOWER_MAX + 1, sizeof(struct nlattr *), GFP_KERNEL);
872         if (!tb)
873                 return -ENOBUFS;
874
875         err = nla_parse_nested(tb, TCA_FLOWER_MAX, tca[TCA_OPTIONS],
876                                fl_policy, NULL);
877         if (err < 0)
878                 goto errout_tb;
879
880         if (fold && handle && fold->handle != handle) {
881                 err = -EINVAL;
882                 goto errout_tb;
883         }
884
885         fnew = kzalloc(sizeof(*fnew), GFP_KERNEL);
886         if (!fnew) {
887                 err = -ENOBUFS;
888                 goto errout_tb;
889         }
890
891         err = tcf_exts_init(&fnew->exts, TCA_FLOWER_ACT, 0);
892         if (err < 0)
893                 goto errout;
894
895         if (!handle) {
896                 err = idr_alloc_ext(&head->handle_idr, fnew, &idr_index,
897                                     1, 0x80000000, GFP_KERNEL);
898                 if (err)
899                         goto errout;
900                 fnew->handle = idr_index;
901         }
902
903         /* user specifies a handle and it doesn't exist */
904         if (handle && !fold) {
905                 err = idr_alloc_ext(&head->handle_idr, fnew, &idr_index,
906                                     handle, handle + 1, GFP_KERNEL);
907                 if (err)
908                         goto errout;
909                 fnew->handle = idr_index;
910         }
911
912         if (tb[TCA_FLOWER_FLAGS]) {
913                 fnew->flags = nla_get_u32(tb[TCA_FLOWER_FLAGS]);
914
915                 if (!tc_flags_valid(fnew->flags)) {
916                         err = -EINVAL;
917                         goto errout_idr;
918                 }
919         }
920
921         err = fl_set_parms(net, tp, fnew, &mask, base, tb, tca[TCA_RATE], ovr,
922                            extack);
923         if (err)
924                 goto errout_idr;
925
926         err = fl_check_assign_mask(head, &mask);
927         if (err)
928                 goto errout_idr;
929
930         if (!tc_skip_sw(fnew->flags)) {
931                 if (!fold && fl_lookup(head, &fnew->mkey)) {
932                         err = -EEXIST;
933                         goto errout_idr;
934                 }
935
936                 err = rhashtable_insert_fast(&head->ht, &fnew->ht_node,
937                                              head->ht_params);
938                 if (err)
939                         goto errout_idr;
940         }
941
942         if (!tc_skip_hw(fnew->flags)) {
943                 err = fl_hw_replace_filter(tp,
944                                            &head->dissector,
945                                            &mask.key,
946                                            fnew);
947                 if (err)
948                         goto errout_idr;
949         }
950
951         if (!tc_in_hw(fnew->flags))
952                 fnew->flags |= TCA_CLS_FLAGS_NOT_IN_HW;
953
954         if (fold) {
955                 if (!tc_skip_sw(fold->flags))
956                         rhashtable_remove_fast(&head->ht, &fold->ht_node,
957                                                head->ht_params);
958                 if (!tc_skip_hw(fold->flags))
959                         fl_hw_destroy_filter(tp, fold);
960         }
961
962         *arg = fnew;
963
964         if (fold) {
965                 fnew->handle = handle;
966                 idr_replace_ext(&head->handle_idr, fnew, fnew->handle);
967                 list_replace_rcu(&fold->list, &fnew->list);
968                 tcf_unbind_filter(tp, &fold->res);
969                 tcf_exts_get_net(&fold->exts);
970                 call_rcu(&fold->rcu, fl_destroy_filter);
971         } else {
972                 list_add_tail_rcu(&fnew->list, &head->filters);
973         }
974
975         kfree(tb);
976         return 0;
977
978 errout_idr:
979         if (fnew->handle)
980                 idr_remove_ext(&head->handle_idr, fnew->handle);
981 errout:
982         tcf_exts_destroy(&fnew->exts);
983         kfree(fnew);
984 errout_tb:
985         kfree(tb);
986         return err;
987 }
988
989 static int fl_delete(struct tcf_proto *tp, void *arg, bool *last,
990                      struct netlink_ext_ack *extack)
991 {
992         struct cls_fl_head *head = rtnl_dereference(tp->root);
993         struct cls_fl_filter *f = arg;
994
995         if (!tc_skip_sw(f->flags))
996                 rhashtable_remove_fast(&head->ht, &f->ht_node,
997                                        head->ht_params);
998         __fl_delete(tp, f);
999         *last = list_empty(&head->filters);
1000         return 0;
1001 }
1002
1003 static void fl_walk(struct tcf_proto *tp, struct tcf_walker *arg)
1004 {
1005         struct cls_fl_head *head = rtnl_dereference(tp->root);
1006         struct cls_fl_filter *f;
1007
1008         list_for_each_entry_rcu(f, &head->filters, list) {
1009                 if (arg->count < arg->skip)
1010                         goto skip;
1011                 if (arg->fn(tp, f, arg) < 0) {
1012                         arg->stop = 1;
1013                         break;
1014                 }
1015 skip:
1016                 arg->count++;
1017         }
1018 }
1019
1020 static int fl_dump_key_val(struct sk_buff *skb,
1021                            void *val, int val_type,
1022                            void *mask, int mask_type, int len)
1023 {
1024         int err;
1025
1026         if (!memchr_inv(mask, 0, len))
1027                 return 0;
1028         err = nla_put(skb, val_type, len, val);
1029         if (err)
1030                 return err;
1031         if (mask_type != TCA_FLOWER_UNSPEC) {
1032                 err = nla_put(skb, mask_type, len, mask);
1033                 if (err)
1034                         return err;
1035         }
1036         return 0;
1037 }
1038
1039 static int fl_dump_key_mpls(struct sk_buff *skb,
1040                             struct flow_dissector_key_mpls *mpls_key,
1041                             struct flow_dissector_key_mpls *mpls_mask)
1042 {
1043         int err;
1044
1045         if (!memchr_inv(mpls_mask, 0, sizeof(*mpls_mask)))
1046                 return 0;
1047         if (mpls_mask->mpls_ttl) {
1048                 err = nla_put_u8(skb, TCA_FLOWER_KEY_MPLS_TTL,
1049                                  mpls_key->mpls_ttl);
1050                 if (err)
1051                         return err;
1052         }
1053         if (mpls_mask->mpls_tc) {
1054                 err = nla_put_u8(skb, TCA_FLOWER_KEY_MPLS_TC,
1055                                  mpls_key->mpls_tc);
1056                 if (err)
1057                         return err;
1058         }
1059         if (mpls_mask->mpls_label) {
1060                 err = nla_put_u32(skb, TCA_FLOWER_KEY_MPLS_LABEL,
1061                                   mpls_key->mpls_label);
1062                 if (err)
1063                         return err;
1064         }
1065         if (mpls_mask->mpls_bos) {
1066                 err = nla_put_u8(skb, TCA_FLOWER_KEY_MPLS_BOS,
1067                                  mpls_key->mpls_bos);
1068                 if (err)
1069                         return err;
1070         }
1071         return 0;
1072 }
1073
1074 static int fl_dump_key_ip(struct sk_buff *skb,
1075                           struct flow_dissector_key_ip *key,
1076                           struct flow_dissector_key_ip *mask)
1077 {
1078         if (fl_dump_key_val(skb, &key->tos, TCA_FLOWER_KEY_IP_TOS, &mask->tos,
1079                             TCA_FLOWER_KEY_IP_TOS_MASK, sizeof(key->tos)) ||
1080             fl_dump_key_val(skb, &key->ttl, TCA_FLOWER_KEY_IP_TTL, &mask->ttl,
1081                             TCA_FLOWER_KEY_IP_TTL_MASK, sizeof(key->ttl)))
1082                 return -1;
1083
1084         return 0;
1085 }
1086
1087 static int fl_dump_key_vlan(struct sk_buff *skb,
1088                             struct flow_dissector_key_vlan *vlan_key,
1089                             struct flow_dissector_key_vlan *vlan_mask)
1090 {
1091         int err;
1092
1093         if (!memchr_inv(vlan_mask, 0, sizeof(*vlan_mask)))
1094                 return 0;
1095         if (vlan_mask->vlan_id) {
1096                 err = nla_put_u16(skb, TCA_FLOWER_KEY_VLAN_ID,
1097                                   vlan_key->vlan_id);
1098                 if (err)
1099                         return err;
1100         }
1101         if (vlan_mask->vlan_priority) {
1102                 err = nla_put_u8(skb, TCA_FLOWER_KEY_VLAN_PRIO,
1103                                  vlan_key->vlan_priority);
1104                 if (err)
1105                         return err;
1106         }
1107         return 0;
1108 }
1109
1110 static void fl_get_key_flag(u32 dissector_key, u32 dissector_mask,
1111                             u32 *flower_key, u32 *flower_mask,
1112                             u32 flower_flag_bit, u32 dissector_flag_bit)
1113 {
1114         if (dissector_mask & dissector_flag_bit) {
1115                 *flower_mask |= flower_flag_bit;
1116                 if (dissector_key & dissector_flag_bit)
1117                         *flower_key |= flower_flag_bit;
1118         }
1119 }
1120
1121 static int fl_dump_key_flags(struct sk_buff *skb, u32 flags_key, u32 flags_mask)
1122 {
1123         u32 key, mask;
1124         __be32 _key, _mask;
1125         int err;
1126
1127         if (!memchr_inv(&flags_mask, 0, sizeof(flags_mask)))
1128                 return 0;
1129
1130         key = 0;
1131         mask = 0;
1132
1133         fl_get_key_flag(flags_key, flags_mask, &key, &mask,
1134                         TCA_FLOWER_KEY_FLAGS_IS_FRAGMENT, FLOW_DIS_IS_FRAGMENT);
1135
1136         _key = cpu_to_be32(key);
1137         _mask = cpu_to_be32(mask);
1138
1139         err = nla_put(skb, TCA_FLOWER_KEY_FLAGS, 4, &_key);
1140         if (err)
1141                 return err;
1142
1143         return nla_put(skb, TCA_FLOWER_KEY_FLAGS_MASK, 4, &_mask);
1144 }
1145
1146 static int fl_dump(struct net *net, struct tcf_proto *tp, void *fh,
1147                    struct sk_buff *skb, struct tcmsg *t)
1148 {
1149         struct cls_fl_head *head = rtnl_dereference(tp->root);
1150         struct cls_fl_filter *f = fh;
1151         struct nlattr *nest;
1152         struct fl_flow_key *key, *mask;
1153
1154         if (!f)
1155                 return skb->len;
1156
1157         t->tcm_handle = f->handle;
1158
1159         nest = nla_nest_start(skb, TCA_OPTIONS);
1160         if (!nest)
1161                 goto nla_put_failure;
1162
1163         if (f->res.classid &&
1164             nla_put_u32(skb, TCA_FLOWER_CLASSID, f->res.classid))
1165                 goto nla_put_failure;
1166
1167         key = &f->key;
1168         mask = &head->mask.key;
1169
1170         if (mask->indev_ifindex) {
1171                 struct net_device *dev;
1172
1173                 dev = __dev_get_by_index(net, key->indev_ifindex);
1174                 if (dev && nla_put_string(skb, TCA_FLOWER_INDEV, dev->name))
1175                         goto nla_put_failure;
1176         }
1177
1178         if (!tc_skip_hw(f->flags))
1179                 fl_hw_update_stats(tp, f);
1180
1181         if (fl_dump_key_val(skb, key->eth.dst, TCA_FLOWER_KEY_ETH_DST,
1182                             mask->eth.dst, TCA_FLOWER_KEY_ETH_DST_MASK,
1183                             sizeof(key->eth.dst)) ||
1184             fl_dump_key_val(skb, key->eth.src, TCA_FLOWER_KEY_ETH_SRC,
1185                             mask->eth.src, TCA_FLOWER_KEY_ETH_SRC_MASK,
1186                             sizeof(key->eth.src)) ||
1187             fl_dump_key_val(skb, &key->basic.n_proto, TCA_FLOWER_KEY_ETH_TYPE,
1188                             &mask->basic.n_proto, TCA_FLOWER_UNSPEC,
1189                             sizeof(key->basic.n_proto)))
1190                 goto nla_put_failure;
1191
1192         if (fl_dump_key_mpls(skb, &key->mpls, &mask->mpls))
1193                 goto nla_put_failure;
1194
1195         if (fl_dump_key_vlan(skb, &key->vlan, &mask->vlan))
1196                 goto nla_put_failure;
1197
1198         if ((key->basic.n_proto == htons(ETH_P_IP) ||
1199              key->basic.n_proto == htons(ETH_P_IPV6)) &&
1200             (fl_dump_key_val(skb, &key->basic.ip_proto, TCA_FLOWER_KEY_IP_PROTO,
1201                             &mask->basic.ip_proto, TCA_FLOWER_UNSPEC,
1202                             sizeof(key->basic.ip_proto)) ||
1203             fl_dump_key_ip(skb, &key->ip, &mask->ip)))
1204                 goto nla_put_failure;
1205
1206         if (key->control.addr_type == FLOW_DISSECTOR_KEY_IPV4_ADDRS &&
1207             (fl_dump_key_val(skb, &key->ipv4.src, TCA_FLOWER_KEY_IPV4_SRC,
1208                              &mask->ipv4.src, TCA_FLOWER_KEY_IPV4_SRC_MASK,
1209                              sizeof(key->ipv4.src)) ||
1210              fl_dump_key_val(skb, &key->ipv4.dst, TCA_FLOWER_KEY_IPV4_DST,
1211                              &mask->ipv4.dst, TCA_FLOWER_KEY_IPV4_DST_MASK,
1212                              sizeof(key->ipv4.dst))))
1213                 goto nla_put_failure;
1214         else if (key->control.addr_type == FLOW_DISSECTOR_KEY_IPV6_ADDRS &&
1215                  (fl_dump_key_val(skb, &key->ipv6.src, TCA_FLOWER_KEY_IPV6_SRC,
1216                                   &mask->ipv6.src, TCA_FLOWER_KEY_IPV6_SRC_MASK,
1217                                   sizeof(key->ipv6.src)) ||
1218                   fl_dump_key_val(skb, &key->ipv6.dst, TCA_FLOWER_KEY_IPV6_DST,
1219                                   &mask->ipv6.dst, TCA_FLOWER_KEY_IPV6_DST_MASK,
1220                                   sizeof(key->ipv6.dst))))
1221                 goto nla_put_failure;
1222
1223         if (key->basic.ip_proto == IPPROTO_TCP &&
1224             (fl_dump_key_val(skb, &key->tp.src, TCA_FLOWER_KEY_TCP_SRC,
1225                              &mask->tp.src, TCA_FLOWER_KEY_TCP_SRC_MASK,
1226                              sizeof(key->tp.src)) ||
1227              fl_dump_key_val(skb, &key->tp.dst, TCA_FLOWER_KEY_TCP_DST,
1228                              &mask->tp.dst, TCA_FLOWER_KEY_TCP_DST_MASK,
1229                              sizeof(key->tp.dst)) ||
1230              fl_dump_key_val(skb, &key->tcp.flags, TCA_FLOWER_KEY_TCP_FLAGS,
1231                              &mask->tcp.flags, TCA_FLOWER_KEY_TCP_FLAGS_MASK,
1232                              sizeof(key->tcp.flags))))
1233                 goto nla_put_failure;
1234         else if (key->basic.ip_proto == IPPROTO_UDP &&
1235                  (fl_dump_key_val(skb, &key->tp.src, TCA_FLOWER_KEY_UDP_SRC,
1236                                   &mask->tp.src, TCA_FLOWER_KEY_UDP_SRC_MASK,
1237                                   sizeof(key->tp.src)) ||
1238                   fl_dump_key_val(skb, &key->tp.dst, TCA_FLOWER_KEY_UDP_DST,
1239                                   &mask->tp.dst, TCA_FLOWER_KEY_UDP_DST_MASK,
1240                                   sizeof(key->tp.dst))))
1241                 goto nla_put_failure;
1242         else if (key->basic.ip_proto == IPPROTO_SCTP &&
1243                  (fl_dump_key_val(skb, &key->tp.src, TCA_FLOWER_KEY_SCTP_SRC,
1244                                   &mask->tp.src, TCA_FLOWER_KEY_SCTP_SRC_MASK,
1245                                   sizeof(key->tp.src)) ||
1246                   fl_dump_key_val(skb, &key->tp.dst, TCA_FLOWER_KEY_SCTP_DST,
1247                                   &mask->tp.dst, TCA_FLOWER_KEY_SCTP_DST_MASK,
1248                                   sizeof(key->tp.dst))))
1249                 goto nla_put_failure;
1250         else if (key->basic.n_proto == htons(ETH_P_IP) &&
1251                  key->basic.ip_proto == IPPROTO_ICMP &&
1252                  (fl_dump_key_val(skb, &key->icmp.type,
1253                                   TCA_FLOWER_KEY_ICMPV4_TYPE, &mask->icmp.type,
1254                                   TCA_FLOWER_KEY_ICMPV4_TYPE_MASK,
1255                                   sizeof(key->icmp.type)) ||
1256                   fl_dump_key_val(skb, &key->icmp.code,
1257                                   TCA_FLOWER_KEY_ICMPV4_CODE, &mask->icmp.code,
1258                                   TCA_FLOWER_KEY_ICMPV4_CODE_MASK,
1259                                   sizeof(key->icmp.code))))
1260                 goto nla_put_failure;
1261         else if (key->basic.n_proto == htons(ETH_P_IPV6) &&
1262                  key->basic.ip_proto == IPPROTO_ICMPV6 &&
1263                  (fl_dump_key_val(skb, &key->icmp.type,
1264                                   TCA_FLOWER_KEY_ICMPV6_TYPE, &mask->icmp.type,
1265                                   TCA_FLOWER_KEY_ICMPV6_TYPE_MASK,
1266                                   sizeof(key->icmp.type)) ||
1267                   fl_dump_key_val(skb, &key->icmp.code,
1268                                   TCA_FLOWER_KEY_ICMPV6_CODE, &mask->icmp.code,
1269                                   TCA_FLOWER_KEY_ICMPV6_CODE_MASK,
1270                                   sizeof(key->icmp.code))))
1271                 goto nla_put_failure;
1272         else if ((key->basic.n_proto == htons(ETH_P_ARP) ||
1273                   key->basic.n_proto == htons(ETH_P_RARP)) &&
1274                  (fl_dump_key_val(skb, &key->arp.sip,
1275                                   TCA_FLOWER_KEY_ARP_SIP, &mask->arp.sip,
1276                                   TCA_FLOWER_KEY_ARP_SIP_MASK,
1277                                   sizeof(key->arp.sip)) ||
1278                   fl_dump_key_val(skb, &key->arp.tip,
1279                                   TCA_FLOWER_KEY_ARP_TIP, &mask->arp.tip,
1280                                   TCA_FLOWER_KEY_ARP_TIP_MASK,
1281                                   sizeof(key->arp.tip)) ||
1282                   fl_dump_key_val(skb, &key->arp.op,
1283                                   TCA_FLOWER_KEY_ARP_OP, &mask->arp.op,
1284                                   TCA_FLOWER_KEY_ARP_OP_MASK,
1285                                   sizeof(key->arp.op)) ||
1286                   fl_dump_key_val(skb, key->arp.sha, TCA_FLOWER_KEY_ARP_SHA,
1287                                   mask->arp.sha, TCA_FLOWER_KEY_ARP_SHA_MASK,
1288                                   sizeof(key->arp.sha)) ||
1289                   fl_dump_key_val(skb, key->arp.tha, TCA_FLOWER_KEY_ARP_THA,
1290                                   mask->arp.tha, TCA_FLOWER_KEY_ARP_THA_MASK,
1291                                   sizeof(key->arp.tha))))
1292                 goto nla_put_failure;
1293
1294         if (key->enc_control.addr_type == FLOW_DISSECTOR_KEY_IPV4_ADDRS &&
1295             (fl_dump_key_val(skb, &key->enc_ipv4.src,
1296                             TCA_FLOWER_KEY_ENC_IPV4_SRC, &mask->enc_ipv4.src,
1297                             TCA_FLOWER_KEY_ENC_IPV4_SRC_MASK,
1298                             sizeof(key->enc_ipv4.src)) ||
1299              fl_dump_key_val(skb, &key->enc_ipv4.dst,
1300                              TCA_FLOWER_KEY_ENC_IPV4_DST, &mask->enc_ipv4.dst,
1301                              TCA_FLOWER_KEY_ENC_IPV4_DST_MASK,
1302                              sizeof(key->enc_ipv4.dst))))
1303                 goto nla_put_failure;
1304         else if (key->enc_control.addr_type == FLOW_DISSECTOR_KEY_IPV6_ADDRS &&
1305                  (fl_dump_key_val(skb, &key->enc_ipv6.src,
1306                             TCA_FLOWER_KEY_ENC_IPV6_SRC, &mask->enc_ipv6.src,
1307                             TCA_FLOWER_KEY_ENC_IPV6_SRC_MASK,
1308                             sizeof(key->enc_ipv6.src)) ||
1309                  fl_dump_key_val(skb, &key->enc_ipv6.dst,
1310                                  TCA_FLOWER_KEY_ENC_IPV6_DST,
1311                                  &mask->enc_ipv6.dst,
1312                                  TCA_FLOWER_KEY_ENC_IPV6_DST_MASK,
1313                             sizeof(key->enc_ipv6.dst))))
1314                 goto nla_put_failure;
1315
1316         if (fl_dump_key_val(skb, &key->enc_key_id, TCA_FLOWER_KEY_ENC_KEY_ID,
1317                             &mask->enc_key_id, TCA_FLOWER_UNSPEC,
1318                             sizeof(key->enc_key_id)) ||
1319             fl_dump_key_val(skb, &key->enc_tp.src,
1320                             TCA_FLOWER_KEY_ENC_UDP_SRC_PORT,
1321                             &mask->enc_tp.src,
1322                             TCA_FLOWER_KEY_ENC_UDP_SRC_PORT_MASK,
1323                             sizeof(key->enc_tp.src)) ||
1324             fl_dump_key_val(skb, &key->enc_tp.dst,
1325                             TCA_FLOWER_KEY_ENC_UDP_DST_PORT,
1326                             &mask->enc_tp.dst,
1327                             TCA_FLOWER_KEY_ENC_UDP_DST_PORT_MASK,
1328                             sizeof(key->enc_tp.dst)))
1329                 goto nla_put_failure;
1330
1331         if (fl_dump_key_flags(skb, key->control.flags, mask->control.flags))
1332                 goto nla_put_failure;
1333
1334         if (f->flags && nla_put_u32(skb, TCA_FLOWER_FLAGS, f->flags))
1335                 goto nla_put_failure;
1336
1337         if (tcf_exts_dump(skb, &f->exts))
1338                 goto nla_put_failure;
1339
1340         nla_nest_end(skb, nest);
1341
1342         if (tcf_exts_dump_stats(skb, &f->exts) < 0)
1343                 goto nla_put_failure;
1344
1345         return skb->len;
1346
1347 nla_put_failure:
1348         nla_nest_cancel(skb, nest);
1349         return -1;
1350 }
1351
1352 static void fl_bind_class(void *fh, u32 classid, unsigned long cl)
1353 {
1354         struct cls_fl_filter *f = fh;
1355
1356         if (f && f->res.classid == classid)
1357                 f->res.class = cl;
1358 }
1359
1360 static struct tcf_proto_ops cls_fl_ops __read_mostly = {
1361         .kind           = "flower",
1362         .classify       = fl_classify,
1363         .init           = fl_init,
1364         .destroy        = fl_destroy,
1365         .get            = fl_get,
1366         .change         = fl_change,
1367         .delete         = fl_delete,
1368         .walk           = fl_walk,
1369         .dump           = fl_dump,
1370         .bind_class     = fl_bind_class,
1371         .owner          = THIS_MODULE,
1372 };
1373
1374 static int __init cls_fl_init(void)
1375 {
1376         return register_tcf_proto_ops(&cls_fl_ops);
1377 }
1378
1379 static void __exit cls_fl_exit(void)
1380 {
1381         unregister_tcf_proto_ops(&cls_fl_ops);
1382 }
1383
1384 module_init(cls_fl_init);
1385 module_exit(cls_fl_exit);
1386
1387 MODULE_AUTHOR("Jiri Pirko <jiri@resnulli.us>");
1388 MODULE_DESCRIPTION("Flower classifier");
1389 MODULE_LICENSE("GPL v2");