1 /* 2 * net/core/fib_rules.c Generic Routing Rules 3 * 4 * This program is free software; you can redistribute it and/or 5 * modify it under the terms of the GNU General Public License as 6 * published by the Free Software Foundation, version 2. 7 * 8 * Authors: Thomas Graf <tgraf@suug.ch> 9 */ 10 11 #include <linux/types.h> 12 #include <linux/kernel.h> 13 #include <linux/slab.h> 14 #include <linux/list.h> 15 #include <linux/module.h> 16 #include <net/net_namespace.h> 17 #include <net/sock.h> 18 #include <net/fib_rules.h> 19 #include <net/ip_tunnels.h> 20 21 static const struct fib_kuid_range fib_kuid_range_unset = { 22 KUIDT_INIT(0), 23 KUIDT_INIT(~0), 24 }; 25 26 bool fib_rule_matchall(const struct fib_rule *rule) 27 { 28 if (rule->iifindex || rule->oifindex || rule->mark || rule->tun_id || 29 rule->flags) 30 return false; 31 if (rule->suppress_ifgroup != -1 || rule->suppress_prefixlen != -1) 32 return false; 33 if (!uid_eq(rule->uid_range.start, fib_kuid_range_unset.start) || 34 !uid_eq(rule->uid_range.end, fib_kuid_range_unset.end)) 35 return false; 36 if (fib_rule_port_range_set(&rule->sport_range)) 37 return false; 38 if (fib_rule_port_range_set(&rule->dport_range)) 39 return false; 40 return true; 41 } 42 EXPORT_SYMBOL_GPL(fib_rule_matchall); 43 44 int fib_default_rule_add(struct fib_rules_ops *ops, 45 u32 pref, u32 table, u32 flags) 46 { 47 struct fib_rule *r; 48 49 r = kzalloc(ops->rule_size, GFP_KERNEL); 50 if (r == NULL) 51 return -ENOMEM; 52 53 refcount_set(&r->refcnt, 1); 54 r->action = FR_ACT_TO_TBL; 55 r->pref = pref; 56 r->table = table; 57 r->flags = flags; 58 r->proto = RTPROT_KERNEL; 59 r->fr_net = ops->fro_net; 60 r->uid_range = fib_kuid_range_unset; 61 62 r->suppress_prefixlen = -1; 63 r->suppress_ifgroup = -1; 64 65 /* The lock is not required here, the list in unreacheable 66 * at the moment this function is called */ 67 list_add_tail(&r->list, &ops->rules_list); 68 return 0; 69 } 70 EXPORT_SYMBOL(fib_default_rule_add); 71 72 static u32 fib_default_rule_pref(struct fib_rules_ops *ops) 73 { 74 struct list_head *pos; 75 struct fib_rule *rule; 76 77 if (!list_empty(&ops->rules_list)) { 78 pos = ops->rules_list.next; 79 if (pos->next != &ops->rules_list) { 80 rule = list_entry(pos->next, struct fib_rule, list); 81 if (rule->pref) 82 return rule->pref - 1; 83 } 84 } 85 86 return 0; 87 } 88 89 static void notify_rule_change(int event, struct fib_rule *rule, 90 struct fib_rules_ops *ops, struct nlmsghdr *nlh, 91 u32 pid); 92 93 static struct fib_rules_ops *lookup_rules_ops(struct net *net, int family) 94 { 95 struct fib_rules_ops *ops; 96 97 rcu_read_lock(); 98 list_for_each_entry_rcu(ops, &net->rules_ops, list) { 99 if (ops->family == family) { 100 if (!try_module_get(ops->owner)) 101 ops = NULL; 102 rcu_read_unlock(); 103 return ops; 104 } 105 } 106 rcu_read_unlock(); 107 108 return NULL; 109 } 110 111 static void rules_ops_put(struct fib_rules_ops *ops) 112 { 113 if (ops) 114 module_put(ops->owner); 115 } 116 117 static void flush_route_cache(struct fib_rules_ops *ops) 118 { 119 if (ops->flush_cache) 120 ops->flush_cache(ops); 121 } 122 123 static int __fib_rules_register(struct fib_rules_ops *ops) 124 { 125 int err = -EEXIST; 126 struct fib_rules_ops *o; 127 struct net *net; 128 129 net = ops->fro_net; 130 131 if (ops->rule_size < sizeof(struct fib_rule)) 132 return -EINVAL; 133 134 if (ops->match == NULL || ops->configure == NULL || 135 ops->compare == NULL || ops->fill == NULL || 136 ops->action == NULL) 137 return -EINVAL; 138 139 spin_lock(&net->rules_mod_lock); 140 list_for_each_entry(o, &net->rules_ops, list) 141 if (ops->family == o->family) 142 goto errout; 143 144 list_add_tail_rcu(&ops->list, &net->rules_ops); 145 err = 0; 146 errout: 147 spin_unlock(&net->rules_mod_lock); 148 149 return err; 150 } 151 152 struct fib_rules_ops * 153 fib_rules_register(const struct fib_rules_ops *tmpl, struct net *net) 154 { 155 struct fib_rules_ops *ops; 156 int err; 157 158 ops = kmemdup(tmpl, sizeof(*ops), GFP_KERNEL); 159 if (ops == NULL) 160 return ERR_PTR(-ENOMEM); 161 162 INIT_LIST_HEAD(&ops->rules_list); 163 ops->fro_net = net; 164 165 err = __fib_rules_register(ops); 166 if (err) { 167 kfree(ops); 168 ops = ERR_PTR(err); 169 } 170 171 return ops; 172 } 173 EXPORT_SYMBOL_GPL(fib_rules_register); 174 175 static void fib_rules_cleanup_ops(struct fib_rules_ops *ops) 176 { 177 struct fib_rule *rule, *tmp; 178 179 list_for_each_entry_safe(rule, tmp, &ops->rules_list, list) { 180 list_del_rcu(&rule->list); 181 if (ops->delete) 182 ops->delete(rule); 183 fib_rule_put(rule); 184 } 185 } 186 187 void fib_rules_unregister(struct fib_rules_ops *ops) 188 { 189 struct net *net = ops->fro_net; 190 191 spin_lock(&net->rules_mod_lock); 192 list_del_rcu(&ops->list); 193 spin_unlock(&net->rules_mod_lock); 194 195 fib_rules_cleanup_ops(ops); 196 kfree_rcu(ops, rcu); 197 } 198 EXPORT_SYMBOL_GPL(fib_rules_unregister); 199 200 static int uid_range_set(struct fib_kuid_range *range) 201 { 202 return uid_valid(range->start) && uid_valid(range->end); 203 } 204 205 static struct fib_kuid_range nla_get_kuid_range(struct nlattr **tb) 206 { 207 struct fib_rule_uid_range *in; 208 struct fib_kuid_range out; 209 210 in = (struct fib_rule_uid_range *)nla_data(tb[FRA_UID_RANGE]); 211 212 out.start = make_kuid(current_user_ns(), in->start); 213 out.end = make_kuid(current_user_ns(), in->end); 214 215 return out; 216 } 217 218 static int nla_put_uid_range(struct sk_buff *skb, struct fib_kuid_range *range) 219 { 220 struct fib_rule_uid_range out = { 221 from_kuid_munged(current_user_ns(), range->start), 222 from_kuid_munged(current_user_ns(), range->end) 223 }; 224 225 return nla_put(skb, FRA_UID_RANGE, sizeof(out), &out); 226 } 227 228 static int nla_get_port_range(struct nlattr *pattr, 229 struct fib_rule_port_range *port_range) 230 { 231 const struct fib_rule_port_range *pr = nla_data(pattr); 232 233 if (!fib_rule_port_range_valid(pr)) 234 return -EINVAL; 235 236 port_range->start = pr->start; 237 port_range->end = pr->end; 238 239 return 0; 240 } 241 242 static int nla_put_port_range(struct sk_buff *skb, int attrtype, 243 struct fib_rule_port_range *range) 244 { 245 return nla_put(skb, attrtype, sizeof(*range), range); 246 } 247 248 static int fib_rule_match(struct fib_rule *rule, struct fib_rules_ops *ops, 249 struct flowi *fl, int flags, 250 struct fib_lookup_arg *arg) 251 { 252 int ret = 0; 253 254 if (rule->iifindex && (rule->iifindex != fl->flowi_iif)) 255 goto out; 256 257 if (rule->oifindex && (rule->oifindex != fl->flowi_oif)) 258 goto out; 259 260 if ((rule->mark ^ fl->flowi_mark) & rule->mark_mask) 261 goto out; 262 263 if (rule->tun_id && (rule->tun_id != fl->flowi_tun_key.tun_id)) 264 goto out; 265 266 if (rule->l3mdev && !l3mdev_fib_rule_match(rule->fr_net, fl, arg)) 267 goto out; 268 269 if (uid_lt(fl->flowi_uid, rule->uid_range.start) || 270 uid_gt(fl->flowi_uid, rule->uid_range.end)) 271 goto out; 272 273 ret = ops->match(rule, fl, flags); 274 out: 275 return (rule->flags & FIB_RULE_INVERT) ? !ret : ret; 276 } 277 278 int fib_rules_lookup(struct fib_rules_ops *ops, struct flowi *fl, 279 int flags, struct fib_lookup_arg *arg) 280 { 281 struct fib_rule *rule; 282 int err; 283 284 rcu_read_lock(); 285 286 list_for_each_entry_rcu(rule, &ops->rules_list, list) { 287 jumped: 288 if (!fib_rule_match(rule, ops, fl, flags, arg)) 289 continue; 290 291 if (rule->action == FR_ACT_GOTO) { 292 struct fib_rule *target; 293 294 target = rcu_dereference(rule->ctarget); 295 if (target == NULL) { 296 continue; 297 } else { 298 rule = target; 299 goto jumped; 300 } 301 } else if (rule->action == FR_ACT_NOP) 302 continue; 303 else 304 err = ops->action(rule, fl, flags, arg); 305 306 if (!err && ops->suppress && ops->suppress(rule, arg)) 307 continue; 308 309 if (err != -EAGAIN) { 310 if ((arg->flags & FIB_LOOKUP_NOREF) || 311 likely(refcount_inc_not_zero(&rule->refcnt))) { 312 arg->rule = rule; 313 goto out; 314 } 315 break; 316 } 317 } 318 319 err = -ESRCH; 320 out: 321 rcu_read_unlock(); 322 323 return err; 324 } 325 EXPORT_SYMBOL_GPL(fib_rules_lookup); 326 327 static int call_fib_rule_notifier(struct notifier_block *nb, struct net *net, 328 enum fib_event_type event_type, 329 struct fib_rule *rule, int family) 330 { 331 struct fib_rule_notifier_info info = { 332 .info.family = family, 333 .rule = rule, 334 }; 335 336 return call_fib_notifier(nb, net, event_type, &info.info); 337 } 338 339 static int call_fib_rule_notifiers(struct net *net, 340 enum fib_event_type event_type, 341 struct fib_rule *rule, 342 struct fib_rules_ops *ops, 343 struct netlink_ext_ack *extack) 344 { 345 struct fib_rule_notifier_info info = { 346 .info.family = ops->family, 347 .info.extack = extack, 348 .rule = rule, 349 }; 350 351 ops->fib_rules_seq++; 352 return call_fib_notifiers(net, event_type, &info.info); 353 } 354 355 /* Called with rcu_read_lock() */ 356 int fib_rules_dump(struct net *net, struct notifier_block *nb, int family) 357 { 358 struct fib_rules_ops *ops; 359 struct fib_rule *rule; 360 361 ops = lookup_rules_ops(net, family); 362 if (!ops) 363 return -EAFNOSUPPORT; 364 list_for_each_entry_rcu(rule, &ops->rules_list, list) 365 call_fib_rule_notifier(nb, net, FIB_EVENT_RULE_ADD, rule, 366 family); 367 rules_ops_put(ops); 368 369 return 0; 370 } 371 EXPORT_SYMBOL_GPL(fib_rules_dump); 372 373 unsigned int fib_rules_seq_read(struct net *net, int family) 374 { 375 unsigned int fib_rules_seq; 376 struct fib_rules_ops *ops; 377 378 ASSERT_RTNL(); 379 380 ops = lookup_rules_ops(net, family); 381 if (!ops) 382 return 0; 383 fib_rules_seq = ops->fib_rules_seq; 384 rules_ops_put(ops); 385 386 return fib_rules_seq; 387 } 388 EXPORT_SYMBOL_GPL(fib_rules_seq_read); 389 390 static struct fib_rule *rule_find(struct fib_rules_ops *ops, 391 struct fib_rule_hdr *frh, 392 struct nlattr **tb, 393 struct fib_rule *rule, 394 bool user_priority) 395 { 396 struct fib_rule *r; 397 398 list_for_each_entry(r, &ops->rules_list, list) { 399 if (rule->action && r->action != rule->action) 400 continue; 401 402 if (rule->table && r->table != rule->table) 403 continue; 404 405 if (user_priority && r->pref != rule->pref) 406 continue; 407 408 if (rule->iifname[0] && 409 memcmp(r->iifname, rule->iifname, IFNAMSIZ)) 410 continue; 411 412 if (rule->oifname[0] && 413 memcmp(r->oifname, rule->oifname, IFNAMSIZ)) 414 continue; 415 416 if (rule->mark && r->mark != rule->mark) 417 continue; 418 419 if (rule->suppress_ifgroup != -1 && 420 r->suppress_ifgroup != rule->suppress_ifgroup) 421 continue; 422 423 if (rule->suppress_prefixlen != -1 && 424 r->suppress_prefixlen != rule->suppress_prefixlen) 425 continue; 426 427 if (rule->mark_mask && r->mark_mask != rule->mark_mask) 428 continue; 429 430 if (rule->tun_id && r->tun_id != rule->tun_id) 431 continue; 432 433 if (r->fr_net != rule->fr_net) 434 continue; 435 436 if (rule->l3mdev && r->l3mdev != rule->l3mdev) 437 continue; 438 439 if (uid_range_set(&rule->uid_range) && 440 (!uid_eq(r->uid_range.start, rule->uid_range.start) || 441 !uid_eq(r->uid_range.end, rule->uid_range.end))) 442 continue; 443 444 if (rule->ip_proto && r->ip_proto != rule->ip_proto) 445 continue; 446 447 if (rule->proto && r->proto != rule->proto) 448 continue; 449 450 if (fib_rule_port_range_set(&rule->sport_range) && 451 !fib_rule_port_range_compare(&r->sport_range, 452 &rule->sport_range)) 453 continue; 454 455 if (fib_rule_port_range_set(&rule->dport_range) && 456 !fib_rule_port_range_compare(&r->dport_range, 457 &rule->dport_range)) 458 continue; 459 460 if (!ops->compare(r, frh, tb)) 461 continue; 462 return r; 463 } 464 465 return NULL; 466 } 467 468 #ifdef CONFIG_NET_L3_MASTER_DEV 469 static int fib_nl2rule_l3mdev(struct nlattr *nla, struct fib_rule *nlrule, 470 struct netlink_ext_ack *extack) 471 { 472 nlrule->l3mdev = nla_get_u8(nla); 473 if (nlrule->l3mdev != 1) { 474 NL_SET_ERR_MSG(extack, "Invalid l3mdev attribute"); 475 return -1; 476 } 477 478 return 0; 479 } 480 #else 481 static int fib_nl2rule_l3mdev(struct nlattr *nla, struct fib_rule *nlrule, 482 struct netlink_ext_ack *extack) 483 { 484 NL_SET_ERR_MSG(extack, "l3mdev support is not enabled in kernel"); 485 return -1; 486 } 487 #endif 488 489 static int fib_nl2rule(struct sk_buff *skb, struct nlmsghdr *nlh, 490 struct netlink_ext_ack *extack, 491 struct fib_rules_ops *ops, 492 struct nlattr *tb[], 493 struct fib_rule **rule, 494 bool *user_priority) 495 { 496 struct net *net = sock_net(skb->sk); 497 struct fib_rule_hdr *frh = nlmsg_data(nlh); 498 struct fib_rule *nlrule = NULL; 499 int err = -EINVAL; 500 501 if (frh->src_len) 502 if (!tb[FRA_SRC] || 503 frh->src_len > (ops->addr_size * 8) || 504 nla_len(tb[FRA_SRC]) != ops->addr_size) { 505 NL_SET_ERR_MSG(extack, "Invalid source address"); 506 goto errout; 507 } 508 509 if (frh->dst_len) 510 if (!tb[FRA_DST] || 511 frh->dst_len > (ops->addr_size * 8) || 512 nla_len(tb[FRA_DST]) != ops->addr_size) { 513 NL_SET_ERR_MSG(extack, "Invalid dst address"); 514 goto errout; 515 } 516 517 nlrule = kzalloc(ops->rule_size, GFP_KERNEL); 518 if (!nlrule) { 519 err = -ENOMEM; 520 goto errout; 521 } 522 refcount_set(&nlrule->refcnt, 1); 523 nlrule->fr_net = net; 524 525 if (tb[FRA_PRIORITY]) { 526 nlrule->pref = nla_get_u32(tb[FRA_PRIORITY]); 527 *user_priority = true; 528 } else { 529 nlrule->pref = fib_default_rule_pref(ops); 530 } 531 532 nlrule->proto = tb[FRA_PROTOCOL] ? 533 nla_get_u8(tb[FRA_PROTOCOL]) : RTPROT_UNSPEC; 534 535 if (tb[FRA_IIFNAME]) { 536 struct net_device *dev; 537 538 nlrule->iifindex = -1; 539 nla_strlcpy(nlrule->iifname, tb[FRA_IIFNAME], IFNAMSIZ); 540 dev = __dev_get_by_name(net, nlrule->iifname); 541 if (dev) 542 nlrule->iifindex = dev->ifindex; 543 } 544 545 if (tb[FRA_OIFNAME]) { 546 struct net_device *dev; 547 548 nlrule->oifindex = -1; 549 nla_strlcpy(nlrule->oifname, tb[FRA_OIFNAME], IFNAMSIZ); 550 dev = __dev_get_by_name(net, nlrule->oifname); 551 if (dev) 552 nlrule->oifindex = dev->ifindex; 553 } 554 555 if (tb[FRA_FWMARK]) { 556 nlrule->mark = nla_get_u32(tb[FRA_FWMARK]); 557 if (nlrule->mark) 558 /* compatibility: if the mark value is non-zero all bits 559 * are compared unless a mask is explicitly specified. 560 */ 561 nlrule->mark_mask = 0xFFFFFFFF; 562 } 563 564 if (tb[FRA_FWMASK]) 565 nlrule->mark_mask = nla_get_u32(tb[FRA_FWMASK]); 566 567 if (tb[FRA_TUN_ID]) 568 nlrule->tun_id = nla_get_be64(tb[FRA_TUN_ID]); 569 570 err = -EINVAL; 571 if (tb[FRA_L3MDEV] && 572 fib_nl2rule_l3mdev(tb[FRA_L3MDEV], nlrule, extack) < 0) 573 goto errout_free; 574 575 nlrule->action = frh->action; 576 nlrule->flags = frh->flags; 577 nlrule->table = frh_get_table(frh, tb); 578 if (tb[FRA_SUPPRESS_PREFIXLEN]) 579 nlrule->suppress_prefixlen = nla_get_u32(tb[FRA_SUPPRESS_PREFIXLEN]); 580 else 581 nlrule->suppress_prefixlen = -1; 582 583 if (tb[FRA_SUPPRESS_IFGROUP]) 584 nlrule->suppress_ifgroup = nla_get_u32(tb[FRA_SUPPRESS_IFGROUP]); 585 else 586 nlrule->suppress_ifgroup = -1; 587 588 if (tb[FRA_GOTO]) { 589 if (nlrule->action != FR_ACT_GOTO) { 590 NL_SET_ERR_MSG(extack, "Unexpected goto"); 591 goto errout_free; 592 } 593 594 nlrule->target = nla_get_u32(tb[FRA_GOTO]); 595 /* Backward jumps are prohibited to avoid endless loops */ 596 if (nlrule->target <= nlrule->pref) { 597 NL_SET_ERR_MSG(extack, "Backward goto not supported"); 598 goto errout_free; 599 } 600 } else if (nlrule->action == FR_ACT_GOTO) { 601 NL_SET_ERR_MSG(extack, "Missing goto target for action goto"); 602 goto errout_free; 603 } 604 605 if (nlrule->l3mdev && nlrule->table) { 606 NL_SET_ERR_MSG(extack, "l3mdev and table are mutually exclusive"); 607 goto errout_free; 608 } 609 610 if (tb[FRA_UID_RANGE]) { 611 if (current_user_ns() != net->user_ns) { 612 err = -EPERM; 613 NL_SET_ERR_MSG(extack, "No permission to set uid"); 614 goto errout_free; 615 } 616 617 nlrule->uid_range = nla_get_kuid_range(tb); 618 619 if (!uid_range_set(&nlrule->uid_range) || 620 !uid_lte(nlrule->uid_range.start, nlrule->uid_range.end)) { 621 NL_SET_ERR_MSG(extack, "Invalid uid range"); 622 goto errout_free; 623 } 624 } else { 625 nlrule->uid_range = fib_kuid_range_unset; 626 } 627 628 if (tb[FRA_IP_PROTO]) 629 nlrule->ip_proto = nla_get_u8(tb[FRA_IP_PROTO]); 630 631 if (tb[FRA_SPORT_RANGE]) { 632 err = nla_get_port_range(tb[FRA_SPORT_RANGE], 633 &nlrule->sport_range); 634 if (err) { 635 NL_SET_ERR_MSG(extack, "Invalid sport range"); 636 goto errout_free; 637 } 638 } 639 640 if (tb[FRA_DPORT_RANGE]) { 641 err = nla_get_port_range(tb[FRA_DPORT_RANGE], 642 &nlrule->dport_range); 643 if (err) { 644 NL_SET_ERR_MSG(extack, "Invalid dport range"); 645 goto errout_free; 646 } 647 } 648 649 *rule = nlrule; 650 651 return 0; 652 653 errout_free: 654 kfree(nlrule); 655 errout: 656 return err; 657 } 658 659 static int rule_exists(struct fib_rules_ops *ops, struct fib_rule_hdr *frh, 660 struct nlattr **tb, struct fib_rule *rule) 661 { 662 struct fib_rule *r; 663 664 list_for_each_entry(r, &ops->rules_list, list) { 665 if (r->action != rule->action) 666 continue; 667 668 if (r->table != rule->table) 669 continue; 670 671 if (r->pref != rule->pref) 672 continue; 673 674 if (memcmp(r->iifname, rule->iifname, IFNAMSIZ)) 675 continue; 676 677 if (memcmp(r->oifname, rule->oifname, IFNAMSIZ)) 678 continue; 679 680 if (r->mark != rule->mark) 681 continue; 682 683 if (r->suppress_ifgroup != rule->suppress_ifgroup) 684 continue; 685 686 if (r->suppress_prefixlen != rule->suppress_prefixlen) 687 continue; 688 689 if (r->mark_mask != rule->mark_mask) 690 continue; 691 692 if (r->tun_id != rule->tun_id) 693 continue; 694 695 if (r->fr_net != rule->fr_net) 696 continue; 697 698 if (r->l3mdev != rule->l3mdev) 699 continue; 700 701 if (!uid_eq(r->uid_range.start, rule->uid_range.start) || 702 !uid_eq(r->uid_range.end, rule->uid_range.end)) 703 continue; 704 705 if (r->ip_proto != rule->ip_proto) 706 continue; 707 708 if (r->proto != rule->proto) 709 continue; 710 711 if (!fib_rule_port_range_compare(&r->sport_range, 712 &rule->sport_range)) 713 continue; 714 715 if (!fib_rule_port_range_compare(&r->dport_range, 716 &rule->dport_range)) 717 continue; 718 719 if (!ops->compare(r, frh, tb)) 720 continue; 721 return 1; 722 } 723 return 0; 724 } 725 726 int fib_nl_newrule(struct sk_buff *skb, struct nlmsghdr *nlh, 727 struct netlink_ext_ack *extack) 728 { 729 struct net *net = sock_net(skb->sk); 730 struct fib_rule_hdr *frh = nlmsg_data(nlh); 731 struct fib_rules_ops *ops = NULL; 732 struct fib_rule *rule = NULL, *r, *last = NULL; 733 struct nlattr *tb[FRA_MAX + 1]; 734 int err = -EINVAL, unresolved = 0; 735 bool user_priority = false; 736 737 if (nlh->nlmsg_len < nlmsg_msg_size(sizeof(*frh))) { 738 NL_SET_ERR_MSG(extack, "Invalid msg length"); 739 goto errout; 740 } 741 742 ops = lookup_rules_ops(net, frh->family); 743 if (!ops) { 744 err = -EAFNOSUPPORT; 745 NL_SET_ERR_MSG(extack, "Rule family not supported"); 746 goto errout; 747 } 748 749 err = nlmsg_parse_deprecated(nlh, sizeof(*frh), tb, FRA_MAX, 750 ops->policy, extack); 751 if (err < 0) { 752 NL_SET_ERR_MSG(extack, "Error parsing msg"); 753 goto errout; 754 } 755 756 err = fib_nl2rule(skb, nlh, extack, ops, tb, &rule, &user_priority); 757 if (err) 758 goto errout; 759 760 if (rule_exists(ops, frh, tb, rule)) { 761 if (nlh->nlmsg_flags & NLM_F_EXCL) 762 err = -EEXIST; 763 goto errout_free; 764 } 765 766 err = ops->configure(rule, skb, frh, tb, extack); 767 if (err < 0) 768 goto errout_free; 769 770 err = call_fib_rule_notifiers(net, FIB_EVENT_RULE_ADD, rule, ops, 771 extack); 772 if (err < 0) 773 goto errout_free; 774 775 list_for_each_entry(r, &ops->rules_list, list) { 776 if (r->pref == rule->target) { 777 RCU_INIT_POINTER(rule->ctarget, r); 778 break; 779 } 780 } 781 782 if (rcu_dereference_protected(rule->ctarget, 1) == NULL) 783 unresolved = 1; 784 785 list_for_each_entry(r, &ops->rules_list, list) { 786 if (r->pref > rule->pref) 787 break; 788 last = r; 789 } 790 791 if (last) 792 list_add_rcu(&rule->list, &last->list); 793 else 794 list_add_rcu(&rule->list, &ops->rules_list); 795 796 if (ops->unresolved_rules) { 797 /* 798 * There are unresolved goto rules in the list, check if 799 * any of them are pointing to this new rule. 800 */ 801 list_for_each_entry(r, &ops->rules_list, list) { 802 if (r->action == FR_ACT_GOTO && 803 r->target == rule->pref && 804 rtnl_dereference(r->ctarget) == NULL) { 805 rcu_assign_pointer(r->ctarget, rule); 806 if (--ops->unresolved_rules == 0) 807 break; 808 } 809 } 810 } 811 812 if (rule->action == FR_ACT_GOTO) 813 ops->nr_goto_rules++; 814 815 if (unresolved) 816 ops->unresolved_rules++; 817 818 if (rule->tun_id) 819 ip_tunnel_need_metadata(); 820 821 notify_rule_change(RTM_NEWRULE, rule, ops, nlh, NETLINK_CB(skb).portid); 822 flush_route_cache(ops); 823 rules_ops_put(ops); 824 return 0; 825 826 errout_free: 827 kfree(rule); 828 errout: 829 rules_ops_put(ops); 830 return err; 831 } 832 EXPORT_SYMBOL_GPL(fib_nl_newrule); 833 834 int fib_nl_delrule(struct sk_buff *skb, struct nlmsghdr *nlh, 835 struct netlink_ext_ack *extack) 836 { 837 struct net *net = sock_net(skb->sk); 838 struct fib_rule_hdr *frh = nlmsg_data(nlh); 839 struct fib_rules_ops *ops = NULL; 840 struct fib_rule *rule = NULL, *r, *nlrule = NULL; 841 struct nlattr *tb[FRA_MAX+1]; 842 int err = -EINVAL; 843 bool user_priority = false; 844 845 if (nlh->nlmsg_len < nlmsg_msg_size(sizeof(*frh))) { 846 NL_SET_ERR_MSG(extack, "Invalid msg length"); 847 goto errout; 848 } 849 850 ops = lookup_rules_ops(net, frh->family); 851 if (ops == NULL) { 852 err = -EAFNOSUPPORT; 853 NL_SET_ERR_MSG(extack, "Rule family not supported"); 854 goto errout; 855 } 856 857 err = nlmsg_parse_deprecated(nlh, sizeof(*frh), tb, FRA_MAX, 858 ops->policy, extack); 859 if (err < 0) { 860 NL_SET_ERR_MSG(extack, "Error parsing msg"); 861 goto errout; 862 } 863 864 err = fib_nl2rule(skb, nlh, extack, ops, tb, &nlrule, &user_priority); 865 if (err) 866 goto errout; 867 868 rule = rule_find(ops, frh, tb, nlrule, user_priority); 869 if (!rule) { 870 err = -ENOENT; 871 goto errout; 872 } 873 874 if (rule->flags & FIB_RULE_PERMANENT) { 875 err = -EPERM; 876 goto errout; 877 } 878 879 if (ops->delete) { 880 err = ops->delete(rule); 881 if (err) 882 goto errout; 883 } 884 885 if (rule->tun_id) 886 ip_tunnel_unneed_metadata(); 887 888 list_del_rcu(&rule->list); 889 890 if (rule->action == FR_ACT_GOTO) { 891 ops->nr_goto_rules--; 892 if (rtnl_dereference(rule->ctarget) == NULL) 893 ops->unresolved_rules--; 894 } 895 896 /* 897 * Check if this rule is a target to any of them. If so, 898 * adjust to the next one with the same preference or 899 * disable them. As this operation is eventually very 900 * expensive, it is only performed if goto rules, except 901 * current if it is goto rule, have actually been added. 902 */ 903 if (ops->nr_goto_rules > 0) { 904 struct fib_rule *n; 905 906 n = list_next_entry(rule, list); 907 if (&n->list == &ops->rules_list || n->pref != rule->pref) 908 n = NULL; 909 list_for_each_entry(r, &ops->rules_list, list) { 910 if (rtnl_dereference(r->ctarget) != rule) 911 continue; 912 rcu_assign_pointer(r->ctarget, n); 913 if (!n) 914 ops->unresolved_rules++; 915 } 916 } 917 918 call_fib_rule_notifiers(net, FIB_EVENT_RULE_DEL, rule, ops, 919 NULL); 920 notify_rule_change(RTM_DELRULE, rule, ops, nlh, 921 NETLINK_CB(skb).portid); 922 fib_rule_put(rule); 923 flush_route_cache(ops); 924 rules_ops_put(ops); 925 kfree(nlrule); 926 return 0; 927 928 errout: 929 kfree(nlrule); 930 rules_ops_put(ops); 931 return err; 932 } 933 EXPORT_SYMBOL_GPL(fib_nl_delrule); 934 935 static inline size_t fib_rule_nlmsg_size(struct fib_rules_ops *ops, 936 struct fib_rule *rule) 937 { 938 size_t payload = NLMSG_ALIGN(sizeof(struct fib_rule_hdr)) 939 + nla_total_size(IFNAMSIZ) /* FRA_IIFNAME */ 940 + nla_total_size(IFNAMSIZ) /* FRA_OIFNAME */ 941 + nla_total_size(4) /* FRA_PRIORITY */ 942 + nla_total_size(4) /* FRA_TABLE */ 943 + nla_total_size(4) /* FRA_SUPPRESS_PREFIXLEN */ 944 + nla_total_size(4) /* FRA_SUPPRESS_IFGROUP */ 945 + nla_total_size(4) /* FRA_FWMARK */ 946 + nla_total_size(4) /* FRA_FWMASK */ 947 + nla_total_size_64bit(8) /* FRA_TUN_ID */ 948 + nla_total_size(sizeof(struct fib_kuid_range)) 949 + nla_total_size(1) /* FRA_PROTOCOL */ 950 + nla_total_size(1) /* FRA_IP_PROTO */ 951 + nla_total_size(sizeof(struct fib_rule_port_range)) /* FRA_SPORT_RANGE */ 952 + nla_total_size(sizeof(struct fib_rule_port_range)); /* FRA_DPORT_RANGE */ 953 954 if (ops->nlmsg_payload) 955 payload += ops->nlmsg_payload(rule); 956 957 return payload; 958 } 959 960 static int fib_nl_fill_rule(struct sk_buff *skb, struct fib_rule *rule, 961 u32 pid, u32 seq, int type, int flags, 962 struct fib_rules_ops *ops) 963 { 964 struct nlmsghdr *nlh; 965 struct fib_rule_hdr *frh; 966 967 nlh = nlmsg_put(skb, pid, seq, type, sizeof(*frh), flags); 968 if (nlh == NULL) 969 return -EMSGSIZE; 970 971 frh = nlmsg_data(nlh); 972 frh->family = ops->family; 973 frh->table = rule->table; 974 if (nla_put_u32(skb, FRA_TABLE, rule->table)) 975 goto nla_put_failure; 976 if (nla_put_u32(skb, FRA_SUPPRESS_PREFIXLEN, rule->suppress_prefixlen)) 977 goto nla_put_failure; 978 frh->res1 = 0; 979 frh->res2 = 0; 980 frh->action = rule->action; 981 frh->flags = rule->flags; 982 983 if (nla_put_u8(skb, FRA_PROTOCOL, rule->proto)) 984 goto nla_put_failure; 985 986 if (rule->action == FR_ACT_GOTO && 987 rcu_access_pointer(rule->ctarget) == NULL) 988 frh->flags |= FIB_RULE_UNRESOLVED; 989 990 if (rule->iifname[0]) { 991 if (nla_put_string(skb, FRA_IIFNAME, rule->iifname)) 992 goto nla_put_failure; 993 if (rule->iifindex == -1) 994 frh->flags |= FIB_RULE_IIF_DETACHED; 995 } 996 997 if (rule->oifname[0]) { 998 if (nla_put_string(skb, FRA_OIFNAME, rule->oifname)) 999 goto nla_put_failure; 1000 if (rule->oifindex == -1) 1001 frh->flags |= FIB_RULE_OIF_DETACHED; 1002 } 1003 1004 if ((rule->pref && 1005 nla_put_u32(skb, FRA_PRIORITY, rule->pref)) || 1006 (rule->mark && 1007 nla_put_u32(skb, FRA_FWMARK, rule->mark)) || 1008 ((rule->mark_mask || rule->mark) && 1009 nla_put_u32(skb, FRA_FWMASK, rule->mark_mask)) || 1010 (rule->target && 1011 nla_put_u32(skb, FRA_GOTO, rule->target)) || 1012 (rule->tun_id && 1013 nla_put_be64(skb, FRA_TUN_ID, rule->tun_id, FRA_PAD)) || 1014 (rule->l3mdev && 1015 nla_put_u8(skb, FRA_L3MDEV, rule->l3mdev)) || 1016 (uid_range_set(&rule->uid_range) && 1017 nla_put_uid_range(skb, &rule->uid_range)) || 1018 (fib_rule_port_range_set(&rule->sport_range) && 1019 nla_put_port_range(skb, FRA_SPORT_RANGE, &rule->sport_range)) || 1020 (fib_rule_port_range_set(&rule->dport_range) && 1021 nla_put_port_range(skb, FRA_DPORT_RANGE, &rule->dport_range)) || 1022 (rule->ip_proto && nla_put_u8(skb, FRA_IP_PROTO, rule->ip_proto))) 1023 goto nla_put_failure; 1024 1025 if (rule->suppress_ifgroup != -1) { 1026 if (nla_put_u32(skb, FRA_SUPPRESS_IFGROUP, rule->suppress_ifgroup)) 1027 goto nla_put_failure; 1028 } 1029 1030 if (ops->fill(rule, skb, frh) < 0) 1031 goto nla_put_failure; 1032 1033 nlmsg_end(skb, nlh); 1034 return 0; 1035 1036 nla_put_failure: 1037 nlmsg_cancel(skb, nlh); 1038 return -EMSGSIZE; 1039 } 1040 1041 static int dump_rules(struct sk_buff *skb, struct netlink_callback *cb, 1042 struct fib_rules_ops *ops) 1043 { 1044 int idx = 0; 1045 struct fib_rule *rule; 1046 int err = 0; 1047 1048 rcu_read_lock(); 1049 list_for_each_entry_rcu(rule, &ops->rules_list, list) { 1050 if (idx < cb->args[1]) 1051 goto skip; 1052 1053 err = fib_nl_fill_rule(skb, rule, NETLINK_CB(cb->skb).portid, 1054 cb->nlh->nlmsg_seq, RTM_NEWRULE, 1055 NLM_F_MULTI, ops); 1056 if (err) 1057 break; 1058 skip: 1059 idx++; 1060 } 1061 rcu_read_unlock(); 1062 cb->args[1] = idx; 1063 rules_ops_put(ops); 1064 1065 return err; 1066 } 1067 1068 static int fib_valid_dumprule_req(const struct nlmsghdr *nlh, 1069 struct netlink_ext_ack *extack) 1070 { 1071 struct fib_rule_hdr *frh; 1072 1073 if (nlh->nlmsg_len < nlmsg_msg_size(sizeof(*frh))) { 1074 NL_SET_ERR_MSG(extack, "Invalid header for fib rule dump request"); 1075 return -EINVAL; 1076 } 1077 1078 frh = nlmsg_data(nlh); 1079 if (frh->dst_len || frh->src_len || frh->tos || frh->table || 1080 frh->res1 || frh->res2 || frh->action || frh->flags) { 1081 NL_SET_ERR_MSG(extack, 1082 "Invalid values in header for fib rule dump request"); 1083 return -EINVAL; 1084 } 1085 1086 if (nlmsg_attrlen(nlh, sizeof(*frh))) { 1087 NL_SET_ERR_MSG(extack, "Invalid data after header in fib rule dump request"); 1088 return -EINVAL; 1089 } 1090 1091 return 0; 1092 } 1093 1094 static int fib_nl_dumprule(struct sk_buff *skb, struct netlink_callback *cb) 1095 { 1096 const struct nlmsghdr *nlh = cb->nlh; 1097 struct net *net = sock_net(skb->sk); 1098 struct fib_rules_ops *ops; 1099 int idx = 0, family; 1100 1101 if (cb->strict_check) { 1102 int err = fib_valid_dumprule_req(nlh, cb->extack); 1103 1104 if (err < 0) 1105 return err; 1106 } 1107 1108 family = rtnl_msg_family(nlh); 1109 if (family != AF_UNSPEC) { 1110 /* Protocol specific dump request */ 1111 ops = lookup_rules_ops(net, family); 1112 if (ops == NULL) 1113 return -EAFNOSUPPORT; 1114 1115 dump_rules(skb, cb, ops); 1116 1117 return skb->len; 1118 } 1119 1120 rcu_read_lock(); 1121 list_for_each_entry_rcu(ops, &net->rules_ops, list) { 1122 if (idx < cb->args[0] || !try_module_get(ops->owner)) 1123 goto skip; 1124 1125 if (dump_rules(skb, cb, ops) < 0) 1126 break; 1127 1128 cb->args[1] = 0; 1129 skip: 1130 idx++; 1131 } 1132 rcu_read_unlock(); 1133 cb->args[0] = idx; 1134 1135 return skb->len; 1136 } 1137 1138 static void notify_rule_change(int event, struct fib_rule *rule, 1139 struct fib_rules_ops *ops, struct nlmsghdr *nlh, 1140 u32 pid) 1141 { 1142 struct net *net; 1143 struct sk_buff *skb; 1144 int err = -ENOBUFS; 1145 1146 net = ops->fro_net; 1147 skb = nlmsg_new(fib_rule_nlmsg_size(ops, rule), GFP_KERNEL); 1148 if (skb == NULL) 1149 goto errout; 1150 1151 err = fib_nl_fill_rule(skb, rule, pid, nlh->nlmsg_seq, event, 0, ops); 1152 if (err < 0) { 1153 /* -EMSGSIZE implies BUG in fib_rule_nlmsg_size() */ 1154 WARN_ON(err == -EMSGSIZE); 1155 kfree_skb(skb); 1156 goto errout; 1157 } 1158 1159 rtnl_notify(skb, net, pid, ops->nlgroup, nlh, GFP_KERNEL); 1160 return; 1161 errout: 1162 if (err < 0) 1163 rtnl_set_sk_err(net, ops->nlgroup, err); 1164 } 1165 1166 static void attach_rules(struct list_head *rules, struct net_device *dev) 1167 { 1168 struct fib_rule *rule; 1169 1170 list_for_each_entry(rule, rules, list) { 1171 if (rule->iifindex == -1 && 1172 strcmp(dev->name, rule->iifname) == 0) 1173 rule->iifindex = dev->ifindex; 1174 if (rule->oifindex == -1 && 1175 strcmp(dev->name, rule->oifname) == 0) 1176 rule->oifindex = dev->ifindex; 1177 } 1178 } 1179 1180 static void detach_rules(struct list_head *rules, struct net_device *dev) 1181 { 1182 struct fib_rule *rule; 1183 1184 list_for_each_entry(rule, rules, list) { 1185 if (rule->iifindex == dev->ifindex) 1186 rule->iifindex = -1; 1187 if (rule->oifindex == dev->ifindex) 1188 rule->oifindex = -1; 1189 } 1190 } 1191 1192 1193 static int fib_rules_event(struct notifier_block *this, unsigned long event, 1194 void *ptr) 1195 { 1196 struct net_device *dev = netdev_notifier_info_to_dev(ptr); 1197 struct net *net = dev_net(dev); 1198 struct fib_rules_ops *ops; 1199 1200 ASSERT_RTNL(); 1201 1202 switch (event) { 1203 case NETDEV_REGISTER: 1204 list_for_each_entry(ops, &net->rules_ops, list) 1205 attach_rules(&ops->rules_list, dev); 1206 break; 1207 1208 case NETDEV_CHANGENAME: 1209 list_for_each_entry(ops, &net->rules_ops, list) { 1210 detach_rules(&ops->rules_list, dev); 1211 attach_rules(&ops->rules_list, dev); 1212 } 1213 break; 1214 1215 case NETDEV_UNREGISTER: 1216 list_for_each_entry(ops, &net->rules_ops, list) 1217 detach_rules(&ops->rules_list, dev); 1218 break; 1219 } 1220 1221 return NOTIFY_DONE; 1222 } 1223 1224 static struct notifier_block fib_rules_notifier = { 1225 .notifier_call = fib_rules_event, 1226 }; 1227 1228 static int __net_init fib_rules_net_init(struct net *net) 1229 { 1230 INIT_LIST_HEAD(&net->rules_ops); 1231 spin_lock_init(&net->rules_mod_lock); 1232 return 0; 1233 } 1234 1235 static void __net_exit fib_rules_net_exit(struct net *net) 1236 { 1237 WARN_ON_ONCE(!list_empty(&net->rules_ops)); 1238 } 1239 1240 static struct pernet_operations fib_rules_net_ops = { 1241 .init = fib_rules_net_init, 1242 .exit = fib_rules_net_exit, 1243 }; 1244 1245 static int __init fib_rules_init(void) 1246 { 1247 int err; 1248 rtnl_register(PF_UNSPEC, RTM_NEWRULE, fib_nl_newrule, NULL, 0); 1249 rtnl_register(PF_UNSPEC, RTM_DELRULE, fib_nl_delrule, NULL, 0); 1250 rtnl_register(PF_UNSPEC, RTM_GETRULE, NULL, fib_nl_dumprule, 0); 1251 1252 err = register_pernet_subsys(&fib_rules_net_ops); 1253 if (err < 0) 1254 goto fail; 1255 1256 err = register_netdevice_notifier(&fib_rules_notifier); 1257 if (err < 0) 1258 goto fail_unregister; 1259 1260 return 0; 1261 1262 fail_unregister: 1263 unregister_pernet_subsys(&fib_rules_net_ops); 1264 fail: 1265 rtnl_unregister(PF_UNSPEC, RTM_NEWRULE); 1266 rtnl_unregister(PF_UNSPEC, RTM_DELRULE); 1267 rtnl_unregister(PF_UNSPEC, RTM_GETRULE); 1268 return err; 1269 } 1270 1271 subsys_initcall(fib_rules_init); 1272