1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576 |
- /*
- * Copyright (C) 2003 Yasuhiro Ohara
- *
- * This file is part of GNU Zebra.
- *
- * GNU Zebra is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License as published by the
- * Free Software Foundation; either version 2, or (at your option) any
- * later version.
- *
- * GNU Zebra is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with GNU Zebra; see the file COPYING. If not, write to the
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
- */
- #include <zebra.h>
- #include "log.h"
- #include "linklist.h"
- #include "thread.h"
- #include "memory.h"
- #include "if.h"
- #include "prefix.h"
- #include "table.h"
- #include "vty.h"
- #include "command.h"
- #include "ospf6_proto.h"
- #include "ospf6_message.h"
- #include "ospf6_route.h"
- #include "ospf6_lsa.h"
- #include "ospf6_lsdb.h"
- #include "ospf6_top.h"
- #include "ospf6_area.h"
- #include "ospf6_interface.h"
- #include "ospf6_neighbor.h"
- #include "ospf6_intra.h"
- #include "ospf6_asbr.h"
- #include "ospf6_abr.h"
- #include "ospf6_flood.h"
- #include "ospf6d.h"
- unsigned char conf_debug_ospf6_brouter = 0;
- u_int32_t conf_debug_ospf6_brouter_specific_router_id;
- u_int32_t conf_debug_ospf6_brouter_specific_area_id;
- /******************************/
- /* RFC2740 3.4.3.1 Router-LSA */
- /******************************/
- static int
- ospf6_router_lsa_show (struct vty *vty, struct ospf6_lsa *lsa)
- {
- char *start, *end, *current;
- char buf[32], name[32], bits[16], options[32];
- struct ospf6_router_lsa *router_lsa;
- struct ospf6_router_lsdesc *lsdesc;
- router_lsa = (struct ospf6_router_lsa *)
- ((char *) lsa->header + sizeof (struct ospf6_lsa_header));
- ospf6_capability_printbuf (router_lsa->bits, bits, sizeof (bits));
- ospf6_options_printbuf (router_lsa->options, options, sizeof (options));
- vty_out (vty, " Bits: %s Options: %s%s", bits, options, VNL);
- start = (char *) router_lsa + sizeof (struct ospf6_router_lsa);
- end = (char *) lsa->header + ntohs (lsa->header->length);
- for (current = start; current + sizeof (struct ospf6_router_lsdesc) <= end;
- current += sizeof (struct ospf6_router_lsdesc))
- {
- lsdesc = (struct ospf6_router_lsdesc *) current;
- if (lsdesc->type == OSPF6_ROUTER_LSDESC_POINTTOPOINT)
- snprintf (name, sizeof (name), "Point-To-Point");
- else if (lsdesc->type == OSPF6_ROUTER_LSDESC_TRANSIT_NETWORK)
- snprintf (name, sizeof (name), "Transit-Network");
- else if (lsdesc->type == OSPF6_ROUTER_LSDESC_STUB_NETWORK)
- snprintf (name, sizeof (name), "Stub-Network");
- else if (lsdesc->type == OSPF6_ROUTER_LSDESC_VIRTUAL_LINK)
- snprintf (name, sizeof (name), "Virtual-Link");
- else
- snprintf (name, sizeof (name), "Unknown (%#x)", lsdesc->type);
- vty_out (vty, " Type: %s Metric: %d%s",
- name, ntohs (lsdesc->metric), VNL);
- vty_out (vty, " Interface ID: %s%s",
- inet_ntop (AF_INET, &lsdesc->interface_id,
- buf, sizeof (buf)), VNL);
- vty_out (vty, " Neighbor Interface ID: %s%s",
- inet_ntop (AF_INET, &lsdesc->neighbor_interface_id,
- buf, sizeof (buf)), VNL);
- vty_out (vty, " Neighbor Router ID: %s%s",
- inet_ntop (AF_INET, &lsdesc->neighbor_router_id,
- buf, sizeof (buf)), VNL);
- }
- return 0;
- }
- int
- ospf6_router_lsa_originate (struct thread *thread)
- {
- struct ospf6_area *oa;
- char buffer [OSPF6_MAX_LSASIZE];
- struct ospf6_lsa_header *lsa_header;
- struct ospf6_lsa *lsa;
- u_int32_t link_state_id = 0;
- struct listnode *node, *nnode;
- struct listnode *j;
- struct ospf6_interface *oi;
- struct ospf6_neighbor *on, *drouter = NULL;
- struct ospf6_router_lsa *router_lsa;
- struct ospf6_router_lsdesc *lsdesc;
- u_int16_t type;
- u_int32_t router;
- int count;
- oa = (struct ospf6_area *) THREAD_ARG (thread);
- oa->thread_router_lsa = NULL;
- if (IS_OSPF6_DEBUG_ORIGINATE (ROUTER))
- zlog_debug ("Originate Router-LSA for Area %s", oa->name);
- memset (buffer, 0, sizeof (buffer));
- lsa_header = (struct ospf6_lsa_header *) buffer;
- router_lsa = (struct ospf6_router_lsa *)
- ((caddr_t) lsa_header + sizeof (struct ospf6_lsa_header));
- OSPF6_OPT_SET (router_lsa->options, OSPF6_OPT_V6);
- OSPF6_OPT_SET (router_lsa->options, OSPF6_OPT_E);
- OSPF6_OPT_CLEAR (router_lsa->options, OSPF6_OPT_MC);
- OSPF6_OPT_CLEAR (router_lsa->options, OSPF6_OPT_N);
- OSPF6_OPT_SET (router_lsa->options, OSPF6_OPT_R);
- OSPF6_OPT_CLEAR (router_lsa->options, OSPF6_OPT_DC);
- if (ospf6_is_router_abr (ospf6))
- SET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_B);
- else
- UNSET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_B);
- if (ospf6_asbr_is_asbr (ospf6))
- SET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_E);
- else
- UNSET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_E);
- UNSET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_V);
- UNSET_FLAG (router_lsa->bits, OSPF6_ROUTER_BIT_W);
- /* describe links for each interfaces */
- lsdesc = (struct ospf6_router_lsdesc *)
- ((caddr_t) router_lsa + sizeof (struct ospf6_router_lsa));
- for (ALL_LIST_ELEMENTS (oa->if_list, node, nnode, oi))
- {
- /* Interfaces in state Down or Loopback are not described */
- if (oi->state == OSPF6_INTERFACE_DOWN ||
- oi->state == OSPF6_INTERFACE_LOOPBACK)
- continue;
- /* Nor are interfaces without any full adjacencies described */
- count = 0;
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, j, on))
- if (on->state == OSPF6_NEIGHBOR_FULL)
- count++;
-
- if (count == 0)
- continue;
- /* Multiple Router-LSA instance according to size limit setting */
- if ( (oa->router_lsa_size_limit != 0)
- && ((caddr_t) lsdesc + sizeof (struct ospf6_router_lsdesc) -
- /* XXX warning: comparison between signed and unsigned */
- (caddr_t) buffer > oa->router_lsa_size_limit))
- {
- if ((caddr_t) lsdesc == (caddr_t) router_lsa +
- sizeof (struct ospf6_router_lsa))
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (ROUTER))
- zlog_debug ("Size limit setting for Router-LSA too short");
- return 0;
- }
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_ROUTER);
- lsa_header->id = htonl (link_state_id);
- lsa_header->adv_router = oa->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oa->lsdb);
- lsa_header->length = htons ((caddr_t) lsdesc - (caddr_t) buffer);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_area (lsa, oa);
- /* Reset setting for consecutive origination */
- memset ((caddr_t) router_lsa + sizeof (struct ospf6_router_lsa),
- 0, (caddr_t) lsdesc - (caddr_t) router_lsa);
- lsdesc = (struct ospf6_router_lsdesc *)
- ((caddr_t) router_lsa + sizeof (struct ospf6_router_lsa));
- link_state_id ++;
- }
- /* Point-to-Point interfaces */
- if (if_is_pointopoint (oi->interface))
- {
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, j, on))
- {
- if (on->state != OSPF6_NEIGHBOR_FULL)
- continue;
- lsdesc->type = OSPF6_ROUTER_LSDESC_POINTTOPOINT;
- lsdesc->metric = htons (oi->cost);
- lsdesc->interface_id = htonl (oi->interface->ifindex);
- lsdesc->neighbor_interface_id = htonl (on->ifindex);
- lsdesc->neighbor_router_id = on->router_id;
- lsdesc++;
- }
- }
- /* Broadcast and NBMA interfaces */
- if (if_is_broadcast (oi->interface))
- {
- /* If this router is not DR,
- and If this router not fully adjacent with DR,
- this interface is not transit yet: ignore. */
- if (oi->state != OSPF6_INTERFACE_DR)
- {
- drouter = ospf6_neighbor_lookup (oi->drouter, oi);
- if (drouter == NULL || drouter->state != OSPF6_NEIGHBOR_FULL)
- continue;
- }
- lsdesc->type = OSPF6_ROUTER_LSDESC_TRANSIT_NETWORK;
- lsdesc->metric = htons (oi->cost);
- lsdesc->interface_id = htonl (oi->interface->ifindex);
- if (oi->state != OSPF6_INTERFACE_DR)
- {
- lsdesc->neighbor_interface_id = htonl (drouter->ifindex);
- lsdesc->neighbor_router_id = drouter->router_id;
- }
- else
- {
- lsdesc->neighbor_interface_id = htonl (oi->interface->ifindex);
- lsdesc->neighbor_router_id = oi->area->ospf6->router_id;
- }
- lsdesc++;
- }
- /* Virtual links */
- /* xxx */
- /* Point-to-Multipoint interfaces */
- /* xxx */
- }
- if ((caddr_t) lsdesc != (caddr_t) router_lsa +
- sizeof (struct ospf6_router_lsa))
- {
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_ROUTER);
- lsa_header->id = htonl (link_state_id);
- lsa_header->adv_router = oa->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oa->lsdb);
- lsa_header->length = htons ((caddr_t) lsdesc - (caddr_t) buffer);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_area (lsa, oa);
- link_state_id ++;
- }
- else
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (ROUTER))
- zlog_debug ("Nothing to describe in Router-LSA, suppress");
- }
- /* Do premature-aging of rest, undesired Router-LSAs */
- type = ntohs (OSPF6_LSTYPE_ROUTER);
- router = oa->ospf6->router_id;
- for (lsa = ospf6_lsdb_type_router_head (type, router, oa->lsdb); lsa;
- lsa = ospf6_lsdb_type_router_next (type, router, lsa))
- {
- if (ntohl (lsa->header->id) < link_state_id)
- continue;
- ospf6_lsa_purge (lsa);
- }
- return 0;
- }
- /*******************************/
- /* RFC2740 3.4.3.2 Network-LSA */
- /*******************************/
- static int
- ospf6_network_lsa_show (struct vty *vty, struct ospf6_lsa *lsa)
- {
- char *start, *end, *current;
- struct ospf6_network_lsa *network_lsa;
- struct ospf6_network_lsdesc *lsdesc;
- char buf[128], options[32];
- network_lsa = (struct ospf6_network_lsa *)
- ((caddr_t) lsa->header + sizeof (struct ospf6_lsa_header));
- ospf6_options_printbuf (network_lsa->options, options, sizeof (options));
- vty_out (vty, " Options: %s%s", options, VNL);
- start = (char *) network_lsa + sizeof (struct ospf6_network_lsa);
- end = (char *) lsa->header + ntohs (lsa->header->length);
- for (current = start; current + sizeof (struct ospf6_network_lsdesc) <= end;
- current += sizeof (struct ospf6_network_lsdesc))
- {
- lsdesc = (struct ospf6_network_lsdesc *) current;
- inet_ntop (AF_INET, &lsdesc->router_id, buf, sizeof (buf));
- vty_out (vty, " Attached Router: %s%s", buf, VNL);
- }
- return 0;
- }
- int
- ospf6_network_lsa_originate (struct thread *thread)
- {
- struct ospf6_interface *oi;
- char buffer [OSPF6_MAX_LSASIZE];
- struct ospf6_lsa_header *lsa_header;
- int count;
- struct ospf6_lsa *old, *lsa;
- struct ospf6_network_lsa *network_lsa;
- struct ospf6_network_lsdesc *lsdesc;
- struct ospf6_neighbor *on;
- struct ospf6_link_lsa *link_lsa;
- struct listnode *i;
- u_int16_t type;
- oi = (struct ospf6_interface *) THREAD_ARG (thread);
- oi->thread_network_lsa = NULL;
- /* The interface must be enabled until here. A Network-LSA of a
- disabled interface (but was once enabled) should be flushed
- by ospf6_lsa_refresh (), and does not come here. */
- assert (oi->area);
- old = ospf6_lsdb_lookup (htons (OSPF6_LSTYPE_NETWORK),
- htonl (oi->interface->ifindex),
- oi->area->ospf6->router_id, oi->area->lsdb);
- /* Do not originate Network-LSA if not DR */
- if (oi->state != OSPF6_INTERFACE_DR)
- {
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- if (IS_OSPF6_DEBUG_ORIGINATE (NETWORK))
- zlog_debug ("Originate Network-LSA for Interface %s", oi->interface->name);
- /* If none of neighbor is adjacent to us */
- count = 0;
-
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, i, on))
- if (on->state == OSPF6_NEIGHBOR_FULL)
- count++;
-
- if (count == 0)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (NETWORK))
- zlog_debug ("Interface stub, ignore");
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- /* prepare buffer */
- memset (buffer, 0, sizeof (buffer));
- lsa_header = (struct ospf6_lsa_header *) buffer;
- network_lsa = (struct ospf6_network_lsa *)
- ((caddr_t) lsa_header + sizeof (struct ospf6_lsa_header));
- /* Collect the interface's Link-LSAs to describe
- network's optional capabilities */
- type = htons (OSPF6_LSTYPE_LINK);
- for (lsa = ospf6_lsdb_type_head (type, oi->lsdb); lsa;
- lsa = ospf6_lsdb_type_next (type, lsa))
- {
- link_lsa = (struct ospf6_link_lsa *)
- ((caddr_t) lsa->header + sizeof (struct ospf6_lsa_header));
- network_lsa->options[0] |= link_lsa->options[0];
- network_lsa->options[1] |= link_lsa->options[1];
- network_lsa->options[2] |= link_lsa->options[2];
- }
- lsdesc = (struct ospf6_network_lsdesc *)
- ((caddr_t) network_lsa + sizeof (struct ospf6_network_lsa));
- /* set Link Description to the router itself */
- lsdesc->router_id = oi->area->ospf6->router_id;
- lsdesc++;
- /* Walk through the neighbors */
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, i, on))
- {
- if (on->state != OSPF6_NEIGHBOR_FULL)
- continue;
- /* set this neighbor's Router-ID to LSA */
- lsdesc->router_id = on->router_id;
- lsdesc++;
- }
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_NETWORK);
- lsa_header->id = htonl (oi->interface->ifindex);
- lsa_header->adv_router = oi->area->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oi->area->lsdb);
- lsa_header->length = htons ((caddr_t) lsdesc - (caddr_t) buffer);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_area (lsa, oi->area);
- return 0;
- }
- /****************************/
- /* RFC2740 3.4.3.6 Link-LSA */
- /****************************/
- static int
- ospf6_link_lsa_show (struct vty *vty, struct ospf6_lsa *lsa)
- {
- char *start, *end, *current;
- struct ospf6_link_lsa *link_lsa;
- int prefixnum;
- char buf[128], options[32];
- struct ospf6_prefix *prefix;
- const char *p, *mc, *la, *nu;
- struct in6_addr in6;
- link_lsa = (struct ospf6_link_lsa *)
- ((caddr_t) lsa->header + sizeof (struct ospf6_lsa_header));
- ospf6_options_printbuf (link_lsa->options, options, sizeof (options));
- inet_ntop (AF_INET6, &link_lsa->linklocal_addr, buf, sizeof (buf));
- prefixnum = ntohl (link_lsa->prefix_num);
- vty_out (vty, " Priority: %d Options: %s%s",
- link_lsa->priority, options, VNL);
- vty_out (vty, " LinkLocal Address: %s%s", buf, VNL);
- vty_out (vty, " Number of Prefix: %d%s", prefixnum, VNL);
- start = (char *) link_lsa + sizeof (struct ospf6_link_lsa);
- end = (char *) lsa->header + ntohs (lsa->header->length);
- for (current = start; current < end; current += OSPF6_PREFIX_SIZE (prefix))
- {
- prefix = (struct ospf6_prefix *) current;
- if (prefix->prefix_length == 0 ||
- current + OSPF6_PREFIX_SIZE (prefix) > end)
- break;
- p = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_P) ?
- "P" : "--");
- mc = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_MC) ?
- "MC" : "--");
- la = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_LA) ?
- "LA" : "--");
- nu = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_NU) ?
- "NU" : "--");
- vty_out (vty, " Prefix Options: %s|%s|%s|%s%s",
- p, mc, la, nu, VNL);
- memset (&in6, 0, sizeof (in6));
- memcpy (&in6, OSPF6_PREFIX_BODY (prefix),
- OSPF6_PREFIX_SPACE (prefix->prefix_length));
- inet_ntop (AF_INET6, &in6, buf, sizeof (buf));
- vty_out (vty, " Prefix: %s/%d%s",
- buf, prefix->prefix_length, VNL);
- }
- return 0;
- }
- int
- ospf6_link_lsa_originate (struct thread *thread)
- {
- struct ospf6_interface *oi;
- char buffer[OSPF6_MAX_LSASIZE];
- struct ospf6_lsa_header *lsa_header;
- struct ospf6_lsa *old, *lsa;
- struct ospf6_link_lsa *link_lsa;
- struct ospf6_route *route;
- struct ospf6_prefix *op;
- oi = (struct ospf6_interface *) THREAD_ARG (thread);
- oi->thread_link_lsa = NULL;
- assert (oi->area);
- /* find previous LSA */
- old = ospf6_lsdb_lookup (htons (OSPF6_LSTYPE_LINK),
- htonl (oi->interface->ifindex),
- oi->area->ospf6->router_id, oi->lsdb);
- if (CHECK_FLAG (oi->flag, OSPF6_INTERFACE_DISABLE))
- {
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- if (IS_OSPF6_DEBUG_ORIGINATE (LINK))
- zlog_debug ("Originate Link-LSA for Interface %s", oi->interface->name);
- /* can't make Link-LSA if linklocal address not set */
- if (oi->linklocal_addr == NULL)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (LINK))
- zlog_debug ("No Linklocal address on %s, defer originating",
- oi->interface->name);
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- /* prepare buffer */
- memset (buffer, 0, sizeof (buffer));
- lsa_header = (struct ospf6_lsa_header *) buffer;
- link_lsa = (struct ospf6_link_lsa *)
- ((caddr_t) lsa_header + sizeof (struct ospf6_lsa_header));
- /* Fill Link-LSA */
- link_lsa->priority = oi->priority;
- memcpy (link_lsa->options, oi->area->options, 3);
- memcpy (&link_lsa->linklocal_addr, oi->linklocal_addr,
- sizeof (struct in6_addr));
- link_lsa->prefix_num = htonl (oi->route_connected->count);
- op = (struct ospf6_prefix *)
- ((caddr_t) link_lsa + sizeof (struct ospf6_link_lsa));
- /* connected prefix to advertise */
- for (route = ospf6_route_head (oi->route_connected); route;
- route = ospf6_route_next (route))
- {
- op->prefix_length = route->prefix.prefixlen;
- op->prefix_options = route->path.prefix_options;
- op->prefix_metric = htons (0);
- memcpy (OSPF6_PREFIX_BODY (op), &route->prefix.u.prefix6,
- OSPF6_PREFIX_SPACE (op->prefix_length));
- op = OSPF6_PREFIX_NEXT (op);
- }
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_LINK);
- lsa_header->id = htonl (oi->interface->ifindex);
- lsa_header->adv_router = oi->area->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oi->lsdb);
- lsa_header->length = htons ((caddr_t) op - (caddr_t) buffer);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_interface (lsa, oi);
- return 0;
- }
- /*****************************************/
- /* RFC2740 3.4.3.7 Intra-Area-Prefix-LSA */
- /*****************************************/
- static int
- ospf6_intra_prefix_lsa_show (struct vty *vty, struct ospf6_lsa *lsa)
- {
- char *start, *end, *current;
- struct ospf6_intra_prefix_lsa *intra_prefix_lsa;
- int prefixnum;
- char buf[128];
- struct ospf6_prefix *prefix;
- char id[16], adv_router[16];
- const char *p, *mc, *la, *nu;
- struct in6_addr in6;
- intra_prefix_lsa = (struct ospf6_intra_prefix_lsa *)
- ((caddr_t) lsa->header + sizeof (struct ospf6_lsa_header));
- prefixnum = ntohs (intra_prefix_lsa->prefix_num);
- vty_out (vty, " Number of Prefix: %d%s", prefixnum, VNL);
- inet_ntop (AF_INET, &intra_prefix_lsa->ref_id, id, sizeof (id));
- inet_ntop (AF_INET, &intra_prefix_lsa->ref_adv_router,
- adv_router, sizeof (adv_router));
- vty_out (vty, " Reference: %s Id: %s Adv: %s%s",
- ospf6_lstype_name (intra_prefix_lsa->ref_type), id, adv_router,
- VNL);
- start = (char *) intra_prefix_lsa + sizeof (struct ospf6_intra_prefix_lsa);
- end = (char *) lsa->header + ntohs (lsa->header->length);
- for (current = start; current < end; current += OSPF6_PREFIX_SIZE (prefix))
- {
- prefix = (struct ospf6_prefix *) current;
- if (prefix->prefix_length == 0 ||
- current + OSPF6_PREFIX_SIZE (prefix) > end)
- break;
- p = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_P) ?
- "P" : "--");
- mc = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_MC) ?
- "MC" : "--");
- la = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_LA) ?
- "LA" : "--");
- nu = (CHECK_FLAG (prefix->prefix_options, OSPF6_PREFIX_OPTION_NU) ?
- "NU" : "--");
- vty_out (vty, " Prefix Options: %s|%s|%s|%s%s",
- p, mc, la, nu, VNL);
- memset (&in6, 0, sizeof (in6));
- memcpy (&in6, OSPF6_PREFIX_BODY (prefix),
- OSPF6_PREFIX_SPACE (prefix->prefix_length));
- inet_ntop (AF_INET6, &in6, buf, sizeof (buf));
- vty_out (vty, " Prefix: %s/%d%s",
- buf, prefix->prefix_length, VNL);
- }
- return 0;
- }
- int
- ospf6_intra_prefix_lsa_originate_stub (struct thread *thread)
- {
- struct ospf6_area *oa;
- char buffer[OSPF6_MAX_LSASIZE];
- struct ospf6_lsa_header *lsa_header;
- struct ospf6_lsa *old, *lsa;
- struct ospf6_intra_prefix_lsa *intra_prefix_lsa;
- struct ospf6_interface *oi;
- struct ospf6_neighbor *on;
- struct ospf6_route *route;
- struct ospf6_prefix *op;
- struct listnode *i, *j;
- int full_count = 0;
- unsigned short prefix_num = 0;
- char buf[BUFSIZ];
- struct ospf6_route_table *route_advertise;
- oa = (struct ospf6_area *) THREAD_ARG (thread);
- oa->thread_intra_prefix_lsa = NULL;
- /* find previous LSA */
- old = ospf6_lsdb_lookup (htons (OSPF6_LSTYPE_INTRA_PREFIX),
- htonl (0), oa->ospf6->router_id, oa->lsdb);
- if (! IS_AREA_ENABLED (oa))
- {
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug ("Originate Intra-Area-Prefix-LSA for area %s's stub prefix",
- oa->name);
- /* prepare buffer */
- memset (buffer, 0, sizeof (buffer));
- lsa_header = (struct ospf6_lsa_header *) buffer;
- intra_prefix_lsa = (struct ospf6_intra_prefix_lsa *)
- ((caddr_t) lsa_header + sizeof (struct ospf6_lsa_header));
- /* Fill Intra-Area-Prefix-LSA */
- intra_prefix_lsa->ref_type = htons (OSPF6_LSTYPE_ROUTER);
- intra_prefix_lsa->ref_id = htonl (0);
- intra_prefix_lsa->ref_adv_router = oa->ospf6->router_id;
- route_advertise = ospf6_route_table_create (0, 0);
- for (ALL_LIST_ELEMENTS_RO (oa->if_list, i, oi))
- {
- if (oi->state == OSPF6_INTERFACE_DOWN)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Interface %s is down, ignore", oi->interface->name);
- continue;
- }
- full_count = 0;
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, j, on))
- if (on->state == OSPF6_NEIGHBOR_FULL)
- full_count++;
- if (oi->state != OSPF6_INTERFACE_LOOPBACK &&
- oi->state != OSPF6_INTERFACE_POINTTOPOINT &&
- full_count != 0)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Interface %s is not stub, ignore",
- oi->interface->name);
- continue;
- }
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Interface %s:", oi->interface->name);
- /* connected prefix to advertise */
- for (route = ospf6_route_head (oi->route_connected); route;
- route = ospf6_route_best_next (route))
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- {
- prefix2str (&route->prefix, buf, sizeof (buf));
- zlog_debug (" include %s", buf);
- }
- ospf6_route_add (ospf6_route_copy (route), route_advertise);
- }
- }
- if (route_advertise->count == 0)
- {
- if (old)
- ospf6_lsa_purge (old);
- ospf6_route_table_delete (route_advertise);
- return 0;
- }
- /* put prefixes to advertise */
- prefix_num = 0;
- op = (struct ospf6_prefix *)
- ((caddr_t) intra_prefix_lsa + sizeof (struct ospf6_intra_prefix_lsa));
- for (route = ospf6_route_head (route_advertise); route;
- route = ospf6_route_best_next (route))
- {
- op->prefix_length = route->prefix.prefixlen;
- op->prefix_options = route->path.prefix_options;
- op->prefix_metric = htons (route->path.cost);
- memcpy (OSPF6_PREFIX_BODY (op), &route->prefix.u.prefix6,
- OSPF6_PREFIX_SPACE (op->prefix_length));
- op = OSPF6_PREFIX_NEXT (op);
- prefix_num++;
- }
- ospf6_route_table_delete (route_advertise);
- if (prefix_num == 0)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug ("Quit to Advertise Intra-Prefix: no route to advertise");
- return 0;
- }
- intra_prefix_lsa->prefix_num = htons (prefix_num);
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_INTRA_PREFIX);
- lsa_header->id = htonl (0);
- lsa_header->adv_router = oa->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oa->lsdb);
- lsa_header->length = htons ((caddr_t) op - (caddr_t) lsa_header);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_area (lsa, oa);
- return 0;
- }
- int
- ospf6_intra_prefix_lsa_originate_transit (struct thread *thread)
- {
- struct ospf6_interface *oi;
- char buffer[OSPF6_MAX_LSASIZE];
- struct ospf6_lsa_header *lsa_header;
- struct ospf6_lsa *old, *lsa;
- struct ospf6_intra_prefix_lsa *intra_prefix_lsa;
- struct ospf6_neighbor *on;
- struct ospf6_route *route;
- struct ospf6_prefix *op;
- struct listnode *i;
- int full_count = 0;
- unsigned short prefix_num = 0;
- struct ospf6_route_table *route_advertise;
- struct ospf6_link_lsa *link_lsa;
- char *start, *end, *current;
- u_int16_t type;
- char buf[BUFSIZ];
- oi = (struct ospf6_interface *) THREAD_ARG (thread);
- oi->thread_intra_prefix_lsa = NULL;
- assert (oi->area);
- /* find previous LSA */
- old = ospf6_lsdb_lookup (htons (OSPF6_LSTYPE_INTRA_PREFIX),
- htonl (oi->interface->ifindex),
- oi->area->ospf6->router_id, oi->area->lsdb);
- if (CHECK_FLAG (oi->flag, OSPF6_INTERFACE_DISABLE))
- {
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug ("Originate Intra-Area-Prefix-LSA for interface %s's prefix",
- oi->interface->name);
- /* prepare buffer */
- memset (buffer, 0, sizeof (buffer));
- lsa_header = (struct ospf6_lsa_header *) buffer;
- intra_prefix_lsa = (struct ospf6_intra_prefix_lsa *)
- ((caddr_t) lsa_header + sizeof (struct ospf6_lsa_header));
- /* Fill Intra-Area-Prefix-LSA */
- intra_prefix_lsa->ref_type = htons (OSPF6_LSTYPE_NETWORK);
- intra_prefix_lsa->ref_id = htonl (oi->interface->ifindex);
- intra_prefix_lsa->ref_adv_router = oi->area->ospf6->router_id;
- if (oi->state != OSPF6_INTERFACE_DR)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Interface is not DR");
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- full_count = 0;
- for (ALL_LIST_ELEMENTS_RO (oi->neighbor_list, i, on))
- if (on->state == OSPF6_NEIGHBOR_FULL)
- full_count++;
-
- if (full_count == 0)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Interface is stub");
- if (old)
- ospf6_lsa_purge (old);
- return 0;
- }
- /* connected prefix to advertise */
- route_advertise = ospf6_route_table_create (0, 0);
- type = ntohs (OSPF6_LSTYPE_LINK);
- for (lsa = ospf6_lsdb_type_head (type, oi->lsdb); lsa;
- lsa = ospf6_lsdb_type_next (type, lsa))
- {
- if (OSPF6_LSA_IS_MAXAGE (lsa))
- continue;
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" include prefix from %s", lsa->name);
- if (lsa->header->adv_router != oi->area->ospf6->router_id)
- {
- on = ospf6_neighbor_lookup (lsa->header->adv_router, oi);
- if (on == NULL || on->state != OSPF6_NEIGHBOR_FULL)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug (" Neighbor not found or not Full, ignore");
- continue;
- }
- }
- link_lsa = (struct ospf6_link_lsa *)
- ((caddr_t) lsa->header + sizeof (struct ospf6_lsa_header));
- prefix_num = (unsigned short) ntohl (link_lsa->prefix_num);
- start = (char *) link_lsa + sizeof (struct ospf6_link_lsa);
- end = (char *) lsa->header + ntohs (lsa->header->length);
- for (current = start; current < end && prefix_num;
- current += OSPF6_PREFIX_SIZE (op))
- {
- op = (struct ospf6_prefix *) current;
- if (op->prefix_length == 0 ||
- current + OSPF6_PREFIX_SIZE (op) > end)
- break;
- route = ospf6_route_create ();
- route->type = OSPF6_DEST_TYPE_NETWORK;
- route->prefix.family = AF_INET6;
- route->prefix.prefixlen = op->prefix_length;
- memset (&route->prefix.u.prefix6, 0, sizeof (struct in6_addr));
- memcpy (&route->prefix.u.prefix6, OSPF6_PREFIX_BODY (op),
- OSPF6_PREFIX_SPACE (op->prefix_length));
- route->path.origin.type = lsa->header->type;
- route->path.origin.id = lsa->header->id;
- route->path.origin.adv_router = lsa->header->adv_router;
- route->path.options[0] = link_lsa->options[0];
- route->path.options[1] = link_lsa->options[1];
- route->path.options[2] = link_lsa->options[2];
- route->path.prefix_options = op->prefix_options;
- route->path.area_id = oi->area->area_id;
- route->path.type = OSPF6_PATH_TYPE_INTRA;
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- {
- prefix2str (&route->prefix, buf, sizeof (buf));
- zlog_debug (" include %s", buf);
- }
- ospf6_route_add (route, route_advertise);
- prefix_num--;
- }
- if (current != end && IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug ("Trailing garbage in %s", lsa->name);
- }
- op = (struct ospf6_prefix *)
- ((caddr_t) intra_prefix_lsa + sizeof (struct ospf6_intra_prefix_lsa));
- prefix_num = 0;
- for (route = ospf6_route_head (route_advertise); route;
- route = ospf6_route_best_next (route))
- {
- op->prefix_length = route->prefix.prefixlen;
- op->prefix_options = route->path.prefix_options;
- op->prefix_metric = htons (0);
- memcpy (OSPF6_PREFIX_BODY (op), &route->prefix.u.prefix6,
- OSPF6_PREFIX_SPACE (op->prefix_length));
- op = OSPF6_PREFIX_NEXT (op);
- prefix_num++;
- }
- ospf6_route_table_delete (route_advertise);
- if (prefix_num == 0)
- {
- if (IS_OSPF6_DEBUG_ORIGINATE (INTRA_PREFIX))
- zlog_debug ("Quit to Advertise Intra-Prefix: no route to advertise");
- return 0;
- }
- intra_prefix_lsa->prefix_num = htons (prefix_num);
- /* Fill LSA Header */
- lsa_header->age = 0;
- lsa_header->type = htons (OSPF6_LSTYPE_INTRA_PREFIX);
- lsa_header->id = htonl (oi->interface->ifindex);
- lsa_header->adv_router = oi->area->ospf6->router_id;
- lsa_header->seqnum =
- ospf6_new_ls_seqnum (lsa_header->type, lsa_header->id,
- lsa_header->adv_router, oi->area->lsdb);
- lsa_header->length = htons ((caddr_t) op - (caddr_t) lsa_header);
- /* LSA checksum */
- ospf6_lsa_checksum (lsa_header);
- /* create LSA */
- lsa = ospf6_lsa_create (lsa_header);
- /* Originate */
- ospf6_lsa_originate_area (lsa, oi->area);
- return 0;
- }
- void
- ospf6_intra_prefix_lsa_add (struct ospf6_lsa *lsa)
- {
- struct ospf6_area *oa;
- struct ospf6_intra_prefix_lsa *intra_prefix_lsa;
- struct prefix ls_prefix;
- struct ospf6_route *route, *ls_entry;
- int i, prefix_num;
- struct ospf6_prefix *op;
- char *start, *current, *end;
- char buf[64];
- if (OSPF6_LSA_IS_MAXAGE (lsa))
- return;
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("%s found", lsa->name);
- oa = OSPF6_AREA (lsa->lsdb->data);
- intra_prefix_lsa = (struct ospf6_intra_prefix_lsa *)
- OSPF6_LSA_HEADER_END (lsa->header);
- if (intra_prefix_lsa->ref_type == htons (OSPF6_LSTYPE_ROUTER))
- ospf6_linkstate_prefix (intra_prefix_lsa->ref_adv_router,
- htonl (0), &ls_prefix);
- else if (intra_prefix_lsa->ref_type == htons (OSPF6_LSTYPE_NETWORK))
- ospf6_linkstate_prefix (intra_prefix_lsa->ref_adv_router,
- intra_prefix_lsa->ref_id, &ls_prefix);
- else
- {
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("Unknown reference LS-type: %#hx",
- ntohs (intra_prefix_lsa->ref_type));
- return;
- }
- ls_entry = ospf6_route_lookup (&ls_prefix, oa->spf_table);
- if (ls_entry == NULL)
- {
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- {
- ospf6_linkstate_prefix2str (&ls_prefix, buf, sizeof (buf));
- zlog_debug ("LS entry does not exist: %s", buf);
- }
- return;
- }
- prefix_num = ntohs (intra_prefix_lsa->prefix_num);
- start = (caddr_t) intra_prefix_lsa +
- sizeof (struct ospf6_intra_prefix_lsa);
- end = OSPF6_LSA_END (lsa->header);
- for (current = start; current < end; current += OSPF6_PREFIX_SIZE (op))
- {
- op = (struct ospf6_prefix *) current;
- if (prefix_num == 0)
- break;
- if (end < current + OSPF6_PREFIX_SIZE (op))
- break;
- route = ospf6_route_create ();
- memset (&route->prefix, 0, sizeof (struct prefix));
- route->prefix.family = AF_INET6;
- route->prefix.prefixlen = op->prefix_length;
- ospf6_prefix_in6_addr (&route->prefix.u.prefix6, op);
- route->type = OSPF6_DEST_TYPE_NETWORK;
- route->path.origin.type = lsa->header->type;
- route->path.origin.id = lsa->header->id;
- route->path.origin.adv_router = lsa->header->adv_router;
- route->path.prefix_options = op->prefix_options;
- route->path.area_id = oa->area_id;
- route->path.type = OSPF6_PATH_TYPE_INTRA;
- route->path.metric_type = 1;
- route->path.cost = ls_entry->path.cost +
- ntohs (op->prefix_metric);
- for (i = 0; ospf6_nexthop_is_set (&ls_entry->nexthop[i]) &&
- i < OSPF6_MULTI_PATH_LIMIT; i++)
- ospf6_nexthop_copy (&route->nexthop[i], &ls_entry->nexthop[i]);
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- {
- prefix2str (&route->prefix, buf, sizeof (buf));
- zlog_debug (" add %s", buf);
- }
- ospf6_route_add (route, oa->route_table);
- prefix_num--;
- }
- if (current != end && IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("Trailing garbage ignored");
- }
- void
- ospf6_intra_prefix_lsa_remove (struct ospf6_lsa *lsa)
- {
- struct ospf6_area *oa;
- struct ospf6_intra_prefix_lsa *intra_prefix_lsa;
- struct prefix prefix;
- struct ospf6_route *route;
- int prefix_num;
- struct ospf6_prefix *op;
- char *start, *current, *end;
- char buf[64];
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("%s disappearing", lsa->name);
- oa = OSPF6_AREA (lsa->lsdb->data);
- intra_prefix_lsa = (struct ospf6_intra_prefix_lsa *)
- OSPF6_LSA_HEADER_END (lsa->header);
- prefix_num = ntohs (intra_prefix_lsa->prefix_num);
- start = (caddr_t) intra_prefix_lsa +
- sizeof (struct ospf6_intra_prefix_lsa);
- end = OSPF6_LSA_END (lsa->header);
- for (current = start; current < end; current += OSPF6_PREFIX_SIZE (op))
- {
- op = (struct ospf6_prefix *) current;
- if (prefix_num == 0)
- break;
- if (end < current + OSPF6_PREFIX_SIZE (op))
- break;
- prefix_num--;
- memset (&prefix, 0, sizeof (struct prefix));
- prefix.family = AF_INET6;
- prefix.prefixlen = op->prefix_length;
- ospf6_prefix_in6_addr (&prefix.u.prefix6, op);
- route = ospf6_route_lookup (&prefix, oa->route_table);
- if (route == NULL)
- continue;
- for (ospf6_route_lock (route);
- route && ospf6_route_is_prefix (&prefix, route);
- route = ospf6_route_next (route))
- {
- if (route->type != OSPF6_DEST_TYPE_NETWORK)
- continue;
- if (route->path.area_id != oa->area_id)
- continue;
- if (route->path.type != OSPF6_PATH_TYPE_INTRA)
- continue;
- if (route->path.origin.type != lsa->header->type ||
- route->path.origin.id != lsa->header->id ||
- route->path.origin.adv_router != lsa->header->adv_router)
- continue;
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- {
- prefix2str (&route->prefix, buf, sizeof (buf));
- zlog_debug ("remove %s", buf);
- }
- ospf6_route_remove (route, oa->route_table);
- }
- }
- if (current != end && IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("Trailing garbage ignored");
- }
- void
- ospf6_intra_route_calculation (struct ospf6_area *oa)
- {
- struct ospf6_route *route;
- u_int16_t type;
- struct ospf6_lsa *lsa;
- void (*hook_add) (struct ospf6_route *) = NULL;
- void (*hook_remove) (struct ospf6_route *) = NULL;
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("Re-examin intra-routes for area %s", oa->name);
- hook_add = oa->route_table->hook_add;
- hook_remove = oa->route_table->hook_remove;
- oa->route_table->hook_add = NULL;
- oa->route_table->hook_remove = NULL;
- for (route = ospf6_route_head (oa->route_table); route;
- route = ospf6_route_next (route))
- route->flag = OSPF6_ROUTE_REMOVE;
- type = htons (OSPF6_LSTYPE_INTRA_PREFIX);
- for (lsa = ospf6_lsdb_type_head (type, oa->lsdb); lsa;
- lsa = ospf6_lsdb_type_next (type, lsa))
- ospf6_intra_prefix_lsa_add (lsa);
- oa->route_table->hook_add = hook_add;
- oa->route_table->hook_remove = hook_remove;
- for (route = ospf6_route_head (oa->route_table); route;
- route = ospf6_route_next (route))
- {
- if (CHECK_FLAG (route->flag, OSPF6_ROUTE_REMOVE) &&
- CHECK_FLAG (route->flag, OSPF6_ROUTE_ADD))
- {
- UNSET_FLAG (route->flag, OSPF6_ROUTE_REMOVE);
- UNSET_FLAG (route->flag, OSPF6_ROUTE_ADD);
- }
- if (CHECK_FLAG (route->flag, OSPF6_ROUTE_REMOVE))
- ospf6_route_remove (route, oa->route_table);
- else if (CHECK_FLAG (route->flag, OSPF6_ROUTE_ADD) ||
- CHECK_FLAG (route->flag, OSPF6_ROUTE_CHANGE))
- {
- if (hook_add)
- (*hook_add) (route);
- }
- route->flag = 0;
- }
- if (IS_OSPF6_DEBUG_EXAMIN (INTRA_PREFIX))
- zlog_debug ("Re-examin intra-routes for area %s: Done", oa->name);
- }
- static void
- ospf6_brouter_debug_print (struct ospf6_route *brouter)
- {
- u_int32_t brouter_id;
- char brouter_name[16];
- char area_name[16];
- char destination[64];
- char installed[16], changed[16];
- struct timeval now, res;
- char id[16], adv_router[16];
- char capa[16], options[16];
- brouter_id = ADV_ROUTER_IN_PREFIX (&brouter->prefix);
- inet_ntop (AF_INET, &brouter_id, brouter_name, sizeof (brouter_name));
- inet_ntop (AF_INET, &brouter->path.area_id, area_name, sizeof (area_name));
- ospf6_linkstate_prefix2str (&brouter->prefix, destination,
- sizeof (destination));
- gettimeofday (&now, (struct timezone *) NULL);
- timersub (&now, &brouter->installed, &res);
- timerstring (&res, installed, sizeof (installed));
- gettimeofday (&now, (struct timezone *) NULL);
- timersub (&now, &brouter->changed, &res);
- timerstring (&res, changed, sizeof (changed));
- inet_ntop (AF_INET, &brouter->path.origin.id, id, sizeof (id));
- inet_ntop (AF_INET, &brouter->path.origin.adv_router, adv_router,
- sizeof (adv_router));
- ospf6_options_printbuf (brouter->path.options, options, sizeof (options));
- ospf6_capability_printbuf (brouter->path.router_bits, capa, sizeof (capa));
- zlog_info ("Brouter: %s via area %s", brouter_name, area_name);
- zlog_info (" memory: prev: %p this: %p next: %p parent rnode: %p",
- brouter->prev, brouter, brouter->next, brouter->rnode);
- zlog_info (" type: %d prefix: %s installed: %s changed: %s",
- brouter->type, destination, installed, changed);
- zlog_info (" lock: %d flags: %s%s%s%s", brouter->lock,
- (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_BEST) ? "B" : "-"),
- (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_ADD) ? "A" : "-"),
- (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_REMOVE) ? "R" : "-"),
- (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_CHANGE) ? "C" : "-"));
- zlog_info (" path type: %s ls-origin %s id: %s adv-router %s",
- OSPF6_PATH_TYPE_NAME (brouter->path.type),
- ospf6_lstype_name (brouter->path.origin.type),
- id, adv_router);
- zlog_info (" options: %s router-bits: %s metric-type: %d metric: %d/%d",
- options, capa, brouter->path.metric_type,
- brouter->path.cost, brouter->path.cost_e2);
- }
- void
- ospf6_intra_brouter_calculation (struct ospf6_area *oa)
- {
- struct ospf6_route *brouter, *copy;
- void (*hook_add) (struct ospf6_route *) = NULL;
- void (*hook_remove) (struct ospf6_route *) = NULL;
- u_int32_t brouter_id;
- char brouter_name[16];
-
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ID (oa->area_id))
- zlog_info ("border-router calculation for area %s", oa->name);
-
- hook_add = oa->ospf6->brouter_table->hook_add;
- hook_remove = oa->ospf6->brouter_table->hook_remove;
- oa->ospf6->brouter_table->hook_add = NULL;
- oa->ospf6->brouter_table->hook_remove = NULL;
- /* withdraw the previous router entries for the area */
- for (brouter = ospf6_route_head (oa->ospf6->brouter_table); brouter;
- brouter = ospf6_route_next (brouter))
- {
- brouter_id = ADV_ROUTER_IN_PREFIX (&brouter->prefix);
- inet_ntop (AF_INET, &brouter_id, brouter_name, sizeof (brouter_name));
- if (brouter->path.area_id != oa->area_id)
- continue;
- brouter->flag = OSPF6_ROUTE_REMOVE;
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ID (brouter_id) ||
- IS_OSPF6_DEBUG_ROUTE (MEMORY))
- {
- zlog_info ("%p: mark as removing: area %s brouter %s",
- brouter, oa->name, brouter_name);
- ospf6_brouter_debug_print (brouter);
- }
- }
- for (brouter = ospf6_route_head (oa->spf_table); brouter;
- brouter = ospf6_route_next (brouter))
- {
- brouter_id = ADV_ROUTER_IN_PREFIX (&brouter->prefix);
- inet_ntop (AF_INET, &brouter_id, brouter_name, sizeof (brouter_name));
- if (brouter->type != OSPF6_DEST_TYPE_LINKSTATE)
- continue;
- if (ospf6_linkstate_prefix_id (&brouter->prefix) != htonl (0))
- continue;
- if (! CHECK_FLAG (brouter->path.router_bits, OSPF6_ROUTER_BIT_E) &&
- ! CHECK_FLAG (brouter->path.router_bits, OSPF6_ROUTER_BIT_B))
- continue;
- copy = ospf6_route_copy (brouter);
- copy->type = OSPF6_DEST_TYPE_ROUTER;
- copy->path.area_id = oa->area_id;
- ospf6_route_add (copy, oa->ospf6->brouter_table);
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ID (brouter_id) ||
- IS_OSPF6_DEBUG_ROUTE (MEMORY))
- {
- zlog_info ("%p: transfer: area %s brouter %s",
- brouter, oa->name, brouter_name);
- ospf6_brouter_debug_print (brouter);
- }
- }
- oa->ospf6->brouter_table->hook_add = hook_add;
- oa->ospf6->brouter_table->hook_remove = hook_remove;
- for (brouter = ospf6_route_head (oa->ospf6->brouter_table); brouter;
- brouter = ospf6_route_next (brouter))
- {
- brouter_id = ADV_ROUTER_IN_PREFIX (&brouter->prefix);
- inet_ntop (AF_INET, &brouter_id, brouter_name, sizeof (brouter_name));
-
- if (brouter->path.area_id != oa->area_id)
- continue;
- if (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_WAS_REMOVED))
- continue;
- if (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_REMOVE) &&
- CHECK_FLAG (brouter->flag, OSPF6_ROUTE_ADD))
- {
- UNSET_FLAG (brouter->flag, OSPF6_ROUTE_REMOVE);
- UNSET_FLAG (brouter->flag, OSPF6_ROUTE_ADD);
- }
- if (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_REMOVE))
- {
- if (IS_OSPF6_DEBUG_BROUTER ||
- IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ID (brouter_id) ||
- IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ID (oa->area_id))
- zlog_info ("brouter %s disappears via area %s",
- brouter_name, oa->name);
- ospf6_route_remove (brouter, oa->ospf6->brouter_table);
- }
- else if (CHECK_FLAG (brouter->flag, OSPF6_ROUTE_ADD) ||
- CHECK_FLAG (brouter->flag, OSPF6_ROUTE_CHANGE))
- {
- if (IS_OSPF6_DEBUG_BROUTER ||
- IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ID (brouter_id) ||
- IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ID (oa->area_id))
- zlog_info ("brouter %s appears via area %s",
- brouter_name, oa->name);
- /* newly added */
- if (hook_add)
- (*hook_add) (brouter);
- }
- else
- {
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ID (brouter_id) ||
- IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ID (oa->area_id))
- zlog_info ("brouter %s still exists via area %s",
- brouter_name, oa->name);
- }
- brouter->flag = 0;
- }
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ID (oa->area_id))
- zlog_info ("border-router calculation for area %s: done", oa->name);
- }
- struct ospf6_lsa_handler router_handler =
- {
- OSPF6_LSTYPE_ROUTER,
- "Router",
- ospf6_router_lsa_show
- };
- struct ospf6_lsa_handler network_handler =
- {
- OSPF6_LSTYPE_NETWORK,
- "Network",
- ospf6_network_lsa_show
- };
- struct ospf6_lsa_handler link_handler =
- {
- OSPF6_LSTYPE_LINK,
- "Link",
- ospf6_link_lsa_show
- };
- struct ospf6_lsa_handler intra_prefix_handler =
- {
- OSPF6_LSTYPE_INTRA_PREFIX,
- "Intra-Prefix",
- ospf6_intra_prefix_lsa_show
- };
- void
- ospf6_intra_init (void)
- {
- ospf6_install_lsa_handler (&router_handler);
- ospf6_install_lsa_handler (&network_handler);
- ospf6_install_lsa_handler (&link_handler);
- ospf6_install_lsa_handler (&intra_prefix_handler);
- }
- DEFUN (debug_ospf6_brouter,
- debug_ospf6_brouter_cmd,
- "debug ospf6 border-routers",
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- )
- {
- OSPF6_DEBUG_BROUTER_ON ();
- return CMD_SUCCESS;
- }
- DEFUN (no_debug_ospf6_brouter,
- no_debug_ospf6_brouter_cmd,
- "no debug ospf6 border-routers",
- NO_STR
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- )
- {
- OSPF6_DEBUG_BROUTER_OFF ();
- return CMD_SUCCESS;
- }
- DEFUN (debug_ospf6_brouter_router,
- debug_ospf6_brouter_router_cmd,
- "debug ospf6 border-routers router-id A.B.C.D",
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- "Debug specific border router\n"
- "Specify border-router's router-id\n"
- )
- {
- u_int32_t router_id;
- inet_pton (AF_INET, argv[0], &router_id);
- OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_ON (router_id);
- return CMD_SUCCESS;
- }
- DEFUN (no_debug_ospf6_brouter_router,
- no_debug_ospf6_brouter_router_cmd,
- "no debug ospf6 border-routers router-id",
- NO_STR
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- "Debug specific border router\n"
- )
- {
- OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER_OFF ();
- return CMD_SUCCESS;
- }
- DEFUN (debug_ospf6_brouter_area,
- debug_ospf6_brouter_area_cmd,
- "debug ospf6 border-routers area-id A.B.C.D",
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- "Debug border routers in specific Area\n"
- "Specify Area-ID\n"
- )
- {
- u_int32_t area_id;
- inet_pton (AF_INET, argv[0], &area_id);
- OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_ON (area_id);
- return CMD_SUCCESS;
- }
- DEFUN (no_debug_ospf6_brouter_area,
- no_debug_ospf6_brouter_area_cmd,
- "no debug ospf6 border-routers area-id",
- NO_STR
- DEBUG_STR
- OSPF6_STR
- "Debug border router\n"
- "Debug border routers in specific Area\n"
- )
- {
- OSPF6_DEBUG_BROUTER_SPECIFIC_AREA_OFF ();
- return CMD_SUCCESS;
- }
- int
- config_write_ospf6_debug_brouter (struct vty *vty)
- {
- char buf[16];
- if (IS_OSPF6_DEBUG_BROUTER)
- vty_out (vty, "debug ospf6 border-routers%s", VNL);
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_ROUTER)
- {
- inet_ntop (AF_INET, &conf_debug_ospf6_brouter_specific_router_id,
- buf, sizeof (buf));
- vty_out (vty, "debug ospf6 border-routers router-id %s%s", buf, VNL);
- }
- if (IS_OSPF6_DEBUG_BROUTER_SPECIFIC_AREA)
- {
- inet_ntop (AF_INET, &conf_debug_ospf6_brouter_specific_area_id,
- buf, sizeof (buf));
- vty_out (vty, "debug ospf6 border-routers area-id %s%s", buf, VNL);
- }
- return 0;
- }
- void
- install_element_ospf6_debug_brouter (void)
- {
- install_element (ENABLE_NODE, &debug_ospf6_brouter_cmd);
- install_element (ENABLE_NODE, &debug_ospf6_brouter_router_cmd);
- install_element (ENABLE_NODE, &debug_ospf6_brouter_area_cmd);
- install_element (ENABLE_NODE, &no_debug_ospf6_brouter_cmd);
- install_element (ENABLE_NODE, &no_debug_ospf6_brouter_router_cmd);
- install_element (ENABLE_NODE, &no_debug_ospf6_brouter_area_cmd);
- install_element (CONFIG_NODE, &debug_ospf6_brouter_cmd);
- install_element (CONFIG_NODE, &debug_ospf6_brouter_router_cmd);
- install_element (CONFIG_NODE, &debug_ospf6_brouter_area_cmd);
- install_element (CONFIG_NODE, &no_debug_ospf6_brouter_cmd);
- install_element (CONFIG_NODE, &no_debug_ospf6_brouter_router_cmd);
- install_element (CONFIG_NODE, &no_debug_ospf6_brouter_area_cmd);
- }
|