new->retransmit_counter = 0;
new->data = ospf_lsa_data_dup (lsa->data);
+ /* kevinm: Clear the refresh_list, otherwise there are going
+ to be problems when we try to remove the LSA from the
+ queue (which it's not a member of.)
+ XXX: Should we add the LSA to the refresh_list queue? */
+ new->refresh_list = -1;
+
+ if (IS_DEBUG_OSPF (lsa, LSA))
+ zlog_info ("LSA: duplicated %p (new: %p)", lsa, new);
+
return new;
}
/* Get 1st IP connection for Forward Addr */
struct in_addr
-ospf_get_nssa_ip (void)
+ospf_get_nssa_ip (struct ospf_area *area)
{
struct in_addr fwd;
+ struct in_addr best_default;
listnode n1;
fwd.s_addr = 0;
+ best_default.s_addr = 0;
for (n1 = listhead (ospf_top->oiflist); n1; nextnode (n1))
if (if_is_operative (oi->ifp))
if (oi->area->external_routing == OSPF_AREA_NSSA)
- if (oi->address && oi->address->family == AF_INET)
- return (oi->address->u.prefix4 );
+ if (oi->address && oi->address->family == AF_INET) {
+ if (best_default.s_addr == 0) {
+ best_default = oi->address->u.prefix4;
+ }
+ if (oi->area == area)
+ return (oi->address->u.prefix4);
+ }
}
+ if (best_default.s_addr != 0)
+ return best_default;
return fwd;
}
ospf_install_flood_nssa (struct ospf_lsa *lsa, struct external_info *ei)
{
struct ospf_lsa *new2;
- struct as_external_lsa *extlsa;
+ struct as_external_lsa *extlsa, *newextlsa;
+ listnode node;
/* NSSA Originate or Refresh (If anyNSSA)
Later, ABR_TASK and P-bit will scan Type-7 LSDB and translate to
Type-5's to non-NSSA Areas. (it will also attempt a re-install) */
- /* make lsa duplicate, lock=1 */
- new2 = ospf_lsa_dup(lsa);
-
- /* make type-7 */
- new2->data->type = OSPF_AS_NSSA_LSA;
-
- /* set P-bit if not ABR */
- if (! OSPF_IS_ABR)
- {
- SET_FLAG(new2->data->options, OSPF_OPTION_NP);
-
- /* set non-zero FWD ADDR
-
- draft-ietf-ospf-nssa-update-09.txt
-
- if the network between the NSSA AS boundary router and the
- adjacent AS is advertised into OSPF as an internal OSPF route,
- the forwarding address should be the next op address as is cu
- currently done with type-5 LSAs. If the intervening network is
- not adversited into OSPF as an internal OSPF route and the
- type-7 LSA's P-bit is set a forwarding address should be
- selected from one of the router's active OSPF inteface addresses
- which belong to the NSSA. If no such addresses exist, then
- no type-7 LSA's with the P-bit set should originate from this
- router. */
+ for (node = listhead (ospf_top->areas); node; nextnode (node)) {
+
+ struct ospf_area *area = getdata (node);
- extlsa = (struct as_external_lsa *)(lsa->data);
+ /* make lsa duplicate, lock=1 */
+ new2 = ospf_lsa_dup(lsa);
- if (extlsa->e[0].fwd_addr.s_addr == 0)
- extlsa->e[0].fwd_addr = ospf_get_nssa_ip(); /* this NSSA area in ifp */
+ /* make type-7 */
+ new2->data->type = OSPF_AS_NSSA_LSA;
- if (IS_DEBUG_OSPF_NSSA)
- if (extlsa->e[0].fwd_addr.s_addr == 0)
- {
- zlog_info ("LSA[Type-7]: Could not build FWD-ADDR");
- ospf_lsa_discard(new2);
- return;
- }
- }
+ /* set P-bit if not ABR */
+ if (! OSPF_IS_ABR)
+ {
+ SET_FLAG(new2->data->options, OSPF_OPTION_NP);
+
+ /* set non-zero FWD ADDR
+
+ draft-ietf-ospf-nssa-update-09.txt
+
+ if the network between the NSSA AS boundary router and the
+ adjacent AS is advertised into OSPF as an internal OSPF route,
+ the forwarding address should be the next op address as is cu
+ currently done with type-5 LSAs. If the intervening network is
+ not adversited into OSPF as an internal OSPF route and the
+ type-7 LSA's P-bit is set a forwarding address should be
+ selected from one of the router's active OSPF inteface addresses
+ which belong to the NSSA. If no such addresses exist, then
+ no type-7 LSA's with the P-bit set should originate from this
+ router. */
+
+ /* not updating lsa anymore, just new2 */
+ extlsa = (struct as_external_lsa *)(new2->data);
+
+ if (extlsa->e[0].fwd_addr.s_addr == 0)
+ /* this NSSA area in ifp */
+ extlsa->e[0].fwd_addr = ospf_get_nssa_ip(area);
+
+ if (IS_DEBUG_OSPF_NSSA)
+ if (extlsa->e[0].fwd_addr.s_addr == 0)
+ {
+ zlog_info ("LSA[Type-7]: Could not build FWD-ADDR");
+ ospf_lsa_discard(new2);
+ return;
+ }
+ }
- /* Re-calculate checksum. */
- ospf_lsa_checksum (new2->data);
+ /* Re-calculate checksum. */
+ ospf_lsa_checksum (new2->data);
- /* install also as Type-7 */
- ospf_lsa_install (NULL, new2); /* Remove Old, Lock New = 2 */
+ /* install also as Type-7 */
+ ospf_lsa_install (NULL, new2); /* Remove Old, Lock New = 2 */
- /* will send each copy, lock=2+n */
- ospf_flood_through_as (NULL, new2); /* all attached NSSA's, no AS/STUBs */
+ /* will send each copy, lock=2+n */
+ ospf_flood_through_as (NULL, new2); /* all attached NSSA's, no AS/STUBs */
+ }
/* last send, lock=2 LSA is now permanent in Type-7 LSDB */
/* It has the same ID as it's Type-5 Counter-Part */
/* Set LSDB. */
switch (lsa->data->type)
{
+ /* kevinm */
+ case OSPF_AS_NSSA_LSA:
+ if (lsa->area)
+ lsdb = lsa->area->lsdb;
+ else
+ lsdb = ospf_top->lsdb;
+ break;
case OSPF_AS_EXTERNAL_LSA:
#ifdef HAVE_OPAQUE_LSA
case OSPF_OPAQUE_AS_LSA:
#ifdef HAVE_OPAQUE_LSA
case OSPF_OPAQUE_AS_LSA:
#endif /* HAVE_OPAQUE_LSA */
+#ifdef HAVE_NSSA
+ case OSPF_AS_NSSA_LSA:
+#endif
zlog_info ("LSA[%s]: Install %s",
dump_lsa_key (new),
LOOKUP (ospf_lsa_type_msg, new->data->type));
#ifdef HAVE_OPAQUE_LSA
case OSPF_OPAQUE_AS_LSA:
#endif /* HAVE_OPAQUE_LSA */
+#ifdef HAVE_NSSA
+ case OSPF_AS_NSSA_LSA:
+#endif
ospf_ase_incremental_update (lsa, ospf_top);
break;
default:
top->lsa_refresh_queue.qs[index] = list_new ();
listnode_add (top->lsa_refresh_queue.qs[index], ospf_lsa_lock (lsa));
lsa->refresh_list = index;
+ if (IS_DEBUG_OSPF (lsa, LSA_REFRESH))
+ zlog_info ("LSA[Refresh]: ospf_refresher_register_lsa(): setting refresh_list on lsa %p (slod %d)", lsa, index);
}
}
next = node->next;
if (IS_DEBUG_OSPF (lsa, LSA_REFRESH))
- zlog_info ("LSA[Refresh]: ospf_lsa_refresh_walker(): refresh lsa %p", lsa);
+ zlog_info ("LSA[Refresh]: ospf_lsa_refresh_walker(): refresh lsa %p (slot %d)", lsa, i);
list_delete_node (refresh_list, node);
ospf_lsa_unlock (lsa);
projects / mirror_frr.git / blobdiff