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