xref: /openbmc/linux/net/xfrm/xfrm_user.c (revision 4f205687)
1 /* xfrm_user.c: User interface to configure xfrm engine.
2  *
3  * Copyright (C) 2002 David S. Miller (davem@redhat.com)
4  *
5  * Changes:
6  *	Mitsuru KANDA @USAGI
7  * 	Kazunori MIYAZAWA @USAGI
8  * 	Kunihiro Ishiguro <kunihiro@ipinfusion.com>
9  * 		IPv6 support
10  *
11  */
12 
13 #include <linux/crypto.h>
14 #include <linux/module.h>
15 #include <linux/kernel.h>
16 #include <linux/types.h>
17 #include <linux/slab.h>
18 #include <linux/socket.h>
19 #include <linux/string.h>
20 #include <linux/net.h>
21 #include <linux/skbuff.h>
22 #include <linux/pfkeyv2.h>
23 #include <linux/ipsec.h>
24 #include <linux/init.h>
25 #include <linux/security.h>
26 #include <net/sock.h>
27 #include <net/xfrm.h>
28 #include <net/netlink.h>
29 #include <net/ah.h>
30 #include <asm/uaccess.h>
31 #if IS_ENABLED(CONFIG_IPV6)
32 #include <linux/in6.h>
33 #endif
34 #include <asm/unaligned.h>
35 
36 static int verify_one_alg(struct nlattr **attrs, enum xfrm_attr_type_t type)
37 {
38 	struct nlattr *rt = attrs[type];
39 	struct xfrm_algo *algp;
40 
41 	if (!rt)
42 		return 0;
43 
44 	algp = nla_data(rt);
45 	if (nla_len(rt) < xfrm_alg_len(algp))
46 		return -EINVAL;
47 
48 	switch (type) {
49 	case XFRMA_ALG_AUTH:
50 	case XFRMA_ALG_CRYPT:
51 	case XFRMA_ALG_COMP:
52 		break;
53 
54 	default:
55 		return -EINVAL;
56 	}
57 
58 	algp->alg_name[CRYPTO_MAX_ALG_NAME - 1] = '\0';
59 	return 0;
60 }
61 
62 static int verify_auth_trunc(struct nlattr **attrs)
63 {
64 	struct nlattr *rt = attrs[XFRMA_ALG_AUTH_TRUNC];
65 	struct xfrm_algo_auth *algp;
66 
67 	if (!rt)
68 		return 0;
69 
70 	algp = nla_data(rt);
71 	if (nla_len(rt) < xfrm_alg_auth_len(algp))
72 		return -EINVAL;
73 
74 	algp->alg_name[CRYPTO_MAX_ALG_NAME - 1] = '\0';
75 	return 0;
76 }
77 
78 static int verify_aead(struct nlattr **attrs)
79 {
80 	struct nlattr *rt = attrs[XFRMA_ALG_AEAD];
81 	struct xfrm_algo_aead *algp;
82 
83 	if (!rt)
84 		return 0;
85 
86 	algp = nla_data(rt);
87 	if (nla_len(rt) < aead_len(algp))
88 		return -EINVAL;
89 
90 	algp->alg_name[CRYPTO_MAX_ALG_NAME - 1] = '\0';
91 	return 0;
92 }
93 
94 static void verify_one_addr(struct nlattr **attrs, enum xfrm_attr_type_t type,
95 			   xfrm_address_t **addrp)
96 {
97 	struct nlattr *rt = attrs[type];
98 
99 	if (rt && addrp)
100 		*addrp = nla_data(rt);
101 }
102 
103 static inline int verify_sec_ctx_len(struct nlattr **attrs)
104 {
105 	struct nlattr *rt = attrs[XFRMA_SEC_CTX];
106 	struct xfrm_user_sec_ctx *uctx;
107 
108 	if (!rt)
109 		return 0;
110 
111 	uctx = nla_data(rt);
112 	if (uctx->len != (sizeof(struct xfrm_user_sec_ctx) + uctx->ctx_len))
113 		return -EINVAL;
114 
115 	return 0;
116 }
117 
118 static inline int verify_replay(struct xfrm_usersa_info *p,
119 				struct nlattr **attrs)
120 {
121 	struct nlattr *rt = attrs[XFRMA_REPLAY_ESN_VAL];
122 	struct xfrm_replay_state_esn *rs;
123 
124 	if (p->flags & XFRM_STATE_ESN) {
125 		if (!rt)
126 			return -EINVAL;
127 
128 		rs = nla_data(rt);
129 
130 		if (rs->bmp_len > XFRMA_REPLAY_ESN_MAX / sizeof(rs->bmp[0]) / 8)
131 			return -EINVAL;
132 
133 		if (nla_len(rt) < xfrm_replay_state_esn_len(rs) &&
134 		    nla_len(rt) != sizeof(*rs))
135 			return -EINVAL;
136 	}
137 
138 	if (!rt)
139 		return 0;
140 
141 	/* As only ESP and AH support ESN feature. */
142 	if ((p->id.proto != IPPROTO_ESP) && (p->id.proto != IPPROTO_AH))
143 		return -EINVAL;
144 
145 	if (p->replay_window != 0)
146 		return -EINVAL;
147 
148 	return 0;
149 }
150 
151 static int verify_newsa_info(struct xfrm_usersa_info *p,
152 			     struct nlattr **attrs)
153 {
154 	int err;
155 
156 	err = -EINVAL;
157 	switch (p->family) {
158 	case AF_INET:
159 		break;
160 
161 	case AF_INET6:
162 #if IS_ENABLED(CONFIG_IPV6)
163 		break;
164 #else
165 		err = -EAFNOSUPPORT;
166 		goto out;
167 #endif
168 
169 	default:
170 		goto out;
171 	}
172 
173 	err = -EINVAL;
174 	switch (p->id.proto) {
175 	case IPPROTO_AH:
176 		if ((!attrs[XFRMA_ALG_AUTH]	&&
177 		     !attrs[XFRMA_ALG_AUTH_TRUNC]) ||
178 		    attrs[XFRMA_ALG_AEAD]	||
179 		    attrs[XFRMA_ALG_CRYPT]	||
180 		    attrs[XFRMA_ALG_COMP]	||
181 		    attrs[XFRMA_TFCPAD])
182 			goto out;
183 		break;
184 
185 	case IPPROTO_ESP:
186 		if (attrs[XFRMA_ALG_COMP])
187 			goto out;
188 		if (!attrs[XFRMA_ALG_AUTH] &&
189 		    !attrs[XFRMA_ALG_AUTH_TRUNC] &&
190 		    !attrs[XFRMA_ALG_CRYPT] &&
191 		    !attrs[XFRMA_ALG_AEAD])
192 			goto out;
193 		if ((attrs[XFRMA_ALG_AUTH] ||
194 		     attrs[XFRMA_ALG_AUTH_TRUNC] ||
195 		     attrs[XFRMA_ALG_CRYPT]) &&
196 		    attrs[XFRMA_ALG_AEAD])
197 			goto out;
198 		if (attrs[XFRMA_TFCPAD] &&
199 		    p->mode != XFRM_MODE_TUNNEL)
200 			goto out;
201 		break;
202 
203 	case IPPROTO_COMP:
204 		if (!attrs[XFRMA_ALG_COMP]	||
205 		    attrs[XFRMA_ALG_AEAD]	||
206 		    attrs[XFRMA_ALG_AUTH]	||
207 		    attrs[XFRMA_ALG_AUTH_TRUNC]	||
208 		    attrs[XFRMA_ALG_CRYPT]	||
209 		    attrs[XFRMA_TFCPAD]		||
210 		    (ntohl(p->id.spi) >= 0x10000))
211 			goto out;
212 		break;
213 
214 #if IS_ENABLED(CONFIG_IPV6)
215 	case IPPROTO_DSTOPTS:
216 	case IPPROTO_ROUTING:
217 		if (attrs[XFRMA_ALG_COMP]	||
218 		    attrs[XFRMA_ALG_AUTH]	||
219 		    attrs[XFRMA_ALG_AUTH_TRUNC]	||
220 		    attrs[XFRMA_ALG_AEAD]	||
221 		    attrs[XFRMA_ALG_CRYPT]	||
222 		    attrs[XFRMA_ENCAP]		||
223 		    attrs[XFRMA_SEC_CTX]	||
224 		    attrs[XFRMA_TFCPAD]		||
225 		    !attrs[XFRMA_COADDR])
226 			goto out;
227 		break;
228 #endif
229 
230 	default:
231 		goto out;
232 	}
233 
234 	if ((err = verify_aead(attrs)))
235 		goto out;
236 	if ((err = verify_auth_trunc(attrs)))
237 		goto out;
238 	if ((err = verify_one_alg(attrs, XFRMA_ALG_AUTH)))
239 		goto out;
240 	if ((err = verify_one_alg(attrs, XFRMA_ALG_CRYPT)))
241 		goto out;
242 	if ((err = verify_one_alg(attrs, XFRMA_ALG_COMP)))
243 		goto out;
244 	if ((err = verify_sec_ctx_len(attrs)))
245 		goto out;
246 	if ((err = verify_replay(p, attrs)))
247 		goto out;
248 
249 	err = -EINVAL;
250 	switch (p->mode) {
251 	case XFRM_MODE_TRANSPORT:
252 	case XFRM_MODE_TUNNEL:
253 	case XFRM_MODE_ROUTEOPTIMIZATION:
254 	case XFRM_MODE_BEET:
255 		break;
256 
257 	default:
258 		goto out;
259 	}
260 
261 	err = 0;
262 
263 out:
264 	return err;
265 }
266 
267 static int attach_one_algo(struct xfrm_algo **algpp, u8 *props,
268 			   struct xfrm_algo_desc *(*get_byname)(const char *, int),
269 			   struct nlattr *rta)
270 {
271 	struct xfrm_algo *p, *ualg;
272 	struct xfrm_algo_desc *algo;
273 
274 	if (!rta)
275 		return 0;
276 
277 	ualg = nla_data(rta);
278 
279 	algo = get_byname(ualg->alg_name, 1);
280 	if (!algo)
281 		return -ENOSYS;
282 	*props = algo->desc.sadb_alg_id;
283 
284 	p = kmemdup(ualg, xfrm_alg_len(ualg), GFP_KERNEL);
285 	if (!p)
286 		return -ENOMEM;
287 
288 	strcpy(p->alg_name, algo->name);
289 	*algpp = p;
290 	return 0;
291 }
292 
293 static int attach_crypt(struct xfrm_state *x, struct nlattr *rta)
294 {
295 	struct xfrm_algo *p, *ualg;
296 	struct xfrm_algo_desc *algo;
297 
298 	if (!rta)
299 		return 0;
300 
301 	ualg = nla_data(rta);
302 
303 	algo = xfrm_ealg_get_byname(ualg->alg_name, 1);
304 	if (!algo)
305 		return -ENOSYS;
306 	x->props.ealgo = algo->desc.sadb_alg_id;
307 
308 	p = kmemdup(ualg, xfrm_alg_len(ualg), GFP_KERNEL);
309 	if (!p)
310 		return -ENOMEM;
311 
312 	strcpy(p->alg_name, algo->name);
313 	x->ealg = p;
314 	x->geniv = algo->uinfo.encr.geniv;
315 	return 0;
316 }
317 
318 static int attach_auth(struct xfrm_algo_auth **algpp, u8 *props,
319 		       struct nlattr *rta)
320 {
321 	struct xfrm_algo *ualg;
322 	struct xfrm_algo_auth *p;
323 	struct xfrm_algo_desc *algo;
324 
325 	if (!rta)
326 		return 0;
327 
328 	ualg = nla_data(rta);
329 
330 	algo = xfrm_aalg_get_byname(ualg->alg_name, 1);
331 	if (!algo)
332 		return -ENOSYS;
333 	*props = algo->desc.sadb_alg_id;
334 
335 	p = kmalloc(sizeof(*p) + (ualg->alg_key_len + 7) / 8, GFP_KERNEL);
336 	if (!p)
337 		return -ENOMEM;
338 
339 	strcpy(p->alg_name, algo->name);
340 	p->alg_key_len = ualg->alg_key_len;
341 	p->alg_trunc_len = algo->uinfo.auth.icv_truncbits;
342 	memcpy(p->alg_key, ualg->alg_key, (ualg->alg_key_len + 7) / 8);
343 
344 	*algpp = p;
345 	return 0;
346 }
347 
348 static int attach_auth_trunc(struct xfrm_algo_auth **algpp, u8 *props,
349 			     struct nlattr *rta)
350 {
351 	struct xfrm_algo_auth *p, *ualg;
352 	struct xfrm_algo_desc *algo;
353 
354 	if (!rta)
355 		return 0;
356 
357 	ualg = nla_data(rta);
358 
359 	algo = xfrm_aalg_get_byname(ualg->alg_name, 1);
360 	if (!algo)
361 		return -ENOSYS;
362 	if (ualg->alg_trunc_len > algo->uinfo.auth.icv_fullbits)
363 		return -EINVAL;
364 	*props = algo->desc.sadb_alg_id;
365 
366 	p = kmemdup(ualg, xfrm_alg_auth_len(ualg), GFP_KERNEL);
367 	if (!p)
368 		return -ENOMEM;
369 
370 	strcpy(p->alg_name, algo->name);
371 	if (!p->alg_trunc_len)
372 		p->alg_trunc_len = algo->uinfo.auth.icv_truncbits;
373 
374 	*algpp = p;
375 	return 0;
376 }
377 
378 static int attach_aead(struct xfrm_state *x, struct nlattr *rta)
379 {
380 	struct xfrm_algo_aead *p, *ualg;
381 	struct xfrm_algo_desc *algo;
382 
383 	if (!rta)
384 		return 0;
385 
386 	ualg = nla_data(rta);
387 
388 	algo = xfrm_aead_get_byname(ualg->alg_name, ualg->alg_icv_len, 1);
389 	if (!algo)
390 		return -ENOSYS;
391 	x->props.ealgo = algo->desc.sadb_alg_id;
392 
393 	p = kmemdup(ualg, aead_len(ualg), GFP_KERNEL);
394 	if (!p)
395 		return -ENOMEM;
396 
397 	strcpy(p->alg_name, algo->name);
398 	x->aead = p;
399 	x->geniv = algo->uinfo.aead.geniv;
400 	return 0;
401 }
402 
403 static inline int xfrm_replay_verify_len(struct xfrm_replay_state_esn *replay_esn,
404 					 struct nlattr *rp)
405 {
406 	struct xfrm_replay_state_esn *up;
407 	int ulen;
408 
409 	if (!replay_esn || !rp)
410 		return 0;
411 
412 	up = nla_data(rp);
413 	ulen = xfrm_replay_state_esn_len(up);
414 
415 	if (nla_len(rp) < ulen || xfrm_replay_state_esn_len(replay_esn) != ulen)
416 		return -EINVAL;
417 
418 	return 0;
419 }
420 
421 static int xfrm_alloc_replay_state_esn(struct xfrm_replay_state_esn **replay_esn,
422 				       struct xfrm_replay_state_esn **preplay_esn,
423 				       struct nlattr *rta)
424 {
425 	struct xfrm_replay_state_esn *p, *pp, *up;
426 	int klen, ulen;
427 
428 	if (!rta)
429 		return 0;
430 
431 	up = nla_data(rta);
432 	klen = xfrm_replay_state_esn_len(up);
433 	ulen = nla_len(rta) >= klen ? klen : sizeof(*up);
434 
435 	p = kzalloc(klen, GFP_KERNEL);
436 	if (!p)
437 		return -ENOMEM;
438 
439 	pp = kzalloc(klen, GFP_KERNEL);
440 	if (!pp) {
441 		kfree(p);
442 		return -ENOMEM;
443 	}
444 
445 	memcpy(p, up, ulen);
446 	memcpy(pp, up, ulen);
447 
448 	*replay_esn = p;
449 	*preplay_esn = pp;
450 
451 	return 0;
452 }
453 
454 static inline int xfrm_user_sec_ctx_size(struct xfrm_sec_ctx *xfrm_ctx)
455 {
456 	int len = 0;
457 
458 	if (xfrm_ctx) {
459 		len += sizeof(struct xfrm_user_sec_ctx);
460 		len += xfrm_ctx->ctx_len;
461 	}
462 	return len;
463 }
464 
465 static void copy_from_user_state(struct xfrm_state *x, struct xfrm_usersa_info *p)
466 {
467 	memcpy(&x->id, &p->id, sizeof(x->id));
468 	memcpy(&x->sel, &p->sel, sizeof(x->sel));
469 	memcpy(&x->lft, &p->lft, sizeof(x->lft));
470 	x->props.mode = p->mode;
471 	x->props.replay_window = min_t(unsigned int, p->replay_window,
472 					sizeof(x->replay.bitmap) * 8);
473 	x->props.reqid = p->reqid;
474 	x->props.family = p->family;
475 	memcpy(&x->props.saddr, &p->saddr, sizeof(x->props.saddr));
476 	x->props.flags = p->flags;
477 
478 	if (!x->sel.family && !(p->flags & XFRM_STATE_AF_UNSPEC))
479 		x->sel.family = p->family;
480 }
481 
482 /*
483  * someday when pfkey also has support, we could have the code
484  * somehow made shareable and move it to xfrm_state.c - JHS
485  *
486 */
487 static void xfrm_update_ae_params(struct xfrm_state *x, struct nlattr **attrs,
488 				  int update_esn)
489 {
490 	struct nlattr *rp = attrs[XFRMA_REPLAY_VAL];
491 	struct nlattr *re = update_esn ? attrs[XFRMA_REPLAY_ESN_VAL] : NULL;
492 	struct nlattr *lt = attrs[XFRMA_LTIME_VAL];
493 	struct nlattr *et = attrs[XFRMA_ETIMER_THRESH];
494 	struct nlattr *rt = attrs[XFRMA_REPLAY_THRESH];
495 
496 	if (re) {
497 		struct xfrm_replay_state_esn *replay_esn;
498 		replay_esn = nla_data(re);
499 		memcpy(x->replay_esn, replay_esn,
500 		       xfrm_replay_state_esn_len(replay_esn));
501 		memcpy(x->preplay_esn, replay_esn,
502 		       xfrm_replay_state_esn_len(replay_esn));
503 	}
504 
505 	if (rp) {
506 		struct xfrm_replay_state *replay;
507 		replay = nla_data(rp);
508 		memcpy(&x->replay, replay, sizeof(*replay));
509 		memcpy(&x->preplay, replay, sizeof(*replay));
510 	}
511 
512 	if (lt) {
513 		struct xfrm_lifetime_cur *ltime;
514 		ltime = nla_data(lt);
515 		x->curlft.bytes = ltime->bytes;
516 		x->curlft.packets = ltime->packets;
517 		x->curlft.add_time = ltime->add_time;
518 		x->curlft.use_time = ltime->use_time;
519 	}
520 
521 	if (et)
522 		x->replay_maxage = nla_get_u32(et);
523 
524 	if (rt)
525 		x->replay_maxdiff = nla_get_u32(rt);
526 }
527 
528 static struct xfrm_state *xfrm_state_construct(struct net *net,
529 					       struct xfrm_usersa_info *p,
530 					       struct nlattr **attrs,
531 					       int *errp)
532 {
533 	struct xfrm_state *x = xfrm_state_alloc(net);
534 	int err = -ENOMEM;
535 
536 	if (!x)
537 		goto error_no_put;
538 
539 	copy_from_user_state(x, p);
540 
541 	if (attrs[XFRMA_SA_EXTRA_FLAGS])
542 		x->props.extra_flags = nla_get_u32(attrs[XFRMA_SA_EXTRA_FLAGS]);
543 
544 	if ((err = attach_aead(x, attrs[XFRMA_ALG_AEAD])))
545 		goto error;
546 	if ((err = attach_auth_trunc(&x->aalg, &x->props.aalgo,
547 				     attrs[XFRMA_ALG_AUTH_TRUNC])))
548 		goto error;
549 	if (!x->props.aalgo) {
550 		if ((err = attach_auth(&x->aalg, &x->props.aalgo,
551 				       attrs[XFRMA_ALG_AUTH])))
552 			goto error;
553 	}
554 	if ((err = attach_crypt(x, attrs[XFRMA_ALG_CRYPT])))
555 		goto error;
556 	if ((err = attach_one_algo(&x->calg, &x->props.calgo,
557 				   xfrm_calg_get_byname,
558 				   attrs[XFRMA_ALG_COMP])))
559 		goto error;
560 
561 	if (attrs[XFRMA_ENCAP]) {
562 		x->encap = kmemdup(nla_data(attrs[XFRMA_ENCAP]),
563 				   sizeof(*x->encap), GFP_KERNEL);
564 		if (x->encap == NULL)
565 			goto error;
566 	}
567 
568 	if (attrs[XFRMA_TFCPAD])
569 		x->tfcpad = nla_get_u32(attrs[XFRMA_TFCPAD]);
570 
571 	if (attrs[XFRMA_COADDR]) {
572 		x->coaddr = kmemdup(nla_data(attrs[XFRMA_COADDR]),
573 				    sizeof(*x->coaddr), GFP_KERNEL);
574 		if (x->coaddr == NULL)
575 			goto error;
576 	}
577 
578 	xfrm_mark_get(attrs, &x->mark);
579 
580 	err = __xfrm_init_state(x, false);
581 	if (err)
582 		goto error;
583 
584 	if (attrs[XFRMA_SEC_CTX] &&
585 	    security_xfrm_state_alloc(x, nla_data(attrs[XFRMA_SEC_CTX])))
586 		goto error;
587 
588 	if ((err = xfrm_alloc_replay_state_esn(&x->replay_esn, &x->preplay_esn,
589 					       attrs[XFRMA_REPLAY_ESN_VAL])))
590 		goto error;
591 
592 	x->km.seq = p->seq;
593 	x->replay_maxdiff = net->xfrm.sysctl_aevent_rseqth;
594 	/* sysctl_xfrm_aevent_etime is in 100ms units */
595 	x->replay_maxage = (net->xfrm.sysctl_aevent_etime*HZ)/XFRM_AE_ETH_M;
596 
597 	if ((err = xfrm_init_replay(x)))
598 		goto error;
599 
600 	/* override default values from above */
601 	xfrm_update_ae_params(x, attrs, 0);
602 
603 	return x;
604 
605 error:
606 	x->km.state = XFRM_STATE_DEAD;
607 	xfrm_state_put(x);
608 error_no_put:
609 	*errp = err;
610 	return NULL;
611 }
612 
613 static int xfrm_add_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
614 		struct nlattr **attrs)
615 {
616 	struct net *net = sock_net(skb->sk);
617 	struct xfrm_usersa_info *p = nlmsg_data(nlh);
618 	struct xfrm_state *x;
619 	int err;
620 	struct km_event c;
621 
622 	err = verify_newsa_info(p, attrs);
623 	if (err)
624 		return err;
625 
626 	x = xfrm_state_construct(net, p, attrs, &err);
627 	if (!x)
628 		return err;
629 
630 	xfrm_state_hold(x);
631 	if (nlh->nlmsg_type == XFRM_MSG_NEWSA)
632 		err = xfrm_state_add(x);
633 	else
634 		err = xfrm_state_update(x);
635 
636 	xfrm_audit_state_add(x, err ? 0 : 1, true);
637 
638 	if (err < 0) {
639 		x->km.state = XFRM_STATE_DEAD;
640 		__xfrm_state_put(x);
641 		goto out;
642 	}
643 
644 	c.seq = nlh->nlmsg_seq;
645 	c.portid = nlh->nlmsg_pid;
646 	c.event = nlh->nlmsg_type;
647 
648 	km_state_notify(x, &c);
649 out:
650 	xfrm_state_put(x);
651 	return err;
652 }
653 
654 static struct xfrm_state *xfrm_user_state_lookup(struct net *net,
655 						 struct xfrm_usersa_id *p,
656 						 struct nlattr **attrs,
657 						 int *errp)
658 {
659 	struct xfrm_state *x = NULL;
660 	struct xfrm_mark m;
661 	int err;
662 	u32 mark = xfrm_mark_get(attrs, &m);
663 
664 	if (xfrm_id_proto_match(p->proto, IPSEC_PROTO_ANY)) {
665 		err = -ESRCH;
666 		x = xfrm_state_lookup(net, mark, &p->daddr, p->spi, p->proto, p->family);
667 	} else {
668 		xfrm_address_t *saddr = NULL;
669 
670 		verify_one_addr(attrs, XFRMA_SRCADDR, &saddr);
671 		if (!saddr) {
672 			err = -EINVAL;
673 			goto out;
674 		}
675 
676 		err = -ESRCH;
677 		x = xfrm_state_lookup_byaddr(net, mark,
678 					     &p->daddr, saddr,
679 					     p->proto, p->family);
680 	}
681 
682  out:
683 	if (!x && errp)
684 		*errp = err;
685 	return x;
686 }
687 
688 static int xfrm_del_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
689 		struct nlattr **attrs)
690 {
691 	struct net *net = sock_net(skb->sk);
692 	struct xfrm_state *x;
693 	int err = -ESRCH;
694 	struct km_event c;
695 	struct xfrm_usersa_id *p = nlmsg_data(nlh);
696 
697 	x = xfrm_user_state_lookup(net, p, attrs, &err);
698 	if (x == NULL)
699 		return err;
700 
701 	if ((err = security_xfrm_state_delete(x)) != 0)
702 		goto out;
703 
704 	if (xfrm_state_kern(x)) {
705 		err = -EPERM;
706 		goto out;
707 	}
708 
709 	err = xfrm_state_delete(x);
710 
711 	if (err < 0)
712 		goto out;
713 
714 	c.seq = nlh->nlmsg_seq;
715 	c.portid = nlh->nlmsg_pid;
716 	c.event = nlh->nlmsg_type;
717 	km_state_notify(x, &c);
718 
719 out:
720 	xfrm_audit_state_delete(x, err ? 0 : 1, true);
721 	xfrm_state_put(x);
722 	return err;
723 }
724 
725 static void copy_to_user_state(struct xfrm_state *x, struct xfrm_usersa_info *p)
726 {
727 	memset(p, 0, sizeof(*p));
728 	memcpy(&p->id, &x->id, sizeof(p->id));
729 	memcpy(&p->sel, &x->sel, sizeof(p->sel));
730 	memcpy(&p->lft, &x->lft, sizeof(p->lft));
731 	memcpy(&p->curlft, &x->curlft, sizeof(p->curlft));
732 	put_unaligned(x->stats.replay_window, &p->stats.replay_window);
733 	put_unaligned(x->stats.replay, &p->stats.replay);
734 	put_unaligned(x->stats.integrity_failed, &p->stats.integrity_failed);
735 	memcpy(&p->saddr, &x->props.saddr, sizeof(p->saddr));
736 	p->mode = x->props.mode;
737 	p->replay_window = x->props.replay_window;
738 	p->reqid = x->props.reqid;
739 	p->family = x->props.family;
740 	p->flags = x->props.flags;
741 	p->seq = x->km.seq;
742 }
743 
744 struct xfrm_dump_info {
745 	struct sk_buff *in_skb;
746 	struct sk_buff *out_skb;
747 	u32 nlmsg_seq;
748 	u16 nlmsg_flags;
749 };
750 
751 static int copy_sec_ctx(struct xfrm_sec_ctx *s, struct sk_buff *skb)
752 {
753 	struct xfrm_user_sec_ctx *uctx;
754 	struct nlattr *attr;
755 	int ctx_size = sizeof(*uctx) + s->ctx_len;
756 
757 	attr = nla_reserve(skb, XFRMA_SEC_CTX, ctx_size);
758 	if (attr == NULL)
759 		return -EMSGSIZE;
760 
761 	uctx = nla_data(attr);
762 	uctx->exttype = XFRMA_SEC_CTX;
763 	uctx->len = ctx_size;
764 	uctx->ctx_doi = s->ctx_doi;
765 	uctx->ctx_alg = s->ctx_alg;
766 	uctx->ctx_len = s->ctx_len;
767 	memcpy(uctx + 1, s->ctx_str, s->ctx_len);
768 
769 	return 0;
770 }
771 
772 static int copy_to_user_auth(struct xfrm_algo_auth *auth, struct sk_buff *skb)
773 {
774 	struct xfrm_algo *algo;
775 	struct nlattr *nla;
776 
777 	nla = nla_reserve(skb, XFRMA_ALG_AUTH,
778 			  sizeof(*algo) + (auth->alg_key_len + 7) / 8);
779 	if (!nla)
780 		return -EMSGSIZE;
781 
782 	algo = nla_data(nla);
783 	strncpy(algo->alg_name, auth->alg_name, sizeof(algo->alg_name));
784 	memcpy(algo->alg_key, auth->alg_key, (auth->alg_key_len + 7) / 8);
785 	algo->alg_key_len = auth->alg_key_len;
786 
787 	return 0;
788 }
789 
790 /* Don't change this without updating xfrm_sa_len! */
791 static int copy_to_user_state_extra(struct xfrm_state *x,
792 				    struct xfrm_usersa_info *p,
793 				    struct sk_buff *skb)
794 {
795 	int ret = 0;
796 
797 	copy_to_user_state(x, p);
798 
799 	if (x->props.extra_flags) {
800 		ret = nla_put_u32(skb, XFRMA_SA_EXTRA_FLAGS,
801 				  x->props.extra_flags);
802 		if (ret)
803 			goto out;
804 	}
805 
806 	if (x->coaddr) {
807 		ret = nla_put(skb, XFRMA_COADDR, sizeof(*x->coaddr), x->coaddr);
808 		if (ret)
809 			goto out;
810 	}
811 	if (x->lastused) {
812 		ret = nla_put_u64_64bit(skb, XFRMA_LASTUSED, x->lastused,
813 					XFRMA_PAD);
814 		if (ret)
815 			goto out;
816 	}
817 	if (x->aead) {
818 		ret = nla_put(skb, XFRMA_ALG_AEAD, aead_len(x->aead), x->aead);
819 		if (ret)
820 			goto out;
821 	}
822 	if (x->aalg) {
823 		ret = copy_to_user_auth(x->aalg, skb);
824 		if (!ret)
825 			ret = nla_put(skb, XFRMA_ALG_AUTH_TRUNC,
826 				      xfrm_alg_auth_len(x->aalg), x->aalg);
827 		if (ret)
828 			goto out;
829 	}
830 	if (x->ealg) {
831 		ret = nla_put(skb, XFRMA_ALG_CRYPT, xfrm_alg_len(x->ealg), x->ealg);
832 		if (ret)
833 			goto out;
834 	}
835 	if (x->calg) {
836 		ret = nla_put(skb, XFRMA_ALG_COMP, sizeof(*(x->calg)), x->calg);
837 		if (ret)
838 			goto out;
839 	}
840 	if (x->encap) {
841 		ret = nla_put(skb, XFRMA_ENCAP, sizeof(*x->encap), x->encap);
842 		if (ret)
843 			goto out;
844 	}
845 	if (x->tfcpad) {
846 		ret = nla_put_u32(skb, XFRMA_TFCPAD, x->tfcpad);
847 		if (ret)
848 			goto out;
849 	}
850 	ret = xfrm_mark_put(skb, &x->mark);
851 	if (ret)
852 		goto out;
853 	if (x->replay_esn)
854 		ret = nla_put(skb, XFRMA_REPLAY_ESN_VAL,
855 			      xfrm_replay_state_esn_len(x->replay_esn),
856 			      x->replay_esn);
857 	else
858 		ret = nla_put(skb, XFRMA_REPLAY_VAL, sizeof(x->replay),
859 			      &x->replay);
860 	if (ret)
861 		goto out;
862 	if (x->security)
863 		ret = copy_sec_ctx(x->security, skb);
864 out:
865 	return ret;
866 }
867 
868 static int dump_one_state(struct xfrm_state *x, int count, void *ptr)
869 {
870 	struct xfrm_dump_info *sp = ptr;
871 	struct sk_buff *in_skb = sp->in_skb;
872 	struct sk_buff *skb = sp->out_skb;
873 	struct xfrm_usersa_info *p;
874 	struct nlmsghdr *nlh;
875 	int err;
876 
877 	nlh = nlmsg_put(skb, NETLINK_CB(in_skb).portid, sp->nlmsg_seq,
878 			XFRM_MSG_NEWSA, sizeof(*p), sp->nlmsg_flags);
879 	if (nlh == NULL)
880 		return -EMSGSIZE;
881 
882 	p = nlmsg_data(nlh);
883 
884 	err = copy_to_user_state_extra(x, p, skb);
885 	if (err) {
886 		nlmsg_cancel(skb, nlh);
887 		return err;
888 	}
889 	nlmsg_end(skb, nlh);
890 	return 0;
891 }
892 
893 static int xfrm_dump_sa_done(struct netlink_callback *cb)
894 {
895 	struct xfrm_state_walk *walk = (struct xfrm_state_walk *) &cb->args[1];
896 	struct sock *sk = cb->skb->sk;
897 	struct net *net = sock_net(sk);
898 
899 	xfrm_state_walk_done(walk, net);
900 	return 0;
901 }
902 
903 static const struct nla_policy xfrma_policy[XFRMA_MAX+1];
904 static int xfrm_dump_sa(struct sk_buff *skb, struct netlink_callback *cb)
905 {
906 	struct net *net = sock_net(skb->sk);
907 	struct xfrm_state_walk *walk = (struct xfrm_state_walk *) &cb->args[1];
908 	struct xfrm_dump_info info;
909 
910 	BUILD_BUG_ON(sizeof(struct xfrm_state_walk) >
911 		     sizeof(cb->args) - sizeof(cb->args[0]));
912 
913 	info.in_skb = cb->skb;
914 	info.out_skb = skb;
915 	info.nlmsg_seq = cb->nlh->nlmsg_seq;
916 	info.nlmsg_flags = NLM_F_MULTI;
917 
918 	if (!cb->args[0]) {
919 		struct nlattr *attrs[XFRMA_MAX+1];
920 		struct xfrm_address_filter *filter = NULL;
921 		u8 proto = 0;
922 		int err;
923 
924 		cb->args[0] = 1;
925 
926 		err = nlmsg_parse(cb->nlh, 0, attrs, XFRMA_MAX,
927 				  xfrma_policy);
928 		if (err < 0)
929 			return err;
930 
931 		if (attrs[XFRMA_ADDRESS_FILTER]) {
932 			filter = kmemdup(nla_data(attrs[XFRMA_ADDRESS_FILTER]),
933 					 sizeof(*filter), GFP_KERNEL);
934 			if (filter == NULL)
935 				return -ENOMEM;
936 		}
937 
938 		if (attrs[XFRMA_PROTO])
939 			proto = nla_get_u8(attrs[XFRMA_PROTO]);
940 
941 		xfrm_state_walk_init(walk, proto, filter);
942 	}
943 
944 	(void) xfrm_state_walk(net, walk, dump_one_state, &info);
945 
946 	return skb->len;
947 }
948 
949 static struct sk_buff *xfrm_state_netlink(struct sk_buff *in_skb,
950 					  struct xfrm_state *x, u32 seq)
951 {
952 	struct xfrm_dump_info info;
953 	struct sk_buff *skb;
954 	int err;
955 
956 	skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
957 	if (!skb)
958 		return ERR_PTR(-ENOMEM);
959 
960 	info.in_skb = in_skb;
961 	info.out_skb = skb;
962 	info.nlmsg_seq = seq;
963 	info.nlmsg_flags = 0;
964 
965 	err = dump_one_state(x, 0, &info);
966 	if (err) {
967 		kfree_skb(skb);
968 		return ERR_PTR(err);
969 	}
970 
971 	return skb;
972 }
973 
974 /* A wrapper for nlmsg_multicast() checking that nlsk is still available.
975  * Must be called with RCU read lock.
976  */
977 static inline int xfrm_nlmsg_multicast(struct net *net, struct sk_buff *skb,
978 				       u32 pid, unsigned int group)
979 {
980 	struct sock *nlsk = rcu_dereference(net->xfrm.nlsk);
981 
982 	if (nlsk)
983 		return nlmsg_multicast(nlsk, skb, pid, group, GFP_ATOMIC);
984 	else
985 		return -1;
986 }
987 
988 static inline size_t xfrm_spdinfo_msgsize(void)
989 {
990 	return NLMSG_ALIGN(4)
991 	       + nla_total_size(sizeof(struct xfrmu_spdinfo))
992 	       + nla_total_size(sizeof(struct xfrmu_spdhinfo))
993 	       + nla_total_size(sizeof(struct xfrmu_spdhthresh))
994 	       + nla_total_size(sizeof(struct xfrmu_spdhthresh));
995 }
996 
997 static int build_spdinfo(struct sk_buff *skb, struct net *net,
998 			 u32 portid, u32 seq, u32 flags)
999 {
1000 	struct xfrmk_spdinfo si;
1001 	struct xfrmu_spdinfo spc;
1002 	struct xfrmu_spdhinfo sph;
1003 	struct xfrmu_spdhthresh spt4, spt6;
1004 	struct nlmsghdr *nlh;
1005 	int err;
1006 	u32 *f;
1007 	unsigned lseq;
1008 
1009 	nlh = nlmsg_put(skb, portid, seq, XFRM_MSG_NEWSPDINFO, sizeof(u32), 0);
1010 	if (nlh == NULL) /* shouldn't really happen ... */
1011 		return -EMSGSIZE;
1012 
1013 	f = nlmsg_data(nlh);
1014 	*f = flags;
1015 	xfrm_spd_getinfo(net, &si);
1016 	spc.incnt = si.incnt;
1017 	spc.outcnt = si.outcnt;
1018 	spc.fwdcnt = si.fwdcnt;
1019 	spc.inscnt = si.inscnt;
1020 	spc.outscnt = si.outscnt;
1021 	spc.fwdscnt = si.fwdscnt;
1022 	sph.spdhcnt = si.spdhcnt;
1023 	sph.spdhmcnt = si.spdhmcnt;
1024 
1025 	do {
1026 		lseq = read_seqbegin(&net->xfrm.policy_hthresh.lock);
1027 
1028 		spt4.lbits = net->xfrm.policy_hthresh.lbits4;
1029 		spt4.rbits = net->xfrm.policy_hthresh.rbits4;
1030 		spt6.lbits = net->xfrm.policy_hthresh.lbits6;
1031 		spt6.rbits = net->xfrm.policy_hthresh.rbits6;
1032 	} while (read_seqretry(&net->xfrm.policy_hthresh.lock, lseq));
1033 
1034 	err = nla_put(skb, XFRMA_SPD_INFO, sizeof(spc), &spc);
1035 	if (!err)
1036 		err = nla_put(skb, XFRMA_SPD_HINFO, sizeof(sph), &sph);
1037 	if (!err)
1038 		err = nla_put(skb, XFRMA_SPD_IPV4_HTHRESH, sizeof(spt4), &spt4);
1039 	if (!err)
1040 		err = nla_put(skb, XFRMA_SPD_IPV6_HTHRESH, sizeof(spt6), &spt6);
1041 	if (err) {
1042 		nlmsg_cancel(skb, nlh);
1043 		return err;
1044 	}
1045 
1046 	nlmsg_end(skb, nlh);
1047 	return 0;
1048 }
1049 
1050 static int xfrm_set_spdinfo(struct sk_buff *skb, struct nlmsghdr *nlh,
1051 			    struct nlattr **attrs)
1052 {
1053 	struct net *net = sock_net(skb->sk);
1054 	struct xfrmu_spdhthresh *thresh4 = NULL;
1055 	struct xfrmu_spdhthresh *thresh6 = NULL;
1056 
1057 	/* selector prefixlen thresholds to hash policies */
1058 	if (attrs[XFRMA_SPD_IPV4_HTHRESH]) {
1059 		struct nlattr *rta = attrs[XFRMA_SPD_IPV4_HTHRESH];
1060 
1061 		if (nla_len(rta) < sizeof(*thresh4))
1062 			return -EINVAL;
1063 		thresh4 = nla_data(rta);
1064 		if (thresh4->lbits > 32 || thresh4->rbits > 32)
1065 			return -EINVAL;
1066 	}
1067 	if (attrs[XFRMA_SPD_IPV6_HTHRESH]) {
1068 		struct nlattr *rta = attrs[XFRMA_SPD_IPV6_HTHRESH];
1069 
1070 		if (nla_len(rta) < sizeof(*thresh6))
1071 			return -EINVAL;
1072 		thresh6 = nla_data(rta);
1073 		if (thresh6->lbits > 128 || thresh6->rbits > 128)
1074 			return -EINVAL;
1075 	}
1076 
1077 	if (thresh4 || thresh6) {
1078 		write_seqlock(&net->xfrm.policy_hthresh.lock);
1079 		if (thresh4) {
1080 			net->xfrm.policy_hthresh.lbits4 = thresh4->lbits;
1081 			net->xfrm.policy_hthresh.rbits4 = thresh4->rbits;
1082 		}
1083 		if (thresh6) {
1084 			net->xfrm.policy_hthresh.lbits6 = thresh6->lbits;
1085 			net->xfrm.policy_hthresh.rbits6 = thresh6->rbits;
1086 		}
1087 		write_sequnlock(&net->xfrm.policy_hthresh.lock);
1088 
1089 		xfrm_policy_hash_rebuild(net);
1090 	}
1091 
1092 	return 0;
1093 }
1094 
1095 static int xfrm_get_spdinfo(struct sk_buff *skb, struct nlmsghdr *nlh,
1096 		struct nlattr **attrs)
1097 {
1098 	struct net *net = sock_net(skb->sk);
1099 	struct sk_buff *r_skb;
1100 	u32 *flags = nlmsg_data(nlh);
1101 	u32 sportid = NETLINK_CB(skb).portid;
1102 	u32 seq = nlh->nlmsg_seq;
1103 
1104 	r_skb = nlmsg_new(xfrm_spdinfo_msgsize(), GFP_ATOMIC);
1105 	if (r_skb == NULL)
1106 		return -ENOMEM;
1107 
1108 	if (build_spdinfo(r_skb, net, sportid, seq, *flags) < 0)
1109 		BUG();
1110 
1111 	return nlmsg_unicast(net->xfrm.nlsk, r_skb, sportid);
1112 }
1113 
1114 static inline size_t xfrm_sadinfo_msgsize(void)
1115 {
1116 	return NLMSG_ALIGN(4)
1117 	       + nla_total_size(sizeof(struct xfrmu_sadhinfo))
1118 	       + nla_total_size(4); /* XFRMA_SAD_CNT */
1119 }
1120 
1121 static int build_sadinfo(struct sk_buff *skb, struct net *net,
1122 			 u32 portid, u32 seq, u32 flags)
1123 {
1124 	struct xfrmk_sadinfo si;
1125 	struct xfrmu_sadhinfo sh;
1126 	struct nlmsghdr *nlh;
1127 	int err;
1128 	u32 *f;
1129 
1130 	nlh = nlmsg_put(skb, portid, seq, XFRM_MSG_NEWSADINFO, sizeof(u32), 0);
1131 	if (nlh == NULL) /* shouldn't really happen ... */
1132 		return -EMSGSIZE;
1133 
1134 	f = nlmsg_data(nlh);
1135 	*f = flags;
1136 	xfrm_sad_getinfo(net, &si);
1137 
1138 	sh.sadhmcnt = si.sadhmcnt;
1139 	sh.sadhcnt = si.sadhcnt;
1140 
1141 	err = nla_put_u32(skb, XFRMA_SAD_CNT, si.sadcnt);
1142 	if (!err)
1143 		err = nla_put(skb, XFRMA_SAD_HINFO, sizeof(sh), &sh);
1144 	if (err) {
1145 		nlmsg_cancel(skb, nlh);
1146 		return err;
1147 	}
1148 
1149 	nlmsg_end(skb, nlh);
1150 	return 0;
1151 }
1152 
1153 static int xfrm_get_sadinfo(struct sk_buff *skb, struct nlmsghdr *nlh,
1154 		struct nlattr **attrs)
1155 {
1156 	struct net *net = sock_net(skb->sk);
1157 	struct sk_buff *r_skb;
1158 	u32 *flags = nlmsg_data(nlh);
1159 	u32 sportid = NETLINK_CB(skb).portid;
1160 	u32 seq = nlh->nlmsg_seq;
1161 
1162 	r_skb = nlmsg_new(xfrm_sadinfo_msgsize(), GFP_ATOMIC);
1163 	if (r_skb == NULL)
1164 		return -ENOMEM;
1165 
1166 	if (build_sadinfo(r_skb, net, sportid, seq, *flags) < 0)
1167 		BUG();
1168 
1169 	return nlmsg_unicast(net->xfrm.nlsk, r_skb, sportid);
1170 }
1171 
1172 static int xfrm_get_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
1173 		struct nlattr **attrs)
1174 {
1175 	struct net *net = sock_net(skb->sk);
1176 	struct xfrm_usersa_id *p = nlmsg_data(nlh);
1177 	struct xfrm_state *x;
1178 	struct sk_buff *resp_skb;
1179 	int err = -ESRCH;
1180 
1181 	x = xfrm_user_state_lookup(net, p, attrs, &err);
1182 	if (x == NULL)
1183 		goto out_noput;
1184 
1185 	resp_skb = xfrm_state_netlink(skb, x, nlh->nlmsg_seq);
1186 	if (IS_ERR(resp_skb)) {
1187 		err = PTR_ERR(resp_skb);
1188 	} else {
1189 		err = nlmsg_unicast(net->xfrm.nlsk, resp_skb, NETLINK_CB(skb).portid);
1190 	}
1191 	xfrm_state_put(x);
1192 out_noput:
1193 	return err;
1194 }
1195 
1196 static int xfrm_alloc_userspi(struct sk_buff *skb, struct nlmsghdr *nlh,
1197 		struct nlattr **attrs)
1198 {
1199 	struct net *net = sock_net(skb->sk);
1200 	struct xfrm_state *x;
1201 	struct xfrm_userspi_info *p;
1202 	struct sk_buff *resp_skb;
1203 	xfrm_address_t *daddr;
1204 	int family;
1205 	int err;
1206 	u32 mark;
1207 	struct xfrm_mark m;
1208 
1209 	p = nlmsg_data(nlh);
1210 	err = verify_spi_info(p->info.id.proto, p->min, p->max);
1211 	if (err)
1212 		goto out_noput;
1213 
1214 	family = p->info.family;
1215 	daddr = &p->info.id.daddr;
1216 
1217 	x = NULL;
1218 
1219 	mark = xfrm_mark_get(attrs, &m);
1220 	if (p->info.seq) {
1221 		x = xfrm_find_acq_byseq(net, mark, p->info.seq);
1222 		if (x && !xfrm_addr_equal(&x->id.daddr, daddr, family)) {
1223 			xfrm_state_put(x);
1224 			x = NULL;
1225 		}
1226 	}
1227 
1228 	if (!x)
1229 		x = xfrm_find_acq(net, &m, p->info.mode, p->info.reqid,
1230 				  p->info.id.proto, daddr,
1231 				  &p->info.saddr, 1,
1232 				  family);
1233 	err = -ENOENT;
1234 	if (x == NULL)
1235 		goto out_noput;
1236 
1237 	err = xfrm_alloc_spi(x, p->min, p->max);
1238 	if (err)
1239 		goto out;
1240 
1241 	resp_skb = xfrm_state_netlink(skb, x, nlh->nlmsg_seq);
1242 	if (IS_ERR(resp_skb)) {
1243 		err = PTR_ERR(resp_skb);
1244 		goto out;
1245 	}
1246 
1247 	err = nlmsg_unicast(net->xfrm.nlsk, resp_skb, NETLINK_CB(skb).portid);
1248 
1249 out:
1250 	xfrm_state_put(x);
1251 out_noput:
1252 	return err;
1253 }
1254 
1255 static int verify_policy_dir(u8 dir)
1256 {
1257 	switch (dir) {
1258 	case XFRM_POLICY_IN:
1259 	case XFRM_POLICY_OUT:
1260 	case XFRM_POLICY_FWD:
1261 		break;
1262 
1263 	default:
1264 		return -EINVAL;
1265 	}
1266 
1267 	return 0;
1268 }
1269 
1270 static int verify_policy_type(u8 type)
1271 {
1272 	switch (type) {
1273 	case XFRM_POLICY_TYPE_MAIN:
1274 #ifdef CONFIG_XFRM_SUB_POLICY
1275 	case XFRM_POLICY_TYPE_SUB:
1276 #endif
1277 		break;
1278 
1279 	default:
1280 		return -EINVAL;
1281 	}
1282 
1283 	return 0;
1284 }
1285 
1286 static int verify_newpolicy_info(struct xfrm_userpolicy_info *p)
1287 {
1288 	int ret;
1289 
1290 	switch (p->share) {
1291 	case XFRM_SHARE_ANY:
1292 	case XFRM_SHARE_SESSION:
1293 	case XFRM_SHARE_USER:
1294 	case XFRM_SHARE_UNIQUE:
1295 		break;
1296 
1297 	default:
1298 		return -EINVAL;
1299 	}
1300 
1301 	switch (p->action) {
1302 	case XFRM_POLICY_ALLOW:
1303 	case XFRM_POLICY_BLOCK:
1304 		break;
1305 
1306 	default:
1307 		return -EINVAL;
1308 	}
1309 
1310 	switch (p->sel.family) {
1311 	case AF_INET:
1312 		break;
1313 
1314 	case AF_INET6:
1315 #if IS_ENABLED(CONFIG_IPV6)
1316 		break;
1317 #else
1318 		return  -EAFNOSUPPORT;
1319 #endif
1320 
1321 	default:
1322 		return -EINVAL;
1323 	}
1324 
1325 	ret = verify_policy_dir(p->dir);
1326 	if (ret)
1327 		return ret;
1328 	if (p->index && ((p->index & XFRM_POLICY_MAX) != p->dir))
1329 		return -EINVAL;
1330 
1331 	return 0;
1332 }
1333 
1334 static int copy_from_user_sec_ctx(struct xfrm_policy *pol, struct nlattr **attrs)
1335 {
1336 	struct nlattr *rt = attrs[XFRMA_SEC_CTX];
1337 	struct xfrm_user_sec_ctx *uctx;
1338 
1339 	if (!rt)
1340 		return 0;
1341 
1342 	uctx = nla_data(rt);
1343 	return security_xfrm_policy_alloc(&pol->security, uctx, GFP_KERNEL);
1344 }
1345 
1346 static void copy_templates(struct xfrm_policy *xp, struct xfrm_user_tmpl *ut,
1347 			   int nr)
1348 {
1349 	int i;
1350 
1351 	xp->xfrm_nr = nr;
1352 	for (i = 0; i < nr; i++, ut++) {
1353 		struct xfrm_tmpl *t = &xp->xfrm_vec[i];
1354 
1355 		memcpy(&t->id, &ut->id, sizeof(struct xfrm_id));
1356 		memcpy(&t->saddr, &ut->saddr,
1357 		       sizeof(xfrm_address_t));
1358 		t->reqid = ut->reqid;
1359 		t->mode = ut->mode;
1360 		t->share = ut->share;
1361 		t->optional = ut->optional;
1362 		t->aalgos = ut->aalgos;
1363 		t->ealgos = ut->ealgos;
1364 		t->calgos = ut->calgos;
1365 		/* If all masks are ~0, then we allow all algorithms. */
1366 		t->allalgs = !~(t->aalgos & t->ealgos & t->calgos);
1367 		t->encap_family = ut->family;
1368 	}
1369 }
1370 
1371 static int validate_tmpl(int nr, struct xfrm_user_tmpl *ut, u16 family)
1372 {
1373 	int i;
1374 
1375 	if (nr > XFRM_MAX_DEPTH)
1376 		return -EINVAL;
1377 
1378 	for (i = 0; i < nr; i++) {
1379 		/* We never validated the ut->family value, so many
1380 		 * applications simply leave it at zero.  The check was
1381 		 * never made and ut->family was ignored because all
1382 		 * templates could be assumed to have the same family as
1383 		 * the policy itself.  Now that we will have ipv4-in-ipv6
1384 		 * and ipv6-in-ipv4 tunnels, this is no longer true.
1385 		 */
1386 		if (!ut[i].family)
1387 			ut[i].family = family;
1388 
1389 		switch (ut[i].family) {
1390 		case AF_INET:
1391 			break;
1392 #if IS_ENABLED(CONFIG_IPV6)
1393 		case AF_INET6:
1394 			break;
1395 #endif
1396 		default:
1397 			return -EINVAL;
1398 		}
1399 	}
1400 
1401 	return 0;
1402 }
1403 
1404 static int copy_from_user_tmpl(struct xfrm_policy *pol, struct nlattr **attrs)
1405 {
1406 	struct nlattr *rt = attrs[XFRMA_TMPL];
1407 
1408 	if (!rt) {
1409 		pol->xfrm_nr = 0;
1410 	} else {
1411 		struct xfrm_user_tmpl *utmpl = nla_data(rt);
1412 		int nr = nla_len(rt) / sizeof(*utmpl);
1413 		int err;
1414 
1415 		err = validate_tmpl(nr, utmpl, pol->family);
1416 		if (err)
1417 			return err;
1418 
1419 		copy_templates(pol, utmpl, nr);
1420 	}
1421 	return 0;
1422 }
1423 
1424 static int copy_from_user_policy_type(u8 *tp, struct nlattr **attrs)
1425 {
1426 	struct nlattr *rt = attrs[XFRMA_POLICY_TYPE];
1427 	struct xfrm_userpolicy_type *upt;
1428 	u8 type = XFRM_POLICY_TYPE_MAIN;
1429 	int err;
1430 
1431 	if (rt) {
1432 		upt = nla_data(rt);
1433 		type = upt->type;
1434 	}
1435 
1436 	err = verify_policy_type(type);
1437 	if (err)
1438 		return err;
1439 
1440 	*tp = type;
1441 	return 0;
1442 }
1443 
1444 static void copy_from_user_policy(struct xfrm_policy *xp, struct xfrm_userpolicy_info *p)
1445 {
1446 	xp->priority = p->priority;
1447 	xp->index = p->index;
1448 	memcpy(&xp->selector, &p->sel, sizeof(xp->selector));
1449 	memcpy(&xp->lft, &p->lft, sizeof(xp->lft));
1450 	xp->action = p->action;
1451 	xp->flags = p->flags;
1452 	xp->family = p->sel.family;
1453 	/* XXX xp->share = p->share; */
1454 }
1455 
1456 static void copy_to_user_policy(struct xfrm_policy *xp, struct xfrm_userpolicy_info *p, int dir)
1457 {
1458 	memset(p, 0, sizeof(*p));
1459 	memcpy(&p->sel, &xp->selector, sizeof(p->sel));
1460 	memcpy(&p->lft, &xp->lft, sizeof(p->lft));
1461 	memcpy(&p->curlft, &xp->curlft, sizeof(p->curlft));
1462 	p->priority = xp->priority;
1463 	p->index = xp->index;
1464 	p->sel.family = xp->family;
1465 	p->dir = dir;
1466 	p->action = xp->action;
1467 	p->flags = xp->flags;
1468 	p->share = XFRM_SHARE_ANY; /* XXX xp->share */
1469 }
1470 
1471 static struct xfrm_policy *xfrm_policy_construct(struct net *net, struct xfrm_userpolicy_info *p, struct nlattr **attrs, int *errp)
1472 {
1473 	struct xfrm_policy *xp = xfrm_policy_alloc(net, GFP_KERNEL);
1474 	int err;
1475 
1476 	if (!xp) {
1477 		*errp = -ENOMEM;
1478 		return NULL;
1479 	}
1480 
1481 	copy_from_user_policy(xp, p);
1482 
1483 	err = copy_from_user_policy_type(&xp->type, attrs);
1484 	if (err)
1485 		goto error;
1486 
1487 	if (!(err = copy_from_user_tmpl(xp, attrs)))
1488 		err = copy_from_user_sec_ctx(xp, attrs);
1489 	if (err)
1490 		goto error;
1491 
1492 	xfrm_mark_get(attrs, &xp->mark);
1493 
1494 	return xp;
1495  error:
1496 	*errp = err;
1497 	xp->walk.dead = 1;
1498 	xfrm_policy_destroy(xp);
1499 	return NULL;
1500 }
1501 
1502 static int xfrm_add_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1503 		struct nlattr **attrs)
1504 {
1505 	struct net *net = sock_net(skb->sk);
1506 	struct xfrm_userpolicy_info *p = nlmsg_data(nlh);
1507 	struct xfrm_policy *xp;
1508 	struct km_event c;
1509 	int err;
1510 	int excl;
1511 
1512 	err = verify_newpolicy_info(p);
1513 	if (err)
1514 		return err;
1515 	err = verify_sec_ctx_len(attrs);
1516 	if (err)
1517 		return err;
1518 
1519 	xp = xfrm_policy_construct(net, p, attrs, &err);
1520 	if (!xp)
1521 		return err;
1522 
1523 	/* shouldn't excl be based on nlh flags??
1524 	 * Aha! this is anti-netlink really i.e  more pfkey derived
1525 	 * in netlink excl is a flag and you wouldnt need
1526 	 * a type XFRM_MSG_UPDPOLICY - JHS */
1527 	excl = nlh->nlmsg_type == XFRM_MSG_NEWPOLICY;
1528 	err = xfrm_policy_insert(p->dir, xp, excl);
1529 	xfrm_audit_policy_add(xp, err ? 0 : 1, true);
1530 
1531 	if (err) {
1532 		security_xfrm_policy_free(xp->security);
1533 		kfree(xp);
1534 		return err;
1535 	}
1536 
1537 	c.event = nlh->nlmsg_type;
1538 	c.seq = nlh->nlmsg_seq;
1539 	c.portid = nlh->nlmsg_pid;
1540 	km_policy_notify(xp, p->dir, &c);
1541 
1542 	xfrm_pol_put(xp);
1543 
1544 	return 0;
1545 }
1546 
1547 static int copy_to_user_tmpl(struct xfrm_policy *xp, struct sk_buff *skb)
1548 {
1549 	struct xfrm_user_tmpl vec[XFRM_MAX_DEPTH];
1550 	int i;
1551 
1552 	if (xp->xfrm_nr == 0)
1553 		return 0;
1554 
1555 	for (i = 0; i < xp->xfrm_nr; i++) {
1556 		struct xfrm_user_tmpl *up = &vec[i];
1557 		struct xfrm_tmpl *kp = &xp->xfrm_vec[i];
1558 
1559 		memset(up, 0, sizeof(*up));
1560 		memcpy(&up->id, &kp->id, sizeof(up->id));
1561 		up->family = kp->encap_family;
1562 		memcpy(&up->saddr, &kp->saddr, sizeof(up->saddr));
1563 		up->reqid = kp->reqid;
1564 		up->mode = kp->mode;
1565 		up->share = kp->share;
1566 		up->optional = kp->optional;
1567 		up->aalgos = kp->aalgos;
1568 		up->ealgos = kp->ealgos;
1569 		up->calgos = kp->calgos;
1570 	}
1571 
1572 	return nla_put(skb, XFRMA_TMPL,
1573 		       sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr, vec);
1574 }
1575 
1576 static inline int copy_to_user_state_sec_ctx(struct xfrm_state *x, struct sk_buff *skb)
1577 {
1578 	if (x->security) {
1579 		return copy_sec_ctx(x->security, skb);
1580 	}
1581 	return 0;
1582 }
1583 
1584 static inline int copy_to_user_sec_ctx(struct xfrm_policy *xp, struct sk_buff *skb)
1585 {
1586 	if (xp->security)
1587 		return copy_sec_ctx(xp->security, skb);
1588 	return 0;
1589 }
1590 static inline size_t userpolicy_type_attrsize(void)
1591 {
1592 #ifdef CONFIG_XFRM_SUB_POLICY
1593 	return nla_total_size(sizeof(struct xfrm_userpolicy_type));
1594 #else
1595 	return 0;
1596 #endif
1597 }
1598 
1599 #ifdef CONFIG_XFRM_SUB_POLICY
1600 static int copy_to_user_policy_type(u8 type, struct sk_buff *skb)
1601 {
1602 	struct xfrm_userpolicy_type upt = {
1603 		.type = type,
1604 	};
1605 
1606 	return nla_put(skb, XFRMA_POLICY_TYPE, sizeof(upt), &upt);
1607 }
1608 
1609 #else
1610 static inline int copy_to_user_policy_type(u8 type, struct sk_buff *skb)
1611 {
1612 	return 0;
1613 }
1614 #endif
1615 
1616 static int dump_one_policy(struct xfrm_policy *xp, int dir, int count, void *ptr)
1617 {
1618 	struct xfrm_dump_info *sp = ptr;
1619 	struct xfrm_userpolicy_info *p;
1620 	struct sk_buff *in_skb = sp->in_skb;
1621 	struct sk_buff *skb = sp->out_skb;
1622 	struct nlmsghdr *nlh;
1623 	int err;
1624 
1625 	nlh = nlmsg_put(skb, NETLINK_CB(in_skb).portid, sp->nlmsg_seq,
1626 			XFRM_MSG_NEWPOLICY, sizeof(*p), sp->nlmsg_flags);
1627 	if (nlh == NULL)
1628 		return -EMSGSIZE;
1629 
1630 	p = nlmsg_data(nlh);
1631 	copy_to_user_policy(xp, p, dir);
1632 	err = copy_to_user_tmpl(xp, skb);
1633 	if (!err)
1634 		err = copy_to_user_sec_ctx(xp, skb);
1635 	if (!err)
1636 		err = copy_to_user_policy_type(xp->type, skb);
1637 	if (!err)
1638 		err = xfrm_mark_put(skb, &xp->mark);
1639 	if (err) {
1640 		nlmsg_cancel(skb, nlh);
1641 		return err;
1642 	}
1643 	nlmsg_end(skb, nlh);
1644 	return 0;
1645 }
1646 
1647 static int xfrm_dump_policy_done(struct netlink_callback *cb)
1648 {
1649 	struct xfrm_policy_walk *walk = (struct xfrm_policy_walk *) &cb->args[1];
1650 	struct net *net = sock_net(cb->skb->sk);
1651 
1652 	xfrm_policy_walk_done(walk, net);
1653 	return 0;
1654 }
1655 
1656 static int xfrm_dump_policy(struct sk_buff *skb, struct netlink_callback *cb)
1657 {
1658 	struct net *net = sock_net(skb->sk);
1659 	struct xfrm_policy_walk *walk = (struct xfrm_policy_walk *) &cb->args[1];
1660 	struct xfrm_dump_info info;
1661 
1662 	BUILD_BUG_ON(sizeof(struct xfrm_policy_walk) >
1663 		     sizeof(cb->args) - sizeof(cb->args[0]));
1664 
1665 	info.in_skb = cb->skb;
1666 	info.out_skb = skb;
1667 	info.nlmsg_seq = cb->nlh->nlmsg_seq;
1668 	info.nlmsg_flags = NLM_F_MULTI;
1669 
1670 	if (!cb->args[0]) {
1671 		cb->args[0] = 1;
1672 		xfrm_policy_walk_init(walk, XFRM_POLICY_TYPE_ANY);
1673 	}
1674 
1675 	(void) xfrm_policy_walk(net, walk, dump_one_policy, &info);
1676 
1677 	return skb->len;
1678 }
1679 
1680 static struct sk_buff *xfrm_policy_netlink(struct sk_buff *in_skb,
1681 					  struct xfrm_policy *xp,
1682 					  int dir, u32 seq)
1683 {
1684 	struct xfrm_dump_info info;
1685 	struct sk_buff *skb;
1686 	int err;
1687 
1688 	skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1689 	if (!skb)
1690 		return ERR_PTR(-ENOMEM);
1691 
1692 	info.in_skb = in_skb;
1693 	info.out_skb = skb;
1694 	info.nlmsg_seq = seq;
1695 	info.nlmsg_flags = 0;
1696 
1697 	err = dump_one_policy(xp, dir, 0, &info);
1698 	if (err) {
1699 		kfree_skb(skb);
1700 		return ERR_PTR(err);
1701 	}
1702 
1703 	return skb;
1704 }
1705 
1706 static int xfrm_get_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1707 		struct nlattr **attrs)
1708 {
1709 	struct net *net = sock_net(skb->sk);
1710 	struct xfrm_policy *xp;
1711 	struct xfrm_userpolicy_id *p;
1712 	u8 type = XFRM_POLICY_TYPE_MAIN;
1713 	int err;
1714 	struct km_event c;
1715 	int delete;
1716 	struct xfrm_mark m;
1717 	u32 mark = xfrm_mark_get(attrs, &m);
1718 
1719 	p = nlmsg_data(nlh);
1720 	delete = nlh->nlmsg_type == XFRM_MSG_DELPOLICY;
1721 
1722 	err = copy_from_user_policy_type(&type, attrs);
1723 	if (err)
1724 		return err;
1725 
1726 	err = verify_policy_dir(p->dir);
1727 	if (err)
1728 		return err;
1729 
1730 	if (p->index)
1731 		xp = xfrm_policy_byid(net, mark, type, p->dir, p->index, delete, &err);
1732 	else {
1733 		struct nlattr *rt = attrs[XFRMA_SEC_CTX];
1734 		struct xfrm_sec_ctx *ctx;
1735 
1736 		err = verify_sec_ctx_len(attrs);
1737 		if (err)
1738 			return err;
1739 
1740 		ctx = NULL;
1741 		if (rt) {
1742 			struct xfrm_user_sec_ctx *uctx = nla_data(rt);
1743 
1744 			err = security_xfrm_policy_alloc(&ctx, uctx, GFP_KERNEL);
1745 			if (err)
1746 				return err;
1747 		}
1748 		xp = xfrm_policy_bysel_ctx(net, mark, type, p->dir, &p->sel,
1749 					   ctx, delete, &err);
1750 		security_xfrm_policy_free(ctx);
1751 	}
1752 	if (xp == NULL)
1753 		return -ENOENT;
1754 
1755 	if (!delete) {
1756 		struct sk_buff *resp_skb;
1757 
1758 		resp_skb = xfrm_policy_netlink(skb, xp, p->dir, nlh->nlmsg_seq);
1759 		if (IS_ERR(resp_skb)) {
1760 			err = PTR_ERR(resp_skb);
1761 		} else {
1762 			err = nlmsg_unicast(net->xfrm.nlsk, resp_skb,
1763 					    NETLINK_CB(skb).portid);
1764 		}
1765 	} else {
1766 		xfrm_audit_policy_delete(xp, err ? 0 : 1, true);
1767 
1768 		if (err != 0)
1769 			goto out;
1770 
1771 		c.data.byid = p->index;
1772 		c.event = nlh->nlmsg_type;
1773 		c.seq = nlh->nlmsg_seq;
1774 		c.portid = nlh->nlmsg_pid;
1775 		km_policy_notify(xp, p->dir, &c);
1776 	}
1777 
1778 out:
1779 	xfrm_pol_put(xp);
1780 	if (delete && err == 0)
1781 		xfrm_garbage_collect(net);
1782 	return err;
1783 }
1784 
1785 static int xfrm_flush_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
1786 		struct nlattr **attrs)
1787 {
1788 	struct net *net = sock_net(skb->sk);
1789 	struct km_event c;
1790 	struct xfrm_usersa_flush *p = nlmsg_data(nlh);
1791 	int err;
1792 
1793 	err = xfrm_state_flush(net, p->proto, true);
1794 	if (err) {
1795 		if (err == -ESRCH) /* empty table */
1796 			return 0;
1797 		return err;
1798 	}
1799 	c.data.proto = p->proto;
1800 	c.event = nlh->nlmsg_type;
1801 	c.seq = nlh->nlmsg_seq;
1802 	c.portid = nlh->nlmsg_pid;
1803 	c.net = net;
1804 	km_state_notify(NULL, &c);
1805 
1806 	return 0;
1807 }
1808 
1809 static inline size_t xfrm_aevent_msgsize(struct xfrm_state *x)
1810 {
1811 	size_t replay_size = x->replay_esn ?
1812 			      xfrm_replay_state_esn_len(x->replay_esn) :
1813 			      sizeof(struct xfrm_replay_state);
1814 
1815 	return NLMSG_ALIGN(sizeof(struct xfrm_aevent_id))
1816 	       + nla_total_size(replay_size)
1817 	       + nla_total_size_64bit(sizeof(struct xfrm_lifetime_cur))
1818 	       + nla_total_size(sizeof(struct xfrm_mark))
1819 	       + nla_total_size(4) /* XFRM_AE_RTHR */
1820 	       + nla_total_size(4); /* XFRM_AE_ETHR */
1821 }
1822 
1823 static int build_aevent(struct sk_buff *skb, struct xfrm_state *x, const struct km_event *c)
1824 {
1825 	struct xfrm_aevent_id *id;
1826 	struct nlmsghdr *nlh;
1827 	int err;
1828 
1829 	nlh = nlmsg_put(skb, c->portid, c->seq, XFRM_MSG_NEWAE, sizeof(*id), 0);
1830 	if (nlh == NULL)
1831 		return -EMSGSIZE;
1832 
1833 	id = nlmsg_data(nlh);
1834 	memcpy(&id->sa_id.daddr, &x->id.daddr, sizeof(x->id.daddr));
1835 	id->sa_id.spi = x->id.spi;
1836 	id->sa_id.family = x->props.family;
1837 	id->sa_id.proto = x->id.proto;
1838 	memcpy(&id->saddr, &x->props.saddr, sizeof(x->props.saddr));
1839 	id->reqid = x->props.reqid;
1840 	id->flags = c->data.aevent;
1841 
1842 	if (x->replay_esn) {
1843 		err = nla_put(skb, XFRMA_REPLAY_ESN_VAL,
1844 			      xfrm_replay_state_esn_len(x->replay_esn),
1845 			      x->replay_esn);
1846 	} else {
1847 		err = nla_put(skb, XFRMA_REPLAY_VAL, sizeof(x->replay),
1848 			      &x->replay);
1849 	}
1850 	if (err)
1851 		goto out_cancel;
1852 	err = nla_put_64bit(skb, XFRMA_LTIME_VAL, sizeof(x->curlft), &x->curlft,
1853 			    XFRMA_PAD);
1854 	if (err)
1855 		goto out_cancel;
1856 
1857 	if (id->flags & XFRM_AE_RTHR) {
1858 		err = nla_put_u32(skb, XFRMA_REPLAY_THRESH, x->replay_maxdiff);
1859 		if (err)
1860 			goto out_cancel;
1861 	}
1862 	if (id->flags & XFRM_AE_ETHR) {
1863 		err = nla_put_u32(skb, XFRMA_ETIMER_THRESH,
1864 				  x->replay_maxage * 10 / HZ);
1865 		if (err)
1866 			goto out_cancel;
1867 	}
1868 	err = xfrm_mark_put(skb, &x->mark);
1869 	if (err)
1870 		goto out_cancel;
1871 
1872 	nlmsg_end(skb, nlh);
1873 	return 0;
1874 
1875 out_cancel:
1876 	nlmsg_cancel(skb, nlh);
1877 	return err;
1878 }
1879 
1880 static int xfrm_get_ae(struct sk_buff *skb, struct nlmsghdr *nlh,
1881 		struct nlattr **attrs)
1882 {
1883 	struct net *net = sock_net(skb->sk);
1884 	struct xfrm_state *x;
1885 	struct sk_buff *r_skb;
1886 	int err;
1887 	struct km_event c;
1888 	u32 mark;
1889 	struct xfrm_mark m;
1890 	struct xfrm_aevent_id *p = nlmsg_data(nlh);
1891 	struct xfrm_usersa_id *id = &p->sa_id;
1892 
1893 	mark = xfrm_mark_get(attrs, &m);
1894 
1895 	x = xfrm_state_lookup(net, mark, &id->daddr, id->spi, id->proto, id->family);
1896 	if (x == NULL)
1897 		return -ESRCH;
1898 
1899 	r_skb = nlmsg_new(xfrm_aevent_msgsize(x), GFP_ATOMIC);
1900 	if (r_skb == NULL) {
1901 		xfrm_state_put(x);
1902 		return -ENOMEM;
1903 	}
1904 
1905 	/*
1906 	 * XXX: is this lock really needed - none of the other
1907 	 * gets lock (the concern is things getting updated
1908 	 * while we are still reading) - jhs
1909 	*/
1910 	spin_lock_bh(&x->lock);
1911 	c.data.aevent = p->flags;
1912 	c.seq = nlh->nlmsg_seq;
1913 	c.portid = nlh->nlmsg_pid;
1914 
1915 	if (build_aevent(r_skb, x, &c) < 0)
1916 		BUG();
1917 	err = nlmsg_unicast(net->xfrm.nlsk, r_skb, NETLINK_CB(skb).portid);
1918 	spin_unlock_bh(&x->lock);
1919 	xfrm_state_put(x);
1920 	return err;
1921 }
1922 
1923 static int xfrm_new_ae(struct sk_buff *skb, struct nlmsghdr *nlh,
1924 		struct nlattr **attrs)
1925 {
1926 	struct net *net = sock_net(skb->sk);
1927 	struct xfrm_state *x;
1928 	struct km_event c;
1929 	int err = -EINVAL;
1930 	u32 mark = 0;
1931 	struct xfrm_mark m;
1932 	struct xfrm_aevent_id *p = nlmsg_data(nlh);
1933 	struct nlattr *rp = attrs[XFRMA_REPLAY_VAL];
1934 	struct nlattr *re = attrs[XFRMA_REPLAY_ESN_VAL];
1935 	struct nlattr *lt = attrs[XFRMA_LTIME_VAL];
1936 	struct nlattr *et = attrs[XFRMA_ETIMER_THRESH];
1937 	struct nlattr *rt = attrs[XFRMA_REPLAY_THRESH];
1938 
1939 	if (!lt && !rp && !re && !et && !rt)
1940 		return err;
1941 
1942 	/* pedantic mode - thou shalt sayeth replaceth */
1943 	if (!(nlh->nlmsg_flags&NLM_F_REPLACE))
1944 		return err;
1945 
1946 	mark = xfrm_mark_get(attrs, &m);
1947 
1948 	x = xfrm_state_lookup(net, mark, &p->sa_id.daddr, p->sa_id.spi, p->sa_id.proto, p->sa_id.family);
1949 	if (x == NULL)
1950 		return -ESRCH;
1951 
1952 	if (x->km.state != XFRM_STATE_VALID)
1953 		goto out;
1954 
1955 	err = xfrm_replay_verify_len(x->replay_esn, re);
1956 	if (err)
1957 		goto out;
1958 
1959 	spin_lock_bh(&x->lock);
1960 	xfrm_update_ae_params(x, attrs, 1);
1961 	spin_unlock_bh(&x->lock);
1962 
1963 	c.event = nlh->nlmsg_type;
1964 	c.seq = nlh->nlmsg_seq;
1965 	c.portid = nlh->nlmsg_pid;
1966 	c.data.aevent = XFRM_AE_CU;
1967 	km_state_notify(x, &c);
1968 	err = 0;
1969 out:
1970 	xfrm_state_put(x);
1971 	return err;
1972 }
1973 
1974 static int xfrm_flush_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1975 		struct nlattr **attrs)
1976 {
1977 	struct net *net = sock_net(skb->sk);
1978 	struct km_event c;
1979 	u8 type = XFRM_POLICY_TYPE_MAIN;
1980 	int err;
1981 
1982 	err = copy_from_user_policy_type(&type, attrs);
1983 	if (err)
1984 		return err;
1985 
1986 	err = xfrm_policy_flush(net, type, true);
1987 	if (err) {
1988 		if (err == -ESRCH) /* empty table */
1989 			return 0;
1990 		return err;
1991 	}
1992 
1993 	c.data.type = type;
1994 	c.event = nlh->nlmsg_type;
1995 	c.seq = nlh->nlmsg_seq;
1996 	c.portid = nlh->nlmsg_pid;
1997 	c.net = net;
1998 	km_policy_notify(NULL, 0, &c);
1999 	return 0;
2000 }
2001 
2002 static int xfrm_add_pol_expire(struct sk_buff *skb, struct nlmsghdr *nlh,
2003 		struct nlattr **attrs)
2004 {
2005 	struct net *net = sock_net(skb->sk);
2006 	struct xfrm_policy *xp;
2007 	struct xfrm_user_polexpire *up = nlmsg_data(nlh);
2008 	struct xfrm_userpolicy_info *p = &up->pol;
2009 	u8 type = XFRM_POLICY_TYPE_MAIN;
2010 	int err = -ENOENT;
2011 	struct xfrm_mark m;
2012 	u32 mark = xfrm_mark_get(attrs, &m);
2013 
2014 	err = copy_from_user_policy_type(&type, attrs);
2015 	if (err)
2016 		return err;
2017 
2018 	err = verify_policy_dir(p->dir);
2019 	if (err)
2020 		return err;
2021 
2022 	if (p->index)
2023 		xp = xfrm_policy_byid(net, mark, type, p->dir, p->index, 0, &err);
2024 	else {
2025 		struct nlattr *rt = attrs[XFRMA_SEC_CTX];
2026 		struct xfrm_sec_ctx *ctx;
2027 
2028 		err = verify_sec_ctx_len(attrs);
2029 		if (err)
2030 			return err;
2031 
2032 		ctx = NULL;
2033 		if (rt) {
2034 			struct xfrm_user_sec_ctx *uctx = nla_data(rt);
2035 
2036 			err = security_xfrm_policy_alloc(&ctx, uctx, GFP_KERNEL);
2037 			if (err)
2038 				return err;
2039 		}
2040 		xp = xfrm_policy_bysel_ctx(net, mark, type, p->dir,
2041 					   &p->sel, ctx, 0, &err);
2042 		security_xfrm_policy_free(ctx);
2043 	}
2044 	if (xp == NULL)
2045 		return -ENOENT;
2046 
2047 	if (unlikely(xp->walk.dead))
2048 		goto out;
2049 
2050 	err = 0;
2051 	if (up->hard) {
2052 		xfrm_policy_delete(xp, p->dir);
2053 		xfrm_audit_policy_delete(xp, 1, true);
2054 	} else {
2055 		// reset the timers here?
2056 		WARN(1, "Don't know what to do with soft policy expire\n");
2057 	}
2058 	km_policy_expired(xp, p->dir, up->hard, nlh->nlmsg_pid);
2059 
2060 out:
2061 	xfrm_pol_put(xp);
2062 	return err;
2063 }
2064 
2065 static int xfrm_add_sa_expire(struct sk_buff *skb, struct nlmsghdr *nlh,
2066 		struct nlattr **attrs)
2067 {
2068 	struct net *net = sock_net(skb->sk);
2069 	struct xfrm_state *x;
2070 	int err;
2071 	struct xfrm_user_expire *ue = nlmsg_data(nlh);
2072 	struct xfrm_usersa_info *p = &ue->state;
2073 	struct xfrm_mark m;
2074 	u32 mark = xfrm_mark_get(attrs, &m);
2075 
2076 	x = xfrm_state_lookup(net, mark, &p->id.daddr, p->id.spi, p->id.proto, p->family);
2077 
2078 	err = -ENOENT;
2079 	if (x == NULL)
2080 		return err;
2081 
2082 	spin_lock_bh(&x->lock);
2083 	err = -EINVAL;
2084 	if (x->km.state != XFRM_STATE_VALID)
2085 		goto out;
2086 	km_state_expired(x, ue->hard, nlh->nlmsg_pid);
2087 
2088 	if (ue->hard) {
2089 		__xfrm_state_delete(x);
2090 		xfrm_audit_state_delete(x, 1, true);
2091 	}
2092 	err = 0;
2093 out:
2094 	spin_unlock_bh(&x->lock);
2095 	xfrm_state_put(x);
2096 	return err;
2097 }
2098 
2099 static int xfrm_add_acquire(struct sk_buff *skb, struct nlmsghdr *nlh,
2100 		struct nlattr **attrs)
2101 {
2102 	struct net *net = sock_net(skb->sk);
2103 	struct xfrm_policy *xp;
2104 	struct xfrm_user_tmpl *ut;
2105 	int i;
2106 	struct nlattr *rt = attrs[XFRMA_TMPL];
2107 	struct xfrm_mark mark;
2108 
2109 	struct xfrm_user_acquire *ua = nlmsg_data(nlh);
2110 	struct xfrm_state *x = xfrm_state_alloc(net);
2111 	int err = -ENOMEM;
2112 
2113 	if (!x)
2114 		goto nomem;
2115 
2116 	xfrm_mark_get(attrs, &mark);
2117 
2118 	err = verify_newpolicy_info(&ua->policy);
2119 	if (err)
2120 		goto bad_policy;
2121 
2122 	/*   build an XP */
2123 	xp = xfrm_policy_construct(net, &ua->policy, attrs, &err);
2124 	if (!xp)
2125 		goto free_state;
2126 
2127 	memcpy(&x->id, &ua->id, sizeof(ua->id));
2128 	memcpy(&x->props.saddr, &ua->saddr, sizeof(ua->saddr));
2129 	memcpy(&x->sel, &ua->sel, sizeof(ua->sel));
2130 	xp->mark.m = x->mark.m = mark.m;
2131 	xp->mark.v = x->mark.v = mark.v;
2132 	ut = nla_data(rt);
2133 	/* extract the templates and for each call km_key */
2134 	for (i = 0; i < xp->xfrm_nr; i++, ut++) {
2135 		struct xfrm_tmpl *t = &xp->xfrm_vec[i];
2136 		memcpy(&x->id, &t->id, sizeof(x->id));
2137 		x->props.mode = t->mode;
2138 		x->props.reqid = t->reqid;
2139 		x->props.family = ut->family;
2140 		t->aalgos = ua->aalgos;
2141 		t->ealgos = ua->ealgos;
2142 		t->calgos = ua->calgos;
2143 		err = km_query(x, t, xp);
2144 
2145 	}
2146 
2147 	kfree(x);
2148 	kfree(xp);
2149 
2150 	return 0;
2151 
2152 bad_policy:
2153 	WARN(1, "BAD policy passed\n");
2154 free_state:
2155 	kfree(x);
2156 nomem:
2157 	return err;
2158 }
2159 
2160 #ifdef CONFIG_XFRM_MIGRATE
2161 static int copy_from_user_migrate(struct xfrm_migrate *ma,
2162 				  struct xfrm_kmaddress *k,
2163 				  struct nlattr **attrs, int *num)
2164 {
2165 	struct nlattr *rt = attrs[XFRMA_MIGRATE];
2166 	struct xfrm_user_migrate *um;
2167 	int i, num_migrate;
2168 
2169 	if (k != NULL) {
2170 		struct xfrm_user_kmaddress *uk;
2171 
2172 		uk = nla_data(attrs[XFRMA_KMADDRESS]);
2173 		memcpy(&k->local, &uk->local, sizeof(k->local));
2174 		memcpy(&k->remote, &uk->remote, sizeof(k->remote));
2175 		k->family = uk->family;
2176 		k->reserved = uk->reserved;
2177 	}
2178 
2179 	um = nla_data(rt);
2180 	num_migrate = nla_len(rt) / sizeof(*um);
2181 
2182 	if (num_migrate <= 0 || num_migrate > XFRM_MAX_DEPTH)
2183 		return -EINVAL;
2184 
2185 	for (i = 0; i < num_migrate; i++, um++, ma++) {
2186 		memcpy(&ma->old_daddr, &um->old_daddr, sizeof(ma->old_daddr));
2187 		memcpy(&ma->old_saddr, &um->old_saddr, sizeof(ma->old_saddr));
2188 		memcpy(&ma->new_daddr, &um->new_daddr, sizeof(ma->new_daddr));
2189 		memcpy(&ma->new_saddr, &um->new_saddr, sizeof(ma->new_saddr));
2190 
2191 		ma->proto = um->proto;
2192 		ma->mode = um->mode;
2193 		ma->reqid = um->reqid;
2194 
2195 		ma->old_family = um->old_family;
2196 		ma->new_family = um->new_family;
2197 	}
2198 
2199 	*num = i;
2200 	return 0;
2201 }
2202 
2203 static int xfrm_do_migrate(struct sk_buff *skb, struct nlmsghdr *nlh,
2204 			   struct nlattr **attrs)
2205 {
2206 	struct xfrm_userpolicy_id *pi = nlmsg_data(nlh);
2207 	struct xfrm_migrate m[XFRM_MAX_DEPTH];
2208 	struct xfrm_kmaddress km, *kmp;
2209 	u8 type;
2210 	int err;
2211 	int n = 0;
2212 	struct net *net = sock_net(skb->sk);
2213 
2214 	if (attrs[XFRMA_MIGRATE] == NULL)
2215 		return -EINVAL;
2216 
2217 	kmp = attrs[XFRMA_KMADDRESS] ? &km : NULL;
2218 
2219 	err = copy_from_user_policy_type(&type, attrs);
2220 	if (err)
2221 		return err;
2222 
2223 	err = copy_from_user_migrate((struct xfrm_migrate *)m, kmp, attrs, &n);
2224 	if (err)
2225 		return err;
2226 
2227 	if (!n)
2228 		return 0;
2229 
2230 	xfrm_migrate(&pi->sel, pi->dir, type, m, n, kmp, net);
2231 
2232 	return 0;
2233 }
2234 #else
2235 static int xfrm_do_migrate(struct sk_buff *skb, struct nlmsghdr *nlh,
2236 			   struct nlattr **attrs)
2237 {
2238 	return -ENOPROTOOPT;
2239 }
2240 #endif
2241 
2242 #ifdef CONFIG_XFRM_MIGRATE
2243 static int copy_to_user_migrate(const struct xfrm_migrate *m, struct sk_buff *skb)
2244 {
2245 	struct xfrm_user_migrate um;
2246 
2247 	memset(&um, 0, sizeof(um));
2248 	um.proto = m->proto;
2249 	um.mode = m->mode;
2250 	um.reqid = m->reqid;
2251 	um.old_family = m->old_family;
2252 	memcpy(&um.old_daddr, &m->old_daddr, sizeof(um.old_daddr));
2253 	memcpy(&um.old_saddr, &m->old_saddr, sizeof(um.old_saddr));
2254 	um.new_family = m->new_family;
2255 	memcpy(&um.new_daddr, &m->new_daddr, sizeof(um.new_daddr));
2256 	memcpy(&um.new_saddr, &m->new_saddr, sizeof(um.new_saddr));
2257 
2258 	return nla_put(skb, XFRMA_MIGRATE, sizeof(um), &um);
2259 }
2260 
2261 static int copy_to_user_kmaddress(const struct xfrm_kmaddress *k, struct sk_buff *skb)
2262 {
2263 	struct xfrm_user_kmaddress uk;
2264 
2265 	memset(&uk, 0, sizeof(uk));
2266 	uk.family = k->family;
2267 	uk.reserved = k->reserved;
2268 	memcpy(&uk.local, &k->local, sizeof(uk.local));
2269 	memcpy(&uk.remote, &k->remote, sizeof(uk.remote));
2270 
2271 	return nla_put(skb, XFRMA_KMADDRESS, sizeof(uk), &uk);
2272 }
2273 
2274 static inline size_t xfrm_migrate_msgsize(int num_migrate, int with_kma)
2275 {
2276 	return NLMSG_ALIGN(sizeof(struct xfrm_userpolicy_id))
2277 	      + (with_kma ? nla_total_size(sizeof(struct xfrm_kmaddress)) : 0)
2278 	      + nla_total_size(sizeof(struct xfrm_user_migrate) * num_migrate)
2279 	      + userpolicy_type_attrsize();
2280 }
2281 
2282 static int build_migrate(struct sk_buff *skb, const struct xfrm_migrate *m,
2283 			 int num_migrate, const struct xfrm_kmaddress *k,
2284 			 const struct xfrm_selector *sel, u8 dir, u8 type)
2285 {
2286 	const struct xfrm_migrate *mp;
2287 	struct xfrm_userpolicy_id *pol_id;
2288 	struct nlmsghdr *nlh;
2289 	int i, err;
2290 
2291 	nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_MIGRATE, sizeof(*pol_id), 0);
2292 	if (nlh == NULL)
2293 		return -EMSGSIZE;
2294 
2295 	pol_id = nlmsg_data(nlh);
2296 	/* copy data from selector, dir, and type to the pol_id */
2297 	memset(pol_id, 0, sizeof(*pol_id));
2298 	memcpy(&pol_id->sel, sel, sizeof(pol_id->sel));
2299 	pol_id->dir = dir;
2300 
2301 	if (k != NULL) {
2302 		err = copy_to_user_kmaddress(k, skb);
2303 		if (err)
2304 			goto out_cancel;
2305 	}
2306 	err = copy_to_user_policy_type(type, skb);
2307 	if (err)
2308 		goto out_cancel;
2309 	for (i = 0, mp = m ; i < num_migrate; i++, mp++) {
2310 		err = copy_to_user_migrate(mp, skb);
2311 		if (err)
2312 			goto out_cancel;
2313 	}
2314 
2315 	nlmsg_end(skb, nlh);
2316 	return 0;
2317 
2318 out_cancel:
2319 	nlmsg_cancel(skb, nlh);
2320 	return err;
2321 }
2322 
2323 static int xfrm_send_migrate(const struct xfrm_selector *sel, u8 dir, u8 type,
2324 			     const struct xfrm_migrate *m, int num_migrate,
2325 			     const struct xfrm_kmaddress *k)
2326 {
2327 	struct net *net = &init_net;
2328 	struct sk_buff *skb;
2329 
2330 	skb = nlmsg_new(xfrm_migrate_msgsize(num_migrate, !!k), GFP_ATOMIC);
2331 	if (skb == NULL)
2332 		return -ENOMEM;
2333 
2334 	/* build migrate */
2335 	if (build_migrate(skb, m, num_migrate, k, sel, dir, type) < 0)
2336 		BUG();
2337 
2338 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_MIGRATE);
2339 }
2340 #else
2341 static int xfrm_send_migrate(const struct xfrm_selector *sel, u8 dir, u8 type,
2342 			     const struct xfrm_migrate *m, int num_migrate,
2343 			     const struct xfrm_kmaddress *k)
2344 {
2345 	return -ENOPROTOOPT;
2346 }
2347 #endif
2348 
2349 #define XMSGSIZE(type) sizeof(struct type)
2350 
2351 static const int xfrm_msg_min[XFRM_NR_MSGTYPES] = {
2352 	[XFRM_MSG_NEWSA       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_info),
2353 	[XFRM_MSG_DELSA       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_id),
2354 	[XFRM_MSG_GETSA       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_id),
2355 	[XFRM_MSG_NEWPOLICY   - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_info),
2356 	[XFRM_MSG_DELPOLICY   - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
2357 	[XFRM_MSG_GETPOLICY   - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
2358 	[XFRM_MSG_ALLOCSPI    - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userspi_info),
2359 	[XFRM_MSG_ACQUIRE     - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_acquire),
2360 	[XFRM_MSG_EXPIRE      - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_expire),
2361 	[XFRM_MSG_UPDPOLICY   - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_info),
2362 	[XFRM_MSG_UPDSA       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_info),
2363 	[XFRM_MSG_POLEXPIRE   - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_polexpire),
2364 	[XFRM_MSG_FLUSHSA     - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_flush),
2365 	[XFRM_MSG_FLUSHPOLICY - XFRM_MSG_BASE] = 0,
2366 	[XFRM_MSG_NEWAE       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_aevent_id),
2367 	[XFRM_MSG_GETAE       - XFRM_MSG_BASE] = XMSGSIZE(xfrm_aevent_id),
2368 	[XFRM_MSG_REPORT      - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_report),
2369 	[XFRM_MSG_MIGRATE     - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
2370 	[XFRM_MSG_GETSADINFO  - XFRM_MSG_BASE] = sizeof(u32),
2371 	[XFRM_MSG_NEWSPDINFO  - XFRM_MSG_BASE] = sizeof(u32),
2372 	[XFRM_MSG_GETSPDINFO  - XFRM_MSG_BASE] = sizeof(u32),
2373 };
2374 
2375 #undef XMSGSIZE
2376 
2377 static const struct nla_policy xfrma_policy[XFRMA_MAX+1] = {
2378 	[XFRMA_SA]		= { .len = sizeof(struct xfrm_usersa_info)},
2379 	[XFRMA_POLICY]		= { .len = sizeof(struct xfrm_userpolicy_info)},
2380 	[XFRMA_LASTUSED]	= { .type = NLA_U64},
2381 	[XFRMA_ALG_AUTH_TRUNC]	= { .len = sizeof(struct xfrm_algo_auth)},
2382 	[XFRMA_ALG_AEAD]	= { .len = sizeof(struct xfrm_algo_aead) },
2383 	[XFRMA_ALG_AUTH]	= { .len = sizeof(struct xfrm_algo) },
2384 	[XFRMA_ALG_CRYPT]	= { .len = sizeof(struct xfrm_algo) },
2385 	[XFRMA_ALG_COMP]	= { .len = sizeof(struct xfrm_algo) },
2386 	[XFRMA_ENCAP]		= { .len = sizeof(struct xfrm_encap_tmpl) },
2387 	[XFRMA_TMPL]		= { .len = sizeof(struct xfrm_user_tmpl) },
2388 	[XFRMA_SEC_CTX]		= { .len = sizeof(struct xfrm_sec_ctx) },
2389 	[XFRMA_LTIME_VAL]	= { .len = sizeof(struct xfrm_lifetime_cur) },
2390 	[XFRMA_REPLAY_VAL]	= { .len = sizeof(struct xfrm_replay_state) },
2391 	[XFRMA_REPLAY_THRESH]	= { .type = NLA_U32 },
2392 	[XFRMA_ETIMER_THRESH]	= { .type = NLA_U32 },
2393 	[XFRMA_SRCADDR]		= { .len = sizeof(xfrm_address_t) },
2394 	[XFRMA_COADDR]		= { .len = sizeof(xfrm_address_t) },
2395 	[XFRMA_POLICY_TYPE]	= { .len = sizeof(struct xfrm_userpolicy_type)},
2396 	[XFRMA_MIGRATE]		= { .len = sizeof(struct xfrm_user_migrate) },
2397 	[XFRMA_KMADDRESS]	= { .len = sizeof(struct xfrm_user_kmaddress) },
2398 	[XFRMA_MARK]		= { .len = sizeof(struct xfrm_mark) },
2399 	[XFRMA_TFCPAD]		= { .type = NLA_U32 },
2400 	[XFRMA_REPLAY_ESN_VAL]	= { .len = sizeof(struct xfrm_replay_state_esn) },
2401 	[XFRMA_SA_EXTRA_FLAGS]	= { .type = NLA_U32 },
2402 	[XFRMA_PROTO]		= { .type = NLA_U8 },
2403 	[XFRMA_ADDRESS_FILTER]	= { .len = sizeof(struct xfrm_address_filter) },
2404 };
2405 
2406 static const struct nla_policy xfrma_spd_policy[XFRMA_SPD_MAX+1] = {
2407 	[XFRMA_SPD_IPV4_HTHRESH] = { .len = sizeof(struct xfrmu_spdhthresh) },
2408 	[XFRMA_SPD_IPV6_HTHRESH] = { .len = sizeof(struct xfrmu_spdhthresh) },
2409 };
2410 
2411 static const struct xfrm_link {
2412 	int (*doit)(struct sk_buff *, struct nlmsghdr *, struct nlattr **);
2413 	int (*dump)(struct sk_buff *, struct netlink_callback *);
2414 	int (*done)(struct netlink_callback *);
2415 	const struct nla_policy *nla_pol;
2416 	int nla_max;
2417 } xfrm_dispatch[XFRM_NR_MSGTYPES] = {
2418 	[XFRM_MSG_NEWSA       - XFRM_MSG_BASE] = { .doit = xfrm_add_sa        },
2419 	[XFRM_MSG_DELSA       - XFRM_MSG_BASE] = { .doit = xfrm_del_sa        },
2420 	[XFRM_MSG_GETSA       - XFRM_MSG_BASE] = { .doit = xfrm_get_sa,
2421 						   .dump = xfrm_dump_sa,
2422 						   .done = xfrm_dump_sa_done  },
2423 	[XFRM_MSG_NEWPOLICY   - XFRM_MSG_BASE] = { .doit = xfrm_add_policy    },
2424 	[XFRM_MSG_DELPOLICY   - XFRM_MSG_BASE] = { .doit = xfrm_get_policy    },
2425 	[XFRM_MSG_GETPOLICY   - XFRM_MSG_BASE] = { .doit = xfrm_get_policy,
2426 						   .dump = xfrm_dump_policy,
2427 						   .done = xfrm_dump_policy_done },
2428 	[XFRM_MSG_ALLOCSPI    - XFRM_MSG_BASE] = { .doit = xfrm_alloc_userspi },
2429 	[XFRM_MSG_ACQUIRE     - XFRM_MSG_BASE] = { .doit = xfrm_add_acquire   },
2430 	[XFRM_MSG_EXPIRE      - XFRM_MSG_BASE] = { .doit = xfrm_add_sa_expire },
2431 	[XFRM_MSG_UPDPOLICY   - XFRM_MSG_BASE] = { .doit = xfrm_add_policy    },
2432 	[XFRM_MSG_UPDSA       - XFRM_MSG_BASE] = { .doit = xfrm_add_sa        },
2433 	[XFRM_MSG_POLEXPIRE   - XFRM_MSG_BASE] = { .doit = xfrm_add_pol_expire},
2434 	[XFRM_MSG_FLUSHSA     - XFRM_MSG_BASE] = { .doit = xfrm_flush_sa      },
2435 	[XFRM_MSG_FLUSHPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_flush_policy  },
2436 	[XFRM_MSG_NEWAE       - XFRM_MSG_BASE] = { .doit = xfrm_new_ae  },
2437 	[XFRM_MSG_GETAE       - XFRM_MSG_BASE] = { .doit = xfrm_get_ae  },
2438 	[XFRM_MSG_MIGRATE     - XFRM_MSG_BASE] = { .doit = xfrm_do_migrate    },
2439 	[XFRM_MSG_GETSADINFO  - XFRM_MSG_BASE] = { .doit = xfrm_get_sadinfo   },
2440 	[XFRM_MSG_NEWSPDINFO  - XFRM_MSG_BASE] = { .doit = xfrm_set_spdinfo,
2441 						   .nla_pol = xfrma_spd_policy,
2442 						   .nla_max = XFRMA_SPD_MAX },
2443 	[XFRM_MSG_GETSPDINFO  - XFRM_MSG_BASE] = { .doit = xfrm_get_spdinfo   },
2444 };
2445 
2446 static int xfrm_user_rcv_msg(struct sk_buff *skb, struct nlmsghdr *nlh)
2447 {
2448 	struct net *net = sock_net(skb->sk);
2449 	struct nlattr *attrs[XFRMA_MAX+1];
2450 	const struct xfrm_link *link;
2451 	int type, err;
2452 
2453 #ifdef CONFIG_COMPAT
2454 	if (in_compat_syscall())
2455 		return -ENOTSUPP;
2456 #endif
2457 
2458 	type = nlh->nlmsg_type;
2459 	if (type > XFRM_MSG_MAX)
2460 		return -EINVAL;
2461 
2462 	type -= XFRM_MSG_BASE;
2463 	link = &xfrm_dispatch[type];
2464 
2465 	/* All operations require privileges, even GET */
2466 	if (!netlink_net_capable(skb, CAP_NET_ADMIN))
2467 		return -EPERM;
2468 
2469 	if ((type == (XFRM_MSG_GETSA - XFRM_MSG_BASE) ||
2470 	     type == (XFRM_MSG_GETPOLICY - XFRM_MSG_BASE)) &&
2471 	    (nlh->nlmsg_flags & NLM_F_DUMP)) {
2472 		if (link->dump == NULL)
2473 			return -EINVAL;
2474 
2475 		{
2476 			struct netlink_dump_control c = {
2477 				.dump = link->dump,
2478 				.done = link->done,
2479 			};
2480 			return netlink_dump_start(net->xfrm.nlsk, skb, nlh, &c);
2481 		}
2482 	}
2483 
2484 	err = nlmsg_parse(nlh, xfrm_msg_min[type], attrs,
2485 			  link->nla_max ? : XFRMA_MAX,
2486 			  link->nla_pol ? : xfrma_policy);
2487 	if (err < 0)
2488 		return err;
2489 
2490 	if (link->doit == NULL)
2491 		return -EINVAL;
2492 
2493 	return link->doit(skb, nlh, attrs);
2494 }
2495 
2496 static void xfrm_netlink_rcv(struct sk_buff *skb)
2497 {
2498 	struct net *net = sock_net(skb->sk);
2499 
2500 	mutex_lock(&net->xfrm.xfrm_cfg_mutex);
2501 	netlink_rcv_skb(skb, &xfrm_user_rcv_msg);
2502 	mutex_unlock(&net->xfrm.xfrm_cfg_mutex);
2503 }
2504 
2505 static inline size_t xfrm_expire_msgsize(void)
2506 {
2507 	return NLMSG_ALIGN(sizeof(struct xfrm_user_expire))
2508 	       + nla_total_size(sizeof(struct xfrm_mark));
2509 }
2510 
2511 static int build_expire(struct sk_buff *skb, struct xfrm_state *x, const struct km_event *c)
2512 {
2513 	struct xfrm_user_expire *ue;
2514 	struct nlmsghdr *nlh;
2515 	int err;
2516 
2517 	nlh = nlmsg_put(skb, c->portid, 0, XFRM_MSG_EXPIRE, sizeof(*ue), 0);
2518 	if (nlh == NULL)
2519 		return -EMSGSIZE;
2520 
2521 	ue = nlmsg_data(nlh);
2522 	copy_to_user_state(x, &ue->state);
2523 	ue->hard = (c->data.hard != 0) ? 1 : 0;
2524 
2525 	err = xfrm_mark_put(skb, &x->mark);
2526 	if (err)
2527 		return err;
2528 
2529 	nlmsg_end(skb, nlh);
2530 	return 0;
2531 }
2532 
2533 static int xfrm_exp_state_notify(struct xfrm_state *x, const struct km_event *c)
2534 {
2535 	struct net *net = xs_net(x);
2536 	struct sk_buff *skb;
2537 
2538 	skb = nlmsg_new(xfrm_expire_msgsize(), GFP_ATOMIC);
2539 	if (skb == NULL)
2540 		return -ENOMEM;
2541 
2542 	if (build_expire(skb, x, c) < 0) {
2543 		kfree_skb(skb);
2544 		return -EMSGSIZE;
2545 	}
2546 
2547 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_EXPIRE);
2548 }
2549 
2550 static int xfrm_aevent_state_notify(struct xfrm_state *x, const struct km_event *c)
2551 {
2552 	struct net *net = xs_net(x);
2553 	struct sk_buff *skb;
2554 
2555 	skb = nlmsg_new(xfrm_aevent_msgsize(x), GFP_ATOMIC);
2556 	if (skb == NULL)
2557 		return -ENOMEM;
2558 
2559 	if (build_aevent(skb, x, c) < 0)
2560 		BUG();
2561 
2562 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_AEVENTS);
2563 }
2564 
2565 static int xfrm_notify_sa_flush(const struct km_event *c)
2566 {
2567 	struct net *net = c->net;
2568 	struct xfrm_usersa_flush *p;
2569 	struct nlmsghdr *nlh;
2570 	struct sk_buff *skb;
2571 	int len = NLMSG_ALIGN(sizeof(struct xfrm_usersa_flush));
2572 
2573 	skb = nlmsg_new(len, GFP_ATOMIC);
2574 	if (skb == NULL)
2575 		return -ENOMEM;
2576 
2577 	nlh = nlmsg_put(skb, c->portid, c->seq, XFRM_MSG_FLUSHSA, sizeof(*p), 0);
2578 	if (nlh == NULL) {
2579 		kfree_skb(skb);
2580 		return -EMSGSIZE;
2581 	}
2582 
2583 	p = nlmsg_data(nlh);
2584 	p->proto = c->data.proto;
2585 
2586 	nlmsg_end(skb, nlh);
2587 
2588 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_SA);
2589 }
2590 
2591 static inline size_t xfrm_sa_len(struct xfrm_state *x)
2592 {
2593 	size_t l = 0;
2594 	if (x->aead)
2595 		l += nla_total_size(aead_len(x->aead));
2596 	if (x->aalg) {
2597 		l += nla_total_size(sizeof(struct xfrm_algo) +
2598 				    (x->aalg->alg_key_len + 7) / 8);
2599 		l += nla_total_size(xfrm_alg_auth_len(x->aalg));
2600 	}
2601 	if (x->ealg)
2602 		l += nla_total_size(xfrm_alg_len(x->ealg));
2603 	if (x->calg)
2604 		l += nla_total_size(sizeof(*x->calg));
2605 	if (x->encap)
2606 		l += nla_total_size(sizeof(*x->encap));
2607 	if (x->tfcpad)
2608 		l += nla_total_size(sizeof(x->tfcpad));
2609 	if (x->replay_esn)
2610 		l += nla_total_size(xfrm_replay_state_esn_len(x->replay_esn));
2611 	else
2612 		l += nla_total_size(sizeof(struct xfrm_replay_state));
2613 	if (x->security)
2614 		l += nla_total_size(sizeof(struct xfrm_user_sec_ctx) +
2615 				    x->security->ctx_len);
2616 	if (x->coaddr)
2617 		l += nla_total_size(sizeof(*x->coaddr));
2618 	if (x->props.extra_flags)
2619 		l += nla_total_size(sizeof(x->props.extra_flags));
2620 
2621 	/* Must count x->lastused as it may become non-zero behind our back. */
2622 	l += nla_total_size_64bit(sizeof(u64));
2623 
2624 	return l;
2625 }
2626 
2627 static int xfrm_notify_sa(struct xfrm_state *x, const struct km_event *c)
2628 {
2629 	struct net *net = xs_net(x);
2630 	struct xfrm_usersa_info *p;
2631 	struct xfrm_usersa_id *id;
2632 	struct nlmsghdr *nlh;
2633 	struct sk_buff *skb;
2634 	int len = xfrm_sa_len(x);
2635 	int headlen, err;
2636 
2637 	headlen = sizeof(*p);
2638 	if (c->event == XFRM_MSG_DELSA) {
2639 		len += nla_total_size(headlen);
2640 		headlen = sizeof(*id);
2641 		len += nla_total_size(sizeof(struct xfrm_mark));
2642 	}
2643 	len += NLMSG_ALIGN(headlen);
2644 
2645 	skb = nlmsg_new(len, GFP_ATOMIC);
2646 	if (skb == NULL)
2647 		return -ENOMEM;
2648 
2649 	nlh = nlmsg_put(skb, c->portid, c->seq, c->event, headlen, 0);
2650 	err = -EMSGSIZE;
2651 	if (nlh == NULL)
2652 		goto out_free_skb;
2653 
2654 	p = nlmsg_data(nlh);
2655 	if (c->event == XFRM_MSG_DELSA) {
2656 		struct nlattr *attr;
2657 
2658 		id = nlmsg_data(nlh);
2659 		memcpy(&id->daddr, &x->id.daddr, sizeof(id->daddr));
2660 		id->spi = x->id.spi;
2661 		id->family = x->props.family;
2662 		id->proto = x->id.proto;
2663 
2664 		attr = nla_reserve(skb, XFRMA_SA, sizeof(*p));
2665 		err = -EMSGSIZE;
2666 		if (attr == NULL)
2667 			goto out_free_skb;
2668 
2669 		p = nla_data(attr);
2670 	}
2671 	err = copy_to_user_state_extra(x, p, skb);
2672 	if (err)
2673 		goto out_free_skb;
2674 
2675 	nlmsg_end(skb, nlh);
2676 
2677 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_SA);
2678 
2679 out_free_skb:
2680 	kfree_skb(skb);
2681 	return err;
2682 }
2683 
2684 static int xfrm_send_state_notify(struct xfrm_state *x, const struct km_event *c)
2685 {
2686 
2687 	switch (c->event) {
2688 	case XFRM_MSG_EXPIRE:
2689 		return xfrm_exp_state_notify(x, c);
2690 	case XFRM_MSG_NEWAE:
2691 		return xfrm_aevent_state_notify(x, c);
2692 	case XFRM_MSG_DELSA:
2693 	case XFRM_MSG_UPDSA:
2694 	case XFRM_MSG_NEWSA:
2695 		return xfrm_notify_sa(x, c);
2696 	case XFRM_MSG_FLUSHSA:
2697 		return xfrm_notify_sa_flush(c);
2698 	default:
2699 		printk(KERN_NOTICE "xfrm_user: Unknown SA event %d\n",
2700 		       c->event);
2701 		break;
2702 	}
2703 
2704 	return 0;
2705 
2706 }
2707 
2708 static inline size_t xfrm_acquire_msgsize(struct xfrm_state *x,
2709 					  struct xfrm_policy *xp)
2710 {
2711 	return NLMSG_ALIGN(sizeof(struct xfrm_user_acquire))
2712 	       + nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr)
2713 	       + nla_total_size(sizeof(struct xfrm_mark))
2714 	       + nla_total_size(xfrm_user_sec_ctx_size(x->security))
2715 	       + userpolicy_type_attrsize();
2716 }
2717 
2718 static int build_acquire(struct sk_buff *skb, struct xfrm_state *x,
2719 			 struct xfrm_tmpl *xt, struct xfrm_policy *xp)
2720 {
2721 	__u32 seq = xfrm_get_acqseq();
2722 	struct xfrm_user_acquire *ua;
2723 	struct nlmsghdr *nlh;
2724 	int err;
2725 
2726 	nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_ACQUIRE, sizeof(*ua), 0);
2727 	if (nlh == NULL)
2728 		return -EMSGSIZE;
2729 
2730 	ua = nlmsg_data(nlh);
2731 	memcpy(&ua->id, &x->id, sizeof(ua->id));
2732 	memcpy(&ua->saddr, &x->props.saddr, sizeof(ua->saddr));
2733 	memcpy(&ua->sel, &x->sel, sizeof(ua->sel));
2734 	copy_to_user_policy(xp, &ua->policy, XFRM_POLICY_OUT);
2735 	ua->aalgos = xt->aalgos;
2736 	ua->ealgos = xt->ealgos;
2737 	ua->calgos = xt->calgos;
2738 	ua->seq = x->km.seq = seq;
2739 
2740 	err = copy_to_user_tmpl(xp, skb);
2741 	if (!err)
2742 		err = copy_to_user_state_sec_ctx(x, skb);
2743 	if (!err)
2744 		err = copy_to_user_policy_type(xp->type, skb);
2745 	if (!err)
2746 		err = xfrm_mark_put(skb, &xp->mark);
2747 	if (err) {
2748 		nlmsg_cancel(skb, nlh);
2749 		return err;
2750 	}
2751 
2752 	nlmsg_end(skb, nlh);
2753 	return 0;
2754 }
2755 
2756 static int xfrm_send_acquire(struct xfrm_state *x, struct xfrm_tmpl *xt,
2757 			     struct xfrm_policy *xp)
2758 {
2759 	struct net *net = xs_net(x);
2760 	struct sk_buff *skb;
2761 
2762 	skb = nlmsg_new(xfrm_acquire_msgsize(x, xp), GFP_ATOMIC);
2763 	if (skb == NULL)
2764 		return -ENOMEM;
2765 
2766 	if (build_acquire(skb, x, xt, xp) < 0)
2767 		BUG();
2768 
2769 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_ACQUIRE);
2770 }
2771 
2772 /* User gives us xfrm_user_policy_info followed by an array of 0
2773  * or more templates.
2774  */
2775 static struct xfrm_policy *xfrm_compile_policy(struct sock *sk, int opt,
2776 					       u8 *data, int len, int *dir)
2777 {
2778 	struct net *net = sock_net(sk);
2779 	struct xfrm_userpolicy_info *p = (struct xfrm_userpolicy_info *)data;
2780 	struct xfrm_user_tmpl *ut = (struct xfrm_user_tmpl *) (p + 1);
2781 	struct xfrm_policy *xp;
2782 	int nr;
2783 
2784 	switch (sk->sk_family) {
2785 	case AF_INET:
2786 		if (opt != IP_XFRM_POLICY) {
2787 			*dir = -EOPNOTSUPP;
2788 			return NULL;
2789 		}
2790 		break;
2791 #if IS_ENABLED(CONFIG_IPV6)
2792 	case AF_INET6:
2793 		if (opt != IPV6_XFRM_POLICY) {
2794 			*dir = -EOPNOTSUPP;
2795 			return NULL;
2796 		}
2797 		break;
2798 #endif
2799 	default:
2800 		*dir = -EINVAL;
2801 		return NULL;
2802 	}
2803 
2804 	*dir = -EINVAL;
2805 
2806 	if (len < sizeof(*p) ||
2807 	    verify_newpolicy_info(p))
2808 		return NULL;
2809 
2810 	nr = ((len - sizeof(*p)) / sizeof(*ut));
2811 	if (validate_tmpl(nr, ut, p->sel.family))
2812 		return NULL;
2813 
2814 	if (p->dir > XFRM_POLICY_OUT)
2815 		return NULL;
2816 
2817 	xp = xfrm_policy_alloc(net, GFP_ATOMIC);
2818 	if (xp == NULL) {
2819 		*dir = -ENOBUFS;
2820 		return NULL;
2821 	}
2822 
2823 	copy_from_user_policy(xp, p);
2824 	xp->type = XFRM_POLICY_TYPE_MAIN;
2825 	copy_templates(xp, ut, nr);
2826 
2827 	*dir = p->dir;
2828 
2829 	return xp;
2830 }
2831 
2832 static inline size_t xfrm_polexpire_msgsize(struct xfrm_policy *xp)
2833 {
2834 	return NLMSG_ALIGN(sizeof(struct xfrm_user_polexpire))
2835 	       + nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr)
2836 	       + nla_total_size(xfrm_user_sec_ctx_size(xp->security))
2837 	       + nla_total_size(sizeof(struct xfrm_mark))
2838 	       + userpolicy_type_attrsize();
2839 }
2840 
2841 static int build_polexpire(struct sk_buff *skb, struct xfrm_policy *xp,
2842 			   int dir, const struct km_event *c)
2843 {
2844 	struct xfrm_user_polexpire *upe;
2845 	int hard = c->data.hard;
2846 	struct nlmsghdr *nlh;
2847 	int err;
2848 
2849 	nlh = nlmsg_put(skb, c->portid, 0, XFRM_MSG_POLEXPIRE, sizeof(*upe), 0);
2850 	if (nlh == NULL)
2851 		return -EMSGSIZE;
2852 
2853 	upe = nlmsg_data(nlh);
2854 	copy_to_user_policy(xp, &upe->pol, dir);
2855 	err = copy_to_user_tmpl(xp, skb);
2856 	if (!err)
2857 		err = copy_to_user_sec_ctx(xp, skb);
2858 	if (!err)
2859 		err = copy_to_user_policy_type(xp->type, skb);
2860 	if (!err)
2861 		err = xfrm_mark_put(skb, &xp->mark);
2862 	if (err) {
2863 		nlmsg_cancel(skb, nlh);
2864 		return err;
2865 	}
2866 	upe->hard = !!hard;
2867 
2868 	nlmsg_end(skb, nlh);
2869 	return 0;
2870 }
2871 
2872 static int xfrm_exp_policy_notify(struct xfrm_policy *xp, int dir, const struct km_event *c)
2873 {
2874 	struct net *net = xp_net(xp);
2875 	struct sk_buff *skb;
2876 
2877 	skb = nlmsg_new(xfrm_polexpire_msgsize(xp), GFP_ATOMIC);
2878 	if (skb == NULL)
2879 		return -ENOMEM;
2880 
2881 	if (build_polexpire(skb, xp, dir, c) < 0)
2882 		BUG();
2883 
2884 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_EXPIRE);
2885 }
2886 
2887 static int xfrm_notify_policy(struct xfrm_policy *xp, int dir, const struct km_event *c)
2888 {
2889 	int len = nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr);
2890 	struct net *net = xp_net(xp);
2891 	struct xfrm_userpolicy_info *p;
2892 	struct xfrm_userpolicy_id *id;
2893 	struct nlmsghdr *nlh;
2894 	struct sk_buff *skb;
2895 	int headlen, err;
2896 
2897 	headlen = sizeof(*p);
2898 	if (c->event == XFRM_MSG_DELPOLICY) {
2899 		len += nla_total_size(headlen);
2900 		headlen = sizeof(*id);
2901 	}
2902 	len += userpolicy_type_attrsize();
2903 	len += nla_total_size(sizeof(struct xfrm_mark));
2904 	len += NLMSG_ALIGN(headlen);
2905 
2906 	skb = nlmsg_new(len, GFP_ATOMIC);
2907 	if (skb == NULL)
2908 		return -ENOMEM;
2909 
2910 	nlh = nlmsg_put(skb, c->portid, c->seq, c->event, headlen, 0);
2911 	err = -EMSGSIZE;
2912 	if (nlh == NULL)
2913 		goto out_free_skb;
2914 
2915 	p = nlmsg_data(nlh);
2916 	if (c->event == XFRM_MSG_DELPOLICY) {
2917 		struct nlattr *attr;
2918 
2919 		id = nlmsg_data(nlh);
2920 		memset(id, 0, sizeof(*id));
2921 		id->dir = dir;
2922 		if (c->data.byid)
2923 			id->index = xp->index;
2924 		else
2925 			memcpy(&id->sel, &xp->selector, sizeof(id->sel));
2926 
2927 		attr = nla_reserve(skb, XFRMA_POLICY, sizeof(*p));
2928 		err = -EMSGSIZE;
2929 		if (attr == NULL)
2930 			goto out_free_skb;
2931 
2932 		p = nla_data(attr);
2933 	}
2934 
2935 	copy_to_user_policy(xp, p, dir);
2936 	err = copy_to_user_tmpl(xp, skb);
2937 	if (!err)
2938 		err = copy_to_user_policy_type(xp->type, skb);
2939 	if (!err)
2940 		err = xfrm_mark_put(skb, &xp->mark);
2941 	if (err)
2942 		goto out_free_skb;
2943 
2944 	nlmsg_end(skb, nlh);
2945 
2946 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_POLICY);
2947 
2948 out_free_skb:
2949 	kfree_skb(skb);
2950 	return err;
2951 }
2952 
2953 static int xfrm_notify_policy_flush(const struct km_event *c)
2954 {
2955 	struct net *net = c->net;
2956 	struct nlmsghdr *nlh;
2957 	struct sk_buff *skb;
2958 	int err;
2959 
2960 	skb = nlmsg_new(userpolicy_type_attrsize(), GFP_ATOMIC);
2961 	if (skb == NULL)
2962 		return -ENOMEM;
2963 
2964 	nlh = nlmsg_put(skb, c->portid, c->seq, XFRM_MSG_FLUSHPOLICY, 0, 0);
2965 	err = -EMSGSIZE;
2966 	if (nlh == NULL)
2967 		goto out_free_skb;
2968 	err = copy_to_user_policy_type(c->data.type, skb);
2969 	if (err)
2970 		goto out_free_skb;
2971 
2972 	nlmsg_end(skb, nlh);
2973 
2974 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_POLICY);
2975 
2976 out_free_skb:
2977 	kfree_skb(skb);
2978 	return err;
2979 }
2980 
2981 static int xfrm_send_policy_notify(struct xfrm_policy *xp, int dir, const struct km_event *c)
2982 {
2983 
2984 	switch (c->event) {
2985 	case XFRM_MSG_NEWPOLICY:
2986 	case XFRM_MSG_UPDPOLICY:
2987 	case XFRM_MSG_DELPOLICY:
2988 		return xfrm_notify_policy(xp, dir, c);
2989 	case XFRM_MSG_FLUSHPOLICY:
2990 		return xfrm_notify_policy_flush(c);
2991 	case XFRM_MSG_POLEXPIRE:
2992 		return xfrm_exp_policy_notify(xp, dir, c);
2993 	default:
2994 		printk(KERN_NOTICE "xfrm_user: Unknown Policy event %d\n",
2995 		       c->event);
2996 	}
2997 
2998 	return 0;
2999 
3000 }
3001 
3002 static inline size_t xfrm_report_msgsize(void)
3003 {
3004 	return NLMSG_ALIGN(sizeof(struct xfrm_user_report));
3005 }
3006 
3007 static int build_report(struct sk_buff *skb, u8 proto,
3008 			struct xfrm_selector *sel, xfrm_address_t *addr)
3009 {
3010 	struct xfrm_user_report *ur;
3011 	struct nlmsghdr *nlh;
3012 
3013 	nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_REPORT, sizeof(*ur), 0);
3014 	if (nlh == NULL)
3015 		return -EMSGSIZE;
3016 
3017 	ur = nlmsg_data(nlh);
3018 	ur->proto = proto;
3019 	memcpy(&ur->sel, sel, sizeof(ur->sel));
3020 
3021 	if (addr) {
3022 		int err = nla_put(skb, XFRMA_COADDR, sizeof(*addr), addr);
3023 		if (err) {
3024 			nlmsg_cancel(skb, nlh);
3025 			return err;
3026 		}
3027 	}
3028 	nlmsg_end(skb, nlh);
3029 	return 0;
3030 }
3031 
3032 static int xfrm_send_report(struct net *net, u8 proto,
3033 			    struct xfrm_selector *sel, xfrm_address_t *addr)
3034 {
3035 	struct sk_buff *skb;
3036 
3037 	skb = nlmsg_new(xfrm_report_msgsize(), GFP_ATOMIC);
3038 	if (skb == NULL)
3039 		return -ENOMEM;
3040 
3041 	if (build_report(skb, proto, sel, addr) < 0)
3042 		BUG();
3043 
3044 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_REPORT);
3045 }
3046 
3047 static inline size_t xfrm_mapping_msgsize(void)
3048 {
3049 	return NLMSG_ALIGN(sizeof(struct xfrm_user_mapping));
3050 }
3051 
3052 static int build_mapping(struct sk_buff *skb, struct xfrm_state *x,
3053 			 xfrm_address_t *new_saddr, __be16 new_sport)
3054 {
3055 	struct xfrm_user_mapping *um;
3056 	struct nlmsghdr *nlh;
3057 
3058 	nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_MAPPING, sizeof(*um), 0);
3059 	if (nlh == NULL)
3060 		return -EMSGSIZE;
3061 
3062 	um = nlmsg_data(nlh);
3063 
3064 	memcpy(&um->id.daddr, &x->id.daddr, sizeof(um->id.daddr));
3065 	um->id.spi = x->id.spi;
3066 	um->id.family = x->props.family;
3067 	um->id.proto = x->id.proto;
3068 	memcpy(&um->new_saddr, new_saddr, sizeof(um->new_saddr));
3069 	memcpy(&um->old_saddr, &x->props.saddr, sizeof(um->old_saddr));
3070 	um->new_sport = new_sport;
3071 	um->old_sport = x->encap->encap_sport;
3072 	um->reqid = x->props.reqid;
3073 
3074 	nlmsg_end(skb, nlh);
3075 	return 0;
3076 }
3077 
3078 static int xfrm_send_mapping(struct xfrm_state *x, xfrm_address_t *ipaddr,
3079 			     __be16 sport)
3080 {
3081 	struct net *net = xs_net(x);
3082 	struct sk_buff *skb;
3083 
3084 	if (x->id.proto != IPPROTO_ESP)
3085 		return -EINVAL;
3086 
3087 	if (!x->encap)
3088 		return -EINVAL;
3089 
3090 	skb = nlmsg_new(xfrm_mapping_msgsize(), GFP_ATOMIC);
3091 	if (skb == NULL)
3092 		return -ENOMEM;
3093 
3094 	if (build_mapping(skb, x, ipaddr, sport) < 0)
3095 		BUG();
3096 
3097 	return xfrm_nlmsg_multicast(net, skb, 0, XFRMNLGRP_MAPPING);
3098 }
3099 
3100 static bool xfrm_is_alive(const struct km_event *c)
3101 {
3102 	return (bool)xfrm_acquire_is_on(c->net);
3103 }
3104 
3105 static struct xfrm_mgr netlink_mgr = {
3106 	.id		= "netlink",
3107 	.notify		= xfrm_send_state_notify,
3108 	.acquire	= xfrm_send_acquire,
3109 	.compile_policy	= xfrm_compile_policy,
3110 	.notify_policy	= xfrm_send_policy_notify,
3111 	.report		= xfrm_send_report,
3112 	.migrate	= xfrm_send_migrate,
3113 	.new_mapping	= xfrm_send_mapping,
3114 	.is_alive	= xfrm_is_alive,
3115 };
3116 
3117 static int __net_init xfrm_user_net_init(struct net *net)
3118 {
3119 	struct sock *nlsk;
3120 	struct netlink_kernel_cfg cfg = {
3121 		.groups	= XFRMNLGRP_MAX,
3122 		.input	= xfrm_netlink_rcv,
3123 	};
3124 
3125 	nlsk = netlink_kernel_create(net, NETLINK_XFRM, &cfg);
3126 	if (nlsk == NULL)
3127 		return -ENOMEM;
3128 	net->xfrm.nlsk_stash = nlsk; /* Don't set to NULL */
3129 	rcu_assign_pointer(net->xfrm.nlsk, nlsk);
3130 	return 0;
3131 }
3132 
3133 static void __net_exit xfrm_user_net_exit(struct list_head *net_exit_list)
3134 {
3135 	struct net *net;
3136 	list_for_each_entry(net, net_exit_list, exit_list)
3137 		RCU_INIT_POINTER(net->xfrm.nlsk, NULL);
3138 	synchronize_net();
3139 	list_for_each_entry(net, net_exit_list, exit_list)
3140 		netlink_kernel_release(net->xfrm.nlsk_stash);
3141 }
3142 
3143 static struct pernet_operations xfrm_user_net_ops = {
3144 	.init	    = xfrm_user_net_init,
3145 	.exit_batch = xfrm_user_net_exit,
3146 };
3147 
3148 static int __init xfrm_user_init(void)
3149 {
3150 	int rv;
3151 
3152 	printk(KERN_INFO "Initializing XFRM netlink socket\n");
3153 
3154 	rv = register_pernet_subsys(&xfrm_user_net_ops);
3155 	if (rv < 0)
3156 		return rv;
3157 	rv = xfrm_register_km(&netlink_mgr);
3158 	if (rv < 0)
3159 		unregister_pernet_subsys(&xfrm_user_net_ops);
3160 	return rv;
3161 }
3162 
3163 static void __exit xfrm_user_exit(void)
3164 {
3165 	xfrm_unregister_km(&netlink_mgr);
3166 	unregister_pernet_subsys(&xfrm_user_net_ops);
3167 }
3168 
3169 module_init(xfrm_user_init);
3170 module_exit(xfrm_user_exit);
3171 MODULE_LICENSE("GPL");
3172 MODULE_ALIAS_NET_PF_PROTO(PF_NETLINK, NETLINK_XFRM);
3173 
3174