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>