e75dbdcb08a49674b846f2ce14b02598b2ba6b3e
[deliverable/linux.git] / net / xfrm / xfrm_user.c
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 <asm/uaccess.h>
30 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
31 #include <linux/in6.h>
32 #endif
33
34 static inline int alg_len(struct xfrm_algo *alg)
35 {
36 return sizeof(*alg) + ((alg->alg_key_len + 7) / 8);
37 }
38
39 static int verify_one_alg(struct nlattr **attrs, enum xfrm_attr_type_t type)
40 {
41 struct nlattr *rt = attrs[type];
42 struct xfrm_algo *algp;
43
44 if (!rt)
45 return 0;
46
47 algp = nla_data(rt);
48 if (nla_len(rt) < alg_len(algp))
49 return -EINVAL;
50
51 switch (type) {
52 case XFRMA_ALG_AUTH:
53 if (!algp->alg_key_len &&
54 strcmp(algp->alg_name, "digest_null") != 0)
55 return -EINVAL;
56 break;
57
58 case XFRMA_ALG_CRYPT:
59 if (!algp->alg_key_len &&
60 strcmp(algp->alg_name, "cipher_null") != 0)
61 return -EINVAL;
62 break;
63
64 case XFRMA_ALG_COMP:
65 /* Zero length keys are legal. */
66 break;
67
68 default:
69 return -EINVAL;
70 }
71
72 algp->alg_name[CRYPTO_MAX_ALG_NAME - 1] = '\0';
73 return 0;
74 }
75
76 static void verify_one_addr(struct nlattr **attrs, enum xfrm_attr_type_t type,
77 xfrm_address_t **addrp)
78 {
79 struct nlattr *rt = attrs[type];
80
81 if (rt && addrp)
82 *addrp = nla_data(rt);
83 }
84
85 static inline int verify_sec_ctx_len(struct nlattr **attrs)
86 {
87 struct nlattr *rt = attrs[XFRMA_SEC_CTX];
88 struct xfrm_user_sec_ctx *uctx;
89
90 if (!rt)
91 return 0;
92
93 uctx = nla_data(rt);
94 if (uctx->len != (sizeof(struct xfrm_user_sec_ctx) + uctx->ctx_len))
95 return -EINVAL;
96
97 return 0;
98 }
99
100
101 static int verify_newsa_info(struct xfrm_usersa_info *p,
102 struct nlattr **attrs)
103 {
104 int err;
105
106 err = -EINVAL;
107 switch (p->family) {
108 case AF_INET:
109 break;
110
111 case AF_INET6:
112 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
113 break;
114 #else
115 err = -EAFNOSUPPORT;
116 goto out;
117 #endif
118
119 default:
120 goto out;
121 }
122
123 err = -EINVAL;
124 switch (p->id.proto) {
125 case IPPROTO_AH:
126 if (!attrs[XFRMA_ALG_AUTH] ||
127 attrs[XFRMA_ALG_CRYPT] ||
128 attrs[XFRMA_ALG_COMP])
129 goto out;
130 break;
131
132 case IPPROTO_ESP:
133 if ((!attrs[XFRMA_ALG_AUTH] &&
134 !attrs[XFRMA_ALG_CRYPT]) ||
135 attrs[XFRMA_ALG_COMP])
136 goto out;
137 break;
138
139 case IPPROTO_COMP:
140 if (!attrs[XFRMA_ALG_COMP] ||
141 attrs[XFRMA_ALG_AUTH] ||
142 attrs[XFRMA_ALG_CRYPT])
143 goto out;
144 break;
145
146 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
147 case IPPROTO_DSTOPTS:
148 case IPPROTO_ROUTING:
149 if (attrs[XFRMA_ALG_COMP] ||
150 attrs[XFRMA_ALG_AUTH] ||
151 attrs[XFRMA_ALG_CRYPT] ||
152 attrs[XFRMA_ENCAP] ||
153 attrs[XFRMA_SEC_CTX] ||
154 !attrs[XFRMA_COADDR])
155 goto out;
156 break;
157 #endif
158
159 default:
160 goto out;
161 }
162
163 if ((err = verify_one_alg(attrs, XFRMA_ALG_AUTH)))
164 goto out;
165 if ((err = verify_one_alg(attrs, XFRMA_ALG_CRYPT)))
166 goto out;
167 if ((err = verify_one_alg(attrs, XFRMA_ALG_COMP)))
168 goto out;
169 if ((err = verify_sec_ctx_len(attrs)))
170 goto out;
171
172 err = -EINVAL;
173 switch (p->mode) {
174 case XFRM_MODE_TRANSPORT:
175 case XFRM_MODE_TUNNEL:
176 case XFRM_MODE_ROUTEOPTIMIZATION:
177 case XFRM_MODE_BEET:
178 break;
179
180 default:
181 goto out;
182 }
183
184 err = 0;
185
186 out:
187 return err;
188 }
189
190 static int attach_one_algo(struct xfrm_algo **algpp, u8 *props,
191 struct xfrm_algo_desc *(*get_byname)(char *, int),
192 struct nlattr *rta)
193 {
194 struct xfrm_algo *p, *ualg;
195 struct xfrm_algo_desc *algo;
196
197 if (!rta)
198 return 0;
199
200 ualg = nla_data(rta);
201
202 algo = get_byname(ualg->alg_name, 1);
203 if (!algo)
204 return -ENOSYS;
205 *props = algo->desc.sadb_alg_id;
206
207 p = kmemdup(ualg, alg_len(ualg), GFP_KERNEL);
208 if (!p)
209 return -ENOMEM;
210
211 strcpy(p->alg_name, algo->name);
212 *algpp = p;
213 return 0;
214 }
215
216 static inline int xfrm_user_sec_ctx_size(struct xfrm_sec_ctx *xfrm_ctx)
217 {
218 int len = 0;
219
220 if (xfrm_ctx) {
221 len += sizeof(struct xfrm_user_sec_ctx);
222 len += xfrm_ctx->ctx_len;
223 }
224 return len;
225 }
226
227 static void copy_from_user_state(struct xfrm_state *x, struct xfrm_usersa_info *p)
228 {
229 memcpy(&x->id, &p->id, sizeof(x->id));
230 memcpy(&x->sel, &p->sel, sizeof(x->sel));
231 memcpy(&x->lft, &p->lft, sizeof(x->lft));
232 x->props.mode = p->mode;
233 x->props.replay_window = p->replay_window;
234 x->props.reqid = p->reqid;
235 x->props.family = p->family;
236 memcpy(&x->props.saddr, &p->saddr, sizeof(x->props.saddr));
237 x->props.flags = p->flags;
238
239 /*
240 * Set inner address family if the KM left it as zero.
241 * See comment in validate_tmpl.
242 */
243 if (!x->sel.family)
244 x->sel.family = p->family;
245 }
246
247 /*
248 * someday when pfkey also has support, we could have the code
249 * somehow made shareable and move it to xfrm_state.c - JHS
250 *
251 */
252 static void xfrm_update_ae_params(struct xfrm_state *x, struct nlattr **attrs)
253 {
254 struct nlattr *rp = attrs[XFRMA_REPLAY_VAL];
255 struct nlattr *lt = attrs[XFRMA_LTIME_VAL];
256 struct nlattr *et = attrs[XFRMA_ETIMER_THRESH];
257 struct nlattr *rt = attrs[XFRMA_REPLAY_THRESH];
258
259 if (rp) {
260 struct xfrm_replay_state *replay;
261 replay = nla_data(rp);
262 memcpy(&x->replay, replay, sizeof(*replay));
263 memcpy(&x->preplay, replay, sizeof(*replay));
264 }
265
266 if (lt) {
267 struct xfrm_lifetime_cur *ltime;
268 ltime = nla_data(lt);
269 x->curlft.bytes = ltime->bytes;
270 x->curlft.packets = ltime->packets;
271 x->curlft.add_time = ltime->add_time;
272 x->curlft.use_time = ltime->use_time;
273 }
274
275 if (et)
276 x->replay_maxage = nla_get_u32(et);
277
278 if (rt)
279 x->replay_maxdiff = nla_get_u32(rt);
280 }
281
282 static struct xfrm_state *xfrm_state_construct(struct xfrm_usersa_info *p,
283 struct nlattr **attrs,
284 int *errp)
285 {
286 struct xfrm_state *x = xfrm_state_alloc();
287 int err = -ENOMEM;
288
289 if (!x)
290 goto error_no_put;
291
292 copy_from_user_state(x, p);
293
294 if ((err = attach_one_algo(&x->aalg, &x->props.aalgo,
295 xfrm_aalg_get_byname,
296 attrs[XFRMA_ALG_AUTH])))
297 goto error;
298 if ((err = attach_one_algo(&x->ealg, &x->props.ealgo,
299 xfrm_ealg_get_byname,
300 attrs[XFRMA_ALG_CRYPT])))
301 goto error;
302 if ((err = attach_one_algo(&x->calg, &x->props.calgo,
303 xfrm_calg_get_byname,
304 attrs[XFRMA_ALG_COMP])))
305 goto error;
306
307 if (attrs[XFRMA_ENCAP]) {
308 x->encap = kmemdup(nla_data(attrs[XFRMA_ENCAP]),
309 sizeof(*x->encap), GFP_KERNEL);
310 if (x->encap == NULL)
311 goto error;
312 }
313
314 if (attrs[XFRMA_COADDR]) {
315 x->coaddr = kmemdup(nla_data(attrs[XFRMA_COADDR]),
316 sizeof(*x->coaddr), GFP_KERNEL);
317 if (x->coaddr == NULL)
318 goto error;
319 }
320
321 err = xfrm_init_state(x);
322 if (err)
323 goto error;
324
325 if (attrs[XFRMA_SEC_CTX] &&
326 security_xfrm_state_alloc(x, nla_data(attrs[XFRMA_SEC_CTX])))
327 goto error;
328
329 x->km.seq = p->seq;
330 x->replay_maxdiff = sysctl_xfrm_aevent_rseqth;
331 /* sysctl_xfrm_aevent_etime is in 100ms units */
332 x->replay_maxage = (sysctl_xfrm_aevent_etime*HZ)/XFRM_AE_ETH_M;
333 x->preplay.bitmap = 0;
334 x->preplay.seq = x->replay.seq+x->replay_maxdiff;
335 x->preplay.oseq = x->replay.oseq +x->replay_maxdiff;
336
337 /* override default values from above */
338
339 xfrm_update_ae_params(x, attrs);
340
341 return x;
342
343 error:
344 x->km.state = XFRM_STATE_DEAD;
345 xfrm_state_put(x);
346 error_no_put:
347 *errp = err;
348 return NULL;
349 }
350
351 static int xfrm_add_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
352 struct nlattr **attrs)
353 {
354 struct xfrm_usersa_info *p = nlmsg_data(nlh);
355 struct xfrm_state *x;
356 int err;
357 struct km_event c;
358
359 err = verify_newsa_info(p, attrs);
360 if (err)
361 return err;
362
363 x = xfrm_state_construct(p, attrs, &err);
364 if (!x)
365 return err;
366
367 xfrm_state_hold(x);
368 if (nlh->nlmsg_type == XFRM_MSG_NEWSA)
369 err = xfrm_state_add(x);
370 else
371 err = xfrm_state_update(x);
372
373 xfrm_audit_state_add(x, err ? 0 : 1, NETLINK_CB(skb).loginuid,
374 NETLINK_CB(skb).sid);
375
376 if (err < 0) {
377 x->km.state = XFRM_STATE_DEAD;
378 __xfrm_state_put(x);
379 goto out;
380 }
381
382 c.seq = nlh->nlmsg_seq;
383 c.pid = nlh->nlmsg_pid;
384 c.event = nlh->nlmsg_type;
385
386 km_state_notify(x, &c);
387 out:
388 xfrm_state_put(x);
389 return err;
390 }
391
392 static struct xfrm_state *xfrm_user_state_lookup(struct xfrm_usersa_id *p,
393 struct nlattr **attrs,
394 int *errp)
395 {
396 struct xfrm_state *x = NULL;
397 int err;
398
399 if (xfrm_id_proto_match(p->proto, IPSEC_PROTO_ANY)) {
400 err = -ESRCH;
401 x = xfrm_state_lookup(&p->daddr, p->spi, p->proto, p->family);
402 } else {
403 xfrm_address_t *saddr = NULL;
404
405 verify_one_addr(attrs, XFRMA_SRCADDR, &saddr);
406 if (!saddr) {
407 err = -EINVAL;
408 goto out;
409 }
410
411 err = -ESRCH;
412 x = xfrm_state_lookup_byaddr(&p->daddr, saddr, p->proto,
413 p->family);
414 }
415
416 out:
417 if (!x && errp)
418 *errp = err;
419 return x;
420 }
421
422 static int xfrm_del_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
423 struct nlattr **attrs)
424 {
425 struct xfrm_state *x;
426 int err = -ESRCH;
427 struct km_event c;
428 struct xfrm_usersa_id *p = nlmsg_data(nlh);
429
430 x = xfrm_user_state_lookup(p, attrs, &err);
431 if (x == NULL)
432 return err;
433
434 if ((err = security_xfrm_state_delete(x)) != 0)
435 goto out;
436
437 if (xfrm_state_kern(x)) {
438 err = -EPERM;
439 goto out;
440 }
441
442 err = xfrm_state_delete(x);
443
444 if (err < 0)
445 goto out;
446
447 c.seq = nlh->nlmsg_seq;
448 c.pid = nlh->nlmsg_pid;
449 c.event = nlh->nlmsg_type;
450 km_state_notify(x, &c);
451
452 out:
453 xfrm_audit_state_delete(x, err ? 0 : 1, NETLINK_CB(skb).loginuid,
454 NETLINK_CB(skb).sid);
455 xfrm_state_put(x);
456 return err;
457 }
458
459 static void copy_to_user_state(struct xfrm_state *x, struct xfrm_usersa_info *p)
460 {
461 memcpy(&p->id, &x->id, sizeof(p->id));
462 memcpy(&p->sel, &x->sel, sizeof(p->sel));
463 memcpy(&p->lft, &x->lft, sizeof(p->lft));
464 memcpy(&p->curlft, &x->curlft, sizeof(p->curlft));
465 memcpy(&p->stats, &x->stats, sizeof(p->stats));
466 memcpy(&p->saddr, &x->props.saddr, sizeof(p->saddr));
467 p->mode = x->props.mode;
468 p->replay_window = x->props.replay_window;
469 p->reqid = x->props.reqid;
470 p->family = x->props.family;
471 p->flags = x->props.flags;
472 p->seq = x->km.seq;
473 }
474
475 struct xfrm_dump_info {
476 struct sk_buff *in_skb;
477 struct sk_buff *out_skb;
478 u32 nlmsg_seq;
479 u16 nlmsg_flags;
480 int start_idx;
481 int this_idx;
482 };
483
484 static int copy_sec_ctx(struct xfrm_sec_ctx *s, struct sk_buff *skb)
485 {
486 struct xfrm_user_sec_ctx *uctx;
487 struct nlattr *attr;
488 int ctx_size = sizeof(*uctx) + s->ctx_len;
489
490 attr = nla_reserve(skb, XFRMA_SEC_CTX, ctx_size);
491 if (attr == NULL)
492 return -EMSGSIZE;
493
494 uctx = nla_data(attr);
495 uctx->exttype = XFRMA_SEC_CTX;
496 uctx->len = ctx_size;
497 uctx->ctx_doi = s->ctx_doi;
498 uctx->ctx_alg = s->ctx_alg;
499 uctx->ctx_len = s->ctx_len;
500 memcpy(uctx + 1, s->ctx_str, s->ctx_len);
501
502 return 0;
503 }
504
505 /* Don't change this without updating xfrm_sa_len! */
506 static int copy_to_user_state_extra(struct xfrm_state *x,
507 struct xfrm_usersa_info *p,
508 struct sk_buff *skb)
509 {
510 copy_to_user_state(x, p);
511
512 if (x->coaddr)
513 NLA_PUT(skb, XFRMA_COADDR, sizeof(*x->coaddr), x->coaddr);
514
515 if (x->lastused)
516 NLA_PUT_U64(skb, XFRMA_LASTUSED, x->lastused);
517
518 if (x->aalg)
519 NLA_PUT(skb, XFRMA_ALG_AUTH, alg_len(x->aalg), x->aalg);
520 if (x->ealg)
521 NLA_PUT(skb, XFRMA_ALG_CRYPT, alg_len(x->ealg), x->ealg);
522 if (x->calg)
523 NLA_PUT(skb, XFRMA_ALG_COMP, sizeof(*(x->calg)), x->calg);
524
525 if (x->encap)
526 NLA_PUT(skb, XFRMA_ENCAP, sizeof(*x->encap), x->encap);
527
528 if (x->security && copy_sec_ctx(x->security, skb) < 0)
529 goto nla_put_failure;
530
531 return 0;
532
533 nla_put_failure:
534 return -EMSGSIZE;
535 }
536
537 static int dump_one_state(struct xfrm_state *x, int count, void *ptr)
538 {
539 struct xfrm_dump_info *sp = ptr;
540 struct sk_buff *in_skb = sp->in_skb;
541 struct sk_buff *skb = sp->out_skb;
542 struct xfrm_usersa_info *p;
543 struct nlmsghdr *nlh;
544 int err;
545
546 if (sp->this_idx < sp->start_idx)
547 goto out;
548
549 nlh = nlmsg_put(skb, NETLINK_CB(in_skb).pid, sp->nlmsg_seq,
550 XFRM_MSG_NEWSA, sizeof(*p), sp->nlmsg_flags);
551 if (nlh == NULL)
552 return -EMSGSIZE;
553
554 p = nlmsg_data(nlh);
555
556 err = copy_to_user_state_extra(x, p, skb);
557 if (err)
558 goto nla_put_failure;
559
560 nlmsg_end(skb, nlh);
561 out:
562 sp->this_idx++;
563 return 0;
564
565 nla_put_failure:
566 nlmsg_cancel(skb, nlh);
567 return err;
568 }
569
570 static int xfrm_dump_sa(struct sk_buff *skb, struct netlink_callback *cb)
571 {
572 struct xfrm_dump_info info;
573
574 info.in_skb = cb->skb;
575 info.out_skb = skb;
576 info.nlmsg_seq = cb->nlh->nlmsg_seq;
577 info.nlmsg_flags = NLM_F_MULTI;
578 info.this_idx = 0;
579 info.start_idx = cb->args[0];
580 (void) xfrm_state_walk(0, dump_one_state, &info);
581 cb->args[0] = info.this_idx;
582
583 return skb->len;
584 }
585
586 static struct sk_buff *xfrm_state_netlink(struct sk_buff *in_skb,
587 struct xfrm_state *x, u32 seq)
588 {
589 struct xfrm_dump_info info;
590 struct sk_buff *skb;
591
592 skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
593 if (!skb)
594 return ERR_PTR(-ENOMEM);
595
596 info.in_skb = in_skb;
597 info.out_skb = skb;
598 info.nlmsg_seq = seq;
599 info.nlmsg_flags = 0;
600 info.this_idx = info.start_idx = 0;
601
602 if (dump_one_state(x, 0, &info)) {
603 kfree_skb(skb);
604 return NULL;
605 }
606
607 return skb;
608 }
609
610 static inline size_t xfrm_spdinfo_msgsize(void)
611 {
612 return NLMSG_ALIGN(4)
613 + nla_total_size(sizeof(struct xfrmu_spdinfo))
614 + nla_total_size(sizeof(struct xfrmu_spdhinfo));
615 }
616
617 static int build_spdinfo(struct sk_buff *skb, u32 pid, u32 seq, u32 flags)
618 {
619 struct xfrmk_spdinfo si;
620 struct xfrmu_spdinfo spc;
621 struct xfrmu_spdhinfo sph;
622 struct nlmsghdr *nlh;
623 u32 *f;
624
625 nlh = nlmsg_put(skb, pid, seq, XFRM_MSG_NEWSPDINFO, sizeof(u32), 0);
626 if (nlh == NULL) /* shouldnt really happen ... */
627 return -EMSGSIZE;
628
629 f = nlmsg_data(nlh);
630 *f = flags;
631 xfrm_spd_getinfo(&si);
632 spc.incnt = si.incnt;
633 spc.outcnt = si.outcnt;
634 spc.fwdcnt = si.fwdcnt;
635 spc.inscnt = si.inscnt;
636 spc.outscnt = si.outscnt;
637 spc.fwdscnt = si.fwdscnt;
638 sph.spdhcnt = si.spdhcnt;
639 sph.spdhmcnt = si.spdhmcnt;
640
641 NLA_PUT(skb, XFRMA_SPD_INFO, sizeof(spc), &spc);
642 NLA_PUT(skb, XFRMA_SPD_HINFO, sizeof(sph), &sph);
643
644 return nlmsg_end(skb, nlh);
645
646 nla_put_failure:
647 nlmsg_cancel(skb, nlh);
648 return -EMSGSIZE;
649 }
650
651 static int xfrm_get_spdinfo(struct sk_buff *skb, struct nlmsghdr *nlh,
652 struct nlattr **attrs)
653 {
654 struct sk_buff *r_skb;
655 u32 *flags = nlmsg_data(nlh);
656 u32 spid = NETLINK_CB(skb).pid;
657 u32 seq = nlh->nlmsg_seq;
658
659 r_skb = nlmsg_new(xfrm_spdinfo_msgsize(), GFP_ATOMIC);
660 if (r_skb == NULL)
661 return -ENOMEM;
662
663 if (build_spdinfo(r_skb, spid, seq, *flags) < 0)
664 BUG();
665
666 return nlmsg_unicast(xfrm_nl, r_skb, spid);
667 }
668
669 static inline size_t xfrm_sadinfo_msgsize(void)
670 {
671 return NLMSG_ALIGN(4)
672 + nla_total_size(sizeof(struct xfrmu_sadhinfo))
673 + nla_total_size(4); /* XFRMA_SAD_CNT */
674 }
675
676 static int build_sadinfo(struct sk_buff *skb, u32 pid, u32 seq, u32 flags)
677 {
678 struct xfrmk_sadinfo si;
679 struct xfrmu_sadhinfo sh;
680 struct nlmsghdr *nlh;
681 u32 *f;
682
683 nlh = nlmsg_put(skb, pid, seq, XFRM_MSG_NEWSADINFO, sizeof(u32), 0);
684 if (nlh == NULL) /* shouldnt really happen ... */
685 return -EMSGSIZE;
686
687 f = nlmsg_data(nlh);
688 *f = flags;
689 xfrm_sad_getinfo(&si);
690
691 sh.sadhmcnt = si.sadhmcnt;
692 sh.sadhcnt = si.sadhcnt;
693
694 NLA_PUT_U32(skb, XFRMA_SAD_CNT, si.sadcnt);
695 NLA_PUT(skb, XFRMA_SAD_HINFO, sizeof(sh), &sh);
696
697 return nlmsg_end(skb, nlh);
698
699 nla_put_failure:
700 nlmsg_cancel(skb, nlh);
701 return -EMSGSIZE;
702 }
703
704 static int xfrm_get_sadinfo(struct sk_buff *skb, struct nlmsghdr *nlh,
705 struct nlattr **attrs)
706 {
707 struct sk_buff *r_skb;
708 u32 *flags = nlmsg_data(nlh);
709 u32 spid = NETLINK_CB(skb).pid;
710 u32 seq = nlh->nlmsg_seq;
711
712 r_skb = nlmsg_new(xfrm_sadinfo_msgsize(), GFP_ATOMIC);
713 if (r_skb == NULL)
714 return -ENOMEM;
715
716 if (build_sadinfo(r_skb, spid, seq, *flags) < 0)
717 BUG();
718
719 return nlmsg_unicast(xfrm_nl, r_skb, spid);
720 }
721
722 static int xfrm_get_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
723 struct nlattr **attrs)
724 {
725 struct xfrm_usersa_id *p = nlmsg_data(nlh);
726 struct xfrm_state *x;
727 struct sk_buff *resp_skb;
728 int err = -ESRCH;
729
730 x = xfrm_user_state_lookup(p, attrs, &err);
731 if (x == NULL)
732 goto out_noput;
733
734 resp_skb = xfrm_state_netlink(skb, x, nlh->nlmsg_seq);
735 if (IS_ERR(resp_skb)) {
736 err = PTR_ERR(resp_skb);
737 } else {
738 err = nlmsg_unicast(xfrm_nl, resp_skb, NETLINK_CB(skb).pid);
739 }
740 xfrm_state_put(x);
741 out_noput:
742 return err;
743 }
744
745 static int verify_userspi_info(struct xfrm_userspi_info *p)
746 {
747 switch (p->info.id.proto) {
748 case IPPROTO_AH:
749 case IPPROTO_ESP:
750 break;
751
752 case IPPROTO_COMP:
753 /* IPCOMP spi is 16-bits. */
754 if (p->max >= 0x10000)
755 return -EINVAL;
756 break;
757
758 default:
759 return -EINVAL;
760 }
761
762 if (p->min > p->max)
763 return -EINVAL;
764
765 return 0;
766 }
767
768 static int xfrm_alloc_userspi(struct sk_buff *skb, struct nlmsghdr *nlh,
769 struct nlattr **attrs)
770 {
771 struct xfrm_state *x;
772 struct xfrm_userspi_info *p;
773 struct sk_buff *resp_skb;
774 xfrm_address_t *daddr;
775 int family;
776 int err;
777
778 p = nlmsg_data(nlh);
779 err = verify_userspi_info(p);
780 if (err)
781 goto out_noput;
782
783 family = p->info.family;
784 daddr = &p->info.id.daddr;
785
786 x = NULL;
787 if (p->info.seq) {
788 x = xfrm_find_acq_byseq(p->info.seq);
789 if (x && xfrm_addr_cmp(&x->id.daddr, daddr, family)) {
790 xfrm_state_put(x);
791 x = NULL;
792 }
793 }
794
795 if (!x)
796 x = xfrm_find_acq(p->info.mode, p->info.reqid,
797 p->info.id.proto, daddr,
798 &p->info.saddr, 1,
799 family);
800 err = -ENOENT;
801 if (x == NULL)
802 goto out_noput;
803
804 err = xfrm_alloc_spi(x, p->min, p->max);
805 if (err)
806 goto out;
807
808 resp_skb = xfrm_state_netlink(skb, x, nlh->nlmsg_seq);
809 if (IS_ERR(resp_skb)) {
810 err = PTR_ERR(resp_skb);
811 goto out;
812 }
813
814 err = nlmsg_unicast(xfrm_nl, resp_skb, NETLINK_CB(skb).pid);
815
816 out:
817 xfrm_state_put(x);
818 out_noput:
819 return err;
820 }
821
822 static int verify_policy_dir(u8 dir)
823 {
824 switch (dir) {
825 case XFRM_POLICY_IN:
826 case XFRM_POLICY_OUT:
827 case XFRM_POLICY_FWD:
828 break;
829
830 default:
831 return -EINVAL;
832 }
833
834 return 0;
835 }
836
837 static int verify_policy_type(u8 type)
838 {
839 switch (type) {
840 case XFRM_POLICY_TYPE_MAIN:
841 #ifdef CONFIG_XFRM_SUB_POLICY
842 case XFRM_POLICY_TYPE_SUB:
843 #endif
844 break;
845
846 default:
847 return -EINVAL;
848 }
849
850 return 0;
851 }
852
853 static int verify_newpolicy_info(struct xfrm_userpolicy_info *p)
854 {
855 switch (p->share) {
856 case XFRM_SHARE_ANY:
857 case XFRM_SHARE_SESSION:
858 case XFRM_SHARE_USER:
859 case XFRM_SHARE_UNIQUE:
860 break;
861
862 default:
863 return -EINVAL;
864 }
865
866 switch (p->action) {
867 case XFRM_POLICY_ALLOW:
868 case XFRM_POLICY_BLOCK:
869 break;
870
871 default:
872 return -EINVAL;
873 }
874
875 switch (p->sel.family) {
876 case AF_INET:
877 break;
878
879 case AF_INET6:
880 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
881 break;
882 #else
883 return -EAFNOSUPPORT;
884 #endif
885
886 default:
887 return -EINVAL;
888 }
889
890 return verify_policy_dir(p->dir);
891 }
892
893 static int copy_from_user_sec_ctx(struct xfrm_policy *pol, struct nlattr **attrs)
894 {
895 struct nlattr *rt = attrs[XFRMA_SEC_CTX];
896 struct xfrm_user_sec_ctx *uctx;
897
898 if (!rt)
899 return 0;
900
901 uctx = nla_data(rt);
902 return security_xfrm_policy_alloc(pol, uctx);
903 }
904
905 static void copy_templates(struct xfrm_policy *xp, struct xfrm_user_tmpl *ut,
906 int nr)
907 {
908 int i;
909
910 xp->xfrm_nr = nr;
911 for (i = 0; i < nr; i++, ut++) {
912 struct xfrm_tmpl *t = &xp->xfrm_vec[i];
913
914 memcpy(&t->id, &ut->id, sizeof(struct xfrm_id));
915 memcpy(&t->saddr, &ut->saddr,
916 sizeof(xfrm_address_t));
917 t->reqid = ut->reqid;
918 t->mode = ut->mode;
919 t->share = ut->share;
920 t->optional = ut->optional;
921 t->aalgos = ut->aalgos;
922 t->ealgos = ut->ealgos;
923 t->calgos = ut->calgos;
924 t->encap_family = ut->family;
925 }
926 }
927
928 static int validate_tmpl(int nr, struct xfrm_user_tmpl *ut, u16 family)
929 {
930 int i;
931
932 if (nr > XFRM_MAX_DEPTH)
933 return -EINVAL;
934
935 for (i = 0; i < nr; i++) {
936 /* We never validated the ut->family value, so many
937 * applications simply leave it at zero. The check was
938 * never made and ut->family was ignored because all
939 * templates could be assumed to have the same family as
940 * the policy itself. Now that we will have ipv4-in-ipv6
941 * and ipv6-in-ipv4 tunnels, this is no longer true.
942 */
943 if (!ut[i].family)
944 ut[i].family = family;
945
946 switch (ut[i].family) {
947 case AF_INET:
948 break;
949 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
950 case AF_INET6:
951 break;
952 #endif
953 default:
954 return -EINVAL;
955 }
956 }
957
958 return 0;
959 }
960
961 static int copy_from_user_tmpl(struct xfrm_policy *pol, struct nlattr **attrs)
962 {
963 struct nlattr *rt = attrs[XFRMA_TMPL];
964
965 if (!rt) {
966 pol->xfrm_nr = 0;
967 } else {
968 struct xfrm_user_tmpl *utmpl = nla_data(rt);
969 int nr = nla_len(rt) / sizeof(*utmpl);
970 int err;
971
972 err = validate_tmpl(nr, utmpl, pol->family);
973 if (err)
974 return err;
975
976 copy_templates(pol, utmpl, nr);
977 }
978 return 0;
979 }
980
981 static int copy_from_user_policy_type(u8 *tp, struct nlattr **attrs)
982 {
983 struct nlattr *rt = attrs[XFRMA_POLICY_TYPE];
984 struct xfrm_userpolicy_type *upt;
985 u8 type = XFRM_POLICY_TYPE_MAIN;
986 int err;
987
988 if (rt) {
989 upt = nla_data(rt);
990 type = upt->type;
991 }
992
993 err = verify_policy_type(type);
994 if (err)
995 return err;
996
997 *tp = type;
998 return 0;
999 }
1000
1001 static void copy_from_user_policy(struct xfrm_policy *xp, struct xfrm_userpolicy_info *p)
1002 {
1003 xp->priority = p->priority;
1004 xp->index = p->index;
1005 memcpy(&xp->selector, &p->sel, sizeof(xp->selector));
1006 memcpy(&xp->lft, &p->lft, sizeof(xp->lft));
1007 xp->action = p->action;
1008 xp->flags = p->flags;
1009 xp->family = p->sel.family;
1010 /* XXX xp->share = p->share; */
1011 }
1012
1013 static void copy_to_user_policy(struct xfrm_policy *xp, struct xfrm_userpolicy_info *p, int dir)
1014 {
1015 memcpy(&p->sel, &xp->selector, sizeof(p->sel));
1016 memcpy(&p->lft, &xp->lft, sizeof(p->lft));
1017 memcpy(&p->curlft, &xp->curlft, sizeof(p->curlft));
1018 p->priority = xp->priority;
1019 p->index = xp->index;
1020 p->sel.family = xp->family;
1021 p->dir = dir;
1022 p->action = xp->action;
1023 p->flags = xp->flags;
1024 p->share = XFRM_SHARE_ANY; /* XXX xp->share */
1025 }
1026
1027 static struct xfrm_policy *xfrm_policy_construct(struct xfrm_userpolicy_info *p, struct nlattr **attrs, int *errp)
1028 {
1029 struct xfrm_policy *xp = xfrm_policy_alloc(GFP_KERNEL);
1030 int err;
1031
1032 if (!xp) {
1033 *errp = -ENOMEM;
1034 return NULL;
1035 }
1036
1037 copy_from_user_policy(xp, p);
1038
1039 err = copy_from_user_policy_type(&xp->type, attrs);
1040 if (err)
1041 goto error;
1042
1043 if (!(err = copy_from_user_tmpl(xp, attrs)))
1044 err = copy_from_user_sec_ctx(xp, attrs);
1045 if (err)
1046 goto error;
1047
1048 return xp;
1049 error:
1050 *errp = err;
1051 kfree(xp);
1052 return NULL;
1053 }
1054
1055 static int xfrm_add_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1056 struct nlattr **attrs)
1057 {
1058 struct xfrm_userpolicy_info *p = nlmsg_data(nlh);
1059 struct xfrm_policy *xp;
1060 struct km_event c;
1061 int err;
1062 int excl;
1063
1064 err = verify_newpolicy_info(p);
1065 if (err)
1066 return err;
1067 err = verify_sec_ctx_len(attrs);
1068 if (err)
1069 return err;
1070
1071 xp = xfrm_policy_construct(p, attrs, &err);
1072 if (!xp)
1073 return err;
1074
1075 /* shouldnt excl be based on nlh flags??
1076 * Aha! this is anti-netlink really i.e more pfkey derived
1077 * in netlink excl is a flag and you wouldnt need
1078 * a type XFRM_MSG_UPDPOLICY - JHS */
1079 excl = nlh->nlmsg_type == XFRM_MSG_NEWPOLICY;
1080 err = xfrm_policy_insert(p->dir, xp, excl);
1081 xfrm_audit_policy_add(xp, err ? 0 : 1, NETLINK_CB(skb).loginuid,
1082 NETLINK_CB(skb).sid);
1083
1084 if (err) {
1085 security_xfrm_policy_free(xp);
1086 kfree(xp);
1087 return err;
1088 }
1089
1090 c.event = nlh->nlmsg_type;
1091 c.seq = nlh->nlmsg_seq;
1092 c.pid = nlh->nlmsg_pid;
1093 km_policy_notify(xp, p->dir, &c);
1094
1095 xfrm_pol_put(xp);
1096
1097 return 0;
1098 }
1099
1100 static int copy_to_user_tmpl(struct xfrm_policy *xp, struct sk_buff *skb)
1101 {
1102 struct xfrm_user_tmpl vec[XFRM_MAX_DEPTH];
1103 int i;
1104
1105 if (xp->xfrm_nr == 0)
1106 return 0;
1107
1108 for (i = 0; i < xp->xfrm_nr; i++) {
1109 struct xfrm_user_tmpl *up = &vec[i];
1110 struct xfrm_tmpl *kp = &xp->xfrm_vec[i];
1111
1112 memcpy(&up->id, &kp->id, sizeof(up->id));
1113 up->family = kp->encap_family;
1114 memcpy(&up->saddr, &kp->saddr, sizeof(up->saddr));
1115 up->reqid = kp->reqid;
1116 up->mode = kp->mode;
1117 up->share = kp->share;
1118 up->optional = kp->optional;
1119 up->aalgos = kp->aalgos;
1120 up->ealgos = kp->ealgos;
1121 up->calgos = kp->calgos;
1122 }
1123
1124 return nla_put(skb, XFRMA_TMPL,
1125 sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr, vec);
1126 }
1127
1128 static inline int copy_to_user_state_sec_ctx(struct xfrm_state *x, struct sk_buff *skb)
1129 {
1130 if (x->security) {
1131 return copy_sec_ctx(x->security, skb);
1132 }
1133 return 0;
1134 }
1135
1136 static inline int copy_to_user_sec_ctx(struct xfrm_policy *xp, struct sk_buff *skb)
1137 {
1138 if (xp->security) {
1139 return copy_sec_ctx(xp->security, skb);
1140 }
1141 return 0;
1142 }
1143 static inline size_t userpolicy_type_attrsize(void)
1144 {
1145 #ifdef CONFIG_XFRM_SUB_POLICY
1146 return nla_total_size(sizeof(struct xfrm_userpolicy_type));
1147 #else
1148 return 0;
1149 #endif
1150 }
1151
1152 #ifdef CONFIG_XFRM_SUB_POLICY
1153 static int copy_to_user_policy_type(u8 type, struct sk_buff *skb)
1154 {
1155 struct xfrm_userpolicy_type upt = {
1156 .type = type,
1157 };
1158
1159 return nla_put(skb, XFRMA_POLICY_TYPE, sizeof(upt), &upt);
1160 }
1161
1162 #else
1163 static inline int copy_to_user_policy_type(u8 type, struct sk_buff *skb)
1164 {
1165 return 0;
1166 }
1167 #endif
1168
1169 static int dump_one_policy(struct xfrm_policy *xp, int dir, int count, void *ptr)
1170 {
1171 struct xfrm_dump_info *sp = ptr;
1172 struct xfrm_userpolicy_info *p;
1173 struct sk_buff *in_skb = sp->in_skb;
1174 struct sk_buff *skb = sp->out_skb;
1175 struct nlmsghdr *nlh;
1176
1177 if (sp->this_idx < sp->start_idx)
1178 goto out;
1179
1180 nlh = nlmsg_put(skb, NETLINK_CB(in_skb).pid, sp->nlmsg_seq,
1181 XFRM_MSG_NEWPOLICY, sizeof(*p), sp->nlmsg_flags);
1182 if (nlh == NULL)
1183 return -EMSGSIZE;
1184
1185 p = nlmsg_data(nlh);
1186 copy_to_user_policy(xp, p, dir);
1187 if (copy_to_user_tmpl(xp, skb) < 0)
1188 goto nlmsg_failure;
1189 if (copy_to_user_sec_ctx(xp, skb))
1190 goto nlmsg_failure;
1191 if (copy_to_user_policy_type(xp->type, skb) < 0)
1192 goto nlmsg_failure;
1193
1194 nlmsg_end(skb, nlh);
1195 out:
1196 sp->this_idx++;
1197 return 0;
1198
1199 nlmsg_failure:
1200 nlmsg_cancel(skb, nlh);
1201 return -EMSGSIZE;
1202 }
1203
1204 static int xfrm_dump_policy(struct sk_buff *skb, struct netlink_callback *cb)
1205 {
1206 struct xfrm_dump_info info;
1207
1208 info.in_skb = cb->skb;
1209 info.out_skb = skb;
1210 info.nlmsg_seq = cb->nlh->nlmsg_seq;
1211 info.nlmsg_flags = NLM_F_MULTI;
1212 info.this_idx = 0;
1213 info.start_idx = cb->args[0];
1214 (void) xfrm_policy_walk(XFRM_POLICY_TYPE_MAIN, dump_one_policy, &info);
1215 #ifdef CONFIG_XFRM_SUB_POLICY
1216 (void) xfrm_policy_walk(XFRM_POLICY_TYPE_SUB, dump_one_policy, &info);
1217 #endif
1218 cb->args[0] = info.this_idx;
1219
1220 return skb->len;
1221 }
1222
1223 static struct sk_buff *xfrm_policy_netlink(struct sk_buff *in_skb,
1224 struct xfrm_policy *xp,
1225 int dir, u32 seq)
1226 {
1227 struct xfrm_dump_info info;
1228 struct sk_buff *skb;
1229
1230 skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1231 if (!skb)
1232 return ERR_PTR(-ENOMEM);
1233
1234 info.in_skb = in_skb;
1235 info.out_skb = skb;
1236 info.nlmsg_seq = seq;
1237 info.nlmsg_flags = 0;
1238 info.this_idx = info.start_idx = 0;
1239
1240 if (dump_one_policy(xp, dir, 0, &info) < 0) {
1241 kfree_skb(skb);
1242 return NULL;
1243 }
1244
1245 return skb;
1246 }
1247
1248 static int xfrm_get_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1249 struct nlattr **attrs)
1250 {
1251 struct xfrm_policy *xp;
1252 struct xfrm_userpolicy_id *p;
1253 u8 type = XFRM_POLICY_TYPE_MAIN;
1254 int err;
1255 struct km_event c;
1256 int delete;
1257
1258 p = nlmsg_data(nlh);
1259 delete = nlh->nlmsg_type == XFRM_MSG_DELPOLICY;
1260
1261 err = copy_from_user_policy_type(&type, attrs);
1262 if (err)
1263 return err;
1264
1265 err = verify_policy_dir(p->dir);
1266 if (err)
1267 return err;
1268
1269 if (p->index)
1270 xp = xfrm_policy_byid(type, p->dir, p->index, delete, &err);
1271 else {
1272 struct nlattr *rt = attrs[XFRMA_SEC_CTX];
1273 struct xfrm_policy tmp;
1274
1275 err = verify_sec_ctx_len(attrs);
1276 if (err)
1277 return err;
1278
1279 memset(&tmp, 0, sizeof(struct xfrm_policy));
1280 if (rt) {
1281 struct xfrm_user_sec_ctx *uctx = nla_data(rt);
1282
1283 if ((err = security_xfrm_policy_alloc(&tmp, uctx)))
1284 return err;
1285 }
1286 xp = xfrm_policy_bysel_ctx(type, p->dir, &p->sel, tmp.security,
1287 delete, &err);
1288 security_xfrm_policy_free(&tmp);
1289 }
1290 if (xp == NULL)
1291 return -ENOENT;
1292
1293 if (!delete) {
1294 struct sk_buff *resp_skb;
1295
1296 resp_skb = xfrm_policy_netlink(skb, xp, p->dir, nlh->nlmsg_seq);
1297 if (IS_ERR(resp_skb)) {
1298 err = PTR_ERR(resp_skb);
1299 } else {
1300 err = nlmsg_unicast(xfrm_nl, resp_skb,
1301 NETLINK_CB(skb).pid);
1302 }
1303 } else {
1304 xfrm_audit_policy_delete(xp, err ? 0 : 1,
1305 NETLINK_CB(skb).loginuid,
1306 NETLINK_CB(skb).sid);
1307
1308 if (err != 0)
1309 goto out;
1310
1311 c.data.byid = p->index;
1312 c.event = nlh->nlmsg_type;
1313 c.seq = nlh->nlmsg_seq;
1314 c.pid = nlh->nlmsg_pid;
1315 km_policy_notify(xp, p->dir, &c);
1316 }
1317
1318 out:
1319 xfrm_pol_put(xp);
1320 return err;
1321 }
1322
1323 static int xfrm_flush_sa(struct sk_buff *skb, struct nlmsghdr *nlh,
1324 struct nlattr **attrs)
1325 {
1326 struct km_event c;
1327 struct xfrm_usersa_flush *p = nlmsg_data(nlh);
1328 struct xfrm_audit audit_info;
1329 int err;
1330
1331 audit_info.loginuid = NETLINK_CB(skb).loginuid;
1332 audit_info.secid = NETLINK_CB(skb).sid;
1333 err = xfrm_state_flush(p->proto, &audit_info);
1334 if (err)
1335 return err;
1336 c.data.proto = p->proto;
1337 c.event = nlh->nlmsg_type;
1338 c.seq = nlh->nlmsg_seq;
1339 c.pid = nlh->nlmsg_pid;
1340 km_state_notify(NULL, &c);
1341
1342 return 0;
1343 }
1344
1345 static inline size_t xfrm_aevent_msgsize(void)
1346 {
1347 return NLMSG_ALIGN(sizeof(struct xfrm_aevent_id))
1348 + nla_total_size(sizeof(struct xfrm_replay_state))
1349 + nla_total_size(sizeof(struct xfrm_lifetime_cur))
1350 + nla_total_size(4) /* XFRM_AE_RTHR */
1351 + nla_total_size(4); /* XFRM_AE_ETHR */
1352 }
1353
1354 static int build_aevent(struct sk_buff *skb, struct xfrm_state *x, struct km_event *c)
1355 {
1356 struct xfrm_aevent_id *id;
1357 struct nlmsghdr *nlh;
1358
1359 nlh = nlmsg_put(skb, c->pid, c->seq, XFRM_MSG_NEWAE, sizeof(*id), 0);
1360 if (nlh == NULL)
1361 return -EMSGSIZE;
1362
1363 id = nlmsg_data(nlh);
1364 memcpy(&id->sa_id.daddr, &x->id.daddr,sizeof(x->id.daddr));
1365 id->sa_id.spi = x->id.spi;
1366 id->sa_id.family = x->props.family;
1367 id->sa_id.proto = x->id.proto;
1368 memcpy(&id->saddr, &x->props.saddr,sizeof(x->props.saddr));
1369 id->reqid = x->props.reqid;
1370 id->flags = c->data.aevent;
1371
1372 NLA_PUT(skb, XFRMA_REPLAY_VAL, sizeof(x->replay), &x->replay);
1373 NLA_PUT(skb, XFRMA_LTIME_VAL, sizeof(x->curlft), &x->curlft);
1374
1375 if (id->flags & XFRM_AE_RTHR)
1376 NLA_PUT_U32(skb, XFRMA_REPLAY_THRESH, x->replay_maxdiff);
1377
1378 if (id->flags & XFRM_AE_ETHR)
1379 NLA_PUT_U32(skb, XFRMA_ETIMER_THRESH,
1380 x->replay_maxage * 10 / HZ);
1381
1382 return nlmsg_end(skb, nlh);
1383
1384 nla_put_failure:
1385 nlmsg_cancel(skb, nlh);
1386 return -EMSGSIZE;
1387 }
1388
1389 static int xfrm_get_ae(struct sk_buff *skb, struct nlmsghdr *nlh,
1390 struct nlattr **attrs)
1391 {
1392 struct xfrm_state *x;
1393 struct sk_buff *r_skb;
1394 int err;
1395 struct km_event c;
1396 struct xfrm_aevent_id *p = nlmsg_data(nlh);
1397 struct xfrm_usersa_id *id = &p->sa_id;
1398
1399 r_skb = nlmsg_new(xfrm_aevent_msgsize(), GFP_ATOMIC);
1400 if (r_skb == NULL)
1401 return -ENOMEM;
1402
1403 x = xfrm_state_lookup(&id->daddr, id->spi, id->proto, id->family);
1404 if (x == NULL) {
1405 kfree_skb(r_skb);
1406 return -ESRCH;
1407 }
1408
1409 /*
1410 * XXX: is this lock really needed - none of the other
1411 * gets lock (the concern is things getting updated
1412 * while we are still reading) - jhs
1413 */
1414 spin_lock_bh(&x->lock);
1415 c.data.aevent = p->flags;
1416 c.seq = nlh->nlmsg_seq;
1417 c.pid = nlh->nlmsg_pid;
1418
1419 if (build_aevent(r_skb, x, &c) < 0)
1420 BUG();
1421 err = nlmsg_unicast(xfrm_nl, r_skb, NETLINK_CB(skb).pid);
1422 spin_unlock_bh(&x->lock);
1423 xfrm_state_put(x);
1424 return err;
1425 }
1426
1427 static int xfrm_new_ae(struct sk_buff *skb, struct nlmsghdr *nlh,
1428 struct nlattr **attrs)
1429 {
1430 struct xfrm_state *x;
1431 struct km_event c;
1432 int err = - EINVAL;
1433 struct xfrm_aevent_id *p = nlmsg_data(nlh);
1434 struct nlattr *rp = attrs[XFRMA_REPLAY_VAL];
1435 struct nlattr *lt = attrs[XFRMA_LTIME_VAL];
1436
1437 if (!lt && !rp)
1438 return err;
1439
1440 /* pedantic mode - thou shalt sayeth replaceth */
1441 if (!(nlh->nlmsg_flags&NLM_F_REPLACE))
1442 return err;
1443
1444 x = xfrm_state_lookup(&p->sa_id.daddr, p->sa_id.spi, p->sa_id.proto, p->sa_id.family);
1445 if (x == NULL)
1446 return -ESRCH;
1447
1448 if (x->km.state != XFRM_STATE_VALID)
1449 goto out;
1450
1451 spin_lock_bh(&x->lock);
1452 xfrm_update_ae_params(x, attrs);
1453 spin_unlock_bh(&x->lock);
1454
1455 c.event = nlh->nlmsg_type;
1456 c.seq = nlh->nlmsg_seq;
1457 c.pid = nlh->nlmsg_pid;
1458 c.data.aevent = XFRM_AE_CU;
1459 km_state_notify(x, &c);
1460 err = 0;
1461 out:
1462 xfrm_state_put(x);
1463 return err;
1464 }
1465
1466 static int xfrm_flush_policy(struct sk_buff *skb, struct nlmsghdr *nlh,
1467 struct nlattr **attrs)
1468 {
1469 struct km_event c;
1470 u8 type = XFRM_POLICY_TYPE_MAIN;
1471 int err;
1472 struct xfrm_audit audit_info;
1473
1474 err = copy_from_user_policy_type(&type, attrs);
1475 if (err)
1476 return err;
1477
1478 audit_info.loginuid = NETLINK_CB(skb).loginuid;
1479 audit_info.secid = NETLINK_CB(skb).sid;
1480 err = xfrm_policy_flush(type, &audit_info);
1481 if (err)
1482 return err;
1483 c.data.type = type;
1484 c.event = nlh->nlmsg_type;
1485 c.seq = nlh->nlmsg_seq;
1486 c.pid = nlh->nlmsg_pid;
1487 km_policy_notify(NULL, 0, &c);
1488 return 0;
1489 }
1490
1491 static int xfrm_add_pol_expire(struct sk_buff *skb, struct nlmsghdr *nlh,
1492 struct nlattr **attrs)
1493 {
1494 struct xfrm_policy *xp;
1495 struct xfrm_user_polexpire *up = nlmsg_data(nlh);
1496 struct xfrm_userpolicy_info *p = &up->pol;
1497 u8 type = XFRM_POLICY_TYPE_MAIN;
1498 int err = -ENOENT;
1499
1500 err = copy_from_user_policy_type(&type, attrs);
1501 if (err)
1502 return err;
1503
1504 if (p->index)
1505 xp = xfrm_policy_byid(type, p->dir, p->index, 0, &err);
1506 else {
1507 struct nlattr *rt = attrs[XFRMA_SEC_CTX];
1508 struct xfrm_policy tmp;
1509
1510 err = verify_sec_ctx_len(attrs);
1511 if (err)
1512 return err;
1513
1514 memset(&tmp, 0, sizeof(struct xfrm_policy));
1515 if (rt) {
1516 struct xfrm_user_sec_ctx *uctx = nla_data(rt);
1517
1518 if ((err = security_xfrm_policy_alloc(&tmp, uctx)))
1519 return err;
1520 }
1521 xp = xfrm_policy_bysel_ctx(type, p->dir, &p->sel, tmp.security,
1522 0, &err);
1523 security_xfrm_policy_free(&tmp);
1524 }
1525
1526 if (xp == NULL)
1527 return -ENOENT;
1528 read_lock(&xp->lock);
1529 if (xp->dead) {
1530 read_unlock(&xp->lock);
1531 goto out;
1532 }
1533
1534 read_unlock(&xp->lock);
1535 err = 0;
1536 if (up->hard) {
1537 xfrm_policy_delete(xp, p->dir);
1538 xfrm_audit_policy_delete(xp, 1, NETLINK_CB(skb).loginuid,
1539 NETLINK_CB(skb).sid);
1540
1541 } else {
1542 // reset the timers here?
1543 printk("Dont know what to do with soft policy expire\n");
1544 }
1545 km_policy_expired(xp, p->dir, up->hard, current->pid);
1546
1547 out:
1548 xfrm_pol_put(xp);
1549 return err;
1550 }
1551
1552 static int xfrm_add_sa_expire(struct sk_buff *skb, struct nlmsghdr *nlh,
1553 struct nlattr **attrs)
1554 {
1555 struct xfrm_state *x;
1556 int err;
1557 struct xfrm_user_expire *ue = nlmsg_data(nlh);
1558 struct xfrm_usersa_info *p = &ue->state;
1559
1560 x = xfrm_state_lookup(&p->id.daddr, p->id.spi, p->id.proto, p->family);
1561
1562 err = -ENOENT;
1563 if (x == NULL)
1564 return err;
1565
1566 spin_lock_bh(&x->lock);
1567 err = -EINVAL;
1568 if (x->km.state != XFRM_STATE_VALID)
1569 goto out;
1570 km_state_expired(x, ue->hard, current->pid);
1571
1572 if (ue->hard) {
1573 __xfrm_state_delete(x);
1574 xfrm_audit_state_delete(x, 1, NETLINK_CB(skb).loginuid,
1575 NETLINK_CB(skb).sid);
1576 }
1577 err = 0;
1578 out:
1579 spin_unlock_bh(&x->lock);
1580 xfrm_state_put(x);
1581 return err;
1582 }
1583
1584 static int xfrm_add_acquire(struct sk_buff *skb, struct nlmsghdr *nlh,
1585 struct nlattr **attrs)
1586 {
1587 struct xfrm_policy *xp;
1588 struct xfrm_user_tmpl *ut;
1589 int i;
1590 struct nlattr *rt = attrs[XFRMA_TMPL];
1591
1592 struct xfrm_user_acquire *ua = nlmsg_data(nlh);
1593 struct xfrm_state *x = xfrm_state_alloc();
1594 int err = -ENOMEM;
1595
1596 if (!x)
1597 return err;
1598
1599 err = verify_newpolicy_info(&ua->policy);
1600 if (err) {
1601 printk("BAD policy passed\n");
1602 kfree(x);
1603 return err;
1604 }
1605
1606 /* build an XP */
1607 xp = xfrm_policy_construct(&ua->policy, attrs, &err);
1608 if (!xp) {
1609 kfree(x);
1610 return err;
1611 }
1612
1613 memcpy(&x->id, &ua->id, sizeof(ua->id));
1614 memcpy(&x->props.saddr, &ua->saddr, sizeof(ua->saddr));
1615 memcpy(&x->sel, &ua->sel, sizeof(ua->sel));
1616
1617 ut = nla_data(rt);
1618 /* extract the templates and for each call km_key */
1619 for (i = 0; i < xp->xfrm_nr; i++, ut++) {
1620 struct xfrm_tmpl *t = &xp->xfrm_vec[i];
1621 memcpy(&x->id, &t->id, sizeof(x->id));
1622 x->props.mode = t->mode;
1623 x->props.reqid = t->reqid;
1624 x->props.family = ut->family;
1625 t->aalgos = ua->aalgos;
1626 t->ealgos = ua->ealgos;
1627 t->calgos = ua->calgos;
1628 err = km_query(x, t, xp);
1629
1630 }
1631
1632 kfree(x);
1633 kfree(xp);
1634
1635 return 0;
1636 }
1637
1638 #ifdef CONFIG_XFRM_MIGRATE
1639 static int copy_from_user_migrate(struct xfrm_migrate *ma,
1640 struct nlattr **attrs, int *num)
1641 {
1642 struct nlattr *rt = attrs[XFRMA_MIGRATE];
1643 struct xfrm_user_migrate *um;
1644 int i, num_migrate;
1645
1646 um = nla_data(rt);
1647 num_migrate = nla_len(rt) / sizeof(*um);
1648
1649 if (num_migrate <= 0 || num_migrate > XFRM_MAX_DEPTH)
1650 return -EINVAL;
1651
1652 for (i = 0; i < num_migrate; i++, um++, ma++) {
1653 memcpy(&ma->old_daddr, &um->old_daddr, sizeof(ma->old_daddr));
1654 memcpy(&ma->old_saddr, &um->old_saddr, sizeof(ma->old_saddr));
1655 memcpy(&ma->new_daddr, &um->new_daddr, sizeof(ma->new_daddr));
1656 memcpy(&ma->new_saddr, &um->new_saddr, sizeof(ma->new_saddr));
1657
1658 ma->proto = um->proto;
1659 ma->mode = um->mode;
1660 ma->reqid = um->reqid;
1661
1662 ma->old_family = um->old_family;
1663 ma->new_family = um->new_family;
1664 }
1665
1666 *num = i;
1667 return 0;
1668 }
1669
1670 static int xfrm_do_migrate(struct sk_buff *skb, struct nlmsghdr *nlh,
1671 struct nlattr **attrs)
1672 {
1673 struct xfrm_userpolicy_id *pi = nlmsg_data(nlh);
1674 struct xfrm_migrate m[XFRM_MAX_DEPTH];
1675 u8 type;
1676 int err;
1677 int n = 0;
1678
1679 if (attrs[XFRMA_MIGRATE] == NULL)
1680 return -EINVAL;
1681
1682 err = copy_from_user_policy_type(&type, attrs);
1683 if (err)
1684 return err;
1685
1686 err = copy_from_user_migrate((struct xfrm_migrate *)m,
1687 attrs, &n);
1688 if (err)
1689 return err;
1690
1691 if (!n)
1692 return 0;
1693
1694 xfrm_migrate(&pi->sel, pi->dir, type, m, n);
1695
1696 return 0;
1697 }
1698 #else
1699 static int xfrm_do_migrate(struct sk_buff *skb, struct nlmsghdr *nlh,
1700 struct nlattr **attrs)
1701 {
1702 return -ENOPROTOOPT;
1703 }
1704 #endif
1705
1706 #ifdef CONFIG_XFRM_MIGRATE
1707 static int copy_to_user_migrate(struct xfrm_migrate *m, struct sk_buff *skb)
1708 {
1709 struct xfrm_user_migrate um;
1710
1711 memset(&um, 0, sizeof(um));
1712 um.proto = m->proto;
1713 um.mode = m->mode;
1714 um.reqid = m->reqid;
1715 um.old_family = m->old_family;
1716 memcpy(&um.old_daddr, &m->old_daddr, sizeof(um.old_daddr));
1717 memcpy(&um.old_saddr, &m->old_saddr, sizeof(um.old_saddr));
1718 um.new_family = m->new_family;
1719 memcpy(&um.new_daddr, &m->new_daddr, sizeof(um.new_daddr));
1720 memcpy(&um.new_saddr, &m->new_saddr, sizeof(um.new_saddr));
1721
1722 return nla_put(skb, XFRMA_MIGRATE, sizeof(um), &um);
1723 }
1724
1725 static inline size_t xfrm_migrate_msgsize(int num_migrate)
1726 {
1727 return NLMSG_ALIGN(sizeof(struct xfrm_userpolicy_id))
1728 + nla_total_size(sizeof(struct xfrm_user_migrate) * num_migrate)
1729 + userpolicy_type_attrsize();
1730 }
1731
1732 static int build_migrate(struct sk_buff *skb, struct xfrm_migrate *m,
1733 int num_migrate, struct xfrm_selector *sel,
1734 u8 dir, u8 type)
1735 {
1736 struct xfrm_migrate *mp;
1737 struct xfrm_userpolicy_id *pol_id;
1738 struct nlmsghdr *nlh;
1739 int i;
1740
1741 nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_MIGRATE, sizeof(*pol_id), 0);
1742 if (nlh == NULL)
1743 return -EMSGSIZE;
1744
1745 pol_id = nlmsg_data(nlh);
1746 /* copy data from selector, dir, and type to the pol_id */
1747 memset(pol_id, 0, sizeof(*pol_id));
1748 memcpy(&pol_id->sel, sel, sizeof(pol_id->sel));
1749 pol_id->dir = dir;
1750
1751 if (copy_to_user_policy_type(type, skb) < 0)
1752 goto nlmsg_failure;
1753
1754 for (i = 0, mp = m ; i < num_migrate; i++, mp++) {
1755 if (copy_to_user_migrate(mp, skb) < 0)
1756 goto nlmsg_failure;
1757 }
1758
1759 return nlmsg_end(skb, nlh);
1760 nlmsg_failure:
1761 nlmsg_cancel(skb, nlh);
1762 return -EMSGSIZE;
1763 }
1764
1765 static int xfrm_send_migrate(struct xfrm_selector *sel, u8 dir, u8 type,
1766 struct xfrm_migrate *m, int num_migrate)
1767 {
1768 struct sk_buff *skb;
1769
1770 skb = nlmsg_new(xfrm_migrate_msgsize(num_migrate), GFP_ATOMIC);
1771 if (skb == NULL)
1772 return -ENOMEM;
1773
1774 /* build migrate */
1775 if (build_migrate(skb, m, num_migrate, sel, dir, type) < 0)
1776 BUG();
1777
1778 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_MIGRATE, GFP_ATOMIC);
1779 }
1780 #else
1781 static int xfrm_send_migrate(struct xfrm_selector *sel, u8 dir, u8 type,
1782 struct xfrm_migrate *m, int num_migrate)
1783 {
1784 return -ENOPROTOOPT;
1785 }
1786 #endif
1787
1788 #define XMSGSIZE(type) sizeof(struct type)
1789
1790 static const int xfrm_msg_min[XFRM_NR_MSGTYPES] = {
1791 [XFRM_MSG_NEWSA - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_info),
1792 [XFRM_MSG_DELSA - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_id),
1793 [XFRM_MSG_GETSA - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_id),
1794 [XFRM_MSG_NEWPOLICY - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_info),
1795 [XFRM_MSG_DELPOLICY - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
1796 [XFRM_MSG_GETPOLICY - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
1797 [XFRM_MSG_ALLOCSPI - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userspi_info),
1798 [XFRM_MSG_ACQUIRE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_acquire),
1799 [XFRM_MSG_EXPIRE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_expire),
1800 [XFRM_MSG_UPDPOLICY - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_info),
1801 [XFRM_MSG_UPDSA - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_info),
1802 [XFRM_MSG_POLEXPIRE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_polexpire),
1803 [XFRM_MSG_FLUSHSA - XFRM_MSG_BASE] = XMSGSIZE(xfrm_usersa_flush),
1804 [XFRM_MSG_FLUSHPOLICY - XFRM_MSG_BASE] = 0,
1805 [XFRM_MSG_NEWAE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_aevent_id),
1806 [XFRM_MSG_GETAE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_aevent_id),
1807 [XFRM_MSG_REPORT - XFRM_MSG_BASE] = XMSGSIZE(xfrm_user_report),
1808 [XFRM_MSG_MIGRATE - XFRM_MSG_BASE] = XMSGSIZE(xfrm_userpolicy_id),
1809 [XFRM_MSG_GETSADINFO - XFRM_MSG_BASE] = sizeof(u32),
1810 [XFRM_MSG_GETSPDINFO - XFRM_MSG_BASE] = sizeof(u32),
1811 };
1812
1813 #undef XMSGSIZE
1814
1815 static const struct nla_policy xfrma_policy[XFRMA_MAX+1] = {
1816 [XFRMA_ALG_AUTH] = { .len = sizeof(struct xfrm_algo) },
1817 [XFRMA_ALG_CRYPT] = { .len = sizeof(struct xfrm_algo) },
1818 [XFRMA_ALG_COMP] = { .len = sizeof(struct xfrm_algo) },
1819 [XFRMA_ENCAP] = { .len = sizeof(struct xfrm_encap_tmpl) },
1820 [XFRMA_TMPL] = { .len = sizeof(struct xfrm_user_tmpl) },
1821 [XFRMA_SEC_CTX] = { .len = sizeof(struct xfrm_sec_ctx) },
1822 [XFRMA_LTIME_VAL] = { .len = sizeof(struct xfrm_lifetime_cur) },
1823 [XFRMA_REPLAY_VAL] = { .len = sizeof(struct xfrm_replay_state) },
1824 [XFRMA_REPLAY_THRESH] = { .type = NLA_U32 },
1825 [XFRMA_ETIMER_THRESH] = { .type = NLA_U32 },
1826 [XFRMA_SRCADDR] = { .len = sizeof(xfrm_address_t) },
1827 [XFRMA_COADDR] = { .len = sizeof(xfrm_address_t) },
1828 [XFRMA_POLICY_TYPE] = { .len = sizeof(struct xfrm_userpolicy_type)},
1829 [XFRMA_MIGRATE] = { .len = sizeof(struct xfrm_user_migrate) },
1830 };
1831
1832 static struct xfrm_link {
1833 int (*doit)(struct sk_buff *, struct nlmsghdr *, struct nlattr **);
1834 int (*dump)(struct sk_buff *, struct netlink_callback *);
1835 } xfrm_dispatch[XFRM_NR_MSGTYPES] = {
1836 [XFRM_MSG_NEWSA - XFRM_MSG_BASE] = { .doit = xfrm_add_sa },
1837 [XFRM_MSG_DELSA - XFRM_MSG_BASE] = { .doit = xfrm_del_sa },
1838 [XFRM_MSG_GETSA - XFRM_MSG_BASE] = { .doit = xfrm_get_sa,
1839 .dump = xfrm_dump_sa },
1840 [XFRM_MSG_NEWPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_add_policy },
1841 [XFRM_MSG_DELPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_get_policy },
1842 [XFRM_MSG_GETPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_get_policy,
1843 .dump = xfrm_dump_policy },
1844 [XFRM_MSG_ALLOCSPI - XFRM_MSG_BASE] = { .doit = xfrm_alloc_userspi },
1845 [XFRM_MSG_ACQUIRE - XFRM_MSG_BASE] = { .doit = xfrm_add_acquire },
1846 [XFRM_MSG_EXPIRE - XFRM_MSG_BASE] = { .doit = xfrm_add_sa_expire },
1847 [XFRM_MSG_UPDPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_add_policy },
1848 [XFRM_MSG_UPDSA - XFRM_MSG_BASE] = { .doit = xfrm_add_sa },
1849 [XFRM_MSG_POLEXPIRE - XFRM_MSG_BASE] = { .doit = xfrm_add_pol_expire},
1850 [XFRM_MSG_FLUSHSA - XFRM_MSG_BASE] = { .doit = xfrm_flush_sa },
1851 [XFRM_MSG_FLUSHPOLICY - XFRM_MSG_BASE] = { .doit = xfrm_flush_policy },
1852 [XFRM_MSG_NEWAE - XFRM_MSG_BASE] = { .doit = xfrm_new_ae },
1853 [XFRM_MSG_GETAE - XFRM_MSG_BASE] = { .doit = xfrm_get_ae },
1854 [XFRM_MSG_MIGRATE - XFRM_MSG_BASE] = { .doit = xfrm_do_migrate },
1855 [XFRM_MSG_GETSADINFO - XFRM_MSG_BASE] = { .doit = xfrm_get_sadinfo },
1856 [XFRM_MSG_GETSPDINFO - XFRM_MSG_BASE] = { .doit = xfrm_get_spdinfo },
1857 };
1858
1859 static int xfrm_user_rcv_msg(struct sk_buff *skb, struct nlmsghdr *nlh)
1860 {
1861 struct nlattr *attrs[XFRMA_MAX+1];
1862 struct xfrm_link *link;
1863 int type, err;
1864
1865 type = nlh->nlmsg_type;
1866 if (type > XFRM_MSG_MAX)
1867 return -EINVAL;
1868
1869 type -= XFRM_MSG_BASE;
1870 link = &xfrm_dispatch[type];
1871
1872 /* All operations require privileges, even GET */
1873 if (security_netlink_recv(skb, CAP_NET_ADMIN))
1874 return -EPERM;
1875
1876 if ((type == (XFRM_MSG_GETSA - XFRM_MSG_BASE) ||
1877 type == (XFRM_MSG_GETPOLICY - XFRM_MSG_BASE)) &&
1878 (nlh->nlmsg_flags & NLM_F_DUMP)) {
1879 if (link->dump == NULL)
1880 return -EINVAL;
1881
1882 return netlink_dump_start(xfrm_nl, skb, nlh, link->dump, NULL);
1883 }
1884
1885 err = nlmsg_parse(nlh, xfrm_msg_min[type], attrs, XFRMA_MAX,
1886 xfrma_policy);
1887 if (err < 0)
1888 return err;
1889
1890 if (link->doit == NULL)
1891 return -EINVAL;
1892
1893 return link->doit(skb, nlh, attrs);
1894 }
1895
1896 static void xfrm_netlink_rcv(struct sk_buff *skb)
1897 {
1898 mutex_lock(&xfrm_cfg_mutex);
1899 netlink_rcv_skb(skb, &xfrm_user_rcv_msg);
1900 mutex_unlock(&xfrm_cfg_mutex);
1901 }
1902
1903 static inline size_t xfrm_expire_msgsize(void)
1904 {
1905 return NLMSG_ALIGN(sizeof(struct xfrm_user_expire));
1906 }
1907
1908 static int build_expire(struct sk_buff *skb, struct xfrm_state *x, struct km_event *c)
1909 {
1910 struct xfrm_user_expire *ue;
1911 struct nlmsghdr *nlh;
1912
1913 nlh = nlmsg_put(skb, c->pid, 0, XFRM_MSG_EXPIRE, sizeof(*ue), 0);
1914 if (nlh == NULL)
1915 return -EMSGSIZE;
1916
1917 ue = nlmsg_data(nlh);
1918 copy_to_user_state(x, &ue->state);
1919 ue->hard = (c->data.hard != 0) ? 1 : 0;
1920
1921 return nlmsg_end(skb, nlh);
1922 }
1923
1924 static int xfrm_exp_state_notify(struct xfrm_state *x, struct km_event *c)
1925 {
1926 struct sk_buff *skb;
1927
1928 skb = nlmsg_new(xfrm_expire_msgsize(), GFP_ATOMIC);
1929 if (skb == NULL)
1930 return -ENOMEM;
1931
1932 if (build_expire(skb, x, c) < 0)
1933 BUG();
1934
1935 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_EXPIRE, GFP_ATOMIC);
1936 }
1937
1938 static int xfrm_aevent_state_notify(struct xfrm_state *x, struct km_event *c)
1939 {
1940 struct sk_buff *skb;
1941
1942 skb = nlmsg_new(xfrm_aevent_msgsize(), GFP_ATOMIC);
1943 if (skb == NULL)
1944 return -ENOMEM;
1945
1946 if (build_aevent(skb, x, c) < 0)
1947 BUG();
1948
1949 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_AEVENTS, GFP_ATOMIC);
1950 }
1951
1952 static int xfrm_notify_sa_flush(struct km_event *c)
1953 {
1954 struct xfrm_usersa_flush *p;
1955 struct nlmsghdr *nlh;
1956 struct sk_buff *skb;
1957 int len = NLMSG_ALIGN(sizeof(struct xfrm_usersa_flush));
1958
1959 skb = nlmsg_new(len, GFP_ATOMIC);
1960 if (skb == NULL)
1961 return -ENOMEM;
1962
1963 nlh = nlmsg_put(skb, c->pid, c->seq, XFRM_MSG_FLUSHSA, sizeof(*p), 0);
1964 if (nlh == NULL) {
1965 kfree_skb(skb);
1966 return -EMSGSIZE;
1967 }
1968
1969 p = nlmsg_data(nlh);
1970 p->proto = c->data.proto;
1971
1972 nlmsg_end(skb, nlh);
1973
1974 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_SA, GFP_ATOMIC);
1975 }
1976
1977 static inline size_t xfrm_sa_len(struct xfrm_state *x)
1978 {
1979 size_t l = 0;
1980 if (x->aalg)
1981 l += nla_total_size(alg_len(x->aalg));
1982 if (x->ealg)
1983 l += nla_total_size(alg_len(x->ealg));
1984 if (x->calg)
1985 l += nla_total_size(sizeof(*x->calg));
1986 if (x->encap)
1987 l += nla_total_size(sizeof(*x->encap));
1988 if (x->security)
1989 l += nla_total_size(sizeof(struct xfrm_user_sec_ctx) +
1990 x->security->ctx_len);
1991 if (x->coaddr)
1992 l += nla_total_size(sizeof(*x->coaddr));
1993
1994 /* Must count this as this may become non-zero behind our back. */
1995 l += nla_total_size(sizeof(x->lastused));
1996
1997 return l;
1998 }
1999
2000 static int xfrm_notify_sa(struct xfrm_state *x, struct km_event *c)
2001 {
2002 struct xfrm_usersa_info *p;
2003 struct xfrm_usersa_id *id;
2004 struct nlmsghdr *nlh;
2005 struct sk_buff *skb;
2006 int len = xfrm_sa_len(x);
2007 int headlen;
2008
2009 headlen = sizeof(*p);
2010 if (c->event == XFRM_MSG_DELSA) {
2011 len += nla_total_size(headlen);
2012 headlen = sizeof(*id);
2013 }
2014 len += NLMSG_ALIGN(headlen);
2015
2016 skb = nlmsg_new(len, GFP_ATOMIC);
2017 if (skb == NULL)
2018 return -ENOMEM;
2019
2020 nlh = nlmsg_put(skb, c->pid, c->seq, c->event, headlen, 0);
2021 if (nlh == NULL)
2022 goto nla_put_failure;
2023
2024 p = nlmsg_data(nlh);
2025 if (c->event == XFRM_MSG_DELSA) {
2026 struct nlattr *attr;
2027
2028 id = nlmsg_data(nlh);
2029 memcpy(&id->daddr, &x->id.daddr, sizeof(id->daddr));
2030 id->spi = x->id.spi;
2031 id->family = x->props.family;
2032 id->proto = x->id.proto;
2033
2034 attr = nla_reserve(skb, XFRMA_SA, sizeof(*p));
2035 if (attr == NULL)
2036 goto nla_put_failure;
2037
2038 p = nla_data(attr);
2039 }
2040
2041 if (copy_to_user_state_extra(x, p, skb))
2042 goto nla_put_failure;
2043
2044 nlmsg_end(skb, nlh);
2045
2046 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_SA, GFP_ATOMIC);
2047
2048 nla_put_failure:
2049 /* Somebody screwed up with xfrm_sa_len! */
2050 WARN_ON(1);
2051 kfree_skb(skb);
2052 return -1;
2053 }
2054
2055 static int xfrm_send_state_notify(struct xfrm_state *x, struct km_event *c)
2056 {
2057
2058 switch (c->event) {
2059 case XFRM_MSG_EXPIRE:
2060 return xfrm_exp_state_notify(x, c);
2061 case XFRM_MSG_NEWAE:
2062 return xfrm_aevent_state_notify(x, c);
2063 case XFRM_MSG_DELSA:
2064 case XFRM_MSG_UPDSA:
2065 case XFRM_MSG_NEWSA:
2066 return xfrm_notify_sa(x, c);
2067 case XFRM_MSG_FLUSHSA:
2068 return xfrm_notify_sa_flush(c);
2069 default:
2070 printk("xfrm_user: Unknown SA event %d\n", c->event);
2071 break;
2072 }
2073
2074 return 0;
2075
2076 }
2077
2078 static inline size_t xfrm_acquire_msgsize(struct xfrm_state *x,
2079 struct xfrm_policy *xp)
2080 {
2081 return NLMSG_ALIGN(sizeof(struct xfrm_user_acquire))
2082 + nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr)
2083 + nla_total_size(xfrm_user_sec_ctx_size(x->security))
2084 + userpolicy_type_attrsize();
2085 }
2086
2087 static int build_acquire(struct sk_buff *skb, struct xfrm_state *x,
2088 struct xfrm_tmpl *xt, struct xfrm_policy *xp,
2089 int dir)
2090 {
2091 struct xfrm_user_acquire *ua;
2092 struct nlmsghdr *nlh;
2093 __u32 seq = xfrm_get_acqseq();
2094
2095 nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_ACQUIRE, sizeof(*ua), 0);
2096 if (nlh == NULL)
2097 return -EMSGSIZE;
2098
2099 ua = nlmsg_data(nlh);
2100 memcpy(&ua->id, &x->id, sizeof(ua->id));
2101 memcpy(&ua->saddr, &x->props.saddr, sizeof(ua->saddr));
2102 memcpy(&ua->sel, &x->sel, sizeof(ua->sel));
2103 copy_to_user_policy(xp, &ua->policy, dir);
2104 ua->aalgos = xt->aalgos;
2105 ua->ealgos = xt->ealgos;
2106 ua->calgos = xt->calgos;
2107 ua->seq = x->km.seq = seq;
2108
2109 if (copy_to_user_tmpl(xp, skb) < 0)
2110 goto nlmsg_failure;
2111 if (copy_to_user_state_sec_ctx(x, skb))
2112 goto nlmsg_failure;
2113 if (copy_to_user_policy_type(xp->type, skb) < 0)
2114 goto nlmsg_failure;
2115
2116 return nlmsg_end(skb, nlh);
2117
2118 nlmsg_failure:
2119 nlmsg_cancel(skb, nlh);
2120 return -EMSGSIZE;
2121 }
2122
2123 static int xfrm_send_acquire(struct xfrm_state *x, struct xfrm_tmpl *xt,
2124 struct xfrm_policy *xp, int dir)
2125 {
2126 struct sk_buff *skb;
2127
2128 skb = nlmsg_new(xfrm_acquire_msgsize(x, xp), GFP_ATOMIC);
2129 if (skb == NULL)
2130 return -ENOMEM;
2131
2132 if (build_acquire(skb, x, xt, xp, dir) < 0)
2133 BUG();
2134
2135 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_ACQUIRE, GFP_ATOMIC);
2136 }
2137
2138 /* User gives us xfrm_user_policy_info followed by an array of 0
2139 * or more templates.
2140 */
2141 static struct xfrm_policy *xfrm_compile_policy(struct sock *sk, int opt,
2142 u8 *data, int len, int *dir)
2143 {
2144 struct xfrm_userpolicy_info *p = (struct xfrm_userpolicy_info *)data;
2145 struct xfrm_user_tmpl *ut = (struct xfrm_user_tmpl *) (p + 1);
2146 struct xfrm_policy *xp;
2147 int nr;
2148
2149 switch (sk->sk_family) {
2150 case AF_INET:
2151 if (opt != IP_XFRM_POLICY) {
2152 *dir = -EOPNOTSUPP;
2153 return NULL;
2154 }
2155 break;
2156 #if defined(CONFIG_IPV6) || defined(CONFIG_IPV6_MODULE)
2157 case AF_INET6:
2158 if (opt != IPV6_XFRM_POLICY) {
2159 *dir = -EOPNOTSUPP;
2160 return NULL;
2161 }
2162 break;
2163 #endif
2164 default:
2165 *dir = -EINVAL;
2166 return NULL;
2167 }
2168
2169 *dir = -EINVAL;
2170
2171 if (len < sizeof(*p) ||
2172 verify_newpolicy_info(p))
2173 return NULL;
2174
2175 nr = ((len - sizeof(*p)) / sizeof(*ut));
2176 if (validate_tmpl(nr, ut, p->sel.family))
2177 return NULL;
2178
2179 if (p->dir > XFRM_POLICY_OUT)
2180 return NULL;
2181
2182 xp = xfrm_policy_alloc(GFP_KERNEL);
2183 if (xp == NULL) {
2184 *dir = -ENOBUFS;
2185 return NULL;
2186 }
2187
2188 copy_from_user_policy(xp, p);
2189 xp->type = XFRM_POLICY_TYPE_MAIN;
2190 copy_templates(xp, ut, nr);
2191
2192 *dir = p->dir;
2193
2194 return xp;
2195 }
2196
2197 static inline size_t xfrm_polexpire_msgsize(struct xfrm_policy *xp)
2198 {
2199 return NLMSG_ALIGN(sizeof(struct xfrm_user_polexpire))
2200 + nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr)
2201 + nla_total_size(xfrm_user_sec_ctx_size(xp->security))
2202 + userpolicy_type_attrsize();
2203 }
2204
2205 static int build_polexpire(struct sk_buff *skb, struct xfrm_policy *xp,
2206 int dir, struct km_event *c)
2207 {
2208 struct xfrm_user_polexpire *upe;
2209 struct nlmsghdr *nlh;
2210 int hard = c->data.hard;
2211
2212 nlh = nlmsg_put(skb, c->pid, 0, XFRM_MSG_POLEXPIRE, sizeof(*upe), 0);
2213 if (nlh == NULL)
2214 return -EMSGSIZE;
2215
2216 upe = nlmsg_data(nlh);
2217 copy_to_user_policy(xp, &upe->pol, dir);
2218 if (copy_to_user_tmpl(xp, skb) < 0)
2219 goto nlmsg_failure;
2220 if (copy_to_user_sec_ctx(xp, skb))
2221 goto nlmsg_failure;
2222 if (copy_to_user_policy_type(xp->type, skb) < 0)
2223 goto nlmsg_failure;
2224 upe->hard = !!hard;
2225
2226 return nlmsg_end(skb, nlh);
2227
2228 nlmsg_failure:
2229 nlmsg_cancel(skb, nlh);
2230 return -EMSGSIZE;
2231 }
2232
2233 static int xfrm_exp_policy_notify(struct xfrm_policy *xp, int dir, struct km_event *c)
2234 {
2235 struct sk_buff *skb;
2236
2237 skb = nlmsg_new(xfrm_polexpire_msgsize(xp), GFP_ATOMIC);
2238 if (skb == NULL)
2239 return -ENOMEM;
2240
2241 if (build_polexpire(skb, xp, dir, c) < 0)
2242 BUG();
2243
2244 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_EXPIRE, GFP_ATOMIC);
2245 }
2246
2247 static int xfrm_notify_policy(struct xfrm_policy *xp, int dir, struct km_event *c)
2248 {
2249 struct xfrm_userpolicy_info *p;
2250 struct xfrm_userpolicy_id *id;
2251 struct nlmsghdr *nlh;
2252 struct sk_buff *skb;
2253 int len = nla_total_size(sizeof(struct xfrm_user_tmpl) * xp->xfrm_nr);
2254 int headlen;
2255
2256 headlen = sizeof(*p);
2257 if (c->event == XFRM_MSG_DELPOLICY) {
2258 len += nla_total_size(headlen);
2259 headlen = sizeof(*id);
2260 }
2261 len += userpolicy_type_attrsize();
2262 len += NLMSG_ALIGN(headlen);
2263
2264 skb = nlmsg_new(len, GFP_ATOMIC);
2265 if (skb == NULL)
2266 return -ENOMEM;
2267
2268 nlh = nlmsg_put(skb, c->pid, c->seq, c->event, headlen, 0);
2269 if (nlh == NULL)
2270 goto nlmsg_failure;
2271
2272 p = nlmsg_data(nlh);
2273 if (c->event == XFRM_MSG_DELPOLICY) {
2274 struct nlattr *attr;
2275
2276 id = nlmsg_data(nlh);
2277 memset(id, 0, sizeof(*id));
2278 id->dir = dir;
2279 if (c->data.byid)
2280 id->index = xp->index;
2281 else
2282 memcpy(&id->sel, &xp->selector, sizeof(id->sel));
2283
2284 attr = nla_reserve(skb, XFRMA_POLICY, sizeof(*p));
2285 if (attr == NULL)
2286 goto nlmsg_failure;
2287
2288 p = nla_data(attr);
2289 }
2290
2291 copy_to_user_policy(xp, p, dir);
2292 if (copy_to_user_tmpl(xp, skb) < 0)
2293 goto nlmsg_failure;
2294 if (copy_to_user_policy_type(xp->type, skb) < 0)
2295 goto nlmsg_failure;
2296
2297 nlmsg_end(skb, nlh);
2298
2299 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_POLICY, GFP_ATOMIC);
2300
2301 nlmsg_failure:
2302 kfree_skb(skb);
2303 return -1;
2304 }
2305
2306 static int xfrm_notify_policy_flush(struct km_event *c)
2307 {
2308 struct nlmsghdr *nlh;
2309 struct sk_buff *skb;
2310
2311 skb = nlmsg_new(userpolicy_type_attrsize(), GFP_ATOMIC);
2312 if (skb == NULL)
2313 return -ENOMEM;
2314
2315 nlh = nlmsg_put(skb, c->pid, c->seq, XFRM_MSG_FLUSHPOLICY, 0, 0);
2316 if (nlh == NULL)
2317 goto nlmsg_failure;
2318 if (copy_to_user_policy_type(c->data.type, skb) < 0)
2319 goto nlmsg_failure;
2320
2321 nlmsg_end(skb, nlh);
2322
2323 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_POLICY, GFP_ATOMIC);
2324
2325 nlmsg_failure:
2326 kfree_skb(skb);
2327 return -1;
2328 }
2329
2330 static int xfrm_send_policy_notify(struct xfrm_policy *xp, int dir, struct km_event *c)
2331 {
2332
2333 switch (c->event) {
2334 case XFRM_MSG_NEWPOLICY:
2335 case XFRM_MSG_UPDPOLICY:
2336 case XFRM_MSG_DELPOLICY:
2337 return xfrm_notify_policy(xp, dir, c);
2338 case XFRM_MSG_FLUSHPOLICY:
2339 return xfrm_notify_policy_flush(c);
2340 case XFRM_MSG_POLEXPIRE:
2341 return xfrm_exp_policy_notify(xp, dir, c);
2342 default:
2343 printk("xfrm_user: Unknown Policy event %d\n", c->event);
2344 }
2345
2346 return 0;
2347
2348 }
2349
2350 static inline size_t xfrm_report_msgsize(void)
2351 {
2352 return NLMSG_ALIGN(sizeof(struct xfrm_user_report));
2353 }
2354
2355 static int build_report(struct sk_buff *skb, u8 proto,
2356 struct xfrm_selector *sel, xfrm_address_t *addr)
2357 {
2358 struct xfrm_user_report *ur;
2359 struct nlmsghdr *nlh;
2360
2361 nlh = nlmsg_put(skb, 0, 0, XFRM_MSG_REPORT, sizeof(*ur), 0);
2362 if (nlh == NULL)
2363 return -EMSGSIZE;
2364
2365 ur = nlmsg_data(nlh);
2366 ur->proto = proto;
2367 memcpy(&ur->sel, sel, sizeof(ur->sel));
2368
2369 if (addr)
2370 NLA_PUT(skb, XFRMA_COADDR, sizeof(*addr), addr);
2371
2372 return nlmsg_end(skb, nlh);
2373
2374 nla_put_failure:
2375 nlmsg_cancel(skb, nlh);
2376 return -EMSGSIZE;
2377 }
2378
2379 static int xfrm_send_report(u8 proto, struct xfrm_selector *sel,
2380 xfrm_address_t *addr)
2381 {
2382 struct sk_buff *skb;
2383
2384 skb = nlmsg_new(xfrm_report_msgsize(), GFP_ATOMIC);
2385 if (skb == NULL)
2386 return -ENOMEM;
2387
2388 if (build_report(skb, proto, sel, addr) < 0)
2389 BUG();
2390
2391 return nlmsg_multicast(xfrm_nl, skb, 0, XFRMNLGRP_REPORT, GFP_ATOMIC);
2392 }
2393
2394 static struct xfrm_mgr netlink_mgr = {
2395 .id = "netlink",
2396 .notify = xfrm_send_state_notify,
2397 .acquire = xfrm_send_acquire,
2398 .compile_policy = xfrm_compile_policy,
2399 .notify_policy = xfrm_send_policy_notify,
2400 .report = xfrm_send_report,
2401 .migrate = xfrm_send_migrate,
2402 };
2403
2404 static int __init xfrm_user_init(void)
2405 {
2406 struct sock *nlsk;
2407
2408 printk(KERN_INFO "Initializing XFRM netlink socket\n");
2409
2410 nlsk = netlink_kernel_create(&init_net, NETLINK_XFRM, XFRMNLGRP_MAX,
2411 xfrm_netlink_rcv, NULL, THIS_MODULE);
2412 if (nlsk == NULL)
2413 return -ENOMEM;
2414 rcu_assign_pointer(xfrm_nl, nlsk);
2415
2416 xfrm_register_km(&netlink_mgr);
2417
2418 return 0;
2419 }
2420
2421 static void __exit xfrm_user_exit(void)
2422 {
2423 struct sock *nlsk = xfrm_nl;
2424
2425 xfrm_unregister_km(&netlink_mgr);
2426 rcu_assign_pointer(xfrm_nl, NULL);
2427 synchronize_rcu();
2428 sock_release(nlsk->sk_socket);
2429 }
2430
2431 module_init(xfrm_user_init);
2432 module_exit(xfrm_user_exit);
2433 MODULE_LICENSE("GPL");
2434 MODULE_ALIAS_NET_PF_PROTO(PF_NETLINK, NETLINK_XFRM);
2435
This page took 0.085554 seconds and 5 git commands to generate.