xref: /linux/net/sched/act_tunnel_key.c (revision 90e0d94d369d342e735a75174439482119b6c393)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * Copyright (c) 2016, Amir Vadai <amir@vadai.me>
4  * Copyright (c) 2016, Mellanox Technologies. All rights reserved.
5  */
6 
7 #include <linux/module.h>
8 #include <linux/init.h>
9 #include <linux/kernel.h>
10 #include <linux/skbuff.h>
11 #include <linux/rtnetlink.h>
12 #include <net/geneve.h>
13 #include <net/vxlan.h>
14 #include <net/erspan.h>
15 #include <net/netlink.h>
16 #include <net/pkt_sched.h>
17 #include <net/dst.h>
18 #include <net/pkt_cls.h>
19 
20 #include <linux/tc_act/tc_tunnel_key.h>
21 #include <net/tc_act/tc_tunnel_key.h>
22 
23 static struct tc_action_ops act_tunnel_key_ops;
24 
25 static int tunnel_key_act(struct sk_buff *skb, const struct tc_action *a,
26 			  struct tcf_result *res)
27 {
28 	struct tcf_tunnel_key *t = to_tunnel_key(a);
29 	struct tcf_tunnel_key_params *params;
30 	int action;
31 
32 	params = rcu_dereference_bh(t->params);
33 
34 	tcf_lastuse_update(&t->tcf_tm);
35 	tcf_action_update_bstats(&t->common, skb);
36 	action = READ_ONCE(t->tcf_action);
37 
38 	switch (params->tcft_action) {
39 	case TCA_TUNNEL_KEY_ACT_RELEASE:
40 		skb_dst_drop(skb);
41 		break;
42 	case TCA_TUNNEL_KEY_ACT_SET:
43 		skb_dst_drop(skb);
44 		skb_dst_set(skb, dst_clone(&params->tcft_enc_metadata->dst));
45 		break;
46 	default:
47 		WARN_ONCE(1, "Bad tunnel_key action %d.\n",
48 			  params->tcft_action);
49 		break;
50 	}
51 
52 	return action;
53 }
54 
55 static const struct nla_policy
56 enc_opts_policy[TCA_TUNNEL_KEY_ENC_OPTS_MAX + 1] = {
57 	[TCA_TUNNEL_KEY_ENC_OPTS_UNSPEC]	= {
58 		.strict_start_type = TCA_TUNNEL_KEY_ENC_OPTS_VXLAN },
59 	[TCA_TUNNEL_KEY_ENC_OPTS_GENEVE]	= { .type = NLA_NESTED },
60 	[TCA_TUNNEL_KEY_ENC_OPTS_VXLAN]		= { .type = NLA_NESTED },
61 	[TCA_TUNNEL_KEY_ENC_OPTS_ERSPAN]	= { .type = NLA_NESTED },
62 };
63 
64 static const struct nla_policy
65 geneve_opt_policy[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_MAX + 1] = {
66 	[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_CLASS]	   = { .type = NLA_U16 },
67 	[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_TYPE]	   = { .type = NLA_U8 },
68 	[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_DATA]	   = { .type = NLA_BINARY,
69 						       .len = 128 },
70 };
71 
72 static const struct nla_policy
73 vxlan_opt_policy[TCA_TUNNEL_KEY_ENC_OPT_VXLAN_MAX + 1] = {
74 	[TCA_TUNNEL_KEY_ENC_OPT_VXLAN_GBP]	   = { .type = NLA_U32 },
75 };
76 
77 static const struct nla_policy
78 erspan_opt_policy[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_MAX + 1] = {
79 	[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_VER]	   = { .type = NLA_U8 },
80 	[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_INDEX]	   = { .type = NLA_U32 },
81 	[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_DIR]	   = { .type = NLA_U8 },
82 	[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_HWID]	   = { .type = NLA_U8 },
83 };
84 
85 static int
86 tunnel_key_copy_geneve_opt(const struct nlattr *nla, void *dst, int dst_len,
87 			   struct netlink_ext_ack *extack)
88 {
89 	struct nlattr *tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_MAX + 1];
90 	int err, data_len, opt_len;
91 	u8 *data;
92 
93 	err = nla_parse_nested_deprecated(tb,
94 					  TCA_TUNNEL_KEY_ENC_OPT_GENEVE_MAX,
95 					  nla, geneve_opt_policy, extack);
96 	if (err < 0)
97 		return err;
98 
99 	if (!tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_CLASS] ||
100 	    !tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_TYPE] ||
101 	    !tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_DATA]) {
102 		NL_SET_ERR_MSG(extack, "Missing tunnel key geneve option class, type or data");
103 		return -EINVAL;
104 	}
105 
106 	data = nla_data(tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_DATA]);
107 	data_len = nla_len(tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_DATA]);
108 	if (data_len < 4) {
109 		NL_SET_ERR_MSG(extack, "Tunnel key geneve option data is less than 4 bytes long");
110 		return -ERANGE;
111 	}
112 	if (data_len % 4) {
113 		NL_SET_ERR_MSG(extack, "Tunnel key geneve option data is not a multiple of 4 bytes long");
114 		return -ERANGE;
115 	}
116 
117 	opt_len = sizeof(struct geneve_opt) + data_len;
118 	if (dst) {
119 		struct geneve_opt *opt = dst;
120 
121 		WARN_ON(dst_len < opt_len);
122 
123 		opt->opt_class =
124 			nla_get_be16(tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_CLASS]);
125 		opt->type = nla_get_u8(tb[TCA_TUNNEL_KEY_ENC_OPT_GENEVE_TYPE]);
126 		opt->length = data_len / 4; /* length is in units of 4 bytes */
127 		opt->r1 = 0;
128 		opt->r2 = 0;
129 		opt->r3 = 0;
130 
131 		memcpy(opt + 1, data, data_len);
132 	}
133 
134 	return opt_len;
135 }
136 
137 static int
138 tunnel_key_copy_vxlan_opt(const struct nlattr *nla, void *dst, int dst_len,
139 			  struct netlink_ext_ack *extack)
140 {
141 	struct nlattr *tb[TCA_TUNNEL_KEY_ENC_OPT_VXLAN_MAX + 1];
142 	int err;
143 
144 	err = nla_parse_nested(tb, TCA_TUNNEL_KEY_ENC_OPT_VXLAN_MAX, nla,
145 			       vxlan_opt_policy, extack);
146 	if (err < 0)
147 		return err;
148 
149 	if (!tb[TCA_TUNNEL_KEY_ENC_OPT_VXLAN_GBP]) {
150 		NL_SET_ERR_MSG(extack, "Missing tunnel key vxlan option gbp");
151 		return -EINVAL;
152 	}
153 
154 	if (dst) {
155 		struct vxlan_metadata *md = dst;
156 
157 		md->gbp = nla_get_u32(tb[TCA_TUNNEL_KEY_ENC_OPT_VXLAN_GBP]);
158 		md->gbp &= VXLAN_GBP_MASK;
159 	}
160 
161 	return sizeof(struct vxlan_metadata);
162 }
163 
164 static int
165 tunnel_key_copy_erspan_opt(const struct nlattr *nla, void *dst, int dst_len,
166 			   struct netlink_ext_ack *extack)
167 {
168 	struct nlattr *tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_MAX + 1];
169 	int err;
170 	u8 ver;
171 
172 	err = nla_parse_nested(tb, TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_MAX, nla,
173 			       erspan_opt_policy, extack);
174 	if (err < 0)
175 		return err;
176 
177 	if (!tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_VER]) {
178 		NL_SET_ERR_MSG(extack, "Missing tunnel key erspan option ver");
179 		return -EINVAL;
180 	}
181 
182 	ver = nla_get_u8(tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_VER]);
183 	if (ver == 1) {
184 		if (!tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_INDEX]) {
185 			NL_SET_ERR_MSG(extack, "Missing tunnel key erspan option index");
186 			return -EINVAL;
187 		}
188 	} else if (ver == 2) {
189 		if (!tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_DIR] ||
190 		    !tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_HWID]) {
191 			NL_SET_ERR_MSG(extack, "Missing tunnel key erspan option dir or hwid");
192 			return -EINVAL;
193 		}
194 	} else {
195 		NL_SET_ERR_MSG(extack, "Tunnel key erspan option ver is incorrect");
196 		return -EINVAL;
197 	}
198 
199 	if (dst) {
200 		struct erspan_metadata *md = dst;
201 
202 		md->version = ver;
203 		if (ver == 1) {
204 			nla = tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_INDEX];
205 			md->u.index = nla_get_be32(nla);
206 		} else {
207 			nla = tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_DIR];
208 			md->u.md2.dir = nla_get_u8(nla);
209 			nla = tb[TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_HWID];
210 			set_hwid(&md->u.md2, nla_get_u8(nla));
211 		}
212 	}
213 
214 	return sizeof(struct erspan_metadata);
215 }
216 
217 static int tunnel_key_copy_opts(const struct nlattr *nla, u8 *dst,
218 				int dst_len, struct netlink_ext_ack *extack)
219 {
220 	int err, rem, opt_len, len = nla_len(nla), opts_len = 0, type = 0;
221 	const struct nlattr *attr, *head = nla_data(nla);
222 
223 	err = nla_validate_deprecated(head, len, TCA_TUNNEL_KEY_ENC_OPTS_MAX,
224 				      enc_opts_policy, extack);
225 	if (err)
226 		return err;
227 
228 	nla_for_each_attr(attr, head, len, rem) {
229 		switch (nla_type(attr)) {
230 		case TCA_TUNNEL_KEY_ENC_OPTS_GENEVE:
231 			if (type && type != TUNNEL_GENEVE_OPT) {
232 				NL_SET_ERR_MSG(extack, "Duplicate type for geneve options");
233 				return -EINVAL;
234 			}
235 			opt_len = tunnel_key_copy_geneve_opt(attr, dst,
236 							     dst_len, extack);
237 			if (opt_len < 0)
238 				return opt_len;
239 			opts_len += opt_len;
240 			if (opts_len > IP_TUNNEL_OPTS_MAX) {
241 				NL_SET_ERR_MSG(extack, "Tunnel options exceeds max size");
242 				return -EINVAL;
243 			}
244 			if (dst) {
245 				dst_len -= opt_len;
246 				dst += opt_len;
247 			}
248 			type = TUNNEL_GENEVE_OPT;
249 			break;
250 		case TCA_TUNNEL_KEY_ENC_OPTS_VXLAN:
251 			if (type) {
252 				NL_SET_ERR_MSG(extack, "Duplicate type for vxlan options");
253 				return -EINVAL;
254 			}
255 			opt_len = tunnel_key_copy_vxlan_opt(attr, dst,
256 							    dst_len, extack);
257 			if (opt_len < 0)
258 				return opt_len;
259 			opts_len += opt_len;
260 			type = TUNNEL_VXLAN_OPT;
261 			break;
262 		case TCA_TUNNEL_KEY_ENC_OPTS_ERSPAN:
263 			if (type) {
264 				NL_SET_ERR_MSG(extack, "Duplicate type for erspan options");
265 				return -EINVAL;
266 			}
267 			opt_len = tunnel_key_copy_erspan_opt(attr, dst,
268 							     dst_len, extack);
269 			if (opt_len < 0)
270 				return opt_len;
271 			opts_len += opt_len;
272 			type = TUNNEL_ERSPAN_OPT;
273 			break;
274 		}
275 	}
276 
277 	if (!opts_len) {
278 		NL_SET_ERR_MSG(extack, "Empty list of tunnel options");
279 		return -EINVAL;
280 	}
281 
282 	if (rem > 0) {
283 		NL_SET_ERR_MSG(extack, "Trailing data after parsing tunnel key options attributes");
284 		return -EINVAL;
285 	}
286 
287 	return opts_len;
288 }
289 
290 static int tunnel_key_get_opts_len(struct nlattr *nla,
291 				   struct netlink_ext_ack *extack)
292 {
293 	return tunnel_key_copy_opts(nla, NULL, 0, extack);
294 }
295 
296 static int tunnel_key_opts_set(struct nlattr *nla, struct ip_tunnel_info *info,
297 			       int opts_len, struct netlink_ext_ack *extack)
298 {
299 	info->options_len = opts_len;
300 	switch (nla_type(nla_data(nla))) {
301 	case TCA_TUNNEL_KEY_ENC_OPTS_GENEVE:
302 #if IS_ENABLED(CONFIG_INET)
303 		info->key.tun_flags |= TUNNEL_GENEVE_OPT;
304 		return tunnel_key_copy_opts(nla, ip_tunnel_info_opts(info),
305 					    opts_len, extack);
306 #else
307 		return -EAFNOSUPPORT;
308 #endif
309 	case TCA_TUNNEL_KEY_ENC_OPTS_VXLAN:
310 #if IS_ENABLED(CONFIG_INET)
311 		info->key.tun_flags |= TUNNEL_VXLAN_OPT;
312 		return tunnel_key_copy_opts(nla, ip_tunnel_info_opts(info),
313 					    opts_len, extack);
314 #else
315 		return -EAFNOSUPPORT;
316 #endif
317 	case TCA_TUNNEL_KEY_ENC_OPTS_ERSPAN:
318 #if IS_ENABLED(CONFIG_INET)
319 		info->key.tun_flags |= TUNNEL_ERSPAN_OPT;
320 		return tunnel_key_copy_opts(nla, ip_tunnel_info_opts(info),
321 					    opts_len, extack);
322 #else
323 		return -EAFNOSUPPORT;
324 #endif
325 	default:
326 		NL_SET_ERR_MSG(extack, "Cannot set tunnel options for unknown tunnel type");
327 		return -EINVAL;
328 	}
329 }
330 
331 static const struct nla_policy tunnel_key_policy[TCA_TUNNEL_KEY_MAX + 1] = {
332 	[TCA_TUNNEL_KEY_PARMS]	    = { .len = sizeof(struct tc_tunnel_key) },
333 	[TCA_TUNNEL_KEY_ENC_IPV4_SRC] = { .type = NLA_U32 },
334 	[TCA_TUNNEL_KEY_ENC_IPV4_DST] = { .type = NLA_U32 },
335 	[TCA_TUNNEL_KEY_ENC_IPV6_SRC] = { .len = sizeof(struct in6_addr) },
336 	[TCA_TUNNEL_KEY_ENC_IPV6_DST] = { .len = sizeof(struct in6_addr) },
337 	[TCA_TUNNEL_KEY_ENC_KEY_ID]   = { .type = NLA_U32 },
338 	[TCA_TUNNEL_KEY_ENC_DST_PORT] = {.type = NLA_U16},
339 	[TCA_TUNNEL_KEY_NO_CSUM]      = { .type = NLA_U8 },
340 	[TCA_TUNNEL_KEY_ENC_OPTS]     = { .type = NLA_NESTED },
341 	[TCA_TUNNEL_KEY_ENC_TOS]      = { .type = NLA_U8 },
342 	[TCA_TUNNEL_KEY_ENC_TTL]      = { .type = NLA_U8 },
343 };
344 
345 static void tunnel_key_release_params(struct tcf_tunnel_key_params *p)
346 {
347 	if (!p)
348 		return;
349 	if (p->tcft_action == TCA_TUNNEL_KEY_ACT_SET)
350 		dst_release(&p->tcft_enc_metadata->dst);
351 
352 	kfree_rcu(p, rcu);
353 }
354 
355 static int tunnel_key_init(struct net *net, struct nlattr *nla,
356 			   struct nlattr *est, struct tc_action **a,
357 			   struct tcf_proto *tp, u32 act_flags,
358 			   struct netlink_ext_ack *extack)
359 {
360 	struct tc_action_net *tn = net_generic(net, act_tunnel_key_ops.net_id);
361 	bool bind = act_flags & TCA_ACT_FLAGS_BIND;
362 	struct nlattr *tb[TCA_TUNNEL_KEY_MAX + 1];
363 	struct tcf_tunnel_key_params *params_new;
364 	struct metadata_dst *metadata = NULL;
365 	struct tcf_chain *goto_ch = NULL;
366 	struct tc_tunnel_key *parm;
367 	struct tcf_tunnel_key *t;
368 	bool exists = false;
369 	__be16 dst_port = 0;
370 	__be64 key_id = 0;
371 	int opts_len = 0;
372 	__be16 flags = 0;
373 	u8 tos, ttl;
374 	int ret = 0;
375 	u32 index;
376 	int err;
377 
378 	if (!nla) {
379 		NL_SET_ERR_MSG(extack, "Tunnel requires attributes to be passed");
380 		return -EINVAL;
381 	}
382 
383 	err = nla_parse_nested_deprecated(tb, TCA_TUNNEL_KEY_MAX, nla,
384 					  tunnel_key_policy, extack);
385 	if (err < 0) {
386 		NL_SET_ERR_MSG(extack, "Failed to parse nested tunnel key attributes");
387 		return err;
388 	}
389 
390 	if (!tb[TCA_TUNNEL_KEY_PARMS]) {
391 		NL_SET_ERR_MSG(extack, "Missing tunnel key parameters");
392 		return -EINVAL;
393 	}
394 
395 	parm = nla_data(tb[TCA_TUNNEL_KEY_PARMS]);
396 	index = parm->index;
397 	err = tcf_idr_check_alloc(tn, &index, a, bind);
398 	if (err < 0)
399 		return err;
400 	exists = err;
401 	if (exists && bind)
402 		return 0;
403 
404 	switch (parm->t_action) {
405 	case TCA_TUNNEL_KEY_ACT_RELEASE:
406 		break;
407 	case TCA_TUNNEL_KEY_ACT_SET:
408 		if (tb[TCA_TUNNEL_KEY_ENC_KEY_ID]) {
409 			__be32 key32;
410 
411 			key32 = nla_get_be32(tb[TCA_TUNNEL_KEY_ENC_KEY_ID]);
412 			key_id = key32_to_tunnel_id(key32);
413 			flags = TUNNEL_KEY;
414 		}
415 
416 		flags |= TUNNEL_CSUM;
417 		if (tb[TCA_TUNNEL_KEY_NO_CSUM] &&
418 		    nla_get_u8(tb[TCA_TUNNEL_KEY_NO_CSUM]))
419 			flags &= ~TUNNEL_CSUM;
420 
421 		if (tb[TCA_TUNNEL_KEY_ENC_DST_PORT])
422 			dst_port = nla_get_be16(tb[TCA_TUNNEL_KEY_ENC_DST_PORT]);
423 
424 		if (tb[TCA_TUNNEL_KEY_ENC_OPTS]) {
425 			opts_len = tunnel_key_get_opts_len(tb[TCA_TUNNEL_KEY_ENC_OPTS],
426 							   extack);
427 			if (opts_len < 0) {
428 				ret = opts_len;
429 				goto err_out;
430 			}
431 		}
432 
433 		tos = 0;
434 		if (tb[TCA_TUNNEL_KEY_ENC_TOS])
435 			tos = nla_get_u8(tb[TCA_TUNNEL_KEY_ENC_TOS]);
436 		ttl = 0;
437 		if (tb[TCA_TUNNEL_KEY_ENC_TTL])
438 			ttl = nla_get_u8(tb[TCA_TUNNEL_KEY_ENC_TTL]);
439 
440 		if (tb[TCA_TUNNEL_KEY_ENC_IPV4_SRC] &&
441 		    tb[TCA_TUNNEL_KEY_ENC_IPV4_DST]) {
442 			__be32 saddr;
443 			__be32 daddr;
444 
445 			saddr = nla_get_in_addr(tb[TCA_TUNNEL_KEY_ENC_IPV4_SRC]);
446 			daddr = nla_get_in_addr(tb[TCA_TUNNEL_KEY_ENC_IPV4_DST]);
447 
448 			metadata = __ip_tun_set_dst(saddr, daddr, tos, ttl,
449 						    dst_port, flags,
450 						    key_id, opts_len);
451 		} else if (tb[TCA_TUNNEL_KEY_ENC_IPV6_SRC] &&
452 			   tb[TCA_TUNNEL_KEY_ENC_IPV6_DST]) {
453 			struct in6_addr saddr;
454 			struct in6_addr daddr;
455 
456 			saddr = nla_get_in6_addr(tb[TCA_TUNNEL_KEY_ENC_IPV6_SRC]);
457 			daddr = nla_get_in6_addr(tb[TCA_TUNNEL_KEY_ENC_IPV6_DST]);
458 
459 			metadata = __ipv6_tun_set_dst(&saddr, &daddr, tos, ttl, dst_port,
460 						      0, flags,
461 						      key_id, opts_len);
462 		} else {
463 			NL_SET_ERR_MSG(extack, "Missing either ipv4 or ipv6 src and dst");
464 			ret = -EINVAL;
465 			goto err_out;
466 		}
467 
468 		if (!metadata) {
469 			NL_SET_ERR_MSG(extack, "Cannot allocate tunnel metadata dst");
470 			ret = -ENOMEM;
471 			goto err_out;
472 		}
473 
474 #ifdef CONFIG_DST_CACHE
475 		ret = dst_cache_init(&metadata->u.tun_info.dst_cache, GFP_KERNEL);
476 		if (ret)
477 			goto release_tun_meta;
478 #endif
479 
480 		if (opts_len) {
481 			ret = tunnel_key_opts_set(tb[TCA_TUNNEL_KEY_ENC_OPTS],
482 						  &metadata->u.tun_info,
483 						  opts_len, extack);
484 			if (ret < 0)
485 				goto release_tun_meta;
486 		}
487 
488 		metadata->u.tun_info.mode |= IP_TUNNEL_INFO_TX;
489 		break;
490 	default:
491 		NL_SET_ERR_MSG(extack, "Unknown tunnel key action");
492 		ret = -EINVAL;
493 		goto err_out;
494 	}
495 
496 	if (!exists) {
497 		ret = tcf_idr_create_from_flags(tn, index, est, a,
498 						&act_tunnel_key_ops, bind,
499 						act_flags);
500 		if (ret) {
501 			NL_SET_ERR_MSG(extack, "Cannot create TC IDR");
502 			goto release_tun_meta;
503 		}
504 
505 		ret = ACT_P_CREATED;
506 	} else if (!(act_flags & TCA_ACT_FLAGS_REPLACE)) {
507 		NL_SET_ERR_MSG(extack, "TC IDR already exists");
508 		ret = -EEXIST;
509 		goto release_tun_meta;
510 	}
511 
512 	err = tcf_action_check_ctrlact(parm->action, tp, &goto_ch, extack);
513 	if (err < 0) {
514 		ret = err;
515 		exists = true;
516 		goto release_tun_meta;
517 	}
518 	t = to_tunnel_key(*a);
519 
520 	params_new = kzalloc(sizeof(*params_new), GFP_KERNEL);
521 	if (unlikely(!params_new)) {
522 		NL_SET_ERR_MSG(extack, "Cannot allocate tunnel key parameters");
523 		ret = -ENOMEM;
524 		exists = true;
525 		goto put_chain;
526 	}
527 	params_new->tcft_action = parm->t_action;
528 	params_new->tcft_enc_metadata = metadata;
529 
530 	spin_lock_bh(&t->tcf_lock);
531 	goto_ch = tcf_action_set_ctrlact(*a, parm->action, goto_ch);
532 	params_new = rcu_replace_pointer(t->params, params_new,
533 					 lockdep_is_held(&t->tcf_lock));
534 	spin_unlock_bh(&t->tcf_lock);
535 	tunnel_key_release_params(params_new);
536 	if (goto_ch)
537 		tcf_chain_put_by_act(goto_ch);
538 
539 	return ret;
540 
541 put_chain:
542 	if (goto_ch)
543 		tcf_chain_put_by_act(goto_ch);
544 
545 release_tun_meta:
546 	if (metadata)
547 		dst_release(&metadata->dst);
548 
549 err_out:
550 	if (exists)
551 		tcf_idr_release(*a, bind);
552 	else
553 		tcf_idr_cleanup(tn, index);
554 	return ret;
555 }
556 
557 static void tunnel_key_release(struct tc_action *a)
558 {
559 	struct tcf_tunnel_key *t = to_tunnel_key(a);
560 	struct tcf_tunnel_key_params *params;
561 
562 	params = rcu_dereference_protected(t->params, 1);
563 	tunnel_key_release_params(params);
564 }
565 
566 static int tunnel_key_geneve_opts_dump(struct sk_buff *skb,
567 				       const struct ip_tunnel_info *info)
568 {
569 	int len = info->options_len;
570 	u8 *src = (u8 *)(info + 1);
571 	struct nlattr *start;
572 
573 	start = nla_nest_start_noflag(skb, TCA_TUNNEL_KEY_ENC_OPTS_GENEVE);
574 	if (!start)
575 		return -EMSGSIZE;
576 
577 	while (len > 0) {
578 		struct geneve_opt *opt = (struct geneve_opt *)src;
579 
580 		if (nla_put_be16(skb, TCA_TUNNEL_KEY_ENC_OPT_GENEVE_CLASS,
581 				 opt->opt_class) ||
582 		    nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_OPT_GENEVE_TYPE,
583 			       opt->type) ||
584 		    nla_put(skb, TCA_TUNNEL_KEY_ENC_OPT_GENEVE_DATA,
585 			    opt->length * 4, opt + 1)) {
586 			nla_nest_cancel(skb, start);
587 			return -EMSGSIZE;
588 		}
589 
590 		len -= sizeof(struct geneve_opt) + opt->length * 4;
591 		src += sizeof(struct geneve_opt) + opt->length * 4;
592 	}
593 
594 	nla_nest_end(skb, start);
595 	return 0;
596 }
597 
598 static int tunnel_key_vxlan_opts_dump(struct sk_buff *skb,
599 				      const struct ip_tunnel_info *info)
600 {
601 	struct vxlan_metadata *md = (struct vxlan_metadata *)(info + 1);
602 	struct nlattr *start;
603 
604 	start = nla_nest_start_noflag(skb, TCA_TUNNEL_KEY_ENC_OPTS_VXLAN);
605 	if (!start)
606 		return -EMSGSIZE;
607 
608 	if (nla_put_u32(skb, TCA_TUNNEL_KEY_ENC_OPT_VXLAN_GBP, md->gbp)) {
609 		nla_nest_cancel(skb, start);
610 		return -EMSGSIZE;
611 	}
612 
613 	nla_nest_end(skb, start);
614 	return 0;
615 }
616 
617 static int tunnel_key_erspan_opts_dump(struct sk_buff *skb,
618 				       const struct ip_tunnel_info *info)
619 {
620 	struct erspan_metadata *md = (struct erspan_metadata *)(info + 1);
621 	struct nlattr *start;
622 
623 	start = nla_nest_start_noflag(skb, TCA_TUNNEL_KEY_ENC_OPTS_ERSPAN);
624 	if (!start)
625 		return -EMSGSIZE;
626 
627 	if (nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_VER, md->version))
628 		goto err;
629 
630 	if (md->version == 1 &&
631 	    nla_put_be32(skb, TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_INDEX, md->u.index))
632 		goto err;
633 
634 	if (md->version == 2 &&
635 	    (nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_DIR,
636 			md->u.md2.dir) ||
637 	     nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_OPT_ERSPAN_HWID,
638 			get_hwid(&md->u.md2))))
639 		goto err;
640 
641 	nla_nest_end(skb, start);
642 	return 0;
643 err:
644 	nla_nest_cancel(skb, start);
645 	return -EMSGSIZE;
646 }
647 
648 static int tunnel_key_opts_dump(struct sk_buff *skb,
649 				const struct ip_tunnel_info *info)
650 {
651 	struct nlattr *start;
652 	int err = -EINVAL;
653 
654 	if (!info->options_len)
655 		return 0;
656 
657 	start = nla_nest_start_noflag(skb, TCA_TUNNEL_KEY_ENC_OPTS);
658 	if (!start)
659 		return -EMSGSIZE;
660 
661 	if (info->key.tun_flags & TUNNEL_GENEVE_OPT) {
662 		err = tunnel_key_geneve_opts_dump(skb, info);
663 		if (err)
664 			goto err_out;
665 	} else if (info->key.tun_flags & TUNNEL_VXLAN_OPT) {
666 		err = tunnel_key_vxlan_opts_dump(skb, info);
667 		if (err)
668 			goto err_out;
669 	} else if (info->key.tun_flags & TUNNEL_ERSPAN_OPT) {
670 		err = tunnel_key_erspan_opts_dump(skb, info);
671 		if (err)
672 			goto err_out;
673 	} else {
674 err_out:
675 		nla_nest_cancel(skb, start);
676 		return err;
677 	}
678 
679 	nla_nest_end(skb, start);
680 	return 0;
681 }
682 
683 static int tunnel_key_dump_addresses(struct sk_buff *skb,
684 				     const struct ip_tunnel_info *info)
685 {
686 	unsigned short family = ip_tunnel_info_af(info);
687 
688 	if (family == AF_INET) {
689 		__be32 saddr = info->key.u.ipv4.src;
690 		__be32 daddr = info->key.u.ipv4.dst;
691 
692 		if (!nla_put_in_addr(skb, TCA_TUNNEL_KEY_ENC_IPV4_SRC, saddr) &&
693 		    !nla_put_in_addr(skb, TCA_TUNNEL_KEY_ENC_IPV4_DST, daddr))
694 			return 0;
695 	}
696 
697 	if (family == AF_INET6) {
698 		const struct in6_addr *saddr6 = &info->key.u.ipv6.src;
699 		const struct in6_addr *daddr6 = &info->key.u.ipv6.dst;
700 
701 		if (!nla_put_in6_addr(skb,
702 				      TCA_TUNNEL_KEY_ENC_IPV6_SRC, saddr6) &&
703 		    !nla_put_in6_addr(skb,
704 				      TCA_TUNNEL_KEY_ENC_IPV6_DST, daddr6))
705 			return 0;
706 	}
707 
708 	return -EINVAL;
709 }
710 
711 static int tunnel_key_dump(struct sk_buff *skb, struct tc_action *a,
712 			   int bind, int ref)
713 {
714 	unsigned char *b = skb_tail_pointer(skb);
715 	struct tcf_tunnel_key *t = to_tunnel_key(a);
716 	struct tcf_tunnel_key_params *params;
717 	struct tc_tunnel_key opt = {
718 		.index    = t->tcf_index,
719 		.refcnt   = refcount_read(&t->tcf_refcnt) - ref,
720 		.bindcnt  = atomic_read(&t->tcf_bindcnt) - bind,
721 	};
722 	struct tcf_t tm;
723 
724 	spin_lock_bh(&t->tcf_lock);
725 	params = rcu_dereference_protected(t->params,
726 					   lockdep_is_held(&t->tcf_lock));
727 	opt.action   = t->tcf_action;
728 	opt.t_action = params->tcft_action;
729 
730 	if (nla_put(skb, TCA_TUNNEL_KEY_PARMS, sizeof(opt), &opt))
731 		goto nla_put_failure;
732 
733 	if (params->tcft_action == TCA_TUNNEL_KEY_ACT_SET) {
734 		struct ip_tunnel_info *info =
735 			&params->tcft_enc_metadata->u.tun_info;
736 		struct ip_tunnel_key *key = &info->key;
737 		__be32 key_id = tunnel_id_to_key32(key->tun_id);
738 
739 		if (((key->tun_flags & TUNNEL_KEY) &&
740 		     nla_put_be32(skb, TCA_TUNNEL_KEY_ENC_KEY_ID, key_id)) ||
741 		    tunnel_key_dump_addresses(skb,
742 					      &params->tcft_enc_metadata->u.tun_info) ||
743 		    (key->tp_dst &&
744 		      nla_put_be16(skb, TCA_TUNNEL_KEY_ENC_DST_PORT,
745 				   key->tp_dst)) ||
746 		    nla_put_u8(skb, TCA_TUNNEL_KEY_NO_CSUM,
747 			       !(key->tun_flags & TUNNEL_CSUM)) ||
748 		    tunnel_key_opts_dump(skb, info))
749 			goto nla_put_failure;
750 
751 		if (key->tos && nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_TOS, key->tos))
752 			goto nla_put_failure;
753 
754 		if (key->ttl && nla_put_u8(skb, TCA_TUNNEL_KEY_ENC_TTL, key->ttl))
755 			goto nla_put_failure;
756 	}
757 
758 	tcf_tm_dump(&tm, &t->tcf_tm);
759 	if (nla_put_64bit(skb, TCA_TUNNEL_KEY_TM, sizeof(tm),
760 			  &tm, TCA_TUNNEL_KEY_PAD))
761 		goto nla_put_failure;
762 	spin_unlock_bh(&t->tcf_lock);
763 
764 	return skb->len;
765 
766 nla_put_failure:
767 	spin_unlock_bh(&t->tcf_lock);
768 	nlmsg_trim(skb, b);
769 	return -1;
770 }
771 
772 static void tcf_tunnel_encap_put_tunnel(void *priv)
773 {
774 	struct ip_tunnel_info *tunnel = priv;
775 
776 	kfree(tunnel);
777 }
778 
779 static int tcf_tunnel_encap_get_tunnel(struct flow_action_entry *entry,
780 				       const struct tc_action *act)
781 {
782 	entry->tunnel = tcf_tunnel_info_copy(act);
783 	if (!entry->tunnel)
784 		return -ENOMEM;
785 	entry->destructor = tcf_tunnel_encap_put_tunnel;
786 	entry->destructor_priv = entry->tunnel;
787 	return 0;
788 }
789 
790 static int tcf_tunnel_key_offload_act_setup(struct tc_action *act,
791 					    void *entry_data,
792 					    u32 *index_inc,
793 					    bool bind,
794 					    struct netlink_ext_ack *extack)
795 {
796 	int err;
797 
798 	if (bind) {
799 		struct flow_action_entry *entry = entry_data;
800 
801 		if (is_tcf_tunnel_set(act)) {
802 			entry->id = FLOW_ACTION_TUNNEL_ENCAP;
803 			err = tcf_tunnel_encap_get_tunnel(entry, act);
804 			if (err)
805 				return err;
806 		} else if (is_tcf_tunnel_release(act)) {
807 			entry->id = FLOW_ACTION_TUNNEL_DECAP;
808 		} else {
809 			NL_SET_ERR_MSG_MOD(extack, "Unsupported tunnel key mode offload");
810 			return -EOPNOTSUPP;
811 		}
812 		*index_inc = 1;
813 	} else {
814 		struct flow_offload_action *fl_action = entry_data;
815 
816 		if (is_tcf_tunnel_set(act))
817 			fl_action->id = FLOW_ACTION_TUNNEL_ENCAP;
818 		else if (is_tcf_tunnel_release(act))
819 			fl_action->id = FLOW_ACTION_TUNNEL_DECAP;
820 		else
821 			return -EOPNOTSUPP;
822 	}
823 
824 	return 0;
825 }
826 
827 static struct tc_action_ops act_tunnel_key_ops = {
828 	.kind		=	"tunnel_key",
829 	.id		=	TCA_ID_TUNNEL_KEY,
830 	.owner		=	THIS_MODULE,
831 	.act		=	tunnel_key_act,
832 	.dump		=	tunnel_key_dump,
833 	.init		=	tunnel_key_init,
834 	.cleanup	=	tunnel_key_release,
835 	.offload_act_setup =	tcf_tunnel_key_offload_act_setup,
836 	.size		=	sizeof(struct tcf_tunnel_key),
837 };
838 
839 static __net_init int tunnel_key_init_net(struct net *net)
840 {
841 	struct tc_action_net *tn = net_generic(net, act_tunnel_key_ops.net_id);
842 
843 	return tc_action_net_init(net, tn, &act_tunnel_key_ops);
844 }
845 
846 static void __net_exit tunnel_key_exit_net(struct list_head *net_list)
847 {
848 	tc_action_net_exit(net_list, act_tunnel_key_ops.net_id);
849 }
850 
851 static struct pernet_operations tunnel_key_net_ops = {
852 	.init = tunnel_key_init_net,
853 	.exit_batch = tunnel_key_exit_net,
854 	.id   = &act_tunnel_key_ops.net_id,
855 	.size = sizeof(struct tc_action_net),
856 };
857 
858 static int __init tunnel_key_init_module(void)
859 {
860 	return tcf_register_action(&act_tunnel_key_ops, &tunnel_key_net_ops);
861 }
862 
863 static void __exit tunnel_key_cleanup_module(void)
864 {
865 	tcf_unregister_action(&act_tunnel_key_ops, &tunnel_key_net_ops);
866 }
867 
868 module_init(tunnel_key_init_module);
869 module_exit(tunnel_key_cleanup_module);
870 
871 MODULE_AUTHOR("Amir Vadai <amir@vadai.me>");
872 MODULE_DESCRIPTION("ip tunnel manipulation actions");
873 MODULE_LICENSE("GPL v2");
874