Annotation of embedaddon/quagga/ospfd/ospf_ase.c, revision 1.1
1.1 ! misho 1: /*
! 2: * OSPF AS external route calculation.
! 3: * Copyright (C) 1999, 2000 Alex Zinin, Toshiaki Takada
! 4: *
! 5: * This file is part of GNU Zebra.
! 6: *
! 7: * GNU Zebra is free software; you can redistribute it and/or modify it
! 8: * under the terms of the GNU General Public License as published by the
! 9: * Free Software Foundation; either version 2, or (at your option) any
! 10: * later version.
! 11: *
! 12: * GNU Zebra is distributed in the hope that it will be useful, but
! 13: * WITHOUT ANY WARRANTY; without even the implied warranty of
! 14: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
! 15: * General Public License for more details.
! 16: *
! 17: * You should have received a copy of the GNU General Public License
! 18: * along with GNU Zebra; see the file COPYING. If not, write to the Free
! 19: * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
! 20: * 02111-1307, USA.
! 21: */
! 22:
! 23: #include <zebra.h>
! 24:
! 25: #include "thread.h"
! 26: #include "memory.h"
! 27: #include "hash.h"
! 28: #include "linklist.h"
! 29: #include "prefix.h"
! 30: #include "if.h"
! 31: #include "table.h"
! 32: #include "vty.h"
! 33: #include "log.h"
! 34:
! 35: #include "ospfd/ospfd.h"
! 36: #include "ospfd/ospf_interface.h"
! 37: #include "ospfd/ospf_ism.h"
! 38: #include "ospfd/ospf_asbr.h"
! 39: #include "ospfd/ospf_lsa.h"
! 40: #include "ospfd/ospf_lsdb.h"
! 41: #include "ospfd/ospf_neighbor.h"
! 42: #include "ospfd/ospf_nsm.h"
! 43: #include "ospfd/ospf_spf.h"
! 44: #include "ospfd/ospf_route.h"
! 45: #include "ospfd/ospf_ase.h"
! 46: #include "ospfd/ospf_zebra.h"
! 47: #include "ospfd/ospf_dump.h"
! 48:
! 49: struct ospf_route *
! 50: ospf_find_asbr_route (struct ospf *ospf,
! 51: struct route_table *rtrs, struct prefix_ipv4 *asbr)
! 52: {
! 53: struct route_node *rn;
! 54: struct ospf_route *or, *best = NULL;
! 55: struct listnode *node;
! 56: struct list *chosen;
! 57:
! 58: /* Sanity check. */
! 59: if (rtrs == NULL)
! 60: return NULL;
! 61:
! 62: rn = route_node_lookup (rtrs, (struct prefix *) asbr);
! 63: if (! rn)
! 64: return NULL;
! 65:
! 66: route_unlock_node (rn);
! 67:
! 68: chosen = list_new ();
! 69:
! 70: /* First try to find intra-area non-bb paths. */
! 71: if (!CHECK_FLAG (ospf->config, OSPF_RFC1583_COMPATIBLE))
! 72: for (ALL_LIST_ELEMENTS_RO ((struct list *) rn->info, node, or))
! 73: if (or->cost < OSPF_LS_INFINITY)
! 74: if (!OSPF_IS_AREA_ID_BACKBONE (or->u.std.area_id) &&
! 75: or->path_type == OSPF_PATH_INTRA_AREA)
! 76: listnode_add (chosen, or);
! 77:
! 78: /* If none is found -- look through all. */
! 79: if (listcount (chosen) == 0)
! 80: {
! 81: list_free (chosen);
! 82: chosen = rn->info;
! 83: }
! 84:
! 85: /* Now find the route with least cost. */
! 86: for (ALL_LIST_ELEMENTS_RO (chosen, node, or))
! 87: if (or->cost < OSPF_LS_INFINITY)
! 88: {
! 89: if (best == NULL)
! 90: best = or;
! 91: else if (best->cost > or->cost)
! 92: best = or;
! 93: else if (best->cost == or->cost &&
! 94: IPV4_ADDR_CMP (&best->u.std.area_id,
! 95: &or->u.std.area_id) < 0)
! 96: best = or;
! 97: }
! 98:
! 99: if (chosen != rn->info)
! 100: list_delete (chosen);
! 101:
! 102: return best;
! 103: }
! 104:
! 105: struct ospf_route *
! 106: ospf_find_asbr_route_through_area (struct route_table *rtrs,
! 107: struct prefix_ipv4 *asbr,
! 108: struct ospf_area *area)
! 109: {
! 110: struct route_node *rn;
! 111:
! 112: /* Sanity check. */
! 113: if (rtrs == NULL)
! 114: return NULL;
! 115:
! 116: rn = route_node_lookup (rtrs, (struct prefix *) asbr);
! 117:
! 118: if (rn)
! 119: {
! 120: struct listnode *node;
! 121: struct ospf_route *or;
! 122:
! 123: route_unlock_node (rn);
! 124:
! 125: for (ALL_LIST_ELEMENTS_RO ((struct list *) rn->info, node, or))
! 126: if (IPV4_ADDR_SAME (&or->u.std.area_id, &area->area_id))
! 127: return or;
! 128: }
! 129:
! 130: return NULL;
! 131: }
! 132:
! 133: static void
! 134: ospf_ase_complete_direct_routes (struct ospf_route *ro, struct in_addr nexthop)
! 135: {
! 136: struct listnode *node;
! 137: struct ospf_path *op;
! 138: struct interface *ifp;
! 139:
! 140: for (ALL_LIST_ELEMENTS_RO (ro->paths, node, op))
! 141: if (op->nexthop.s_addr == 0)
! 142: op->nexthop.s_addr = nexthop.s_addr;
! 143: }
! 144:
! 145: static int
! 146: ospf_ase_forward_address_check (struct ospf *ospf, struct in_addr fwd_addr)
! 147: {
! 148: struct listnode *ifn;
! 149: struct ospf_interface *oi;
! 150:
! 151: for (ALL_LIST_ELEMENTS_RO (ospf->oiflist, ifn, oi))
! 152: if (if_is_operative (oi->ifp))
! 153: if (oi->type != OSPF_IFTYPE_VIRTUALLINK)
! 154: if (IPV4_ADDR_SAME (&oi->address->u.prefix4, &fwd_addr))
! 155: return 0;
! 156:
! 157: return 1;
! 158: }
! 159:
! 160: #if 0
! 161: /* Calculate ASBR route. */
! 162: static struct ospf_route *
! 163: ospf_ase_calculate_asbr_route (struct ospf *ospf,
! 164: struct route_table *rt_network,
! 165: struct route_table *rt_router,
! 166: struct as_external_lsa *al)
! 167: {
! 168: struct prefix_ipv4 asbr;
! 169: struct ospf_route *asbr_route;
! 170: struct route_node *rn;
! 171:
! 172: /* Find ASBR route from Router routing table. */
! 173: asbr.family = AF_INET;
! 174: asbr.prefix = al->header.adv_router;
! 175: asbr.prefixlen = IPV4_MAX_BITLEN;
! 176: apply_mask_ipv4 (&asbr);
! 177:
! 178: asbr_route = ospf_find_asbr_route (ospf, rt_router, &asbr);
! 179:
! 180: if (asbr_route == NULL)
! 181: {
! 182: if (IS_DEBUG_OSPF (lsa, LSA))
! 183: zlog_debug ("ospf_ase_calculate(): Route to ASBR %s not found",
! 184: inet_ntoa (asbr.prefix));
! 185: return NULL;
! 186: }
! 187:
! 188: if (!(asbr_route->u.std.flags & ROUTER_LSA_EXTERNAL))
! 189: {
! 190: if (IS_DEBUG_OSPF (lsa, LSA))
! 191: zlog_debug ("ospf_ase_calculate(): Originating router is not an ASBR");
! 192: return NULL;
! 193: }
! 194:
! 195: if (al->e[0].fwd_addr.s_addr != 0)
! 196: {
! 197: if (IS_DEBUG_OSPF (lsa, LSA))
! 198: zlog_debug ("ospf_ase_calculate(): "
! 199: "Forwarding address is not 0.0.0.0.");
! 200:
! 201: if (! ospf_ase_forward_address_check (ospf, al->e[0].fwd_addr))
! 202: {
! 203: if (IS_DEBUG_OSPF (lsa, LSA))
! 204: zlog_debug ("ospf_ase_calculate(): "
! 205: "Forwarding address is one of our addresses, Ignore.");
! 206: return NULL;
! 207: }
! 208:
! 209: if (IS_DEBUG_OSPF (lsa, LSA))
! 210: zlog_debug ("ospf_ase_calculate(): "
! 211: "Looking up in the Network Routing Table.");
! 212:
! 213: /* Looking up the path to the fwd_addr from Network route. */
! 214: asbr.family = AF_INET;
! 215: asbr.prefix = al->e[0].fwd_addr;
! 216: asbr.prefixlen = IPV4_MAX_BITLEN;
! 217:
! 218: rn = route_node_match (rt_network, (struct prefix *) &asbr);
! 219:
! 220: if (rn == NULL)
! 221: {
! 222: if (IS_DEBUG_OSPF (lsa, LSA))
! 223: zlog_debug ("ospf_ase_calculate(): "
! 224: "Couldn't find a route to the forwarding address.");
! 225: return NULL;
! 226: }
! 227:
! 228: route_unlock_node (rn);
! 229:
! 230: if ((asbr_route = rn->info) == NULL)
! 231: {
! 232: if (IS_DEBUG_OSPF (lsa, LSA))
! 233: zlog_debug ("ospf_ase_calculate(): "
! 234: "Somehow OSPF route to ASBR is lost");
! 235: return NULL;
! 236: }
! 237: }
! 238:
! 239: return asbr_route;
! 240: }
! 241: #endif
! 242:
! 243: static struct ospf_route *
! 244: ospf_ase_calculate_new_route (struct ospf_lsa *lsa,
! 245: struct ospf_route *asbr_route, u_int32_t metric)
! 246: {
! 247: struct as_external_lsa *al;
! 248: struct ospf_route *new;
! 249:
! 250: al = (struct as_external_lsa *) lsa->data;
! 251:
! 252: new = ospf_route_new ();
! 253:
! 254: /* Set redistributed type -- does make sense? */
! 255: /* new->type = type; */
! 256: new->id = al->header.id;
! 257: new->mask = al->mask;
! 258:
! 259: if (!IS_EXTERNAL_METRIC (al->e[0].tos))
! 260: {
! 261: if (IS_DEBUG_OSPF (lsa, LSA))
! 262: zlog_debug ("Route[External]: type-1 created.");
! 263: new->path_type = OSPF_PATH_TYPE1_EXTERNAL;
! 264: new->cost = asbr_route->cost + metric; /* X + Y */
! 265: }
! 266: else
! 267: {
! 268: if (IS_DEBUG_OSPF (lsa, LSA))
! 269: zlog_debug ("Route[External]: type-2 created.");
! 270: new->path_type = OSPF_PATH_TYPE2_EXTERNAL;
! 271: new->cost = asbr_route->cost; /* X */
! 272: new->u.ext.type2_cost = metric; /* Y */
! 273: }
! 274:
! 275: new->type = OSPF_DESTINATION_NETWORK;
! 276: new->u.ext.origin = lsa;
! 277: new->u.ext.tag = ntohl (al->e[0].route_tag);
! 278: new->u.ext.asbr = asbr_route;
! 279:
! 280: assert (new != asbr_route);
! 281:
! 282: return new;
! 283: }
! 284:
! 285: #define OSPF_ASE_CALC_INTERVAL 1
! 286:
! 287: int
! 288: ospf_ase_calculate_route (struct ospf *ospf, struct ospf_lsa * lsa)
! 289: {
! 290: u_int32_t metric;
! 291: struct as_external_lsa *al;
! 292: struct ospf_route *asbr_route;
! 293: struct prefix_ipv4 asbr, p;
! 294: struct route_node *rn;
! 295: struct ospf_route *new, *or;
! 296: int ret;
! 297:
! 298: assert (lsa);
! 299: al = (struct as_external_lsa *) lsa->data;
! 300:
! 301: if (lsa->data->type == OSPF_AS_NSSA_LSA)
! 302: if (IS_DEBUG_OSPF_NSSA)
! 303: zlog_debug ("ospf_ase_calc(): Processing Type-7");
! 304:
! 305: /* Stay away from any Local Translated Type-7 LSAs */
! 306: if (CHECK_FLAG (lsa->flags, OSPF_LSA_LOCAL_XLT))
! 307: {
! 308: if (IS_DEBUG_OSPF_NSSA)
! 309: zlog_debug ("ospf_ase_calc(): Rejecting Local Xlt'd");
! 310: return 0;
! 311: }
! 312:
! 313: if (IS_DEBUG_OSPF (lsa, LSA))
! 314: zlog_debug ("Route[External]: Calculate AS-external-LSA to %s/%d",
! 315: inet_ntoa (al->header.id), ip_masklen (al->mask));
! 316: /* (1) If the cost specified by the LSA is LSInfinity, or if the
! 317: LSA's LS age is equal to MaxAge, then examine the next LSA. */
! 318: if ((metric = GET_METRIC (al->e[0].metric)) >= OSPF_LS_INFINITY)
! 319: {
! 320: if (IS_DEBUG_OSPF (lsa, LSA))
! 321: zlog_debug ("Route[External]: Metric is OSPF_LS_INFINITY");
! 322: return 0;
! 323: }
! 324: if (IS_LSA_MAXAGE (lsa))
! 325: {
! 326: if (IS_DEBUG_OSPF (lsa, LSA))
! 327: zlog_debug ("Route[External]: AS-external-LSA is MAXAGE");
! 328: return 0;
! 329: }
! 330:
! 331: /* (2) If the LSA was originated by the calculating router itself,
! 332: examine the next LSA. */
! 333: if (IS_LSA_SELF (lsa))
! 334: {
! 335: if (IS_DEBUG_OSPF (lsa, LSA))
! 336: zlog_debug ("Route[External]: AS-external-LSA is self originated");
! 337: return 0;
! 338: }
! 339:
! 340: /* (3) Call the destination described by the LSA N. N's address is
! 341: obtained by masking the LSA's Link State ID with the
! 342: network/subnet mask contained in the body of the LSA. Look
! 343: up the routing table entries (potentially one per attached
! 344: area) for the AS boundary router (ASBR) that originated the
! 345: LSA. If no entries exist for router ASBR (i.e., ASBR is
! 346: unreachable), do nothing with this LSA and consider the next
! 347: in the list. */
! 348:
! 349: asbr.family = AF_INET;
! 350: asbr.prefix = al->header.adv_router;
! 351: asbr.prefixlen = IPV4_MAX_BITLEN;
! 352: apply_mask_ipv4 (&asbr);
! 353:
! 354: asbr_route = ospf_find_asbr_route (ospf, ospf->new_rtrs, &asbr);
! 355: if (asbr_route == NULL)
! 356: {
! 357: if (IS_DEBUG_OSPF (lsa, LSA))
! 358: zlog_debug ("Route[External]: Can't find originating ASBR route");
! 359: return 0;
! 360: }
! 361: if (!(asbr_route->u.std.flags & ROUTER_LSA_EXTERNAL))
! 362: {
! 363: if (IS_DEBUG_OSPF (lsa, LSA))
! 364: zlog_debug ("Route[External]: Originating router is not an ASBR");
! 365: return 0;
! 366: }
! 367:
! 368: /* Else, this LSA describes an AS external path to destination
! 369: N. Examine the forwarding address specified in the AS-
! 370: external-LSA. This indicates the IP address to which
! 371: packets for the destination should be forwarded. */
! 372:
! 373: if (al->e[0].fwd_addr.s_addr == 0)
! 374: {
! 375: /* If the forwarding address is set to 0.0.0.0, packets should
! 376: be sent to the ASBR itself. Among the multiple routing table
! 377: entries for the ASBR, select the preferred entry as follows.
! 378: If RFC1583Compatibility is set to "disabled", prune the set
! 379: of routing table entries for the ASBR as described in
! 380: Section 16.4.1. In any case, among the remaining routing
! 381: table entries, select the routing table entry with the least
! 382: cost; when there are multiple least cost routing table
! 383: entries the entry whose associated area has the largest OSPF
! 384: Area ID (when considered as an unsigned 32-bit integer) is
! 385: chosen. */
! 386:
! 387: /* asbr_route already contains the requested route */
! 388: }
! 389: else
! 390: {
! 391: /* If the forwarding address is non-zero, look up the
! 392: forwarding address in the routing table.[24] The matching
! 393: routing table entry must specify an intra-area or inter-area
! 394: path; if no such path exists, do nothing with the LSA and
! 395: consider the next in the list. */
! 396: if (! ospf_ase_forward_address_check (ospf, al->e[0].fwd_addr))
! 397: {
! 398: if (IS_DEBUG_OSPF (lsa, LSA))
! 399: zlog_debug ("Route[External]: Forwarding address is our router "
! 400: "address");
! 401: return 0;
! 402: }
! 403:
! 404: asbr.family = AF_INET;
! 405: asbr.prefix = al->e[0].fwd_addr;
! 406: asbr.prefixlen = IPV4_MAX_BITLEN;
! 407:
! 408: rn = route_node_match (ospf->new_table, (struct prefix *) &asbr);
! 409:
! 410: if (rn == NULL || (asbr_route = rn->info) == NULL)
! 411: {
! 412: if (IS_DEBUG_OSPF (lsa, LSA))
! 413: zlog_debug ("Route[External]: Can't find route to forwarding "
! 414: "address");
! 415: if (rn)
! 416: route_unlock_node (rn);
! 417: return 0;
! 418: }
! 419:
! 420: route_unlock_node (rn);
! 421: }
! 422:
! 423: /* (4) Let X be the cost specified by the preferred routing table
! 424: entry for the ASBR/forwarding address, and Y the cost
! 425: specified in the LSA. X is in terms of the link state
! 426: metric, and Y is a type 1 or 2 external metric. */
! 427:
! 428:
! 429: /* (5) Look up the routing table entry for the destination N. If
! 430: no entry exists for N, install the AS external path to N,
! 431: with next hop equal to the list of next hops to the
! 432: forwarding address, and advertising router equal to ASBR.
! 433: If the external metric type is 1, then the path-type is set
! 434: to type 1 external and the cost is equal to X+Y. If the
! 435: external metric type is 2, the path-type is set to type 2
! 436: external, the link state component of the route's cost is X,
! 437: and the type 2 cost is Y. */
! 438: new = ospf_ase_calculate_new_route (lsa, asbr_route, metric);
! 439:
! 440: /* (6) Compare the AS external path described by the LSA with the
! 441: existing paths in N's routing table entry, as follows. If
! 442: the new path is preferred, it replaces the present paths in
! 443: N's routing table entry. If the new path is of equal
! 444: preference, it is added to N's routing table entry's list of
! 445: paths. */
! 446:
! 447: /* Set prefix. */
! 448: p.family = AF_INET;
! 449: p.prefix = al->header.id;
! 450: p.prefixlen = ip_masklen (al->mask);
! 451:
! 452: /* if there is a Intra/Inter area route to the N
! 453: do not install external route */
! 454: if ((rn = route_node_lookup (ospf->new_table,
! 455: (struct prefix *) &p)))
! 456: {
! 457: route_unlock_node(rn);
! 458: if (rn->info == NULL)
! 459: zlog_info ("Route[External]: rn->info NULL");
! 460: if (new)
! 461: ospf_route_free (new);
! 462: return 0;
! 463: }
! 464: /* Find a route to the same dest */
! 465: /* If there is no route, create new one. */
! 466: if ((rn = route_node_lookup (ospf->new_external_route,
! 467: (struct prefix *) &p)))
! 468: route_unlock_node(rn);
! 469:
! 470: if (!rn || (or = rn->info) == NULL)
! 471: {
! 472: if (IS_DEBUG_OSPF (lsa, LSA))
! 473: zlog_debug ("Route[External]: Adding a new route %s/%d",
! 474: inet_ntoa (p.prefix), p.prefixlen);
! 475:
! 476: ospf_route_add (ospf->new_external_route, &p, new, asbr_route);
! 477:
! 478: if (al->e[0].fwd_addr.s_addr)
! 479: ospf_ase_complete_direct_routes (new, al->e[0].fwd_addr);
! 480: return 0;
! 481: }
! 482: else
! 483: {
! 484: /* (a) Intra-area and inter-area paths are always preferred
! 485: over AS external paths.
! 486:
! 487: (b) Type 1 external paths are always preferred over type 2
! 488: external paths. When all paths are type 2 external
! 489: paths, the paths with the smallest advertised type 2
! 490: metric are always preferred. */
! 491: ret = ospf_route_cmp (ospf, new, or);
! 492:
! 493: /* (c) If the new AS external path is still indistinguishable
! 494: from the current paths in the N's routing table entry,
! 495: and RFC1583Compatibility is set to "disabled", select
! 496: the preferred paths based on the intra-AS paths to the
! 497: ASBR/forwarding addresses, as specified in Section
! 498: 16.4.1.
! 499:
! 500: (d) If the new AS external path is still indistinguishable
! 501: from the current paths in the N's routing table entry,
! 502: select the preferred path based on a least cost
! 503: comparison. Type 1 external paths are compared by
! 504: looking at the sum of the distance to the forwarding
! 505: address and the advertised type 1 metric (X+Y). Type 2
! 506: external paths advertising equal type 2 metrics are
! 507: compared by looking at the distance to the forwarding
! 508: addresses.
! 509: */
! 510: /* New route is better */
! 511: if (ret < 0)
! 512: {
! 513: if (IS_DEBUG_OSPF (lsa, LSA))
! 514: zlog_debug ("Route[External]: New route is better");
! 515: ospf_route_subst (rn, new, asbr_route);
! 516: if (al->e[0].fwd_addr.s_addr)
! 517: ospf_ase_complete_direct_routes (new, al->e[0].fwd_addr);
! 518: or = new;
! 519: new = NULL;
! 520: }
! 521: /* Old route is better */
! 522: else if (ret > 0)
! 523: {
! 524: if (IS_DEBUG_OSPF (lsa, LSA))
! 525: zlog_debug ("Route[External]: Old route is better");
! 526: /* do nothing */
! 527: }
! 528: /* Routes are equal */
! 529: else
! 530: {
! 531: if (IS_DEBUG_OSPF (lsa, LSA))
! 532: zlog_debug ("Route[External]: Routes are equal");
! 533: ospf_route_copy_nexthops (or, asbr_route->paths);
! 534: if (al->e[0].fwd_addr.s_addr)
! 535: ospf_ase_complete_direct_routes (or, al->e[0].fwd_addr);
! 536: }
! 537: }
! 538: /* Make sure setting newly calculated ASBR route.*/
! 539: or->u.ext.asbr = asbr_route;
! 540: if (new)
! 541: ospf_route_free (new);
! 542:
! 543: lsa->route = or;
! 544: return 0;
! 545: }
! 546:
! 547: static int
! 548: ospf_ase_route_match_same (struct route_table *rt, struct prefix *prefix,
! 549: struct ospf_route *newor)
! 550: {
! 551: struct route_node *rn;
! 552: struct ospf_route *or;
! 553: struct ospf_path *op;
! 554: struct ospf_path *newop;
! 555: struct listnode *n1;
! 556: struct listnode *n2;
! 557:
! 558: if (! rt || ! prefix)
! 559: return 0;
! 560:
! 561: rn = route_node_lookup (rt, prefix);
! 562: if (! rn)
! 563: return 0;
! 564:
! 565: route_unlock_node (rn);
! 566:
! 567: or = rn->info;
! 568: if (or->path_type != newor->path_type)
! 569: return 0;
! 570:
! 571: switch (or->path_type)
! 572: {
! 573: case OSPF_PATH_TYPE1_EXTERNAL:
! 574: if (or->cost != newor->cost)
! 575: return 0;
! 576: break;
! 577: case OSPF_PATH_TYPE2_EXTERNAL:
! 578: if ((or->cost != newor->cost) ||
! 579: (or->u.ext.type2_cost != newor->u.ext.type2_cost))
! 580: return 0;
! 581: break;
! 582: default:
! 583: assert (0);
! 584: return 0;
! 585: }
! 586:
! 587: if (or->paths->count != newor->paths->count)
! 588: return 0;
! 589:
! 590: /* Check each path. */
! 591: for (n1 = listhead (or->paths), n2 = listhead (newor->paths);
! 592: n1 && n2; n1 = listnextnode (n1), n2 = listnextnode (n2))
! 593: {
! 594: op = listgetdata (n1);
! 595: newop = listgetdata (n2);
! 596:
! 597: if (! IPV4_ADDR_SAME (&op->nexthop, &newop->nexthop))
! 598: return 0;
! 599: if (op->ifindex != newop->ifindex)
! 600: return 0;
! 601: }
! 602: return 1;
! 603: }
! 604:
! 605: static int
! 606: ospf_ase_compare_tables (struct route_table *new_external_route,
! 607: struct route_table *old_external_route)
! 608: {
! 609: struct route_node *rn, *new_rn;
! 610: struct ospf_route *or;
! 611:
! 612: /* Remove deleted routes */
! 613: for (rn = route_top (old_external_route); rn; rn = route_next (rn))
! 614: if ((or = rn->info))
! 615: {
! 616: if (! (new_rn = route_node_lookup (new_external_route, &rn->p)))
! 617: ospf_zebra_delete ((struct prefix_ipv4 *) &rn->p, or);
! 618: else
! 619: route_unlock_node (new_rn);
! 620: }
! 621:
! 622:
! 623: /* Install new routes */
! 624: for (rn = route_top (new_external_route); rn; rn = route_next (rn))
! 625: if ((or = rn->info) != NULL)
! 626: if (! ospf_ase_route_match_same (old_external_route, &rn->p, or))
! 627: ospf_zebra_add ((struct prefix_ipv4 *) &rn->p, or);
! 628:
! 629: return 0;
! 630: }
! 631:
! 632: static int
! 633: ospf_ase_calculate_timer (struct thread *t)
! 634: {
! 635: struct ospf *ospf;
! 636: struct ospf_lsa *lsa;
! 637: struct route_node *rn;
! 638: struct listnode *node;
! 639: struct ospf_area *area;
! 640:
! 641: ospf = THREAD_ARG (t);
! 642: ospf->t_ase_calc = NULL;
! 643:
! 644: if (ospf->ase_calc)
! 645: {
! 646: ospf->ase_calc = 0;
! 647:
! 648: /* Calculate external route for each AS-external-LSA */
! 649: LSDB_LOOP (EXTERNAL_LSDB (ospf), rn, lsa)
! 650: ospf_ase_calculate_route (ospf, lsa);
! 651:
! 652: /* This version simple adds to the table all NSSA areas */
! 653: if (ospf->anyNSSA)
! 654: for (ALL_LIST_ELEMENTS_RO (ospf->areas, node, area))
! 655: {
! 656: if (IS_DEBUG_OSPF_NSSA)
! 657: zlog_debug ("ospf_ase_calculate_timer(): looking at area %s",
! 658: inet_ntoa (area->area_id));
! 659:
! 660: if (area->external_routing == OSPF_AREA_NSSA)
! 661: LSDB_LOOP (NSSA_LSDB (area), rn, lsa)
! 662: ospf_ase_calculate_route (ospf, lsa);
! 663: }
! 664: /* kevinm: And add the NSSA routes in ospf_top */
! 665: LSDB_LOOP (NSSA_LSDB (ospf),rn,lsa)
! 666: ospf_ase_calculate_route(ospf,lsa);
! 667:
! 668: /* Compare old and new external routing table and install the
! 669: difference info zebra/kernel */
! 670: ospf_ase_compare_tables (ospf->new_external_route,
! 671: ospf->old_external_route);
! 672:
! 673: /* Delete old external routing table */
! 674: ospf_route_table_free (ospf->old_external_route);
! 675: ospf->old_external_route = ospf->new_external_route;
! 676: ospf->new_external_route = route_table_init ();
! 677: }
! 678: return 0;
! 679: }
! 680:
! 681: void
! 682: ospf_ase_calculate_schedule (struct ospf *ospf)
! 683: {
! 684: if (ospf == NULL)
! 685: return;
! 686:
! 687: ospf->ase_calc = 1;
! 688: }
! 689:
! 690: void
! 691: ospf_ase_calculate_timer_add (struct ospf *ospf)
! 692: {
! 693: if (ospf == NULL)
! 694: return;
! 695:
! 696: if (! ospf->t_ase_calc)
! 697: ospf->t_ase_calc = thread_add_timer (master, ospf_ase_calculate_timer,
! 698: ospf, OSPF_ASE_CALC_INTERVAL);
! 699: }
! 700:
! 701: void
! 702: ospf_ase_register_external_lsa (struct ospf_lsa *lsa, struct ospf *top)
! 703: {
! 704: struct route_node *rn;
! 705: struct prefix_ipv4 p;
! 706: struct list *lst;
! 707: struct as_external_lsa *al;
! 708:
! 709: al = (struct as_external_lsa *) lsa->data;
! 710: p.family = AF_INET;
! 711: p.prefix = lsa->data->id;
! 712: p.prefixlen = ip_masklen (al->mask);
! 713: apply_mask_ipv4 (&p);
! 714:
! 715: rn = route_node_get (top->external_lsas, (struct prefix *) &p);
! 716: if ((lst = rn->info) == NULL)
! 717: rn->info = lst = list_new();
! 718:
! 719: /* We assume that if LSA is deleted from DB
! 720: is is also deleted from this RT */
! 721: listnode_add (lst, ospf_lsa_lock (lsa)); /* external_lsas lst */
! 722: }
! 723:
! 724: void
! 725: ospf_ase_unregister_external_lsa (struct ospf_lsa *lsa, struct ospf *top)
! 726: {
! 727: struct route_node *rn;
! 728: struct prefix_ipv4 p;
! 729: struct list *lst;
! 730: struct as_external_lsa *al;
! 731:
! 732: al = (struct as_external_lsa *) lsa->data;
! 733: p.family = AF_INET;
! 734: p.prefix = lsa->data->id;
! 735: p.prefixlen = ip_masklen (al->mask);
! 736: apply_mask_ipv4 (&p);
! 737:
! 738: rn = route_node_get (top->external_lsas, (struct prefix *) &p);
! 739: lst = rn->info;
! 740:
! 741: /* XXX lst can be NULL */
! 742: if (lst) {
! 743: listnode_delete (lst, lsa);
! 744: ospf_lsa_unlock (&lsa); /* external_lsas list */
! 745: }
! 746: }
! 747:
! 748: void
! 749: ospf_ase_external_lsas_finish (struct route_table *rt)
! 750: {
! 751: struct route_node *rn;
! 752: struct ospf_lsa *lsa;
! 753: struct list *lst;
! 754: struct listnode *node, *nnode;
! 755:
! 756: for (rn = route_top (rt); rn; rn = route_next (rn))
! 757: if ((lst = rn->info) != NULL)
! 758: {
! 759: for (ALL_LIST_ELEMENTS (lst, node, nnode, lsa))
! 760: ospf_lsa_unlock (&lsa); /* external_lsas lst */
! 761: list_delete (lst);
! 762: }
! 763:
! 764: route_table_finish (rt);
! 765: }
! 766:
! 767: void
! 768: ospf_ase_incremental_update (struct ospf *ospf, struct ospf_lsa *lsa)
! 769: {
! 770: struct list *lsas;
! 771: struct listnode *node;
! 772: struct route_node *rn, *rn2;
! 773: struct prefix_ipv4 p;
! 774: struct route_table *tmp_old;
! 775: struct as_external_lsa *al;
! 776:
! 777: al = (struct as_external_lsa *) lsa->data;
! 778: p.family = AF_INET;
! 779: p.prefix = lsa->data->id;
! 780: p.prefixlen = ip_masklen (al->mask);
! 781: apply_mask_ipv4 (&p);
! 782:
! 783: /* if new_table is NULL, there was no spf calculation, thus
! 784: incremental update is unneeded */
! 785: if (!ospf->new_table)
! 786: return;
! 787:
! 788: /* If there is already an intra-area or inter-area route
! 789: to the destination, no recalculation is necessary
! 790: (internal routes take precedence). */
! 791:
! 792: rn = route_node_lookup (ospf->new_table, (struct prefix *) &p);
! 793: if (rn)
! 794: {
! 795: route_unlock_node (rn);
! 796: if (rn->info)
! 797: return;
! 798: }
! 799:
! 800: rn = route_node_lookup (ospf->external_lsas, (struct prefix *) &p);
! 801: assert (rn);
! 802: assert (rn->info);
! 803: lsas = rn->info;
! 804: route_unlock_node (rn);
! 805:
! 806: for (ALL_LIST_ELEMENTS_RO (lsas, node, lsa))
! 807: ospf_ase_calculate_route (ospf, lsa);
! 808:
! 809: /* prepare temporary old routing table for compare */
! 810: tmp_old = route_table_init ();
! 811: rn = route_node_lookup (ospf->old_external_route, (struct prefix *) &p);
! 812: if (rn && rn->info)
! 813: {
! 814: rn2 = route_node_get (tmp_old, (struct prefix *) &p);
! 815: rn2->info = rn->info;
! 816: }
! 817:
! 818: /* install changes to zebra */
! 819: ospf_ase_compare_tables (ospf->new_external_route, tmp_old);
! 820:
! 821: /* update ospf->old_external_route table */
! 822: if (rn && rn->info)
! 823: ospf_route_free ((struct ospf_route *) rn->info);
! 824:
! 825: rn2 = route_node_lookup (ospf->new_external_route, (struct prefix *) &p);
! 826: /* if new route exists, install it to ospf->old_external_route */
! 827: if (rn2 && rn2->info)
! 828: {
! 829: if (!rn)
! 830: rn = route_node_get (ospf->old_external_route, (struct prefix *) &p);
! 831: rn->info = rn2->info;
! 832: }
! 833: else
! 834: {
! 835: /* remove route node from ospf->old_external_route */
! 836: if (rn)
! 837: {
! 838: rn->info = NULL;
! 839: route_unlock_node (rn);
! 840: route_unlock_node (rn);
! 841: }
! 842: }
! 843:
! 844: if (rn2)
! 845: {
! 846: /* rn2->info is stored in route node of ospf->old_external_route */
! 847: rn2->info = NULL;
! 848: route_unlock_node (rn2);
! 849: route_unlock_node (rn2);
! 850: }
! 851:
! 852: route_table_finish (tmp_old);
! 853: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>