Annotation of embedaddon/quagga/isisd/isis_spf.c, revision 1.1.1.2

1.1       misho       1: /*
                      2:  * IS-IS Rout(e)ing protocol                  - isis_spf.c
                      3:  *                                              The SPT algorithm
                      4:  *
                      5:  * Copyright (C) 2001,2002   Sampo Saaristo
                      6:  *                           Tampere University of Technology      
                      7:  *                           Institute of Communications Engineering
                      8:  *
                      9:  * This program is free software; you can redistribute it and/or modify it 
                     10:  * under the terms of the GNU General Public Licenseas published by the Free 
                     11:  * Software Foundation; either version 2 of the License, or (at your option) 
                     12:  * any later version.
                     13:  *
                     14:  * This program is distributed in the hope that it will be useful,but WITHOUT 
                     15:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 
                     16:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for 
                     17:  * more details.
                     18: 
                     19:  * You should have received a copy of the GNU General Public License along 
                     20:  * with this program; if not, write to the Free Software Foundation, Inc., 
                     21:  * 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
                     22:  */
                     23: 
                     24: #include <zebra.h>
                     25: 
                     26: #include "thread.h"
                     27: #include "linklist.h"
                     28: #include "vty.h"
                     29: #include "log.h"
                     30: #include "command.h"
                     31: #include "memory.h"
                     32: #include "prefix.h"
                     33: #include "hash.h"
                     34: #include "if.h"
                     35: #include "table.h"
                     36: 
                     37: #include "isis_constants.h"
                     38: #include "isis_common.h"
1.1.1.2 ! misho      39: #include "isis_flags.h"
1.1       misho      40: #include "dict.h"
                     41: #include "isisd.h"
                     42: #include "isis_misc.h"
                     43: #include "isis_adjacency.h"
                     44: #include "isis_circuit.h"
                     45: #include "isis_tlv.h"
                     46: #include "isis_pdu.h"
                     47: #include "isis_lsp.h"
                     48: #include "isis_dynhn.h"
                     49: #include "isis_spf.h"
                     50: #include "isis_route.h"
                     51: #include "isis_csm.h"
                     52: 
                     53: int isis_run_spf_l1 (struct thread *thread);
                     54: int isis_run_spf_l2 (struct thread *thread);
                     55: 
                     56: /* 7.2.7 */
                     57: static void
                     58: remove_excess_adjs (struct list *adjs)
                     59: {
                     60:   struct listnode *node, *excess = NULL;
                     61:   struct isis_adjacency *adj, *candidate = NULL;
                     62:   int comp;
                     63: 
                     64:   for (ALL_LIST_ELEMENTS_RO (adjs, node, adj)) 
                     65:     {
                     66:       if (excess == NULL)
                     67:        excess = node;
                     68:       candidate = listgetdata (excess);
                     69: 
                     70:       if (candidate->sys_type < adj->sys_type)
                     71:        {
                     72:          excess = node;
                     73:          candidate = adj;
                     74:          continue;
                     75:        }
                     76:       if (candidate->sys_type > adj->sys_type)
                     77:        continue;
                     78: 
                     79:       comp = memcmp (candidate->sysid, adj->sysid, ISIS_SYS_ID_LEN);
                     80:       if (comp > 0)
                     81:        {
                     82:          excess = node;
                     83:          candidate = adj;
                     84:          continue;
                     85:        }
                     86:       if (comp < 0)
                     87:        continue;
                     88: 
                     89:       if (candidate->circuit->circuit_id > adj->circuit->circuit_id)
                     90:        {
                     91:          excess = node;
                     92:          candidate = adj;
                     93:          continue;
                     94:        }
                     95: 
                     96:       if (candidate->circuit->circuit_id < adj->circuit->circuit_id)
                     97:        continue;
                     98: 
                     99:       comp = memcmp (candidate->snpa, adj->snpa, ETH_ALEN);
                    100:       if (comp > 0)
                    101:        {
                    102:          excess = node;
                    103:          candidate = adj;
                    104:          continue;
                    105:        }
                    106:     }
                    107: 
                    108:   list_delete_node (adjs, excess);
                    109: 
                    110:   return;
                    111: }
                    112: 
                    113: static const char *
                    114: vtype2string (enum vertextype vtype)
                    115: {
                    116:   switch (vtype)
                    117:     {
                    118:     case VTYPE_PSEUDO_IS:
                    119:       return "pseudo_IS";
                    120:       break;
                    121:     case VTYPE_PSEUDO_TE_IS:
                    122:       return "pseudo_TE-IS";
                    123:       break;
                    124:     case VTYPE_NONPSEUDO_IS:
                    125:       return "IS";
                    126:       break;
                    127:     case VTYPE_NONPSEUDO_TE_IS:
                    128:       return "TE-IS";
                    129:       break;
                    130:     case VTYPE_ES:
                    131:       return "ES";
                    132:       break;
                    133:     case VTYPE_IPREACH_INTERNAL:
                    134:       return "IP internal";
                    135:       break;
                    136:     case VTYPE_IPREACH_EXTERNAL:
                    137:       return "IP external";
                    138:       break;
                    139:     case VTYPE_IPREACH_TE:
                    140:       return "IP TE";
                    141:       break;
                    142: #ifdef HAVE_IPV6
                    143:     case VTYPE_IP6REACH_INTERNAL:
                    144:       return "IP6 internal";
                    145:       break;
                    146:     case VTYPE_IP6REACH_EXTERNAL:
                    147:       return "IP6 external";
                    148:       break;
                    149: #endif /* HAVE_IPV6 */
                    150:     default:
                    151:       return "UNKNOWN";
                    152:     }
                    153:   return NULL;                 /* Not reached */
                    154: }
                    155: 
                    156: static const char *
                    157: vid2string (struct isis_vertex *vertex, u_char * buff)
                    158: {
                    159:   switch (vertex->type)
                    160:     {
                    161:     case VTYPE_PSEUDO_IS:
                    162:     case VTYPE_PSEUDO_TE_IS:
1.1.1.2 ! misho     163:       return print_sys_hostname (vertex->N.id);
1.1       misho     164:       break;
                    165:     case VTYPE_NONPSEUDO_IS:
                    166:     case VTYPE_NONPSEUDO_TE_IS:
                    167:     case VTYPE_ES:
1.1.1.2 ! misho     168:       return print_sys_hostname (vertex->N.id);
1.1       misho     169:       break;
                    170:     case VTYPE_IPREACH_INTERNAL:
                    171:     case VTYPE_IPREACH_EXTERNAL:
                    172:     case VTYPE_IPREACH_TE:
                    173: #ifdef HAVE_IPV6
                    174:     case VTYPE_IP6REACH_INTERNAL:
                    175:     case VTYPE_IP6REACH_EXTERNAL:
                    176: #endif /* HAVE_IPV6 */
                    177:       prefix2str ((struct prefix *) &vertex->N.prefix, (char *) buff, BUFSIZ);
                    178:       break;
                    179:     default:
                    180:       return "UNKNOWN";
                    181:     }
                    182: 
                    183:   return (char *) buff;
                    184: }
                    185: 
1.1.1.2 ! misho     186: static struct isis_vertex *
        !           187: isis_vertex_new (void *id, enum vertextype vtype)
1.1       misho     188: {
1.1.1.2 ! misho     189:   struct isis_vertex *vertex;
1.1       misho     190: 
1.1.1.2 ! misho     191:   vertex = XCALLOC (MTYPE_ISIS_VERTEX, sizeof (struct isis_vertex));
        !           192:   if (vertex == NULL)
1.1       misho     193:     {
1.1.1.2 ! misho     194:       zlog_err ("isis_vertex_new Out of memory!");
1.1       misho     195:       return NULL;
                    196:     }
                    197: 
1.1.1.2 ! misho     198:   vertex->type = vtype;
        !           199:   switch (vtype)
        !           200:     {
        !           201:     case VTYPE_ES:
        !           202:     case VTYPE_NONPSEUDO_IS:
        !           203:     case VTYPE_NONPSEUDO_TE_IS:
        !           204:       memcpy (vertex->N.id, (u_char *) id, ISIS_SYS_ID_LEN);
        !           205:       break;
        !           206:     case VTYPE_PSEUDO_IS:
        !           207:     case VTYPE_PSEUDO_TE_IS:
        !           208:       memcpy (vertex->N.id, (u_char *) id, ISIS_SYS_ID_LEN + 1);
        !           209:       break;
        !           210:     case VTYPE_IPREACH_INTERNAL:
        !           211:     case VTYPE_IPREACH_EXTERNAL:
        !           212:     case VTYPE_IPREACH_TE:
        !           213: #ifdef HAVE_IPV6
        !           214:     case VTYPE_IP6REACH_INTERNAL:
        !           215:     case VTYPE_IP6REACH_EXTERNAL:
        !           216: #endif /* HAVE_IPV6 */
        !           217:       memcpy (&vertex->N.prefix, (struct prefix *) id,
        !           218:              sizeof (struct prefix));
        !           219:       break;
        !           220:     default:
        !           221:       zlog_err ("WTF!");
        !           222:     }
        !           223: 
        !           224:   vertex->Adj_N = list_new ();
        !           225:   vertex->parents = list_new ();
        !           226:   vertex->children = list_new ();
        !           227: 
        !           228:   return vertex;
1.1       misho     229: }
                    230: 
                    231: static void
                    232: isis_vertex_del (struct isis_vertex *vertex)
                    233: {
                    234:   list_delete (vertex->Adj_N);
1.1.1.2 ! misho     235:   vertex->Adj_N = NULL;
        !           236:   list_delete (vertex->parents);
        !           237:   vertex->parents = NULL;
        !           238:   list_delete (vertex->children);
        !           239:   vertex->children = NULL;
1.1       misho     240: 
1.1.1.2 ! misho     241:   memset(vertex, 0, sizeof(struct isis_vertex));
1.1       misho     242:   XFREE (MTYPE_ISIS_VERTEX, vertex);
                    243: 
                    244:   return;
                    245: }
                    246: 
                    247: static void
1.1.1.2 ! misho     248: isis_vertex_adj_del (struct isis_vertex *vertex, struct isis_adjacency *adj)
        !           249: {
        !           250:   struct listnode *node, *nextnode;
        !           251:   if (!vertex)
        !           252:     return;
        !           253:   for (node = listhead (vertex->Adj_N); node; node = nextnode)
        !           254:   {
        !           255:     nextnode = listnextnode(node);
        !           256:     if (listgetdata(node) == adj)
        !           257:       list_delete_node(vertex->Adj_N, node);
        !           258:   }
        !           259:   return;
        !           260: }
        !           261: 
        !           262: struct isis_spftree *
        !           263: isis_spftree_new (struct isis_area *area)
        !           264: {
        !           265:   struct isis_spftree *tree;
        !           266: 
        !           267:   tree = XCALLOC (MTYPE_ISIS_SPFTREE, sizeof (struct isis_spftree));
        !           268:   if (tree == NULL)
        !           269:     {
        !           270:       zlog_err ("ISIS-Spf: isis_spftree_new Out of memory!");
        !           271:       return NULL;
        !           272:     }
        !           273: 
        !           274:   tree->tents = list_new ();
        !           275:   tree->paths = list_new ();
        !           276:   tree->area = area;
        !           277:   tree->last_run_timestamp = 0;
        !           278:   tree->last_run_duration = 0;
        !           279:   tree->runcount = 0;
        !           280:   tree->pending = 0;
        !           281:   return tree;
        !           282: }
        !           283: 
        !           284: void
1.1       misho     285: isis_spftree_del (struct isis_spftree *spftree)
                    286: {
1.1.1.2 ! misho     287:   THREAD_TIMER_OFF (spftree->t_spf);
        !           288: 
1.1       misho     289:   spftree->tents->del = (void (*)(void *)) isis_vertex_del;
                    290:   list_delete (spftree->tents);
1.1.1.2 ! misho     291:   spftree->tents = NULL;
1.1       misho     292: 
                    293:   spftree->paths->del = (void (*)(void *)) isis_vertex_del;
                    294:   list_delete (spftree->paths);
1.1.1.2 ! misho     295:   spftree->paths = NULL;
1.1       misho     296: 
                    297:   XFREE (MTYPE_ISIS_SPFTREE, spftree);
                    298: 
                    299:   return;
                    300: }
1.1.1.2 ! misho     301: 
        !           302: void
        !           303: isis_spftree_adj_del (struct isis_spftree *spftree, struct isis_adjacency *adj)
        !           304: {
        !           305:   struct listnode *node;
        !           306:   if (!adj)
        !           307:     return;
        !           308:   for (node = listhead (spftree->tents); node; node = listnextnode (node))
        !           309:     isis_vertex_adj_del (listgetdata (node), adj);
        !           310:   for (node = listhead (spftree->paths); node; node = listnextnode (node))
        !           311:     isis_vertex_adj_del (listgetdata (node), adj);
        !           312:   return;
        !           313: }
1.1       misho     314: 
                    315: void
                    316: spftree_area_init (struct isis_area *area)
                    317: {
1.1.1.2 ! misho     318:   if (area->is_type & IS_LEVEL_1)
        !           319:   {
        !           320:     if (area->spftree[0] == NULL)
        !           321:       area->spftree[0] = isis_spftree_new (area);
1.1       misho     322: #ifdef HAVE_IPV6
1.1.1.2 ! misho     323:     if (area->spftree6[0] == NULL)
        !           324:       area->spftree6[0] = isis_spftree_new (area);
1.1       misho     325: #endif
1.1.1.2 ! misho     326:   }
1.1       misho     327: 
1.1.1.2 ! misho     328:   if (area->is_type & IS_LEVEL_2)
        !           329:   {
        !           330:     if (area->spftree[1] == NULL)
        !           331:       area->spftree[1] = isis_spftree_new (area);
1.1       misho     332: #ifdef HAVE_IPV6
1.1.1.2 ! misho     333:     if (area->spftree6[1] == NULL)
        !           334:       area->spftree6[1] = isis_spftree_new (area);
1.1       misho     335: #endif
1.1.1.2 ! misho     336:   }
1.1       misho     337: 
                    338:   return;
                    339: }
                    340: 
1.1.1.2 ! misho     341: void
        !           342: spftree_area_del (struct isis_area *area)
1.1       misho     343: {
1.1.1.2 ! misho     344:   if (area->is_type & IS_LEVEL_1)
        !           345:   {
        !           346:     if (area->spftree[0] != NULL)
1.1       misho     347:     {
1.1.1.2 ! misho     348:       isis_spftree_del (area->spftree[0]);
        !           349:       area->spftree[0] = NULL;
        !           350:     }
        !           351: #ifdef HAVE_IPV6
        !           352:     if (area->spftree6[0])
        !           353:     {
        !           354:       isis_spftree_del (area->spftree6[0]);
        !           355:       area->spftree6[0] = NULL;
1.1       misho     356:     }
1.1.1.2 ! misho     357: #endif
        !           358:   }
1.1       misho     359: 
1.1.1.2 ! misho     360:   if (area->is_type & IS_LEVEL_2)
        !           361:   {
        !           362:     if (area->spftree[1] != NULL)
1.1       misho     363:     {
1.1.1.2 ! misho     364:       isis_spftree_del (area->spftree[1]);
        !           365:       area->spftree[1] = NULL;
        !           366:     }
1.1       misho     367: #ifdef HAVE_IPV6
1.1.1.2 ! misho     368:     if (area->spftree[1] != NULL)
        !           369:     {
        !           370:       isis_spftree_del (area->spftree6[1]);
        !           371:       area->spftree6[1] = NULL;
1.1       misho     372:     }
1.1.1.2 ! misho     373: #endif
        !           374:   }
1.1       misho     375: 
1.1.1.2 ! misho     376:   return;
        !           377: }
1.1       misho     378: 
1.1.1.2 ! misho     379: void
        !           380: spftree_area_adj_del (struct isis_area *area, struct isis_adjacency *adj)
        !           381: {
        !           382:   if (area->is_type & IS_LEVEL_1)
        !           383:   {
        !           384:     if (area->spftree[0] != NULL)
        !           385:       isis_spftree_adj_del (area->spftree[0], adj);
        !           386: #ifdef HAVE_IPV6
        !           387:     if (area->spftree6[0] != NULL)
        !           388:       isis_spftree_adj_del (area->spftree6[0], adj);
        !           389: #endif
        !           390:   }
        !           391: 
        !           392:   if (area->is_type & IS_LEVEL_2)
        !           393:   {
        !           394:     if (area->spftree[1] != NULL)
        !           395:       isis_spftree_adj_del (area->spftree[1], adj);
        !           396: #ifdef HAVE_IPV6
        !           397:     if (area->spftree6[1] != NULL)
        !           398:       isis_spftree_adj_del (area->spftree6[1], adj);
        !           399: #endif
        !           400:   }
        !           401: 
        !           402:   return;
        !           403: }
        !           404: 
        !           405: /* 
        !           406:  * Find the system LSP: returns the LSP in our LSP database 
        !           407:  * associated with the given system ID.
        !           408:  */
        !           409: static struct isis_lsp *
        !           410: isis_root_system_lsp (struct isis_area *area, int level, u_char *sysid)
        !           411: {
        !           412:   struct isis_lsp *lsp;
        !           413:   u_char lspid[ISIS_SYS_ID_LEN + 2];
        !           414: 
        !           415:   memcpy (lspid, sysid, ISIS_SYS_ID_LEN);
        !           416:   LSP_PSEUDO_ID (lspid) = 0;
        !           417:   LSP_FRAGMENT (lspid) = 0;
        !           418:   lsp = lsp_search (lspid, area->lspdb[level - 1]);
        !           419:   if (lsp && lsp->lsp_header->rem_lifetime != 0)
        !           420:     return lsp;
        !           421:   return NULL;
1.1       misho     422: }
                    423: 
                    424: /*
                    425:  * Add this IS to the root of SPT
                    426:  */
1.1.1.2 ! misho     427: static struct isis_vertex *
        !           428: isis_spf_add_root (struct isis_spftree *spftree, int level, u_char *sysid)
1.1       misho     429: {
                    430:   struct isis_vertex *vertex;
                    431:   struct isis_lsp *lsp;
                    432: #ifdef EXTREME_DEBUG
                    433:   u_char buff[BUFSIZ];
                    434: #endif /* EXTREME_DEBUG */
                    435: 
1.1.1.2 ! misho     436:   lsp = isis_root_system_lsp (spftree->area, level, sysid);
1.1       misho     437:   if (lsp == NULL)
                    438:     zlog_warn ("ISIS-Spf: could not find own l%d LSP!", level);
                    439: 
1.1.1.2 ! misho     440:   if (!spftree->area->oldmetric)
        !           441:     vertex = isis_vertex_new (sysid, VTYPE_NONPSEUDO_TE_IS);
1.1       misho     442:   else
1.1.1.2 ! misho     443:     vertex = isis_vertex_new (sysid, VTYPE_NONPSEUDO_IS);
1.1       misho     444: 
                    445:   listnode_add (spftree->paths, vertex);
                    446: 
                    447: #ifdef EXTREME_DEBUG
                    448:   zlog_debug ("ISIS-Spf: added this IS  %s %s depth %d dist %d to PATHS",
                    449:              vtype2string (vertex->type), vid2string (vertex, buff),
                    450:              vertex->depth, vertex->d_N);
                    451: #endif /* EXTREME_DEBUG */
                    452: 
1.1.1.2 ! misho     453:   return vertex;
1.1       misho     454: }
                    455: 
                    456: static struct isis_vertex *
                    457: isis_find_vertex (struct list *list, void *id, enum vertextype vtype)
                    458: {
                    459:   struct listnode *node;
                    460:   struct isis_vertex *vertex;
                    461:   struct prefix *p1, *p2;
                    462: 
                    463:   for (ALL_LIST_ELEMENTS_RO (list, node, vertex))
                    464:     {
                    465:       if (vertex->type != vtype)
                    466:        continue;
                    467:       switch (vtype)
                    468:        {
                    469:        case VTYPE_ES:
                    470:        case VTYPE_NONPSEUDO_IS:
                    471:        case VTYPE_NONPSEUDO_TE_IS:
                    472:          if (memcmp ((u_char *) id, vertex->N.id, ISIS_SYS_ID_LEN) == 0)
                    473:            return vertex;
                    474:          break;
                    475:        case VTYPE_PSEUDO_IS:
                    476:        case VTYPE_PSEUDO_TE_IS:
                    477:          if (memcmp ((u_char *) id, vertex->N.id, ISIS_SYS_ID_LEN + 1) == 0)
                    478:            return vertex;
                    479:          break;
                    480:        case VTYPE_IPREACH_INTERNAL:
                    481:        case VTYPE_IPREACH_EXTERNAL:
                    482:        case VTYPE_IPREACH_TE:
                    483: #ifdef HAVE_IPV6
                    484:        case VTYPE_IP6REACH_INTERNAL:
                    485:        case VTYPE_IP6REACH_EXTERNAL:
                    486: #endif /* HAVE_IPV6 */
                    487:          p1 = (struct prefix *) id;
                    488:          p2 = (struct prefix *) &vertex->N.id;
                    489:          if (p1->family == p2->family && p1->prefixlen == p2->prefixlen &&
                    490:              memcmp (&p1->u.prefix, &p2->u.prefix,
                    491:                      PSIZE (p1->prefixlen)) == 0)
                    492:            return vertex;
                    493:          break;
                    494:        }
                    495:     }
                    496: 
                    497:   return NULL;
                    498: }
                    499: 
                    500: /*
                    501:  * Add a vertex to TENT sorted by cost and by vertextype on tie break situation
                    502:  */
                    503: static struct isis_vertex *
                    504: isis_spf_add2tent (struct isis_spftree *spftree, enum vertextype vtype,
1.1.1.2 ! misho     505:                   void *id, uint32_t cost, int depth, int family,
        !           506:                   struct isis_adjacency *adj, struct isis_vertex *parent)
1.1       misho     507: {
                    508:   struct isis_vertex *vertex, *v;
                    509:   struct listnode *node;
1.1.1.2 ! misho     510:   struct isis_adjacency *parent_adj;
1.1       misho     511: #ifdef EXTREME_DEBUG
                    512:   u_char buff[BUFSIZ];
                    513: #endif
                    514: 
1.1.1.2 ! misho     515:   assert (isis_find_vertex (spftree->paths, id, vtype) == NULL);
        !           516:   assert (isis_find_vertex (spftree->tents, id, vtype) == NULL);
1.1       misho     517:   vertex = isis_vertex_new (id, vtype);
                    518:   vertex->d_N = cost;
                    519:   vertex->depth = depth;
                    520: 
1.1.1.2 ! misho     521:   if (parent) {
        !           522:     listnode_add (vertex->parents, parent);
        !           523:     if (listnode_lookup (parent->children, vertex) == NULL)
        !           524:       listnode_add (parent->children, vertex);
        !           525:   }
        !           526: 
        !           527:   if (parent && parent->Adj_N && listcount(parent->Adj_N) > 0) {
        !           528:     for (ALL_LIST_ELEMENTS_RO (parent->Adj_N, node, parent_adj))
        !           529:       listnode_add (vertex->Adj_N, parent_adj);
        !           530:   } else if (adj) {
1.1       misho     531:     listnode_add (vertex->Adj_N, adj);
1.1.1.2 ! misho     532:   }
        !           533: 
1.1       misho     534: #ifdef EXTREME_DEBUG
1.1.1.2 ! misho     535:   zlog_debug ("ISIS-Spf: add to TENT %s %s %s depth %d dist %d adjcount %d",
        !           536:               print_sys_hostname (vertex->N.id),
1.1       misho     537:              vtype2string (vertex->type), vid2string (vertex, buff),
1.1.1.2 ! misho     538:              vertex->depth, vertex->d_N, listcount(vertex->Adj_N));
1.1       misho     539: #endif /* EXTREME_DEBUG */
1.1.1.2 ! misho     540: 
1.1       misho     541:   if (list_isempty (spftree->tents))
                    542:     {
                    543:       listnode_add (spftree->tents, vertex);
                    544:       return vertex;
                    545:     }
1.1.1.2 ! misho     546: 
        !           547:   /* XXX: This cant use the standard ALL_LIST_ELEMENTS macro */
1.1       misho     548:   for (node = listhead (spftree->tents); node; node = listnextnode (node))
                    549:     {
                    550:       v = listgetdata (node);
                    551:       if (v->d_N > vertex->d_N)
                    552:        {
                    553:          list_add_node_prev (spftree->tents, node, vertex);
                    554:          break;
                    555:        }
1.1.1.2 ! misho     556:       else if (v->d_N == vertex->d_N && v->type > vertex->type)
1.1       misho     557:        {
                    558:          /*  Tie break, add according to type */
1.1.1.2 ! misho     559:           list_add_node_prev (spftree->tents, node, vertex);
1.1       misho     560:          break;
                    561:        }
                    562:     }
1.1.1.2 ! misho     563: 
        !           564:   if (node == NULL)
        !           565:       listnode_add (spftree->tents, vertex);
        !           566: 
1.1       misho     567:   return vertex;
                    568: }
                    569: 
1.1.1.2 ! misho     570: static void
1.1       misho     571: isis_spf_add_local (struct isis_spftree *spftree, enum vertextype vtype,
1.1.1.2 ! misho     572:                    void *id, struct isis_adjacency *adj, uint32_t cost,
        !           573:                    int family, struct isis_vertex *parent)
1.1       misho     574: {
                    575:   struct isis_vertex *vertex;
                    576: 
                    577:   vertex = isis_find_vertex (spftree->tents, id, vtype);
                    578: 
                    579:   if (vertex)
                    580:     {
                    581:       /* C.2.5   c) */
                    582:       if (vertex->d_N == cost)
                    583:        {
                    584:          if (adj)
                    585:            listnode_add (vertex->Adj_N, adj);
                    586:          /*       d) */
                    587:          if (listcount (vertex->Adj_N) > ISIS_MAX_PATH_SPLITS)
                    588:            remove_excess_adjs (vertex->Adj_N);
1.1.1.2 ! misho     589:          if (parent && (listnode_lookup (vertex->parents, parent) == NULL))
        !           590:            listnode_add (vertex->parents, parent);
        !           591:          if (parent && (listnode_lookup (parent->children, vertex) == NULL))
        !           592:            listnode_add (parent->children, vertex);
        !           593:          return;
1.1       misho     594:        }
1.1.1.2 ! misho     595:       else if (vertex->d_N < cost)
1.1       misho     596:        {
1.1.1.2 ! misho     597:          /*       e) do nothing */
        !           598:          return;
1.1       misho     599:        }
1.1.1.2 ! misho     600:       else {  /* vertex->d_N > cost */
        !           601:          /*         f) */
        !           602:          struct listnode *pnode, *pnextnode;
        !           603:          struct isis_vertex *pvertex;
        !           604:          listnode_delete (spftree->tents, vertex);
        !           605:          assert (listcount (vertex->children) == 0);
        !           606:          for (ALL_LIST_ELEMENTS (vertex->parents, pnode, pnextnode, pvertex))
        !           607:            listnode_delete(pvertex->children, vertex);
        !           608:          isis_vertex_del (vertex);
        !           609:       }
1.1       misho     610:     }
                    611: 
1.1.1.2 ! misho     612:   isis_spf_add2tent (spftree, vtype, id, cost, 1, family, adj, parent);
        !           613:   return;
1.1       misho     614: }
                    615: 
                    616: static void
                    617: process_N (struct isis_spftree *spftree, enum vertextype vtype, void *id,
1.1.1.2 ! misho     618:           uint32_t dist, uint16_t depth, int family,
        !           619:           struct isis_vertex *parent)
1.1       misho     620: {
                    621:   struct isis_vertex *vertex;
                    622: #ifdef EXTREME_DEBUG
                    623:   u_char buff[255];
                    624: #endif
                    625: 
1.1.1.2 ! misho     626:   assert (spftree && parent);
        !           627: 
        !           628:   /* RFC3787 section 5.1 */
        !           629:   if (spftree->area->newmetric == 1)
        !           630:     {
        !           631:       if (dist > MAX_WIDE_PATH_METRIC)
        !           632:         return;
        !           633:     }
1.1       misho     634:   /* C.2.6 b)    */
1.1.1.2 ! misho     635:   else if (spftree->area->oldmetric == 1)
        !           636:     {
        !           637:       if (dist > MAX_NARROW_PATH_METRIC)
        !           638:         return;
        !           639:     }
        !           640: 
1.1       misho     641:   /*       c)    */
                    642:   vertex = isis_find_vertex (spftree->paths, id, vtype);
                    643:   if (vertex)
                    644:     {
                    645: #ifdef EXTREME_DEBUG
1.1.1.2 ! misho     646:       zlog_debug ("ISIS-Spf: process_N %s %s %s dist %d already found from PATH",
        !           647:                  print_sys_hostname (vertex->N.id),
1.1       misho     648:                  vtype2string (vtype), vid2string (vertex, buff), dist);
                    649: #endif /* EXTREME_DEBUG */
                    650:       assert (dist >= vertex->d_N);
                    651:       return;
                    652:     }
                    653: 
                    654:   vertex = isis_find_vertex (spftree->tents, id, vtype);
                    655:   /*       d)    */
                    656:   if (vertex)
                    657:     {
                    658:       /*        1) */
                    659: #ifdef EXTREME_DEBUG
1.1.1.2 ! misho     660:       zlog_debug ("ISIS-Spf: process_N %s %s %s dist %d parent %s adjcount %d",
        !           661:                  print_sys_hostname (vertex->N.id),
        !           662:                   vtype2string (vtype), vid2string (vertex, buff), dist,
        !           663:                   (parent ? print_sys_hostname (parent->N.id) : "null"),
        !           664:                   (parent ? listcount (parent->Adj_N) : 0));
1.1       misho     665: #endif /* EXTREME_DEBUG */
                    666:       if (vertex->d_N == dist)
                    667:        {
1.1.1.2 ! misho     668:          struct listnode *node;
        !           669:          struct isis_adjacency *parent_adj;
        !           670:          for (ALL_LIST_ELEMENTS_RO (parent->Adj_N, node, parent_adj))
        !           671:            if (listnode_lookup(vertex->Adj_N, parent_adj) == NULL)
        !           672:              listnode_add (vertex->Adj_N, parent_adj);
1.1       misho     673:          /*      2) */
                    674:          if (listcount (vertex->Adj_N) > ISIS_MAX_PATH_SPLITS)
                    675:            remove_excess_adjs (vertex->Adj_N);
1.1.1.2 ! misho     676:          if (listnode_lookup (vertex->parents, parent) == NULL)
        !           677:            listnode_add (vertex->parents, parent);
        !           678:          if (listnode_lookup (parent->children, vertex) == NULL)
        !           679:            listnode_add (parent->children, vertex);
1.1       misho     680:          /*      3) */
                    681:          return;
                    682:        }
                    683:       else if (vertex->d_N < dist)
                    684:        {
                    685:          return;
                    686:          /*      4) */
                    687:        }
                    688:       else
                    689:        {
1.1.1.2 ! misho     690:          struct listnode *pnode, *pnextnode;
        !           691:          struct isis_vertex *pvertex;
1.1       misho     692:          listnode_delete (spftree->tents, vertex);
1.1.1.2 ! misho     693:          assert (listcount (vertex->children) == 0);
        !           694:          for (ALL_LIST_ELEMENTS (vertex->parents, pnode, pnextnode, pvertex))
        !           695:            listnode_delete(pvertex->children, vertex);
        !           696:          isis_vertex_del (vertex);
1.1       misho     697:        }
                    698:     }
                    699: 
1.1.1.2 ! misho     700: #ifdef EXTREME_DEBUG
        !           701:   zlog_debug ("ISIS-Spf: process_N add2tent %s %s dist %d parent %s",
        !           702:               print_sys_hostname(id), vtype2string (vtype), dist,
        !           703:               (parent ? print_sys_hostname (parent->N.id) : "null"));
        !           704: #endif /* EXTREME_DEBUG */
        !           705: 
        !           706:   isis_spf_add2tent (spftree, vtype, id, dist, depth, family, NULL, parent);
1.1       misho     707:   return;
                    708: }
                    709: 
                    710: /*
                    711:  * C.2.6 Step 1
                    712:  */
                    713: static int
                    714: isis_spf_process_lsp (struct isis_spftree *spftree, struct isis_lsp *lsp,
1.1.1.2 ! misho     715:                      uint32_t cost, uint16_t depth, int family,
        !           716:                      u_char *root_sysid, struct isis_vertex *parent)
1.1       misho     717: {
                    718:   struct listnode *node, *fragnode = NULL;
1.1.1.2 ! misho     719:   uint32_t dist;
1.1       misho     720:   struct is_neigh *is_neigh;
                    721:   struct te_is_neigh *te_is_neigh;
                    722:   struct ipv4_reachability *ipreach;
                    723:   struct te_ipv4_reachability *te_ipv4_reach;
                    724:   enum vertextype vtype;
                    725:   struct prefix prefix;
                    726: #ifdef HAVE_IPV6
                    727:   struct ipv6_reachability *ip6reach;
                    728: #endif /* HAVE_IPV6 */
1.1.1.2 ! misho     729:   static const u_char null_sysid[ISIS_SYS_ID_LEN];
1.1       misho     730: 
1.1.1.2 ! misho     731:   if (!speaks (lsp->tlv_data.nlpids, family))
1.1       misho     732:     return ISIS_OK;
                    733: 
                    734: lspfragloop:
                    735:   if (lsp->lsp_header->seq_num == 0)
                    736:     {
1.1.1.2 ! misho     737:       zlog_warn ("isis_spf_process_lsp(): lsp with 0 seq_num - ignore");
1.1       misho     738:       return ISIS_WARNING;
                    739:     }
                    740: 
1.1.1.2 ! misho     741: #ifdef EXTREME_DEBUG
        !           742:       zlog_debug ("ISIS-Spf: process_lsp %s", print_sys_hostname(lsp->lsp_header->lsp_id));
        !           743: #endif /* EXTREME_DEBUG */
        !           744: 
1.1       misho     745:   if (!ISIS_MASK_LSP_OL_BIT (lsp->lsp_header->lsp_bits))
1.1.1.2 ! misho     746:   {
        !           747:     if (lsp->tlv_data.is_neighs)
1.1       misho     748:     {
1.1.1.2 ! misho     749:       for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.is_neighs, node, is_neigh))
        !           750:       {
        !           751:         /* C.2.6 a) */
        !           752:         /* Two way connectivity */
        !           753:         if (!memcmp (is_neigh->neigh_id, root_sysid, ISIS_SYS_ID_LEN))
        !           754:           continue;
        !           755:         if (!memcmp (is_neigh->neigh_id, null_sysid, ISIS_SYS_ID_LEN))
        !           756:           continue;
        !           757:         dist = cost + is_neigh->metrics.metric_default;
        !           758:         vtype = LSP_PSEUDO_ID (is_neigh->neigh_id) ? VTYPE_PSEUDO_IS
        !           759:           : VTYPE_NONPSEUDO_IS;
        !           760:         process_N (spftree, vtype, (void *) is_neigh->neigh_id, dist,
        !           761:             depth + 1, family, parent);
        !           762:       }
        !           763:     }
        !           764:     if (lsp->tlv_data.te_is_neighs)
        !           765:     {
        !           766:       for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.te_is_neighs, node,
        !           767:             te_is_neigh))
        !           768:       {
        !           769:         if (!memcmp (te_is_neigh->neigh_id, root_sysid, ISIS_SYS_ID_LEN))
        !           770:           continue;
        !           771:         if (!memcmp (te_is_neigh->neigh_id, null_sysid, ISIS_SYS_ID_LEN))
        !           772:           continue;
        !           773:         dist = cost + GET_TE_METRIC(te_is_neigh);
        !           774:         vtype = LSP_PSEUDO_ID (te_is_neigh->neigh_id) ? VTYPE_PSEUDO_TE_IS
        !           775:           : VTYPE_NONPSEUDO_TE_IS;
        !           776:         process_N (spftree, vtype, (void *) te_is_neigh->neigh_id, dist,
        !           777:             depth + 1, family, parent);
        !           778:       }
        !           779:     }
        !           780:   }
1.1       misho     781: 
1.1.1.2 ! misho     782:   if (family == AF_INET && lsp->tlv_data.ipv4_int_reachs)
        !           783:   {
        !           784:     prefix.family = AF_INET;
        !           785:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.ipv4_int_reachs, node, ipreach))
        !           786:     {
        !           787:       dist = cost + ipreach->metrics.metric_default;
        !           788:       vtype = VTYPE_IPREACH_INTERNAL;
        !           789:       prefix.u.prefix4 = ipreach->prefix;
        !           790:       prefix.prefixlen = ip_masklen (ipreach->mask);
        !           791:       apply_mask (&prefix);
        !           792:       process_N (spftree, vtype, (void *) &prefix, dist, depth + 1,
        !           793:                  family, parent);
        !           794:     }
        !           795:   }
        !           796:   if (family == AF_INET && lsp->tlv_data.ipv4_ext_reachs)
        !           797:   {
        !           798:     prefix.family = AF_INET;
        !           799:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.ipv4_ext_reachs, node, ipreach))
        !           800:     {
        !           801:       dist = cost + ipreach->metrics.metric_default;
        !           802:       vtype = VTYPE_IPREACH_EXTERNAL;
        !           803:       prefix.u.prefix4 = ipreach->prefix;
        !           804:       prefix.prefixlen = ip_masklen (ipreach->mask);
        !           805:       apply_mask (&prefix);
        !           806:       process_N (spftree, vtype, (void *) &prefix, dist, depth + 1,
        !           807:                  family, parent);
        !           808:     }
        !           809:   }
        !           810:   if (family == AF_INET && lsp->tlv_data.te_ipv4_reachs)
        !           811:   {
        !           812:     prefix.family = AF_INET;
        !           813:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.te_ipv4_reachs,
        !           814:                                node, te_ipv4_reach))
        !           815:     {
        !           816:       dist = cost + ntohl (te_ipv4_reach->te_metric);
        !           817:       vtype = VTYPE_IPREACH_TE;
        !           818:       prefix.u.prefix4 = newprefix2inaddr (&te_ipv4_reach->prefix_start,
        !           819:                                            te_ipv4_reach->control);
        !           820:       prefix.prefixlen = (te_ipv4_reach->control & 0x3F);
        !           821:       apply_mask (&prefix);
        !           822:       process_N (spftree, vtype, (void *) &prefix, dist, depth + 1,
        !           823:                  family, parent);
        !           824:     }
        !           825:   }
1.1       misho     826: #ifdef HAVE_IPV6
1.1.1.2 ! misho     827:   if (family == AF_INET6 && lsp->tlv_data.ipv6_reachs)
        !           828:   {
        !           829:     prefix.family = AF_INET6;
        !           830:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.ipv6_reachs, node, ip6reach))
        !           831:     {
        !           832:       dist = cost + ip6reach->metric;
        !           833:       vtype = (ip6reach->control_info & CTRL_INFO_DISTRIBUTION) ?
        !           834:         VTYPE_IP6REACH_EXTERNAL : VTYPE_IP6REACH_INTERNAL;
        !           835:       prefix.prefixlen = ip6reach->prefix_len;
        !           836:       memcpy (&prefix.u.prefix6.s6_addr, ip6reach->prefix,
        !           837:               PSIZE (ip6reach->prefix_len));
        !           838:       apply_mask (&prefix);
        !           839:       process_N (spftree, vtype, (void *) &prefix, dist, depth + 1,
        !           840:                  family, parent);
1.1       misho     841:     }
1.1.1.2 ! misho     842:   }
        !           843: #endif /* HAVE_IPV6 */
1.1       misho     844: 
                    845:   if (fragnode == NULL)
                    846:     fragnode = listhead (lsp->lspu.frags);
                    847:   else
                    848:     fragnode = listnextnode (fragnode);
                    849: 
                    850:   if (fragnode)
                    851:     {
                    852:       lsp = listgetdata (fragnode);
                    853:       goto lspfragloop;
                    854:     }
                    855: 
                    856:   return ISIS_OK;
                    857: }
                    858: 
                    859: static int
                    860: isis_spf_process_pseudo_lsp (struct isis_spftree *spftree,
1.1.1.2 ! misho     861:                             struct isis_lsp *lsp, uint32_t cost,
        !           862:                             uint16_t depth, int family,
        !           863:                             u_char *root_sysid,
        !           864:                             struct isis_vertex *parent)
1.1       misho     865: {
                    866:   struct listnode *node, *fragnode = NULL;
                    867:   struct is_neigh *is_neigh;
                    868:   struct te_is_neigh *te_is_neigh;
                    869:   enum vertextype vtype;
1.1.1.2 ! misho     870:   uint32_t dist;
1.1       misho     871: 
                    872: pseudofragloop:
                    873: 
                    874:   if (lsp->lsp_header->seq_num == 0)
                    875:     {
                    876:       zlog_warn ("isis_spf_process_pseudo_lsp(): lsp with 0 seq_num"
                    877:                 " - do not process");
                    878:       return ISIS_WARNING;
                    879:     }
                    880: 
1.1.1.2 ! misho     881: #ifdef EXTREME_DEBUG
        !           882:       zlog_debug ("ISIS-Spf: process_pseudo_lsp %s",
        !           883:                   print_sys_hostname(lsp->lsp_header->lsp_id));
        !           884: #endif /* EXTREME_DEBUG */
        !           885: 
        !           886:   /* RFC3787 section 4 SHOULD ignore overload bit in pseudo LSPs */
        !           887: 
1.1       misho     888:   if (lsp->tlv_data.is_neighs)
                    889:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.is_neighs, node, is_neigh))
                    890:       {
                    891:        /* Two way connectivity */
1.1.1.2 ! misho     892:        if (!memcmp (is_neigh->neigh_id, root_sysid, ISIS_SYS_ID_LEN))
1.1       misho     893:          continue;
1.1.1.2 ! misho     894:         dist = cost + is_neigh->metrics.metric_default;
        !           895:         vtype = LSP_PSEUDO_ID (is_neigh->neigh_id) ? VTYPE_PSEUDO_IS
        !           896:           : VTYPE_NONPSEUDO_IS;
        !           897:         process_N (spftree, vtype, (void *) is_neigh->neigh_id, dist,
        !           898:             depth + 1, family, parent);
1.1       misho     899:       }
                    900:   if (lsp->tlv_data.te_is_neighs)
                    901:     for (ALL_LIST_ELEMENTS_RO (lsp->tlv_data.te_is_neighs, node, te_is_neigh))
                    902:       {
                    903:        /* Two way connectivity */
1.1.1.2 ! misho     904:        if (!memcmp (te_is_neigh->neigh_id, root_sysid, ISIS_SYS_ID_LEN))
1.1       misho     905:          continue;
1.1.1.2 ! misho     906:         dist = cost + GET_TE_METRIC(te_is_neigh);
        !           907:         vtype = LSP_PSEUDO_ID (te_is_neigh->neigh_id) ? VTYPE_PSEUDO_TE_IS
        !           908:           : VTYPE_NONPSEUDO_TE_IS;
        !           909:         process_N (spftree, vtype, (void *) te_is_neigh->neigh_id, dist,
        !           910:             depth + 1, family, parent);
1.1       misho     911:       }
                    912: 
                    913:   if (fragnode == NULL)
                    914:     fragnode = listhead (lsp->lspu.frags);
                    915:   else
                    916:     fragnode = listnextnode (fragnode);
                    917: 
                    918:   if (fragnode)
                    919:     {
                    920:       lsp = listgetdata (fragnode);
                    921:       goto pseudofragloop;
                    922:     }
                    923: 
                    924:   return ISIS_OK;
                    925: }
                    926: 
                    927: static int
1.1.1.2 ! misho     928: isis_spf_preload_tent (struct isis_spftree *spftree, int level,
        !           929:                       int family, u_char *root_sysid,
        !           930:                       struct isis_vertex *parent)
1.1       misho     931: {
                    932:   struct isis_circuit *circuit;
                    933:   struct listnode *cnode, *anode, *ipnode;
                    934:   struct isis_adjacency *adj;
                    935:   struct isis_lsp *lsp;
                    936:   struct list *adj_list;
                    937:   struct list *adjdb;
                    938:   struct prefix_ipv4 *ipv4;
                    939:   struct prefix prefix;
                    940:   int retval = ISIS_OK;
                    941:   u_char lsp_id[ISIS_SYS_ID_LEN + 2];
1.1.1.2 ! misho     942:   static u_char null_lsp_id[ISIS_SYS_ID_LEN + 2];
1.1       misho     943: #ifdef HAVE_IPV6
                    944:   struct prefix_ipv6 *ipv6;
                    945: #endif /* HAVE_IPV6 */
                    946: 
1.1.1.2 ! misho     947:   for (ALL_LIST_ELEMENTS_RO (spftree->area->circuit_list, cnode, circuit))
1.1       misho     948:     {
                    949:       if (circuit->state != C_STATE_UP)
                    950:        continue;
1.1.1.2 ! misho     951:       if (!(circuit->is_type & level))
1.1       misho     952:        continue;
                    953:       if (family == AF_INET && !circuit->ip_router)
                    954:        continue;
                    955: #ifdef HAVE_IPV6
                    956:       if (family == AF_INET6 && !circuit->ipv6_router)
                    957:        continue;
                    958: #endif /* HAVE_IPV6 */
                    959:       /* 
                    960:        * Add IP(v6) addresses of this circuit
                    961:        */
                    962:       if (family == AF_INET)
                    963:        {
                    964:          prefix.family = AF_INET;
                    965:           for (ALL_LIST_ELEMENTS_RO (circuit->ip_addrs, ipnode, ipv4))
                    966:            {
                    967:              prefix.u.prefix4 = ipv4->prefix;
                    968:              prefix.prefixlen = ipv4->prefixlen;
1.1.1.2 ! misho     969:               apply_mask (&prefix);
1.1       misho     970:              isis_spf_add_local (spftree, VTYPE_IPREACH_INTERNAL, &prefix,
1.1.1.2 ! misho     971:                                  NULL, 0, family, parent);
1.1       misho     972:            }
                    973:        }
                    974: #ifdef HAVE_IPV6
                    975:       if (family == AF_INET6)
                    976:        {
                    977:          prefix.family = AF_INET6;
                    978:          for (ALL_LIST_ELEMENTS_RO (circuit->ipv6_non_link, ipnode, ipv6))
                    979:            {
                    980:              prefix.prefixlen = ipv6->prefixlen;
                    981:              prefix.u.prefix6 = ipv6->prefix;
1.1.1.2 ! misho     982:               apply_mask (&prefix);
1.1       misho     983:              isis_spf_add_local (spftree, VTYPE_IP6REACH_INTERNAL,
1.1.1.2 ! misho     984:                                  &prefix, NULL, 0, family, parent);
1.1       misho     985:            }
                    986:        }
                    987: #endif /* HAVE_IPV6 */
                    988:       if (circuit->circ_type == CIRCUIT_T_BROADCAST)
                    989:        {
                    990:          /*
                    991:           * Add the adjacencies
                    992:           */
                    993:          adj_list = list_new ();
                    994:          adjdb = circuit->u.bc.adjdb[level - 1];
                    995:          isis_adj_build_up_list (adjdb, adj_list);
                    996:          if (listcount (adj_list) == 0)
                    997:            {
                    998:              list_delete (adj_list);
                    999:              if (isis->debugs & DEBUG_SPF_EVENTS)
                   1000:                zlog_debug ("ISIS-Spf: no L%d adjacencies on circuit %s",
                   1001:                            level, circuit->interface->name);
                   1002:              continue;
                   1003:            }
1.1.1.2 ! misho    1004:           for (ALL_LIST_ELEMENTS_RO (adj_list, anode, adj))
1.1       misho    1005:            {
                   1006:              if (!speaks (&adj->nlpids, family))
                   1007:                  continue;
                   1008:              switch (adj->sys_type)
                   1009:                {
                   1010:                case ISIS_SYSTYPE_ES:
                   1011:                  isis_spf_add_local (spftree, VTYPE_ES, adj->sysid, adj,
1.1.1.2 ! misho    1012:                                      circuit->te_metric[level - 1],
        !          1013:                                      family, parent);
1.1       misho    1014:                  break;
                   1015:                case ISIS_SYSTYPE_IS:
                   1016:                case ISIS_SYSTYPE_L1_IS:
                   1017:                case ISIS_SYSTYPE_L2_IS:
1.1.1.2 ! misho    1018:                  isis_spf_add_local (spftree,
        !          1019:                                       spftree->area->oldmetric ?
        !          1020:                                       VTYPE_NONPSEUDO_IS :
        !          1021:                                       VTYPE_NONPSEUDO_TE_IS,
        !          1022:                                       adj->sysid, adj,
        !          1023:                                       circuit->te_metric[level - 1],
        !          1024:                                       family, parent);
1.1       misho    1025:                  memcpy (lsp_id, adj->sysid, ISIS_SYS_ID_LEN);
                   1026:                  LSP_PSEUDO_ID (lsp_id) = 0;
                   1027:                  LSP_FRAGMENT (lsp_id) = 0;
1.1.1.2 ! misho    1028:                  lsp = lsp_search (lsp_id, spftree->area->lspdb[level - 1]);
        !          1029:                   if (lsp == NULL || lsp->lsp_header->rem_lifetime == 0)
        !          1030:                     zlog_warn ("ISIS-Spf: No LSP %s found for IS adjacency "
        !          1031:                         "L%d on %s (ID %u)",
        !          1032:                        rawlspid_print (lsp_id), level,
        !          1033:                        circuit->interface->name, circuit->circuit_id);
1.1       misho    1034:                  break;
                   1035:                case ISIS_SYSTYPE_UNKNOWN:
                   1036:                default:
                   1037:                  zlog_warn ("isis_spf_preload_tent unknow adj type");
                   1038:                }
                   1039:            }
                   1040:          list_delete (adj_list);
                   1041:          /*
                   1042:           * Add the pseudonode 
                   1043:           */
                   1044:          if (level == 1)
                   1045:            memcpy (lsp_id, circuit->u.bc.l1_desig_is, ISIS_SYS_ID_LEN + 1);
                   1046:          else
                   1047:            memcpy (lsp_id, circuit->u.bc.l2_desig_is, ISIS_SYS_ID_LEN + 1);
1.1.1.2 ! misho    1048:          /* can happen during DR reboot */
        !          1049:          if (memcmp (lsp_id, null_lsp_id, ISIS_SYS_ID_LEN + 1) == 0)
        !          1050:            {
        !          1051:              if (isis->debugs & DEBUG_SPF_EVENTS)
        !          1052:                zlog_debug ("ISIS-Spf: No L%d DR on %s (ID %d)",
        !          1053:                    level, circuit->interface->name, circuit->circuit_id);
        !          1054:              continue;
        !          1055:            }
1.1       misho    1056:          adj = isis_adj_lookup (lsp_id, adjdb);
                   1057:          /* if no adj, we are the dis or error */
                   1058:          if (!adj && !circuit->u.bc.is_dr[level - 1])
                   1059:            {
1.1.1.2 ! misho    1060:               zlog_warn ("ISIS-Spf: No adjacency found from root "
        !          1061:                   "to L%d DR %s on %s (ID %d)",
        !          1062:                  level, rawlspid_print (lsp_id),
        !          1063:                  circuit->interface->name, circuit->circuit_id);
        !          1064:               continue;
1.1       misho    1065:            }
1.1.1.2 ! misho    1066:          lsp = lsp_search (lsp_id, spftree->area->lspdb[level - 1]);
1.1       misho    1067:          if (lsp == NULL || lsp->lsp_header->rem_lifetime == 0)
                   1068:            {
1.1.1.2 ! misho    1069:              zlog_warn ("ISIS-Spf: No lsp (%p) found from root "
        !          1070:                   "to L%d DR %s on %s (ID %d)",
        !          1071:                  lsp, level, rawlspid_print (lsp_id), 
        !          1072:                  circuit->interface->name, circuit->circuit_id);
        !          1073:               continue;
        !          1074:            }
        !          1075:          isis_spf_process_pseudo_lsp (spftree, lsp,
        !          1076:                                        circuit->te_metric[level - 1], 0,
        !          1077:                                        family, root_sysid, parent);
1.1       misho    1078:        }
                   1079:       else if (circuit->circ_type == CIRCUIT_T_P2P)
                   1080:        {
                   1081:          adj = circuit->u.p2p.neighbor;
                   1082:          if (!adj)
                   1083:            continue;
                   1084:          switch (adj->sys_type)
                   1085:            {
                   1086:            case ISIS_SYSTYPE_ES:
                   1087:              isis_spf_add_local (spftree, VTYPE_ES, adj->sysid, adj,
1.1.1.2 ! misho    1088:                                  circuit->te_metric[level - 1], family,
        !          1089:                                  parent);
1.1       misho    1090:              break;
                   1091:            case ISIS_SYSTYPE_IS:
                   1092:            case ISIS_SYSTYPE_L1_IS:
                   1093:            case ISIS_SYSTYPE_L2_IS:
                   1094:              if (speaks (&adj->nlpids, family))
1.1.1.2 ! misho    1095:                isis_spf_add_local (spftree,
        !          1096:                                    spftree->area->oldmetric ?
        !          1097:                                     VTYPE_NONPSEUDO_IS :
        !          1098:                                    VTYPE_NONPSEUDO_TE_IS,
        !          1099:                                     adj->sysid,
1.1       misho    1100:                                    adj, circuit->te_metric[level - 1],
1.1.1.2 ! misho    1101:                                    family, parent);
1.1       misho    1102:              break;
                   1103:            case ISIS_SYSTYPE_UNKNOWN:
                   1104:            default:
1.1.1.2 ! misho    1105:              zlog_warn ("isis_spf_preload_tent unknown adj type");
1.1       misho    1106:              break;
                   1107:            }
                   1108:        }
1.1.1.2 ! misho    1109:       else if (circuit->circ_type == CIRCUIT_T_LOOPBACK)
        !          1110:        {
        !          1111:           continue;
        !          1112:         }
1.1       misho    1113:       else
                   1114:        {
                   1115:          zlog_warn ("isis_spf_preload_tent unsupported media");
                   1116:          retval = ISIS_WARNING;
                   1117:        }
                   1118:     }
                   1119: 
                   1120:   return retval;
                   1121: }
                   1122: 
                   1123: /*
                   1124:  * The parent(s) for vertex is set when added to TENT list
                   1125:  * now we just put the child pointer(s) in place
                   1126:  */
                   1127: static void
                   1128: add_to_paths (struct isis_spftree *spftree, struct isis_vertex *vertex,
1.1.1.2 ! misho    1129:              int level)
1.1       misho    1130: {
                   1131:   u_char buff[BUFSIZ];
1.1.1.2 ! misho    1132: 
        !          1133:   if (isis_find_vertex (spftree->paths, vertex->N.id, vertex->type))
        !          1134:     return;
1.1       misho    1135:   listnode_add (spftree->paths, vertex);
                   1136: 
                   1137: #ifdef EXTREME_DEBUG
1.1.1.2 ! misho    1138:   zlog_debug ("ISIS-Spf: added %s %s %s depth %d dist %d to PATHS",
        !          1139:               print_sys_hostname (vertex->N.id),
1.1       misho    1140:              vtype2string (vertex->type), vid2string (vertex, buff),
                   1141:              vertex->depth, vertex->d_N);
                   1142: #endif /* EXTREME_DEBUG */
1.1.1.2 ! misho    1143: 
1.1       misho    1144:   if (vertex->type > VTYPE_ES)
                   1145:     {
                   1146:       if (listcount (vertex->Adj_N) > 0)
                   1147:        isis_route_create ((struct prefix *) &vertex->N.prefix, vertex->d_N,
1.1.1.2 ! misho    1148:                           vertex->depth, vertex->Adj_N, spftree->area, level);
1.1       misho    1149:       else if (isis->debugs & DEBUG_SPF_EVENTS)
1.1.1.2 ! misho    1150:        zlog_debug ("ISIS-Spf: no adjacencies do not install route for "
        !          1151:                     "%s depth %d dist %d", vid2string (vertex, buff),
        !          1152:                     vertex->depth, vertex->d_N);
1.1       misho    1153:     }
                   1154: 
                   1155:   return;
                   1156: }
                   1157: 
                   1158: static void
                   1159: init_spt (struct isis_spftree *spftree)
                   1160: {
                   1161:   spftree->tents->del = spftree->paths->del = (void (*)(void *)) isis_vertex_del;
                   1162:   list_delete_all_node (spftree->tents);
                   1163:   list_delete_all_node (spftree->paths);
                   1164:   spftree->tents->del = spftree->paths->del = NULL;
                   1165:   return;
                   1166: }
                   1167: 
                   1168: static int
1.1.1.2 ! misho    1169: isis_run_spf (struct isis_area *area, int level, int family, u_char *sysid)
1.1       misho    1170: {
                   1171:   int retval = ISIS_OK;
                   1172:   struct listnode *node;
                   1173:   struct isis_vertex *vertex;
1.1.1.2 ! misho    1174:   struct isis_vertex *root_vertex;
1.1       misho    1175:   struct isis_spftree *spftree = NULL;
                   1176:   u_char lsp_id[ISIS_SYS_ID_LEN + 2];
                   1177:   struct isis_lsp *lsp;
                   1178:   struct route_table *table = NULL;
1.1.1.2 ! misho    1179:   struct timespec time_now;
        !          1180:   unsigned long long start_time, end_time;
        !          1181: 
        !          1182:   /* Get time that can't roll backwards. */
        !          1183:   clock_gettime(CLOCK_MONOTONIC, &time_now);
        !          1184:   start_time = time_now.tv_sec;
        !          1185:   start_time = (start_time * 1000000) + (time_now.tv_nsec / 1000);
1.1       misho    1186: 
                   1187:   if (family == AF_INET)
                   1188:     spftree = area->spftree[level - 1];
                   1189: #ifdef HAVE_IPV6
                   1190:   else if (family == AF_INET6)
                   1191:     spftree = area->spftree6[level - 1];
                   1192: #endif
                   1193:   assert (spftree);
1.1.1.2 ! misho    1194:   assert (sysid);
1.1       misho    1195: 
                   1196:   /* Make all routes in current route table inactive. */
                   1197:   if (family == AF_INET)
                   1198:     table = area->route_table[level - 1];
                   1199: #ifdef HAVE_IPV6
                   1200:   else if (family == AF_INET6)
                   1201:     table = area->route_table6[level - 1];
                   1202: #endif
                   1203: 
1.1.1.2 ! misho    1204:   isis_route_invalidate_table (area, table);
1.1       misho    1205: 
                   1206:   /*
                   1207:    * C.2.5 Step 0
                   1208:    */
                   1209:   init_spt (spftree);
                   1210:   /*              a) */
1.1.1.2 ! misho    1211:   root_vertex = isis_spf_add_root (spftree, level, sysid);
1.1       misho    1212:   /*              b) */
1.1.1.2 ! misho    1213:   retval = isis_spf_preload_tent (spftree, level, family, sysid, root_vertex);
        !          1214:   if (retval != ISIS_OK)
        !          1215:     {
        !          1216:       zlog_warn ("ISIS-Spf: failed to load TENT SPF-root:%s", print_sys_hostname(sysid));
        !          1217:       goto out;
        !          1218:     }
1.1       misho    1219: 
                   1220:   /*
                   1221:    * C.2.7 Step 2
                   1222:    */
                   1223:   if (listcount (spftree->tents) == 0)
                   1224:     {
1.1.1.2 ! misho    1225:       zlog_warn ("ISIS-Spf: TENT is empty SPF-root:%s", print_sys_hostname(sysid));
1.1       misho    1226:       goto out;
                   1227:     }
                   1228: 
                   1229:   while (listcount (spftree->tents) > 0)
                   1230:     {
                   1231:       node = listhead (spftree->tents);
                   1232:       vertex = listgetdata (node);
1.1.1.2 ! misho    1233: 
        !          1234: #ifdef EXTREME_DEBUG
        !          1235:   zlog_debug ("ISIS-Spf: get TENT node %s %s depth %d dist %d to PATHS",
        !          1236:               print_sys_hostname (vertex->N.id),
        !          1237:              vtype2string (vertex->type), vertex->depth, vertex->d_N);
        !          1238: #endif /* EXTREME_DEBUG */
        !          1239: 
        !          1240:       /* Remove from tent list and add to paths list */
1.1       misho    1241:       list_delete_node (spftree->tents, node);
1.1.1.2 ! misho    1242:       add_to_paths (spftree, vertex, level);
        !          1243:       switch (vertex->type)
        !          1244:         {
        !          1245:        case VTYPE_PSEUDO_IS:
        !          1246:        case VTYPE_NONPSEUDO_IS:
        !          1247:        case VTYPE_PSEUDO_TE_IS:
        !          1248:        case VTYPE_NONPSEUDO_TE_IS:
1.1       misho    1249:          memcpy (lsp_id, vertex->N.id, ISIS_SYS_ID_LEN + 1);
                   1250:          LSP_FRAGMENT (lsp_id) = 0;
                   1251:          lsp = lsp_search (lsp_id, area->lspdb[level - 1]);
1.1.1.2 ! misho    1252:          if (lsp && lsp->lsp_header->rem_lifetime != 0)
1.1       misho    1253:            {
                   1254:              if (LSP_PSEUDO_ID (lsp_id))
                   1255:                {
                   1256:                  isis_spf_process_pseudo_lsp (spftree, lsp, vertex->d_N,
1.1.1.2 ! misho    1257:                                               vertex->depth, family, sysid,
        !          1258:                                               vertex);
1.1       misho    1259:                }
                   1260:              else
                   1261:                {
                   1262:                  isis_spf_process_lsp (spftree, lsp, vertex->d_N,
1.1.1.2 ! misho    1263:                                        vertex->depth, family, sysid, vertex);
1.1       misho    1264:                }
                   1265:            }
                   1266:          else
                   1267:            {
                   1268:              zlog_warn ("ISIS-Spf: No LSP found for %s",
                   1269:                         rawlspid_print (lsp_id));
                   1270:            }
1.1.1.2 ! misho    1271:          break;
        !          1272:        default:;
1.1       misho    1273:        }
                   1274:     }
                   1275: 
                   1276: out:
1.1.1.2 ! misho    1277:   isis_route_validate (area);
1.1       misho    1278:   spftree->pending = 0;
1.1.1.2 ! misho    1279:   spftree->runcount++;
        !          1280:   spftree->last_run_timestamp = time (NULL);
        !          1281:   clock_gettime(CLOCK_MONOTONIC, &time_now);
        !          1282:   end_time = time_now.tv_sec;
        !          1283:   end_time = (end_time * 1000000) + (time_now.tv_nsec / 1000);
        !          1284:   spftree->last_run_duration = end_time - start_time;
        !          1285: 
1.1       misho    1286: 
                   1287:   return retval;
                   1288: }
                   1289: 
                   1290: int
                   1291: isis_run_spf_l1 (struct thread *thread)
                   1292: {
                   1293:   struct isis_area *area;
                   1294:   int retval = ISIS_OK;
                   1295: 
                   1296:   area = THREAD_ARG (thread);
                   1297:   assert (area);
                   1298: 
                   1299:   area->spftree[0]->t_spf = NULL;
1.1.1.2 ! misho    1300:   area->spftree[0]->pending = 0;
1.1       misho    1301: 
                   1302:   if (!(area->is_type & IS_LEVEL_1))
                   1303:     {
                   1304:       if (isis->debugs & DEBUG_SPF_EVENTS)
                   1305:        zlog_warn ("ISIS-SPF (%s) area does not share level",
                   1306:                   area->area_tag);
                   1307:       return ISIS_WARNING;
                   1308:     }
                   1309: 
                   1310:   if (isis->debugs & DEBUG_SPF_EVENTS)
                   1311:     zlog_debug ("ISIS-Spf (%s) L1 SPF needed, periodic SPF", area->area_tag);
                   1312: 
                   1313:   if (area->ip_circuits)
1.1.1.2 ! misho    1314:     retval = isis_run_spf (area, 1, AF_INET, isis->sysid);
1.1       misho    1315: 
                   1316:   return retval;
                   1317: }
                   1318: 
                   1319: int
                   1320: isis_run_spf_l2 (struct thread *thread)
                   1321: {
                   1322:   struct isis_area *area;
                   1323:   int retval = ISIS_OK;
                   1324: 
                   1325:   area = THREAD_ARG (thread);
                   1326:   assert (area);
                   1327: 
                   1328:   area->spftree[1]->t_spf = NULL;
1.1.1.2 ! misho    1329:   area->spftree[1]->pending = 0;
1.1       misho    1330: 
                   1331:   if (!(area->is_type & IS_LEVEL_2))
                   1332:     {
                   1333:       if (isis->debugs & DEBUG_SPF_EVENTS)
                   1334:        zlog_warn ("ISIS-SPF (%s) area does not share level", area->area_tag);
                   1335:       return ISIS_WARNING;
                   1336:     }
                   1337: 
                   1338:   if (isis->debugs & DEBUG_SPF_EVENTS)
                   1339:     zlog_debug ("ISIS-Spf (%s) L2 SPF needed, periodic SPF", area->area_tag);
                   1340: 
                   1341:   if (area->ip_circuits)
1.1.1.2 ! misho    1342:     retval = isis_run_spf (area, 2, AF_INET, isis->sysid);
1.1       misho    1343: 
                   1344:   return retval;
                   1345: }
                   1346: 
                   1347: int
                   1348: isis_spf_schedule (struct isis_area *area, int level)
                   1349: {
                   1350:   struct isis_spftree *spftree = area->spftree[level - 1];
1.1.1.2 ! misho    1351:   time_t now = time (NULL);
        !          1352:   int diff = now - spftree->last_run_timestamp;
1.1       misho    1353: 
1.1.1.2 ! misho    1354:   assert (diff >= 0);
        !          1355:   assert (area->is_type & level);
1.1       misho    1356: 
1.1.1.2 ! misho    1357:   if (isis->debugs & DEBUG_SPF_EVENTS)
        !          1358:     zlog_debug ("ISIS-Spf (%s) L%d SPF schedule called, lastrun %d sec ago",
        !          1359:                 area->area_tag, level, diff);
1.1       misho    1360: 
1.1.1.2 ! misho    1361:   if (spftree->pending)
        !          1362:     return ISIS_OK;
1.1       misho    1363: 
                   1364:   THREAD_TIMER_OFF (spftree->t_spf);
                   1365: 
1.1.1.2 ! misho    1366:   /* wait configured min_spf_interval before doing the SPF */
        !          1367:   if (diff >= area->min_spf_interval[level-1])
        !          1368:       return isis_run_spf (area, level, AF_INET, isis->sysid);
        !          1369: 
        !          1370:   if (level == 1)
        !          1371:     THREAD_TIMER_ON (master, spftree->t_spf, isis_run_spf_l1, area,
        !          1372:                      area->min_spf_interval[0] - diff);
1.1       misho    1373:   else
1.1.1.2 ! misho    1374:     THREAD_TIMER_ON (master, spftree->t_spf, isis_run_spf_l2, area,
        !          1375:                      area->min_spf_interval[1] - diff);
1.1       misho    1376: 
1.1.1.2 ! misho    1377:   if (isis->debugs & DEBUG_SPF_EVENTS)
        !          1378:     zlog_debug ("ISIS-Spf (%s) L%d SPF scheduled %d sec from now",
        !          1379:                 area->area_tag, level, area->min_spf_interval[level-1] - diff);
        !          1380: 
        !          1381:   spftree->pending = 1;
        !          1382: 
        !          1383:   return ISIS_OK;
1.1       misho    1384: }
                   1385: 
                   1386: #ifdef HAVE_IPV6
                   1387: static int
                   1388: isis_run_spf6_l1 (struct thread *thread)
                   1389: {
                   1390:   struct isis_area *area;
                   1391:   int retval = ISIS_OK;
                   1392: 
                   1393:   area = THREAD_ARG (thread);
                   1394:   assert (area);
                   1395: 
                   1396:   area->spftree6[0]->t_spf = NULL;
1.1.1.2 ! misho    1397:   area->spftree6[0]->pending = 0;
1.1       misho    1398: 
                   1399:   if (!(area->is_type & IS_LEVEL_1))
                   1400:     {
                   1401:       if (isis->debugs & DEBUG_SPF_EVENTS)
1.1.1.2 ! misho    1402:         zlog_warn ("ISIS-SPF (%s) area does not share level", area->area_tag);
1.1       misho    1403:       return ISIS_WARNING;
                   1404:     }
                   1405: 
                   1406:   if (isis->debugs & DEBUG_SPF_EVENTS)
                   1407:     zlog_debug ("ISIS-Spf (%s) L1 SPF needed, periodic SPF", area->area_tag);
                   1408: 
                   1409:   if (area->ipv6_circuits)
1.1.1.2 ! misho    1410:     retval = isis_run_spf (area, 1, AF_INET6, isis->sysid);
1.1       misho    1411: 
                   1412:   return retval;
                   1413: }
                   1414: 
                   1415: static int
                   1416: isis_run_spf6_l2 (struct thread *thread)
                   1417: {
                   1418:   struct isis_area *area;
                   1419:   int retval = ISIS_OK;
                   1420: 
                   1421:   area = THREAD_ARG (thread);
                   1422:   assert (area);
                   1423: 
                   1424:   area->spftree6[1]->t_spf = NULL;
1.1.1.2 ! misho    1425:   area->spftree6[1]->pending = 0;
1.1       misho    1426: 
                   1427:   if (!(area->is_type & IS_LEVEL_2))
                   1428:     {
                   1429:       if (isis->debugs & DEBUG_SPF_EVENTS)
                   1430:         zlog_warn ("ISIS-SPF (%s) area does not share level", area->area_tag);
                   1431:       return ISIS_WARNING;
                   1432:     }
                   1433: 
                   1434:   if (isis->debugs & DEBUG_SPF_EVENTS)
                   1435:     zlog_debug ("ISIS-Spf (%s) L2 SPF needed, periodic SPF.", area->area_tag);
                   1436: 
                   1437:   if (area->ipv6_circuits)
1.1.1.2 ! misho    1438:     retval = isis_run_spf (area, 2, AF_INET6, isis->sysid);
1.1       misho    1439: 
                   1440:   return retval;
                   1441: }
                   1442: 
                   1443: int
                   1444: isis_spf_schedule6 (struct isis_area *area, int level)
                   1445: {
                   1446:   int retval = ISIS_OK;
                   1447:   struct isis_spftree *spftree = area->spftree6[level - 1];
1.1.1.2 ! misho    1448:   time_t now = time (NULL);
        !          1449:   time_t diff = now - spftree->last_run_timestamp;
1.1       misho    1450: 
1.1.1.2 ! misho    1451:   assert (diff >= 0);
        !          1452:   assert (area->is_type & level);
1.1       misho    1453: 
1.1.1.2 ! misho    1454:   if (isis->debugs & DEBUG_SPF_EVENTS)
        !          1455:     zlog_debug ("ISIS-Spf (%s) L%d SPF schedule called, lastrun %d sec ago",
        !          1456:                 area->area_tag, level, diff);
1.1       misho    1457: 
1.1.1.2 ! misho    1458:   if (spftree->pending)
        !          1459:     return ISIS_OK;
1.1       misho    1460: 
                   1461:   THREAD_TIMER_OFF (spftree->t_spf);
                   1462: 
1.1.1.2 ! misho    1463:   /* wait configured min_spf_interval before doing the SPF */
        !          1464:   if (diff >= area->min_spf_interval[level-1])
        !          1465:       return isis_run_spf (area, level, AF_INET6, isis->sysid);
        !          1466: 
        !          1467:   if (level == 1)
        !          1468:     THREAD_TIMER_ON (master, spftree->t_spf, isis_run_spf6_l1, area,
        !          1469:                      area->min_spf_interval[0] - diff);
1.1       misho    1470:   else
1.1.1.2 ! misho    1471:     THREAD_TIMER_ON (master, spftree->t_spf, isis_run_spf6_l2, area,
        !          1472:                      area->min_spf_interval[1] - diff);
1.1       misho    1473: 
1.1.1.2 ! misho    1474:   if (isis->debugs & DEBUG_SPF_EVENTS)
        !          1475:     zlog_debug ("ISIS-Spf (%s) L%d SPF scheduled %d sec from now",
        !          1476:                 area->area_tag, level, area->min_spf_interval[level-1] - diff);
        !          1477: 
        !          1478:   spftree->pending = 1;
1.1       misho    1479: 
                   1480:   return retval;
                   1481: }
                   1482: #endif
                   1483: 
                   1484: static void
1.1.1.2 ! misho    1485: isis_print_paths (struct vty *vty, struct list *paths, u_char *root_sysid)
1.1       misho    1486: {
                   1487:   struct listnode *node;
1.1.1.2 ! misho    1488:   struct listnode *anode;
1.1       misho    1489:   struct isis_vertex *vertex;
                   1490:   struct isis_adjacency *adj;
                   1491:   u_char buff[255];
                   1492: 
1.1.1.2 ! misho    1493:   vty_out (vty, "Vertex               Type         Metric "
        !          1494:                 "Next-Hop             Interface Parent%s", VTY_NEWLINE);
1.1       misho    1495: 
1.1.1.2 ! misho    1496:   for (ALL_LIST_ELEMENTS_RO (paths, node, vertex)) {
        !          1497:       if (memcmp (vertex->N.id, root_sysid, ISIS_SYS_ID_LEN) == 0) {
        !          1498:        vty_out (vty, "%-20s %-12s %-6s", print_sys_hostname (root_sysid),
        !          1499:                 "", "");
        !          1500:        vty_out (vty, "%-30s", "");
        !          1501:       } else {
        !          1502:        int rows = 0;
        !          1503:        vty_out (vty, "%-20s %-12s %-6u ", vid2string (vertex, buff),
        !          1504:                 vtype2string (vertex->type), vertex->d_N);
        !          1505:        for (ALL_LIST_ELEMENTS_RO (vertex->Adj_N, anode, adj)) {
        !          1506:          if (adj) {
        !          1507:            if (rows) {
        !          1508:                vty_out (vty, "%s", VTY_NEWLINE);
        !          1509:                vty_out (vty, "%-20s %-12s %-6s ", "", "", "");
        !          1510:            }
        !          1511:            vty_out (vty, "%-20s %-9s ",
        !          1512:                     print_sys_hostname (adj->sysid),
        !          1513:                     adj->circuit->interface->name);
        !          1514:            ++rows;
        !          1515:          }
1.1       misho    1516:        }
1.1.1.2 ! misho    1517:        if (rows == 0)
        !          1518:          vty_out (vty, "%-30s ", "");
        !          1519:       }
        !          1520: 
        !          1521:       /* Print list of parents for the ECMP DAG */
        !          1522:       if (listcount (vertex->parents) > 0) {
        !          1523:        struct listnode *pnode;
        !          1524:        struct isis_vertex *pvertex;
        !          1525:        int rows = 0;
        !          1526:        for (ALL_LIST_ELEMENTS_RO (vertex->parents, pnode, pvertex)) {
        !          1527:          if (rows) {
        !          1528:            vty_out (vty, "%s", VTY_NEWLINE);
        !          1529:            vty_out (vty, "%-72s", "");
        !          1530:          }
        !          1531:          vty_out (vty, "%s(%d)",
        !          1532:                   vid2string (pvertex, buff), pvertex->type);
        !          1533:          ++rows;
1.1       misho    1534:        }
1.1.1.2 ! misho    1535:       } else {
        !          1536:        vty_out (vty, "  NULL ");
        !          1537:       }
        !          1538: 
1.1       misho    1539: #if 0
1.1.1.2 ! misho    1540:       if (listcount (vertex->children) > 0) {
        !          1541:          struct listnode *cnode;
        !          1542:          struct isis_vertex *cvertex;
        !          1543:          for (ALL_LIST_ELEMENTS_RO (vertex->children, cnode, cvertex)) {
        !          1544:              vty_out (vty, "%s", VTY_NEWLINE);
        !          1545:              vty_out (vty, "%-72s", "");
        !          1546:              vty_out (vty, "%s(%d) ", 
        !          1547:                       vid2string (cvertex, buff), cvertex->type);
        !          1548:            }
        !          1549:        }
1.1       misho    1550: #endif
1.1.1.2 ! misho    1551:       vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1552:     }
                   1553: }
                   1554: 
                   1555: DEFUN (show_isis_topology,
                   1556:        show_isis_topology_cmd,
                   1557:        "show isis topology",
                   1558:        SHOW_STR
                   1559:        "IS-IS information\n"
                   1560:        "IS-IS paths to Intermediate Systems\n")
                   1561: {
                   1562:   struct listnode *node;
                   1563:   struct isis_area *area;
                   1564:   int level;
                   1565: 
                   1566:   if (!isis->area_list || isis->area_list->count == 0)
                   1567:     return CMD_SUCCESS;
                   1568: 
                   1569:   for (ALL_LIST_ELEMENTS_RO (isis->area_list, node, area))
                   1570:     {
                   1571:       vty_out (vty, "Area %s:%s", area->area_tag ? area->area_tag : "null",
                   1572:               VTY_NEWLINE);
                   1573: 
                   1574:       for (level = 0; level < ISIS_LEVELS; level++)
                   1575:        {
                   1576:          if (area->ip_circuits > 0 && area->spftree[level]
                   1577:              && area->spftree[level]->paths->count > 0)
                   1578:            {
                   1579:              vty_out (vty, "IS-IS paths to level-%d routers that speak IP%s",
                   1580:                       level + 1, VTY_NEWLINE);
1.1.1.2 ! misho    1581:              isis_print_paths (vty, area->spftree[level]->paths, isis->sysid);
        !          1582:              vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1583:            }
                   1584: #ifdef HAVE_IPV6
                   1585:          if (area->ipv6_circuits > 0 && area->spftree6[level]
                   1586:              && area->spftree6[level]->paths->count > 0)
                   1587:            {
                   1588:              vty_out (vty,
                   1589:                       "IS-IS paths to level-%d routers that speak IPv6%s",
                   1590:                       level + 1, VTY_NEWLINE);
1.1.1.2 ! misho    1591:              isis_print_paths (vty, area->spftree6[level]->paths, isis->sysid);
        !          1592:              vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1593:            }
                   1594: #endif /* HAVE_IPV6 */
                   1595:        }
1.1.1.2 ! misho    1596: 
        !          1597:       vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1598:     }
                   1599: 
                   1600:   return CMD_SUCCESS;
                   1601: }
                   1602: 
                   1603: DEFUN (show_isis_topology_l1,
                   1604:        show_isis_topology_l1_cmd,
                   1605:        "show isis topology level-1",
                   1606:        SHOW_STR
                   1607:        "IS-IS information\n"
                   1608:        "IS-IS paths to Intermediate Systems\n"
                   1609:        "Paths to all level-1 routers in the area\n")
                   1610: {
                   1611:   struct listnode *node;
                   1612:   struct isis_area *area;
                   1613: 
                   1614:   if (!isis->area_list || isis->area_list->count == 0)
                   1615:     return CMD_SUCCESS;
                   1616: 
                   1617:   for (ALL_LIST_ELEMENTS_RO (isis->area_list, node, area))
                   1618:     {
                   1619:       vty_out (vty, "Area %s:%s", area->area_tag ? area->area_tag : "null",
                   1620:               VTY_NEWLINE);
                   1621: 
                   1622:       if (area->ip_circuits > 0 && area->spftree[0]
                   1623:          && area->spftree[0]->paths->count > 0)
                   1624:        {
                   1625:          vty_out (vty, "IS-IS paths to level-1 routers that speak IP%s",
                   1626:                   VTY_NEWLINE);
1.1.1.2 ! misho    1627:          isis_print_paths (vty, area->spftree[0]->paths, isis->sysid);
        !          1628:          vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1629:        }
                   1630: #ifdef HAVE_IPV6
                   1631:       if (area->ipv6_circuits > 0 && area->spftree6[0]
                   1632:          && area->spftree6[0]->paths->count > 0)
                   1633:        {
                   1634:          vty_out (vty, "IS-IS paths to level-1 routers that speak IPv6%s",
                   1635:                   VTY_NEWLINE);
1.1.1.2 ! misho    1636:          isis_print_paths (vty, area->spftree6[0]->paths, isis->sysid);
        !          1637:          vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1638:        }
                   1639: #endif /* HAVE_IPV6 */
1.1.1.2 ! misho    1640:       vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1641:     }
                   1642: 
                   1643:   return CMD_SUCCESS;
                   1644: }
                   1645: 
                   1646: DEFUN (show_isis_topology_l2,
                   1647:        show_isis_topology_l2_cmd,
                   1648:        "show isis topology level-2",
                   1649:        SHOW_STR
                   1650:        "IS-IS information\n"
                   1651:        "IS-IS paths to Intermediate Systems\n"
                   1652:        "Paths to all level-2 routers in the domain\n")
                   1653: {
                   1654:   struct listnode *node;
                   1655:   struct isis_area *area;
                   1656: 
                   1657:   if (!isis->area_list || isis->area_list->count == 0)
                   1658:     return CMD_SUCCESS;
                   1659: 
                   1660:   for (ALL_LIST_ELEMENTS_RO (isis->area_list, node, area))
                   1661:     {
                   1662:       vty_out (vty, "Area %s:%s", area->area_tag ? area->area_tag : "null",
                   1663:               VTY_NEWLINE);
                   1664: 
                   1665:       if (area->ip_circuits > 0 && area->spftree[1]
                   1666:          && area->spftree[1]->paths->count > 0)
                   1667:        {
                   1668:          vty_out (vty, "IS-IS paths to level-2 routers that speak IP%s",
                   1669:                   VTY_NEWLINE);
1.1.1.2 ! misho    1670:          isis_print_paths (vty, area->spftree[1]->paths, isis->sysid);
        !          1671:          vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1672:        }
                   1673: #ifdef HAVE_IPV6
                   1674:       if (area->ipv6_circuits > 0 && area->spftree6[1]
                   1675:          && area->spftree6[1]->paths->count > 0)
                   1676:        {
                   1677:          vty_out (vty, "IS-IS paths to level-2 routers that speak IPv6%s",
                   1678:                   VTY_NEWLINE);
1.1.1.2 ! misho    1679:          isis_print_paths (vty, area->spftree6[1]->paths, isis->sysid);
        !          1680:          vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1681:        }
                   1682: #endif /* HAVE_IPV6 */
1.1.1.2 ! misho    1683:       vty_out (vty, "%s", VTY_NEWLINE);
1.1       misho    1684:     }
                   1685: 
                   1686:   return CMD_SUCCESS;
                   1687: }
                   1688: 
                   1689: void
                   1690: isis_spf_cmds_init ()
                   1691: {
                   1692:   install_element (VIEW_NODE, &show_isis_topology_cmd);
                   1693:   install_element (VIEW_NODE, &show_isis_topology_l1_cmd);
                   1694:   install_element (VIEW_NODE, &show_isis_topology_l2_cmd);
                   1695: 
                   1696:   install_element (ENABLE_NODE, &show_isis_topology_cmd);
                   1697:   install_element (ENABLE_NODE, &show_isis_topology_l1_cmd);
                   1698:   install_element (ENABLE_NODE, &show_isis_topology_l2_cmd);
                   1699: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>