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