net/ipv4/fib_frontend.c

   1 /*
   2  * INET         An implementation of the TCP/IP protocol suite for the LINUX
   3  *              operating system.  INET is implemented using the  BSD Socket
   4  *              interface as the means of communication with the user level.
   5  *
   6  *              IPv4 Forwarding Information Base: FIB frontend.
   7  *
   8  * Version:     $Id: fib_frontend.c,v 1.26 2001/10/31 21:55:54 davem Exp $
   9  *
  10  * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
  11  *
  12  *              This program is free software; you can redistribute it and/or
  13  *              modify it under the terms of the GNU General Public License
  14  *              as published by the Free Software Foundation; either version
  15  *              2 of the License, or (at your option) any later version.
  16  */
  17
  18 #include <linux/module.h>
  19 #include <asm/uaccess.h>
  20 #include <asm/system.h>
  21 #include <linux/bitops.h>
  22 #include <linux/capability.h>
  23 #include <linux/types.h>
  24 #include <linux/kernel.h>
  25 #include <linux/mm.h>
  26 #include <linux/string.h>
  27 #include <linux/socket.h>
  28 #include <linux/sockios.h>
  29 #include <linux/errno.h>
  30 #include <linux/in.h>
  31 #include <linux/inet.h>
  32 #include <linux/inetdevice.h>
  33 #include <linux/netdevice.h>
  34 #include <linux/if_addr.h>
  35 #include <linux/if_arp.h>
  36 #include <linux/skbuff.h>
  37 #include <linux/init.h>
  38 #include <linux/list.h>
  39
  40 #include <net/ip.h>
  41 #include <net/protocol.h>
  42 #include <net/route.h>
  43 #include <net/tcp.h>
  44 #include <net/sock.h>
  45 #include <net/icmp.h>
  46 #include <net/arp.h>
  47 #include <net/ip_fib.h>
  48 #include <net/rtnetlink.h>
  49
  50 #define FFprint(a...) printk(KERN_DEBUG a)
  51
  52 #ifndef CONFIG_IP_MULTIPLE_TABLES
  53
  54 struct fib_table *ip_fib_local_table;
  55 struct fib_table *ip_fib_main_table;
  56
  57 #define FIB_TABLE_HASHSZ 1
  58 static struct hlist_head fib_table_hash[FIB_TABLE_HASHSZ];
  59
  60 #else
  61
  62 #define FIB_TABLE_HASHSZ 256
  63 static struct hlist_head fib_table_hash[FIB_TABLE_HASHSZ];
  64
  65 struct fib_table *fib_new_table(u32 id)
  66 {
  67         struct fib_table *tb;
  68         unsigned int h;
  69
  70         if (id == 0)
  71                 id = RT_TABLE_MAIN;
  72         tb = fib_get_table(id);
  73         if (tb)
  74                 return tb;
  75         tb = fib_hash_init(id);
  76         if (!tb)
  77                 return NULL;
  78         h = id & (FIB_TABLE_HASHSZ - 1);
  79         hlist_add_head_rcu(&tb->tb_hlist, &fib_table_hash[h]);
  80         return tb;
  81 }
  82
  83 struct fib_table *fib_get_table(u32 id)
  84 {
  85         struct fib_table *tb;
  86         struct hlist_node *node;
  87         unsigned int h;
  88
  89         if (id == 0)
  90                 id = RT_TABLE_MAIN;
  91         h = id & (FIB_TABLE_HASHSZ - 1);
  92         rcu_read_lock();
  93         hlist_for_each_entry_rcu(tb, node, &fib_table_hash[h], tb_hlist) {
  94                 if (tb->tb_id == id) {
  95                         rcu_read_unlock();
  96                         return tb;
  97                 }
  98         }
  99         rcu_read_unlock();
 100         return NULL;
 101 }
 102 #endif /* CONFIG_IP_MULTIPLE_TABLES */
 103
 104 static void fib_flush(void)
 105 {
 106         int flushed = 0;
 107         struct fib_table *tb;
 108         struct hlist_node *node;
 109         unsigned int h;
 110
 111         for (h = 0; h < FIB_TABLE_HASHSZ; h++) {
 112                 hlist_for_each_entry(tb, node, &fib_table_hash[h], tb_hlist)
 113                         flushed += tb->tb_flush(tb);
 114         }
 115
 116         if (flushed)
 117                 rt_cache_flush(-1);
 118 }
 119
 120 /*
 121  *      Find the first device with a given source address.
 122  */
 123
 124 struct net_device * ip_dev_find(__be32 addr)
 125 {
 126         struct flowi fl = { .nl_u = { .ip4_u = { .daddr = addr } } };
 127         struct fib_result res;
 128         struct net_device *dev = NULL;
 129
 130 #ifdef CONFIG_IP_MULTIPLE_TABLES
 131         res.r = NULL;
 132 #endif
 133
 134         if (!ip_fib_local_table ||
 135             ip_fib_local_table->tb_lookup(ip_fib_local_table, &fl, &res))
 136                 return NULL;
 137         if (res.type != RTN_LOCAL)
 138                 goto out;
 139         dev = FIB_RES_DEV(res);
 140
 141         if (dev)
 142                 dev_hold(dev);
 143 out:
 144         fib_res_put(&res);
 145         return dev;
 146 }
 147
 148 unsigned inet_addr_type(__be32 addr)
 149 {
 150         struct flowi            fl = { .nl_u = { .ip4_u = { .daddr = addr } } };
 151         struct fib_result       res;
 152         unsigned ret = RTN_BROADCAST;
 153
 154         if (ZERONET(addr) || BADCLASS(addr))
 155                 return RTN_BROADCAST;
 156         if (MULTICAST(addr))
 157                 return RTN_MULTICAST;
 158
 159 #ifdef CONFIG_IP_MULTIPLE_TABLES
 160         res.r = NULL;
 161 #endif
 162
 163         if (ip_fib_local_table) {
 164                 ret = RTN_UNICAST;
 165                 if (!ip_fib_local_table->tb_lookup(ip_fib_local_table,
 166                                                    &fl, &res)) {
 167                         ret = res.type;
 168                         fib_res_put(&res);
 169                 }
 170         }
 171         return ret;
 172 }
 173
 174 /* Given (packet source, input interface) and optional (dst, oif, tos):
 175    - (main) check, that source is valid i.e. not broadcast or our local
 176      address.
 177    - figure out what "logical" interface this packet arrived
 178      and calculate "specific destination" address.
 179    - check, that packet arrived from expected physical interface.
 180  */
 181
 182 int fib_validate_source(__be32 src, __be32 dst, u8 tos, int oif,
 183                         struct net_device *dev, __be32 *spec_dst, u32 *itag)
 184 {
 185         struct in_device *in_dev;
 186         struct flowi fl = { .nl_u = { .ip4_u =
 187                                       { .daddr = src,
 188                                         .saddr = dst,
 189                                         .tos = tos } },
 190                             .iif = oif };
 191         struct fib_result res;
 192         int no_addr, rpf;
 193         int ret;
 194
 195         no_addr = rpf = 0;
 196         rcu_read_lock();
 197         in_dev = __in_dev_get_rcu(dev);
 198         if (in_dev) {
 199                 no_addr = in_dev->ifa_list == NULL;
 200                 rpf = IN_DEV_RPFILTER(in_dev);
 201         }
 202         rcu_read_unlock();
 203
 204         if (in_dev == NULL)
 205                 goto e_inval;
 206
 207         if (fib_lookup(&fl, &res))
 208                 goto last_resort;
 209         if (res.type != RTN_UNICAST)
 210                 goto e_inval_res;
 211         *spec_dst = FIB_RES_PREFSRC(res);
 212         fib_combine_itag(itag, &res);
 213 #ifdef CONFIG_IP_ROUTE_MULTIPATH
 214         if (FIB_RES_DEV(res) == dev || res.fi->fib_nhs > 1)
 215 #else
 216         if (FIB_RES_DEV(res) == dev)
 217 #endif
 218         {
 219                 ret = FIB_RES_NH(res).nh_scope >= RT_SCOPE_HOST;
 220                 fib_res_put(&res);
 221                 return ret;
 222         }
 223         fib_res_put(&res);
 224         if (no_addr)
 225                 goto last_resort;
 226         if (rpf)
 227                 goto e_inval;
 228         fl.oif = dev->ifindex;
 229
 230         ret = 0;
 231         if (fib_lookup(&fl, &res) == 0) {
 232                 if (res.type == RTN_UNICAST) {
 233                         *spec_dst = FIB_RES_PREFSRC(res);
 234                         ret = FIB_RES_NH(res).nh_scope >= RT_SCOPE_HOST;
 235                 }
 236                 fib_res_put(&res);
 237         }
 238         return ret;
 239
 240 last_resort:
 241         if (rpf)
 242                 goto e_inval;
 243         *spec_dst = inet_select_addr(dev, 0, RT_SCOPE_UNIVERSE);
 244         *itag = 0;
 245         return 0;
 246
 247 e_inval_res:
 248         fib_res_put(&res);
 249 e_inval:
 250         return -EINVAL;
 251 }
 252
 253 static inline __be32 sk_extract_addr(struct sockaddr *addr)
 254 {
 255         return ((struct sockaddr_in *) addr)->sin_addr.s_addr;
 256 }
 257
 258 static int put_rtax(struct nlattr *mx, int len, int type, u32 value)
 259 {
 260         struct nlattr *nla;
 261
 262         nla = (struct nlattr *) ((char *) mx + len);
 263         nla->nla_type = type;
 264         nla->nla_len = nla_attr_size(4);
 265         *(u32 *) nla_data(nla) = value;
 266
 267         return len + nla_total_size(4);
 268 }
 269
 270 static int rtentry_to_fib_config(int cmd, struct rtentry *rt,
 271                                  struct fib_config *cfg)
 272 {
 273         __be32 addr;
 274         int plen;
 275
 276         memset(cfg, 0, sizeof(*cfg));
 277
 278         if (rt->rt_dst.sa_family != AF_INET)
 279                 return -EAFNOSUPPORT;
 280
 281         /*
 282          * Check mask for validity:
 283          * a) it must be contiguous.
 284          * b) destination must have all host bits clear.
 285          * c) if application forgot to set correct family (AF_INET),
 286          *    reject request unless it is absolutely clear i.e.
 287          *    both family and mask are zero.
 288          */
 289         plen = 32;
 290         addr = sk_extract_addr(&rt->rt_dst);
 291         if (!(rt->rt_flags & RTF_HOST)) {
 292                 __be32 mask = sk_extract_addr(&rt->rt_genmask);
 293
 294                 if (rt->rt_genmask.sa_family != AF_INET) {
 295                         if (mask || rt->rt_genmask.sa_family)
 296                                 return -EAFNOSUPPORT;
 297                 }
 298
 299                 if (bad_mask(mask, addr))
 300                         return -EINVAL;
 301
 302                 plen = inet_mask_len(mask);
 303         }
 304
 305         cfg->fc_dst_len = plen;
 306         cfg->fc_dst = addr;
 307
 308         if (cmd != SIOCDELRT) {
 309                 cfg->fc_nlflags = NLM_F_CREATE;
 310                 cfg->fc_protocol = RTPROT_BOOT;
 311         }
 312
 313         if (rt->rt_metric)
 314                 cfg->fc_priority = rt->rt_metric - 1;
 315
 316         if (rt->rt_flags & RTF_REJECT) {
 317                 cfg->fc_scope = RT_SCOPE_HOST;
 318                 cfg->fc_type = RTN_UNREACHABLE;
 319                 return 0;
 320         }
 321
 322         cfg->fc_scope = RT_SCOPE_NOWHERE;
 323         cfg->fc_type = RTN_UNICAST;
 324
 325         if (rt->rt_dev) {
 326                 char *colon;
 327                 struct net_device *dev;
 328                 char devname[IFNAMSIZ];
 329
 330                 if (copy_from_user(devname, rt->rt_dev, IFNAMSIZ-1))
 331                         return -EFAULT;
 332
 333                 devname[IFNAMSIZ-1] = 0;
 334                 colon = strchr(devname, ':');
 335                 if (colon)
 336                         *colon = 0;
 337                 dev = __dev_get_by_name(devname);
 338                 if (!dev)
 339                         return -ENODEV;
 340                 cfg->fc_oif = dev->ifindex;
 341                 if (colon) {
 342                         struct in_ifaddr *ifa;
 343                         struct in_device *in_dev = __in_dev_get_rtnl(dev);
 344                         if (!in_dev)
 345                                 return -ENODEV;
 346                         *colon = ':';
 347                         for (ifa = in_dev->ifa_list; ifa; ifa = ifa->ifa_next)
 348                                 if (strcmp(ifa->ifa_label, devname) == 0)
 349                                         break;
 350                         if (ifa == NULL)
 351                                 return -ENODEV;
 352                         cfg->fc_prefsrc = ifa->ifa_local;
 353                 }
 354         }
 355
 356         addr = sk_extract_addr(&rt->rt_gateway);
 357         if (rt->rt_gateway.sa_family == AF_INET && addr) {
 358                 cfg->fc_gw = addr;
 359                 if (rt->rt_flags & RTF_GATEWAY &&
 360                     inet_addr_type(addr) == RTN_UNICAST)
 361                         cfg->fc_scope = RT_SCOPE_UNIVERSE;
 362         }
 363
 364         if (cmd == SIOCDELRT)
 365                 return 0;
 366
 367         if (rt->rt_flags & RTF_GATEWAY && !cfg->fc_gw)
 368                 return -EINVAL;
 369
 370         if (cfg->fc_scope == RT_SCOPE_NOWHERE)
 371                 cfg->fc_scope = RT_SCOPE_LINK;
 372
 373         if (rt->rt_flags & (RTF_MTU | RTF_WINDOW | RTF_IRTT)) {
 374                 struct nlattr *mx;
 375                 int len = 0;
 376
 377                 mx = kzalloc(3 * nla_total_size(4), GFP_KERNEL);
 378                 if (mx == NULL)
 379                         return -ENOMEM;
 380
 381                 if (rt->rt_flags & RTF_MTU)
 382                         len = put_rtax(mx, len, RTAX_ADVMSS, rt->rt_mtu - 40);
 383
 384                 if (rt->rt_flags & RTF_WINDOW)
 385                         len = put_rtax(mx, len, RTAX_WINDOW, rt->rt_window);
 386
 387                 if (rt->rt_flags & RTF_IRTT)
 388                         len = put_rtax(mx, len, RTAX_RTT, rt->rt_irtt << 3);
 389
 390                 cfg->fc_mx = mx;
 391                 cfg->fc_mx_len = len;
 392         }
 393
 394         return 0;
 395 }
 396
 397 /*
 398  *      Handle IP routing ioctl calls. These are used to manipulate the routing tables
 399  */
 400
 401 int ip_rt_ioctl(unsigned int cmd, void __user *arg)
 402 {
 403         struct fib_config cfg;
 404         struct rtentry rt;
 405         int err;
 406
 407         switch (cmd) {
 408         case SIOCADDRT:         /* Add a route */
 409         case SIOCDELRT:         /* Delete a route */
 410                 if (!capable(CAP_NET_ADMIN))
 411                         return -EPERM;
 412
 413                 if (copy_from_user(&rt, arg, sizeof(rt)))
 414                         return -EFAULT;
 415
 416                 rtnl_lock();
 417                 err = rtentry_to_fib_config(cmd, &rt, &cfg);
 418                 if (err == 0) {
 419                         struct fib_table *tb;
 420
 421                         if (cmd == SIOCDELRT) {
 422                                 tb = fib_get_table(cfg.fc_table);
 423                                 if (tb)
 424                                         err = tb->tb_delete(tb, &cfg);
 425                                 else
 426                                         err = -ESRCH;
 427                         } else {
 428                                 tb = fib_new_table(cfg.fc_table);
 429                                 if (tb)
 430                                         err = tb->tb_insert(tb, &cfg);
 431                                 else
 432                                         err = -ENOBUFS;
 433                         }
 434
 435                         /* allocated by rtentry_to_fib_config() */
 436                         kfree(cfg.fc_mx);
 437                 }
 438                 rtnl_unlock();
 439                 return err;
 440         }
 441         return -EINVAL;
 442 }
 443
 444 const struct nla_policy rtm_ipv4_policy[RTA_MAX+1] = {
 445         [RTA_DST]               = { .type = NLA_U32 },
 446         [RTA_SRC]               = { .type = NLA_U32 },
 447         [RTA_IIF]               = { .type = NLA_U32 },
 448         [RTA_OIF]               = { .type = NLA_U32 },
 449         [RTA_GATEWAY]           = { .type = NLA_U32 },
 450         [RTA_PRIORITY]          = { .type = NLA_U32 },
 451         [RTA_PREFSRC]           = { .type = NLA_U32 },
 452         [RTA_METRICS]           = { .type = NLA_NESTED },
 453         [RTA_MULTIPATH]         = { .len = sizeof(struct rtnexthop) },
 454         [RTA_PROTOINFO]         = { .type = NLA_U32 },
 455         [RTA_FLOW]              = { .type = NLA_U32 },
 456 };
 457
 458 static int rtm_to_fib_config(struct sk_buff *skb, struct nlmsghdr *nlh,
 459                              struct fib_config *cfg)
 460 {
 461         struct nlattr *attr;
 462         int err, remaining;
 463         struct rtmsg *rtm;
 464
 465         err = nlmsg_validate(nlh, sizeof(*rtm), RTA_MAX, rtm_ipv4_policy);
 466         if (err < 0)
 467                 goto errout;
 468
 469         memset(cfg, 0, sizeof(*cfg));
 470
 471         rtm = nlmsg_data(nlh);
 472         cfg->fc_dst_len = rtm->rtm_dst_len;
 473         cfg->fc_tos = rtm->rtm_tos;
 474         cfg->fc_table = rtm->rtm_table;
 475         cfg->fc_protocol = rtm->rtm_protocol;
 476         cfg->fc_scope = rtm->rtm_scope;
 477         cfg->fc_type = rtm->rtm_type;
 478         cfg->fc_flags = rtm->rtm_flags;
 479         cfg->fc_nlflags = nlh->nlmsg_flags;
 480
 481         cfg->fc_nlinfo.pid = NETLINK_CB(skb).pid;
 482         cfg->fc_nlinfo.nlh = nlh;
 483
 484         if (cfg->fc_type > RTN_MAX) {
 485                 err = -EINVAL;
 486                 goto errout;
 487         }
 488
 489         nlmsg_for_each_attr(attr, nlh, sizeof(struct rtmsg), remaining) {
 490                 switch (attr->nla_type) {
 491                 case RTA_DST:
 492                         cfg->fc_dst = nla_get_be32(attr);
 493                         break;
 494                 case RTA_OIF:
 495                         cfg->fc_oif = nla_get_u32(attr);
 496                         break;
 497                 case RTA_GATEWAY:
 498                         cfg->fc_gw = nla_get_be32(attr);
 499                         break;
 500                 case RTA_PRIORITY:
 501                         cfg->fc_priority = nla_get_u32(attr);
 502                         break;
 503                 case RTA_PREFSRC:
 504                         cfg->fc_prefsrc = nla_get_be32(attr);
 505                         break;
 506                 case RTA_METRICS:
 507                         cfg->fc_mx = nla_data(attr);
 508                         cfg->fc_mx_len = nla_len(attr);
 509                         break;
 510                 case RTA_MULTIPATH:
 511                         cfg->fc_mp = nla_data(attr);
 512                         cfg->fc_mp_len = nla_len(attr);
 513                         break;
 514                 case RTA_FLOW:
 515                         cfg->fc_flow = nla_get_u32(attr);
 516                         break;
 517                 case RTA_TABLE:
 518                         cfg->fc_table = nla_get_u32(attr);
 519                         break;
 520                 }
 521         }
 522
 523         return 0;
 524 errout:
 525         return err;
 526 }
 527
 528 static int inet_rtm_delroute(struct sk_buff *skb, struct nlmsghdr* nlh, void *arg)
 529 {
 530         struct fib_config cfg;
 531         struct fib_table *tb;
 532         int err;
 533
 534         err = rtm_to_fib_config(skb, nlh, &cfg);
 535         if (err < 0)
 536                 goto errout;
 537
 538         tb = fib_get_table(cfg.fc_table);
 539         if (tb == NULL) {
 540                 err = -ESRCH;
 541                 goto errout;
 542         }
 543
 544         err = tb->tb_delete(tb, &cfg);
 545 errout:
 546         return err;
 547 }
 548
 549 static int inet_rtm_newroute(struct sk_buff *skb, struct nlmsghdr* nlh, void *arg)
 550 {
 551         struct fib_config cfg;
 552         struct fib_table *tb;
 553         int err;
 554
 555         err = rtm_to_fib_config(skb, nlh, &cfg);
 556         if (err < 0)
 557                 goto errout;
 558
 559         tb = fib_new_table(cfg.fc_table);
 560         if (tb == NULL) {
 561                 err = -ENOBUFS;
 562                 goto errout;
 563         }
 564
 565         err = tb->tb_insert(tb, &cfg);
 566 errout:
 567         return err;
 568 }
 569
 570 static int inet_dump_fib(struct sk_buff *skb, struct netlink_callback *cb)
 571 {
 572         unsigned int h, s_h;
 573         unsigned int e = 0, s_e;
 574         struct fib_table *tb;
 575         struct hlist_node *node;
 576         int dumped = 0;
 577
 578         if (nlmsg_len(cb->nlh) >= sizeof(struct rtmsg) &&
 579             ((struct rtmsg *) nlmsg_data(cb->nlh))->rtm_flags & RTM_F_CLONED)
 580                 return ip_rt_dump(skb, cb);
 581
 582         s_h = cb->args[0];
 583         s_e = cb->args[1];
 584
 585         for (h = s_h; h < FIB_TABLE_HASHSZ; h++, s_e = 0) {
 586                 e = 0;
 587                 hlist_for_each_entry(tb, node, &fib_table_hash[h], tb_hlist) {
 588                         if (e < s_e)
 589                                 goto next;
 590                         if (dumped)
 591                                 memset(&cb->args[2], 0, sizeof(cb->args) -
 592                                                  2 * sizeof(cb->args[0]));
 593                         if (tb->tb_dump(tb, skb, cb) < 0)
 594                                 goto out;
 595                         dumped = 1;
 596 next:
 597                         e++;
 598                 }
 599         }
 600 out:
 601         cb->args[1] = e;
 602         cb->args[0] = h;
 603
 604         return skb->len;
 605 }
 606
 607 /* Prepare and feed intra-kernel routing request.
 608    Really, it should be netlink message, but :-( netlink
 609    can be not configured, so that we feed it directly
 610    to fib engine. It is legal, because all events occur
 611    only when netlink is already locked.
 612  */
 613
 614 static void fib_magic(int cmd, int type, __be32 dst, int dst_len, struct in_ifaddr *ifa)
 615 {
 616         struct fib_table *tb;
 617         struct fib_config cfg = {
 618                 .fc_protocol = RTPROT_KERNEL,
 619                 .fc_type = type,
 620                 .fc_dst = dst,
 621                 .fc_dst_len = dst_len,
 622                 .fc_prefsrc = ifa->ifa_local,
 623                 .fc_oif = ifa->ifa_dev->dev->ifindex,
 624                 .fc_nlflags = NLM_F_CREATE | NLM_F_APPEND,
 625         };
 626
 627         if (type == RTN_UNICAST)
 628                 tb = fib_new_table(RT_TABLE_MAIN);
 629         else
 630                 tb = fib_new_table(RT_TABLE_LOCAL);
 631
 632         if (tb == NULL)
 633                 return;
 634
 635         cfg.fc_table = tb->tb_id;
 636
 637         if (type != RTN_LOCAL)
 638                 cfg.fc_scope = RT_SCOPE_LINK;
 639         else
 640                 cfg.fc_scope = RT_SCOPE_HOST;
 641
 642         if (cmd == RTM_NEWROUTE)
 643                 tb->tb_insert(tb, &cfg);
 644         else
 645                 tb->tb_delete(tb, &cfg);
 646 }
 647
 648 void fib_add_ifaddr(struct in_ifaddr *ifa)
 649 {
 650         struct in_device *in_dev = ifa->ifa_dev;
 651         struct net_device *dev = in_dev->dev;
 652         struct in_ifaddr *prim = ifa;
 653         __be32 mask = ifa->ifa_mask;
 654         __be32 addr = ifa->ifa_local;
 655         __be32 prefix = ifa->ifa_address&mask;
 656
 657         if (ifa->ifa_flags&IFA_F_SECONDARY) {
 658                 prim = inet_ifa_byprefix(in_dev, prefix, mask);
 659                 if (prim == NULL) {
 660                         printk(KERN_DEBUG "fib_add_ifaddr: bug: prim == NULL\n");
 661                         return;
 662                 }
 663         }
 664
 665         fib_magic(RTM_NEWROUTE, RTN_LOCAL, addr, 32, prim);
 666
 667         if (!(dev->flags&IFF_UP))
 668                 return;
 669
 670         /* Add broadcast address, if it is explicitly assigned. */
 671         if (ifa->ifa_broadcast && ifa->ifa_broadcast != htonl(0xFFFFFFFF))
 672                 fib_magic(RTM_NEWROUTE, RTN_BROADCAST, ifa->ifa_broadcast, 32, prim);
 673
 674         if (!ZERONET(prefix) && !(ifa->ifa_flags&IFA_F_SECONDARY) &&
 675             (prefix != addr || ifa->ifa_prefixlen < 32)) {
 676                 fib_magic(RTM_NEWROUTE, dev->flags&IFF_LOOPBACK ? RTN_LOCAL :
 677                           RTN_UNICAST, prefix, ifa->ifa_prefixlen, prim);
 678
 679                 /* Add network specific broadcasts, when it takes a sense */
 680                 if (ifa->ifa_prefixlen < 31) {
 681                         fib_magic(RTM_NEWROUTE, RTN_BROADCAST, prefix, 32, prim);
 682                         fib_magic(RTM_NEWROUTE, RTN_BROADCAST, prefix|~mask, 32, prim);
 683                 }
 684         }
 685 }
 686
 687 static void fib_del_ifaddr(struct in_ifaddr *ifa)
 688 {
 689         struct in_device *in_dev = ifa->ifa_dev;
 690         struct net_device *dev = in_dev->dev;
 691         struct in_ifaddr *ifa1;
 692         struct in_ifaddr *prim = ifa;
 693         __be32 brd = ifa->ifa_address|~ifa->ifa_mask;
 694         __be32 any = ifa->ifa_address&ifa->ifa_mask;
 695 #define LOCAL_OK        1
 696 #define BRD_OK          2
 697 #define BRD0_OK         4
 698 #define BRD1_OK         8
 699         unsigned ok = 0;
 700
 701         if (!(ifa->ifa_flags&IFA_F_SECONDARY))
 702                 fib_magic(RTM_DELROUTE, dev->flags&IFF_LOOPBACK ? RTN_LOCAL :
 703                           RTN_UNICAST, any, ifa->ifa_prefixlen, prim);
 704         else {
 705                 prim = inet_ifa_byprefix(in_dev, any, ifa->ifa_mask);
 706                 if (prim == NULL) {
 707                         printk(KERN_DEBUG "fib_del_ifaddr: bug: prim == NULL\n");
 708                         return;
 709                 }
 710         }
 711
 712         /* Deletion is more complicated than add.
 713            We should take care of not to delete too much :-)
 714
 715            Scan address list to be sure that addresses are really gone.
 716          */
 717
 718         for (ifa1 = in_dev->ifa_list; ifa1; ifa1 = ifa1->ifa_next) {
 719                 if (ifa->ifa_local == ifa1->ifa_local)
 720                         ok |= LOCAL_OK;
 721                 if (ifa->ifa_broadcast == ifa1->ifa_broadcast)
 722                         ok |= BRD_OK;
 723                 if (brd == ifa1->ifa_broadcast)
 724                         ok |= BRD1_OK;
 725                 if (any == ifa1->ifa_broadcast)
 726                         ok |= BRD0_OK;
 727         }
 728
 729         if (!(ok&BRD_OK))
 730                 fib_magic(RTM_DELROUTE, RTN_BROADCAST, ifa->ifa_broadcast, 32, prim);
 731         if (!(ok&BRD1_OK))
 732                 fib_magic(RTM_DELROUTE, RTN_BROADCAST, brd, 32, prim);
 733         if (!(ok&BRD0_OK))
 734                 fib_magic(RTM_DELROUTE, RTN_BROADCAST, any, 32, prim);
 735         if (!(ok&LOCAL_OK)) {
 736                 fib_magic(RTM_DELROUTE, RTN_LOCAL, ifa->ifa_local, 32, prim);
 737
 738                 /* Check, that this local address finally disappeared. */
 739                 if (inet_addr_type(ifa->ifa_local) != RTN_LOCAL) {
 740                         /* And the last, but not the least thing.
 741                            We must flush stray FIB entries.
 742
 743                            First of all, we scan fib_info list searching
 744                            for stray nexthop entries, then ignite fib_flush.
 745                         */
 746                         if (fib_sync_down(ifa->ifa_local, NULL, 0))
 747                                 fib_flush();
 748                 }
 749         }
 750 #undef LOCAL_OK
 751 #undef BRD_OK
 752 #undef BRD0_OK
 753 #undef BRD1_OK
 754 }
 755
 756 static void nl_fib_lookup(struct fib_result_nl *frn, struct fib_table *tb )
 757 {
 758
 759         struct fib_result       res;
 760         struct flowi            fl = { .mark = frn->fl_mark,
 761                                        .nl_u = { .ip4_u = { .daddr = frn->fl_addr,
 762                                                             .tos = frn->fl_tos,
 763                                                             .scope = frn->fl_scope } } };
 764
 765 #ifdef CONFIG_IP_MULTIPLE_TABLES
 766         res.r = NULL;
 767 #endif
 768
 769         frn->err = -ENOENT;
 770         if (tb) {
 771                 local_bh_disable();
 772
 773                 frn->tb_id = tb->tb_id;
 774                 frn->err = tb->tb_lookup(tb, &fl, &res);
 775
 776                 if (!frn->err) {
 777                         frn->prefixlen = res.prefixlen;
 778                         frn->nh_sel = res.nh_sel;
 779                         frn->type = res.type;
 780                         frn->scope = res.scope;
 781                         fib_res_put(&res);
 782                 }
 783                 local_bh_enable();
 784         }
 785 }
 786
 787 static void nl_fib_input(struct sock *sk, int len)
 788 {
 789         struct sk_buff *skb = NULL;
 790         struct nlmsghdr *nlh = NULL;
 791         struct fib_result_nl *frn;
 792         u32 pid;
 793         struct fib_table *tb;
 794
 795         skb = skb_dequeue(&sk->sk_receive_queue);
 796         if (skb == NULL)
 797                 return;
 798
 799         nlh = nlmsg_hdr(skb);
 800         if (skb->len < NLMSG_SPACE(0) || skb->len < nlh->nlmsg_len ||
 801             nlh->nlmsg_len < NLMSG_LENGTH(sizeof(*frn))) {
 802                 kfree_skb(skb);
 803                 return;
 804         }
 805
 806         frn = (struct fib_result_nl *) NLMSG_DATA(nlh);
 807         tb = fib_get_table(frn->tb_id_in);
 808
 809         nl_fib_lookup(frn, tb);
 810
 811         pid = NETLINK_CB(skb).pid;       /* pid of sending process */
 812         NETLINK_CB(skb).pid = 0;         /* from kernel */
 813         NETLINK_CB(skb).dst_group = 0;  /* unicast */
 814         netlink_unicast(sk, skb, pid, MSG_DONTWAIT);
 815 }
 816
 817 static void nl_fib_lookup_init(void)
 818 {
 819       netlink_kernel_create(NETLINK_FIB_LOOKUP, 0, nl_fib_input, NULL,
 820                             THIS_MODULE);
 821 }
 822
 823 static void fib_disable_ip(struct net_device *dev, int force)
 824 {
 825         if (fib_sync_down(0, dev, force))
 826                 fib_flush();
 827         rt_cache_flush(0);
 828         arp_ifdown(dev);
 829 }
 830
 831 static int fib_inetaddr_event(struct notifier_block *this, unsigned long event, void *ptr)
 832 {
 833         struct in_ifaddr *ifa = (struct in_ifaddr*)ptr;
 834
 835         switch (event) {
 836         case NETDEV_UP:
 837                 fib_add_ifaddr(ifa);
 838 #ifdef CONFIG_IP_ROUTE_MULTIPATH
 839                 fib_sync_up(ifa->ifa_dev->dev);
 840 #endif
 841                 rt_cache_flush(-1);
 842                 break;
 843         case NETDEV_DOWN:
 844                 fib_del_ifaddr(ifa);
 845                 if (ifa->ifa_dev->ifa_list == NULL) {
 846                         /* Last address was deleted from this interface.
 847                            Disable IP.
 848                          */
 849                         fib_disable_ip(ifa->ifa_dev->dev, 1);
 850                 } else {
 851                         rt_cache_flush(-1);
 852                 }
 853                 break;
 854         }
 855         return NOTIFY_DONE;
 856 }
 857
 858 static int fib_netdev_event(struct notifier_block *this, unsigned long event, void *ptr)
 859 {
 860         struct net_device *dev = ptr;
 861         struct in_device *in_dev = __in_dev_get_rtnl(dev);
 862
 863         if (event == NETDEV_UNREGISTER) {
 864                 fib_disable_ip(dev, 2);
 865                 return NOTIFY_DONE;
 866         }
 867
 868         if (!in_dev)
 869                 return NOTIFY_DONE;
 870
 871         switch (event) {
 872         case NETDEV_UP:
 873                 for_ifa(in_dev) {
 874                         fib_add_ifaddr(ifa);
 875                 } endfor_ifa(in_dev);
 876 #ifdef CONFIG_IP_ROUTE_MULTIPATH
 877                 fib_sync_up(dev);
 878 #endif
 879                 rt_cache_flush(-1);
 880                 break;
 881         case NETDEV_DOWN:
 882                 fib_disable_ip(dev, 0);
 883                 break;
 884         case NETDEV_CHANGEMTU:
 885         case NETDEV_CHANGE:
 886                 rt_cache_flush(0);
 887                 break;
 888         }
 889         return NOTIFY_DONE;
 890 }
 891
 892 static struct notifier_block fib_inetaddr_notifier = {
 893         .notifier_call =fib_inetaddr_event,
 894 };
 895
 896 static struct notifier_block fib_netdev_notifier = {
 897         .notifier_call =fib_netdev_event,
 898 };
 899
 900 void __init ip_fib_init(void)
 901 {
 902         unsigned int i;
 903
 904         for (i = 0; i < FIB_TABLE_HASHSZ; i++)
 905                 INIT_HLIST_HEAD(&fib_table_hash[i]);
 906 #ifndef CONFIG_IP_MULTIPLE_TABLES
 907         ip_fib_local_table = fib_hash_init(RT_TABLE_LOCAL);
 908         hlist_add_head_rcu(&ip_fib_local_table->tb_hlist, &fib_table_hash[0]);
 909         ip_fib_main_table  = fib_hash_init(RT_TABLE_MAIN);
 910         hlist_add_head_rcu(&ip_fib_main_table->tb_hlist, &fib_table_hash[0]);
 911 #else
 912         fib4_rules_init();
 913 #endif
 914
 915         register_netdevice_notifier(&fib_netdev_notifier);
 916         register_inetaddr_notifier(&fib_inetaddr_notifier);
 917         nl_fib_lookup_init();
 918
 919         rtnl_register(PF_INET, RTM_NEWROUTE, inet_rtm_newroute, NULL);
 920         rtnl_register(PF_INET, RTM_DELROUTE, inet_rtm_delroute, NULL);
 921         rtnl_register(PF_INET, RTM_GETROUTE, NULL, inet_dump_fib);
 922 }
 923
 924 EXPORT_SYMBOL(inet_addr_type);
 925 EXPORT_SYMBOL(ip_dev_find);