net/decnet/dn_fib.c

   1 /*
   2  * DECnet       An implementation of the DECnet protocol suite for the LINUX
   3  *              operating system.  DECnet is implemented using the  BSD Socket
   4  *              interface as the means of communication with the user level.
   5  *
   6  *              DECnet Routing Forwarding Information Base (Glue/Info List)
   7  *
   8  * Author:      Steve Whitehouse <SteveW@ACM.org>
   9  *
  10  *
  11  * Changes:
  12  *              Alexey Kuznetsov : SMP locking changes
  13  *              Steve Whitehouse : Rewrote it... Well to be more correct, I
  14  *                                 copied most of it from the ipv4 fib code.
  15  *              Steve Whitehouse : Updated it in style and fixed a few bugs
  16  *                                 which were fixed in the ipv4 code since
  17  *                                 this code was copied from it.
  18  *
  19  */
  20 #include <linux/config.h>
  21 #include <linux/string.h>
  22 #include <linux/net.h>
  23 #include <linux/socket.h>
  24 #include <linux/sockios.h>
  25 #include <linux/init.h>
  26 #include <linux/skbuff.h>
  27 #include <linux/netlink.h>
  28 #include <linux/rtnetlink.h>
  29 #include <linux/proc_fs.h>
  30 #include <linux/netdevice.h>
  31 #include <linux/timer.h>
  32 #include <linux/spinlock.h>
  33 #include <asm/atomic.h>
  34 #include <asm/uaccess.h>
  35 #include <net/neighbour.h>
  36 #include <net/dst.h>
  37 #include <net/flow.h>
  38 #include <net/dn.h>
  39 #include <net/dn_route.h>
  40 #include <net/dn_fib.h>
  41 #include <net/dn_neigh.h>
  42 #include <net/dn_dev.h>
  43
  44 #define RT_MIN_TABLE 1
  45
  46 #define for_fib_info() { struct dn_fib_info *fi;\
  47         for(fi = dn_fib_info_list; fi; fi = fi->fib_next)
  48 #define endfor_fib_info() }
  49
  50 #define for_nexthops(fi) { int nhsel; const struct dn_fib_nh *nh;\
  51         for(nhsel = 0, nh = (fi)->fib_nh; nhsel < (fi)->fib_nhs; nh++, nhsel++)
  52
  53 #define change_nexthops(fi) { int nhsel; struct dn_fib_nh *nh;\
  54         for(nhsel = 0, nh = (struct dn_fib_nh *)((fi)->fib_nh); nhsel < (fi)->fib_nhs; nh++, nhsel++)
  55
  56 #define endfor_nexthops(fi) }
  57
  58 extern int dn_cache_dump(struct sk_buff *skb, struct netlink_callback *cb);
  59
  60 static DEFINE_SPINLOCK(dn_fib_multipath_lock);
  61 static struct dn_fib_info *dn_fib_info_list;
  62 static DEFINE_RWLOCK(dn_fib_info_lock);
  63
  64 static struct
  65 {
  66         int error;
  67         u8 scope;
  68 } dn_fib_props[RTA_MAX+1] = {
  69         [RTN_UNSPEC] =      { .error = 0,       .scope = RT_SCOPE_NOWHERE },
  70         [RTN_UNICAST] =     { .error = 0,       .scope = RT_SCOPE_UNIVERSE },
  71         [RTN_LOCAL] =       { .error = 0,       .scope = RT_SCOPE_HOST },
  72         [RTN_BROADCAST] =   { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
  73         [RTN_ANYCAST] =     { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
  74         [RTN_MULTICAST] =   { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
  75         [RTN_BLACKHOLE] =   { .error = -EINVAL, .scope = RT_SCOPE_UNIVERSE },
  76         [RTN_UNREACHABLE] = { .error = -EHOSTUNREACH, .scope = RT_SCOPE_UNIVERSE },
  77         [RTN_PROHIBIT] =    { .error = -EACCES, .scope = RT_SCOPE_UNIVERSE },
  78         [RTN_THROW] =       { .error = -EAGAIN, .scope = RT_SCOPE_UNIVERSE },
  79         [RTN_NAT] =         { .error = 0,       .scope = RT_SCOPE_NOWHERE },
  80         [RTN_XRESOLVE] =    { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
  81 };
  82
  83 void dn_fib_free_info(struct dn_fib_info *fi)
  84 {
  85         if (fi->fib_dead == 0) {
  86                 printk(KERN_DEBUG "DECnet: BUG! Attempt to free alive dn_fib_info\n");
  87                 return;
  88         }
  89
  90         change_nexthops(fi) {
  91                 if (nh->nh_dev)
  92                         dev_put(nh->nh_dev);
  93                 nh->nh_dev = NULL;
  94         } endfor_nexthops(fi);
  95         kfree(fi);
  96 }
  97
  98 void dn_fib_release_info(struct dn_fib_info *fi)
  99 {
 100         write_lock(&dn_fib_info_lock);
 101         if (fi && --fi->fib_treeref == 0) {
 102                 if (fi->fib_next)
 103                         fi->fib_next->fib_prev = fi->fib_prev;
 104                 if (fi->fib_prev)
 105                         fi->fib_prev->fib_next = fi->fib_next;
 106                 if (fi == dn_fib_info_list)
 107                         dn_fib_info_list = fi->fib_next;
 108                 fi->fib_dead = 1;
 109                 dn_fib_info_put(fi);
 110         }
 111         write_unlock(&dn_fib_info_lock);
 112 }
 113
 114 static inline int dn_fib_nh_comp(const struct dn_fib_info *fi, const struct dn_fib_info *ofi)
 115 {
 116         const struct dn_fib_nh *onh = ofi->fib_nh;
 117
 118         for_nexthops(fi) {
 119                 if (nh->nh_oif != onh->nh_oif ||
 120                         nh->nh_gw != onh->nh_gw ||
 121                         nh->nh_scope != onh->nh_scope ||
 122                         nh->nh_weight != onh->nh_weight ||
 123                         ((nh->nh_flags^onh->nh_flags)&~RTNH_F_DEAD))
 124                                 return -1;
 125                 onh++;
 126         } endfor_nexthops(fi);
 127         return 0;
 128 }
 129
 130 static inline struct dn_fib_info *dn_fib_find_info(const struct dn_fib_info *nfi)
 131 {
 132         for_fib_info() {
 133                 if (fi->fib_nhs != nfi->fib_nhs)
 134                         continue;
 135                 if (nfi->fib_protocol == fi->fib_protocol &&
 136                         nfi->fib_prefsrc == fi->fib_prefsrc &&
 137                         nfi->fib_priority == fi->fib_priority &&
 138                         memcmp(nfi->fib_metrics, fi->fib_metrics, sizeof(fi->fib_metrics)) == 0 &&
 139                         ((nfi->fib_flags^fi->fib_flags)&~RTNH_F_DEAD) == 0 &&
 140                         (nfi->fib_nhs == 0 || dn_fib_nh_comp(fi, nfi) == 0))
 141                                 return fi;
 142         } endfor_fib_info();
 143         return NULL;
 144 }
 145
 146 __le16 dn_fib_get_attr16(struct rtattr *attr, int attrlen, int type)
 147 {
 148         while(RTA_OK(attr,attrlen)) {
 149                 if (attr->rta_type == type)
 150                         return *(__le16*)RTA_DATA(attr);
 151                 attr = RTA_NEXT(attr, attrlen);
 152         }
 153
 154         return 0;
 155 }
 156
 157 static int dn_fib_count_nhs(struct rtattr *rta)
 158 {
 159         int nhs = 0;
 160         struct rtnexthop *nhp = RTA_DATA(rta);
 161         int nhlen = RTA_PAYLOAD(rta);
 162
 163         while(nhlen >= (int)sizeof(struct rtnexthop)) {
 164                 if ((nhlen -= nhp->rtnh_len) < 0)
 165                         return 0;
 166                 nhs++;
 167                 nhp = RTNH_NEXT(nhp);
 168         }
 169
 170         return nhs;
 171 }
 172
 173 static int dn_fib_get_nhs(struct dn_fib_info *fi, const struct rtattr *rta, const struct rtmsg *r)
 174 {
 175         struct rtnexthop *nhp = RTA_DATA(rta);
 176         int nhlen = RTA_PAYLOAD(rta);
 177
 178         change_nexthops(fi) {
 179                 int attrlen = nhlen - sizeof(struct rtnexthop);
 180                 if (attrlen < 0 || (nhlen -= nhp->rtnh_len) < 0)
 181                         return -EINVAL;
 182
 183                 nh->nh_flags  = (r->rtm_flags&~0xFF) | nhp->rtnh_flags;
 184                 nh->nh_oif    = nhp->rtnh_ifindex;
 185                 nh->nh_weight = nhp->rtnh_hops + 1;
 186
 187                 if (attrlen) {
 188                         nh->nh_gw = dn_fib_get_attr16(RTNH_DATA(nhp), attrlen, RTA_GATEWAY);
 189                 }
 190                 nhp = RTNH_NEXT(nhp);
 191         } endfor_nexthops(fi);
 192
 193         return 0;
 194 }
 195
 196
 197 static int dn_fib_check_nh(const struct rtmsg *r, struct dn_fib_info *fi, struct dn_fib_nh *nh)
 198 {
 199         int err;
 200
 201         if (nh->nh_gw) {
 202                 struct flowi fl;
 203                 struct dn_fib_res res;
 204
 205                 memset(&fl, 0, sizeof(fl));
 206
 207                 if (nh->nh_flags&RTNH_F_ONLINK) {
 208                         struct net_device *dev;
 209
 210                         if (r->rtm_scope >= RT_SCOPE_LINK)
 211                                 return -EINVAL;
 212                         if (dnet_addr_type(nh->nh_gw) != RTN_UNICAST)
 213                                 return -EINVAL;
 214                         if ((dev = __dev_get_by_index(nh->nh_oif)) == NULL)
 215                                 return -ENODEV;
 216                         if (!(dev->flags&IFF_UP))
 217                                 return -ENETDOWN;
 218                         nh->nh_dev = dev;
 219                         dev_hold(dev);
 220                         nh->nh_scope = RT_SCOPE_LINK;
 221                         return 0;
 222                 }
 223
 224                 memset(&fl, 0, sizeof(fl));
 225                 fl.fld_dst = nh->nh_gw;
 226                 fl.oif = nh->nh_oif;
 227                 fl.fld_scope = r->rtm_scope + 1;
 228
 229                 if (fl.fld_scope < RT_SCOPE_LINK)
 230                         fl.fld_scope = RT_SCOPE_LINK;
 231
 232                 if ((err = dn_fib_lookup(&fl, &res)) != 0)
 233                         return err;
 234
 235                 err = -EINVAL;
 236                 if (res.type != RTN_UNICAST && res.type != RTN_LOCAL)
 237                         goto out;
 238                 nh->nh_scope = res.scope;
 239                 nh->nh_oif = DN_FIB_RES_OIF(res);
 240                 nh->nh_dev = DN_FIB_RES_DEV(res);
 241                 if (nh->nh_dev == NULL)
 242                         goto out;
 243                 dev_hold(nh->nh_dev);
 244                 err = -ENETDOWN;
 245                 if (!(nh->nh_dev->flags & IFF_UP))
 246                         goto out;
 247                 err = 0;
 248 out:
 249                 dn_fib_res_put(&res);
 250                 return err;
 251         } else {
 252                 struct net_device *dev;
 253
 254                 if (nh->nh_flags&(RTNH_F_PERVASIVE|RTNH_F_ONLINK))
 255                         return -EINVAL;
 256
 257                 dev = __dev_get_by_index(nh->nh_oif);
 258                 if (dev == NULL || dev->dn_ptr == NULL)
 259                         return -ENODEV;
 260                 if (!(dev->flags&IFF_UP))
 261                         return -ENETDOWN;
 262                 nh->nh_dev = dev;
 263                 dev_hold(nh->nh_dev);
 264                 nh->nh_scope = RT_SCOPE_HOST;
 265         }
 266
 267         return 0;
 268 }
 269
 270
 271 struct dn_fib_info *dn_fib_create_info(const struct rtmsg *r, struct dn_kern_rta *rta, const struct nlmsghdr *nlh, int *errp)
 272 {
 273         int err;
 274         struct dn_fib_info *fi = NULL;
 275         struct dn_fib_info *ofi;
 276         int nhs = 1;
 277
 278         if (dn_fib_props[r->rtm_type].scope > r->rtm_scope)
 279                 goto err_inval;
 280
 281         if (rta->rta_mp) {
 282                 nhs = dn_fib_count_nhs(rta->rta_mp);
 283                 if (nhs == 0)
 284                         goto err_inval;
 285         }
 286
 287         fi = kmalloc(sizeof(*fi)+nhs*sizeof(struct dn_fib_nh), GFP_KERNEL);
 288         err = -ENOBUFS;
 289         if (fi == NULL)
 290                 goto failure;
 291         memset(fi, 0, sizeof(*fi)+nhs*sizeof(struct dn_fib_nh));
 292
 293         fi->fib_protocol = r->rtm_protocol;
 294         fi->fib_nhs = nhs;
 295         fi->fib_flags = r->rtm_flags;
 296         if (rta->rta_priority)
 297                 fi->fib_priority = *rta->rta_priority;
 298         if (rta->rta_mx) {
 299                 int attrlen = RTA_PAYLOAD(rta->rta_mx);
 300                 struct rtattr *attr = RTA_DATA(rta->rta_mx);
 301
 302                 while(RTA_OK(attr, attrlen)) {
 303                         unsigned flavour = attr->rta_type;
 304                         if (flavour) {
 305                                 if (flavour > RTAX_MAX)
 306                                         goto err_inval;
 307                                 fi->fib_metrics[flavour-1] = *(unsigned*)RTA_DATA(attr);
 308                         }
 309                         attr = RTA_NEXT(attr, attrlen);
 310                 }
 311         }
 312         if (rta->rta_prefsrc)
 313                 memcpy(&fi->fib_prefsrc, rta->rta_prefsrc, 2);
 314
 315         if (rta->rta_mp) {
 316                 if ((err = dn_fib_get_nhs(fi, rta->rta_mp, r)) != 0)
 317                         goto failure;
 318                 if (rta->rta_oif && fi->fib_nh->nh_oif != *rta->rta_oif)
 319                         goto err_inval;
 320                 if (rta->rta_gw && memcmp(&fi->fib_nh->nh_gw, rta->rta_gw, 2))
 321                         goto err_inval;
 322         } else {
 323                 struct dn_fib_nh *nh = fi->fib_nh;
 324                 if (rta->rta_oif)
 325                         nh->nh_oif = *rta->rta_oif;
 326                 if (rta->rta_gw)
 327                         memcpy(&nh->nh_gw, rta->rta_gw, 2);
 328                 nh->nh_flags = r->rtm_flags;
 329                 nh->nh_weight = 1;
 330         }
 331
 332         if (r->rtm_type == RTN_NAT) {
 333                 if (rta->rta_gw == NULL || nhs != 1 || rta->rta_oif)
 334                         goto err_inval;
 335                 memcpy(&fi->fib_nh->nh_gw, rta->rta_gw, 2);
 336                 goto link_it;
 337         }
 338
 339         if (dn_fib_props[r->rtm_type].error) {
 340                 if (rta->rta_gw || rta->rta_oif || rta->rta_mp)
 341                         goto err_inval;
 342                 goto link_it;
 343         }
 344
 345         if (r->rtm_scope > RT_SCOPE_HOST)
 346                 goto err_inval;
 347
 348         if (r->rtm_scope == RT_SCOPE_HOST) {
 349                 struct dn_fib_nh *nh = fi->fib_nh;
 350
 351                 /* Local address is added */
 352                 if (nhs != 1 || nh->nh_gw)
 353                         goto err_inval;
 354                 nh->nh_scope = RT_SCOPE_NOWHERE;
 355                 nh->nh_dev = dev_get_by_index(fi->fib_nh->nh_oif);
 356                 err = -ENODEV;
 357                 if (nh->nh_dev == NULL)
 358                         goto failure;
 359         } else {
 360                 change_nexthops(fi) {
 361                         if ((err = dn_fib_check_nh(r, fi, nh)) != 0)
 362                                 goto failure;
 363                 } endfor_nexthops(fi)
 364         }
 365
 366         if (fi->fib_prefsrc) {
 367                 if (r->rtm_type != RTN_LOCAL || rta->rta_dst == NULL ||
 368                     memcmp(&fi->fib_prefsrc, rta->rta_dst, 2))
 369                         if (dnet_addr_type(fi->fib_prefsrc) != RTN_LOCAL)
 370                                 goto err_inval;
 371         }
 372
 373 link_it:
 374         if ((ofi = dn_fib_find_info(fi)) != NULL) {
 375                 fi->fib_dead = 1;
 376                 dn_fib_free_info(fi);
 377                 ofi->fib_treeref++;
 378                 return ofi;
 379         }
 380
 381         fi->fib_treeref++;
 382         atomic_inc(&fi->fib_clntref);
 383         write_lock(&dn_fib_info_lock);
 384         fi->fib_next = dn_fib_info_list;
 385         fi->fib_prev = NULL;
 386         if (dn_fib_info_list)
 387                 dn_fib_info_list->fib_prev = fi;
 388         dn_fib_info_list = fi;
 389         write_unlock(&dn_fib_info_lock);
 390         return fi;
 391
 392 err_inval:
 393         err = -EINVAL;
 394
 395 failure:
 396         *errp = err;
 397         if (fi) {
 398                 fi->fib_dead = 1;
 399                 dn_fib_free_info(fi);
 400         }
 401
 402         return NULL;
 403 }
 404
 405 int dn_fib_semantic_match(int type, struct dn_fib_info *fi, const struct flowi *fl, struct dn_fib_res *res)
 406 {
 407         int err = dn_fib_props[type].error;
 408
 409         if (err == 0) {
 410                 if (fi->fib_flags & RTNH_F_DEAD)
 411                         return 1;
 412
 413                 res->fi = fi;
 414
 415                 switch(type) {
 416                         case RTN_NAT:
 417                                 DN_FIB_RES_RESET(*res);
 418                                 atomic_inc(&fi->fib_clntref);
 419                                 return 0;
 420                         case RTN_UNICAST:
 421                         case RTN_LOCAL:
 422                                 for_nexthops(fi) {
 423                                         if (nh->nh_flags & RTNH_F_DEAD)
 424                                                 continue;
 425                                         if (!fl->oif || fl->oif == nh->nh_oif)
 426                                                 break;
 427                                 }
 428                                 if (nhsel < fi->fib_nhs) {
 429                                         res->nh_sel = nhsel;
 430                                         atomic_inc(&fi->fib_clntref);
 431                                         return 0;
 432                                 }
 433                                 endfor_nexthops(fi);
 434                                 res->fi = NULL;
 435                                 return 1;
 436                         default:
 437                                 if (net_ratelimit())
 438                                          printk("DECnet: impossible routing event : dn_fib_semantic_match type=%d\n", type);
 439                                 res->fi = NULL;
 440                                 return -EINVAL;
 441                 }
 442         }
 443         return err;
 444 }
 445
 446 void dn_fib_select_multipath(const struct flowi *fl, struct dn_fib_res *res)
 447 {
 448         struct dn_fib_info *fi = res->fi;
 449         int w;
 450
 451         spin_lock_bh(&dn_fib_multipath_lock);
 452         if (fi->fib_power <= 0) {
 453                 int power = 0;
 454                 change_nexthops(fi) {
 455                         if (!(nh->nh_flags&RTNH_F_DEAD)) {
 456                                 power += nh->nh_weight;
 457                                 nh->nh_power = nh->nh_weight;
 458                         }
 459                 } endfor_nexthops(fi);
 460                 fi->fib_power = power;
 461                 if (power < 0) {
 462                         spin_unlock_bh(&dn_fib_multipath_lock);
 463                         res->nh_sel = 0;
 464                         return;
 465                 }
 466         }
 467
 468         w = jiffies % fi->fib_power;
 469
 470         change_nexthops(fi) {
 471                 if (!(nh->nh_flags&RTNH_F_DEAD) && nh->nh_power) {
 472                         if ((w -= nh->nh_power) <= 0) {
 473                                 nh->nh_power--;
 474                                 fi->fib_power--;
 475                                 res->nh_sel = nhsel;
 476                                 spin_unlock_bh(&dn_fib_multipath_lock);
 477                                 return;
 478                         }
 479                 }
 480         } endfor_nexthops(fi);
 481         res->nh_sel = 0;
 482         spin_unlock_bh(&dn_fib_multipath_lock);
 483 }
 484
 485
 486 static int dn_fib_check_attr(struct rtmsg *r, struct rtattr **rta)
 487 {
 488         int i;
 489
 490         for(i = 1; i <= RTA_MAX; i++) {
 491                 struct rtattr *attr = rta[i-1];
 492                 if (attr) {
 493                         if (RTA_PAYLOAD(attr) < 4 && RTA_PAYLOAD(attr) != 2)
 494                                 return -EINVAL;
 495                         if (i != RTA_MULTIPATH && i != RTA_METRICS)
 496                                 rta[i-1] = (struct rtattr *)RTA_DATA(attr);
 497                 }
 498         }
 499
 500         return 0;
 501 }
 502
 503 int dn_fib_rtm_delroute(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
 504 {
 505         struct dn_fib_table *tb;
 506         struct rtattr **rta = arg;
 507         struct rtmsg *r = NLMSG_DATA(nlh);
 508
 509         if (dn_fib_check_attr(r, rta))
 510                 return -EINVAL;
 511
 512         tb = dn_fib_get_table(r->rtm_table, 0);
 513         if (tb)
 514                 return tb->delete(tb, r, (struct dn_kern_rta *)rta, nlh, &NETLINK_CB(skb));
 515
 516         return -ESRCH;
 517 }
 518
 519 int dn_fib_rtm_newroute(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
 520 {
 521         struct dn_fib_table *tb;
 522         struct rtattr **rta = arg;
 523         struct rtmsg *r = NLMSG_DATA(nlh);
 524
 525         if (dn_fib_check_attr(r, rta))
 526                 return -EINVAL;
 527
 528         tb = dn_fib_get_table(r->rtm_table, 1);
 529         if (tb)
 530                 return tb->insert(tb, r, (struct dn_kern_rta *)rta, nlh, &NETLINK_CB(skb));
 531
 532         return -ENOBUFS;
 533 }
 534
 535
 536 int dn_fib_dump(struct sk_buff *skb, struct netlink_callback *cb)
 537 {
 538         int t;
 539         int s_t;
 540         struct dn_fib_table *tb;
 541
 542         if (NLMSG_PAYLOAD(cb->nlh, 0) >= sizeof(struct rtmsg) &&
 543                 ((struct rtmsg *)NLMSG_DATA(cb->nlh))->rtm_flags&RTM_F_CLONED)
 544                         return dn_cache_dump(skb, cb);
 545
 546         s_t = cb->args[0];
 547         if (s_t == 0)
 548                 s_t = cb->args[0] = RT_MIN_TABLE;
 549
 550         for(t = s_t; t <= RT_TABLE_MAX; t++) {
 551                 if (t < s_t)
 552                         continue;
 553                 if (t > s_t)
 554                         memset(&cb->args[1], 0,
 555                                sizeof(cb->args) - sizeof(cb->args[0]));
 556                 tb = dn_fib_get_table(t, 0);
 557                 if (tb == NULL)
 558                         continue;
 559                 if (tb->dump(tb, skb, cb) < 0)
 560                         break;
 561         }
 562
 563         cb->args[0] = t;
 564
 565         return skb->len;
 566 }
 567
 568 static void fib_magic(int cmd, int type, __le16 dst, int dst_len, struct dn_ifaddr *ifa)
 569 {
 570         struct dn_fib_table *tb;
 571         struct {
 572                 struct nlmsghdr nlh;
 573                 struct rtmsg rtm;
 574         } req;
 575         struct dn_kern_rta rta;
 576
 577         memset(&req.rtm, 0, sizeof(req.rtm));
 578         memset(&rta, 0, sizeof(rta));
 579
 580         if (type == RTN_UNICAST)
 581                 tb = dn_fib_get_table(RT_MIN_TABLE, 1);
 582         else
 583                 tb = dn_fib_get_table(RT_TABLE_LOCAL, 1);
 584
 585         if (tb == NULL)
 586                 return;
 587
 588         req.nlh.nlmsg_len = sizeof(req);
 589         req.nlh.nlmsg_type = cmd;
 590         req.nlh.nlmsg_flags = NLM_F_REQUEST|NLM_F_CREATE|NLM_F_APPEND;
 591         req.nlh.nlmsg_pid = 0;
 592         req.nlh.nlmsg_seq = 0;
 593
 594         req.rtm.rtm_dst_len = dst_len;
 595         req.rtm.rtm_table = tb->n;
 596         req.rtm.rtm_protocol = RTPROT_KERNEL;
 597         req.rtm.rtm_scope = (type != RTN_LOCAL ? RT_SCOPE_LINK : RT_SCOPE_HOST);
 598         req.rtm.rtm_type = type;
 599
 600         rta.rta_dst = &dst;
 601         rta.rta_prefsrc = &ifa->ifa_local;
 602         rta.rta_oif = &ifa->ifa_dev->dev->ifindex;
 603
 604         if (cmd == RTM_NEWROUTE)
 605                 tb->insert(tb, &req.rtm, &rta, &req.nlh, NULL);
 606         else
 607                 tb->delete(tb, &req.rtm, &rta, &req.nlh, NULL);
 608 }
 609
 610 static void dn_fib_add_ifaddr(struct dn_ifaddr *ifa)
 611 {
 612
 613         fib_magic(RTM_NEWROUTE, RTN_LOCAL, ifa->ifa_local, 16, ifa);
 614
 615 #if 0
 616         if (!(dev->flags&IFF_UP))
 617                 return;
 618         /* In the future, we will want to add default routes here */
 619
 620 #endif
 621 }
 622
 623 static void dn_fib_del_ifaddr(struct dn_ifaddr *ifa)
 624 {
 625         int found_it = 0;
 626         struct net_device *dev;
 627         struct dn_dev *dn_db;
 628         struct dn_ifaddr *ifa2;
 629
 630         ASSERT_RTNL();
 631
 632         /* Scan device list */
 633         read_lock(&dev_base_lock);
 634         for(dev = dev_base; dev; dev = dev->next) {
 635                 dn_db = dev->dn_ptr;
 636                 if (dn_db == NULL)
 637                         continue;
 638                 for(ifa2 = dn_db->ifa_list; ifa2; ifa2 = ifa2->ifa_next) {
 639                         if (ifa2->ifa_local == ifa->ifa_local) {
 640                                 found_it = 1;
 641                                 break;
 642                         }
 643                 }
 644         }
 645         read_unlock(&dev_base_lock);
 646
 647         if (found_it == 0) {
 648                 fib_magic(RTM_DELROUTE, RTN_LOCAL, ifa->ifa_local, 16, ifa);
 649
 650                 if (dnet_addr_type(ifa->ifa_local) != RTN_LOCAL) {
 651                         if (dn_fib_sync_down(ifa->ifa_local, NULL, 0))
 652                                 dn_fib_flush();
 653                 }
 654         }
 655 }
 656
 657 static void dn_fib_disable_addr(struct net_device *dev, int force)
 658 {
 659         if (dn_fib_sync_down(0, dev, force))
 660                 dn_fib_flush();
 661         dn_rt_cache_flush(0);
 662         neigh_ifdown(&dn_neigh_table, dev);
 663 }
 664
 665 static int dn_fib_dnaddr_event(struct notifier_block *this, unsigned long event, void *ptr)
 666 {
 667         struct dn_ifaddr *ifa = (struct dn_ifaddr *)ptr;
 668
 669         switch(event) {
 670                 case NETDEV_UP:
 671                         dn_fib_add_ifaddr(ifa);
 672                         dn_fib_sync_up(ifa->ifa_dev->dev);
 673                         dn_rt_cache_flush(-1);
 674                         break;
 675                 case NETDEV_DOWN:
 676                         dn_fib_del_ifaddr(ifa);
 677                         if (ifa->ifa_dev && ifa->ifa_dev->ifa_list == NULL) {
 678                                 dn_fib_disable_addr(ifa->ifa_dev->dev, 1);
 679                         } else {
 680                                 dn_rt_cache_flush(-1);
 681                         }
 682                         break;
 683         }
 684         return NOTIFY_DONE;
 685 }
 686
 687 int dn_fib_sync_down(__le16 local, struct net_device *dev, int force)
 688 {
 689         int ret = 0;
 690         int scope = RT_SCOPE_NOWHERE;
 691
 692         if (force)
 693                 scope = -1;
 694
 695         for_fib_info() {
 696                 /*
 697                  * This makes no sense for DECnet.... we will almost
 698                  * certainly have more than one local address the same
 699                  * over all our interfaces. It needs thinking about
 700                  * some more.
 701                  */
 702                 if (local && fi->fib_prefsrc == local) {
 703                         fi->fib_flags |= RTNH_F_DEAD;
 704                         ret++;
 705                 } else if (dev && fi->fib_nhs) {
 706                         int dead = 0;
 707
 708                         change_nexthops(fi) {
 709                                 if (nh->nh_flags&RTNH_F_DEAD)
 710                                         dead++;
 711                                 else if (nh->nh_dev == dev &&
 712                                                 nh->nh_scope != scope) {
 713                                         spin_lock_bh(&dn_fib_multipath_lock);
 714                                         nh->nh_flags |= RTNH_F_DEAD;
 715                                         fi->fib_power -= nh->nh_power;
 716                                         nh->nh_power = 0;
 717                                         spin_unlock_bh(&dn_fib_multipath_lock);
 718                                         dead++;
 719                                 }
 720                         } endfor_nexthops(fi)
 721                         if (dead == fi->fib_nhs) {
 722                                 fi->fib_flags |= RTNH_F_DEAD;
 723                                 ret++;
 724                         }
 725                 }
 726         } endfor_fib_info();
 727         return ret;
 728 }
 729
 730
 731 int dn_fib_sync_up(struct net_device *dev)
 732 {
 733         int ret = 0;
 734
 735         if (!(dev->flags&IFF_UP))
 736                 return 0;
 737
 738         for_fib_info() {
 739                 int alive = 0;
 740
 741                 change_nexthops(fi) {
 742                         if (!(nh->nh_flags&RTNH_F_DEAD)) {
 743                                 alive++;
 744                                 continue;
 745                         }
 746                         if (nh->nh_dev == NULL || !(nh->nh_dev->flags&IFF_UP))
 747                                 continue;
 748                         if (nh->nh_dev != dev || dev->dn_ptr == NULL)
 749                                 continue;
 750                         alive++;
 751                         spin_lock_bh(&dn_fib_multipath_lock);
 752                         nh->nh_power = 0;
 753                         nh->nh_flags &= ~RTNH_F_DEAD;
 754                         spin_unlock_bh(&dn_fib_multipath_lock);
 755                 } endfor_nexthops(fi);
 756
 757                 if (alive > 0) {
 758                         fi->fib_flags &= ~RTNH_F_DEAD;
 759                         ret++;
 760                 }
 761         } endfor_fib_info();
 762         return ret;
 763 }
 764
 765 void dn_fib_flush(void)
 766 {
 767         int flushed = 0;
 768         struct dn_fib_table *tb;
 769         int id;
 770
 771         for(id = RT_TABLE_MAX; id > 0; id--) {
 772                 if ((tb = dn_fib_get_table(id, 0)) == NULL)
 773                         continue;
 774                 flushed += tb->flush(tb);
 775         }
 776
 777         if (flushed)
 778                 dn_rt_cache_flush(-1);
 779 }
 780
 781 static struct notifier_block dn_fib_dnaddr_notifier = {
 782         .notifier_call = dn_fib_dnaddr_event,
 783 };
 784
 785 void __exit dn_fib_cleanup(void)
 786 {
 787         dn_fib_table_cleanup();
 788         dn_fib_rules_cleanup();
 789
 790         unregister_dnaddr_notifier(&dn_fib_dnaddr_notifier);
 791 }
 792
 793
 794 void __init dn_fib_init(void)
 795 {
 796
 797         dn_fib_table_init();
 798         dn_fib_rules_init();
 799
 800         register_dnaddr_notifier(&dn_fib_dnaddr_notifier);
 801 }
 802
 803