void
ospf_abr_remove_unapproved_summaries (struct ospf *ospf)
{
listnode node;
struct ospf_area *area;
struct route_node *rn;
struct ospf_lsa *lsa;
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("ospf_abr_remove_unapproved_summaries(): Start");
for (node = listhead (ospf->areas); node; nextnode (node))
{
area = getdata (node);
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("ospf_abr_remove_unapproved_summaries(): "
"looking at area %s", inet_ntoa (area->area_id));
LSDB_LOOP (SUMMARY_LSDB (area), rn, lsa)
if (ospf_lsa_is_self_originated (ospf, lsa))
if (!CHECK_FLAG (lsa->flags, OSPF_LSA_APPROVED))
ospf_lsa_flush_area (lsa, area);
LSDB_LOOP (ASBR_SUMMARY_LSDB (area), rn, lsa)
if (ospf_lsa_is_self_originated (ospf, lsa))
if (!CHECK_FLAG (lsa->flags, OSPF_LSA_APPROVED))
ospf_lsa_flush_area (lsa, area);
}
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("ospf_abr_remove_unapproved_summaries(): Stop");
}
void
ospf_abr_unapprove_summaries (struct ospf *ospf)
{
listnode node;
struct ospf_area *area;
struct route_node *rn;
struct ospf_lsa *lsa;
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("ospf_abr_unapprove_summaries(): Start");
for (node = listhead (ospf->areas); node; nextnode (node))
{
area = getdata (node);
LSDB_LOOP (SUMMARY_LSDB (area), rn, lsa)
if (ospf_lsa_is_self_originated (ospf, lsa))
UNSET_FLAG (lsa->flags, OSPF_LSA_APPROVED);
LSDB_LOOP (ASBR_SUMMARY_LSDB (area), rn, lsa)
if (ospf_lsa_is_self_originated (ospf, lsa))
UNSET_FLAG (lsa->flags, OSPF_LSA_APPROVED);
}
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("ospf_abr_unapprove_summaries(): Stop");
}
static int process_transit_summary_lsa(struct ospf_area *area,
struct route_table *rt,
struct route_table *rtrs,
struct ospf_lsa *lsa)
{
struct ospf *ospf = area->ospf;
struct summary_lsa *sl;
struct prefix_ipv4 p;
uint32_t metric;
if (lsa == NULL)
return 0;
sl = (struct summary_lsa *)lsa->data;
if (IS_DEBUG_OSPF_EVENT)
zlog_debug("process_transit_summaries(): LS ID: %s",
inet_ntoa(lsa->data->id));
metric = GET_METRIC(sl->metric);
if (metric == OSPF_LS_INFINITY) {
if (IS_DEBUG_OSPF_EVENT)
zlog_debug(
"process_transit_summaries(): metric is infinity, skip");
return 0;
}
if (IS_LSA_MAXAGE(lsa)) {
if (IS_DEBUG_OSPF_EVENT)
zlog_debug(
"process_transit_summaries(): This LSA is too old");
return 0;
}
if (ospf_lsa_is_self_originated(area->ospf, lsa)) {
if (IS_DEBUG_OSPF_EVENT)
zlog_debug(
"process_transit_summaries(): This LSA is mine, skip");
return 0;
}
p.family = AF_INET;
p.prefix = sl->header.id;
if (sl->header.type == OSPF_SUMMARY_LSA)
p.prefixlen = ip_masklen(sl->mask);
else
p.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4(&p);
if (sl->header.type == OSPF_SUMMARY_LSA)
ospf_update_network_route(ospf, rt, rtrs, sl, &p, area);
else
ospf_update_router_route(ospf, rtrs, sl, &p, area);
return 0;
}
int
process_transit_summary_lsa (struct ospf_lsa *l, void *v, int i)
{
struct summary_lsa *sl;
struct prefix_ipv4 p;
u_int32_t metric;
struct ia_args *args;
if (l == NULL)
return 0;
args = (struct ia_args *) v;
sl = (struct summary_lsa *) l->data;
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("process_transit_summaries(): LS ID: %s",
inet_ntoa (l->data->id));
metric = GET_METRIC (sl->metric);
if (metric == OSPF_LS_INFINITY)
{
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("process_transit_summaries(): metric is infinity, skip");
return 0;
}
if (IS_LSA_MAXAGE (l))
{
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("process_transit_summaries(): This LSA is too old");
return 0;
}
if (ospf_lsa_is_self_originated (l))
{
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("process_transit_summaries(): This LSA is mine, skip");
return 0;
}
p.family = AF_INET;
p.prefix = sl->header.id;
if (sl->header.type == OSPF_SUMMARY_LSA)
p.prefixlen = ip_masklen (sl->mask);
else
p.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4 (&p);
if (sl->header.type == OSPF_SUMMARY_LSA)
ospf_update_network_route (args->rt, args->rtrs, sl, &p, args->area);
else
ospf_update_router_route (args->rtrs, sl, &p, args->area);
return 0;
}
static int
process_summary_lsa (struct ospf_area *area, struct route_table *rt,
struct route_table *rtrs, struct ospf_lsa *lsa)
{
struct ospf *ospf = area->ospf;
struct ospf_area_range *range;
struct ospf_route *abr_or, *new_or;
struct summary_lsa *sl;
struct prefix_ipv4 p, abr;
u_int32_t metric;
if (lsa == NULL)
return 0;
sl = (struct summary_lsa *) lsa->data;
if (IS_DEBUG_OSPF_EVENT)
zlog_debug ("process_summary_lsa(): LS ID: %s", inet_ntoa (sl->header.id));
metric = GET_METRIC (sl->metric);
if (metric == OSPF_LS_INFINITY)
return 0;
if (IS_LSA_MAXAGE (lsa))
return 0;
if (ospf_lsa_is_self_originated (area->ospf, lsa))
return 0;
p.family = AF_INET;
p.prefix = sl->header.id;
if (sl->header.type == OSPF_SUMMARY_LSA)
p.prefixlen = ip_masklen (sl->mask);
else
p.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4 (&p);
if (sl->header.type == OSPF_SUMMARY_LSA &&
(range = ospf_area_range_match_any (ospf, &p)) &&
ospf_area_range_active (range))
return 0;
/* XXX: This check seems dubious to me. If an ABR has already decided
* to consider summaries received in this area, then why would one wish
* to exclude default?
*/
if (IS_OSPF_ABR(ospf) &&
ospf->abr_type != OSPF_ABR_STAND &&
area->external_routing != OSPF_AREA_DEFAULT &&
p.prefix.s_addr == OSPF_DEFAULT_DESTINATION &&
p.prefixlen == 0)
return 0; /* Ignore summary default from a stub area */
abr.family = AF_INET;
abr.prefix = sl->header.adv_router;
abr.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4 (&abr);
abr_or = ospf_find_abr_route (rtrs, &abr, area);
if (abr_or == NULL)
return 0;
new_or = ospf_route_new ();
new_or->type = OSPF_DESTINATION_NETWORK;
new_or->id = sl->header.id;
new_or->mask = sl->mask;
new_or->u.std.options = sl->header.options;
new_or->u.std.origin = (struct lsa_header *) sl;
new_or->cost = abr_or->cost + metric;
new_or->u.std.area_id = area->area_id;
new_or->u.std.external_routing = area->external_routing;
new_or->path_type = OSPF_PATH_INTER_AREA;
if (sl->header.type == OSPF_SUMMARY_LSA)
ospf_ia_network_route (ospf, rt, &p, new_or, abr_or);
else
{
new_or->type = OSPF_DESTINATION_ROUTER;
new_or->u.std.flags = ROUTER_LSA_EXTERNAL;
ospf_ia_router_route (ospf, rtrs, &p, new_or, abr_or);
}
return 0;
}
int
process_summary_lsa (struct ospf_lsa *l, void *v, int i)
{
struct ospf_area_range *range;
struct ospf_route *abr_or, *new_or;
struct summary_lsa *sl;
struct prefix_ipv4 p, abr;
u_int32_t metric;
struct ia_args *args;
if (l == NULL)
return 0;
args = (struct ia_args *) v;
sl = (struct summary_lsa *) l->data;
if (IS_DEBUG_OSPF_EVENT)
zlog_info ("process_summary_lsa(): LS ID: %s", inet_ntoa (sl->header.id));
metric = GET_METRIC (sl->metric);
if (metric == OSPF_LS_INFINITY)
return 0;
if (IS_LSA_MAXAGE (l))
return 0;
if (ospf_lsa_is_self_originated (l))
return 0;
p.family = AF_INET;
p.prefix = sl->header.id;
if (sl->header.type == OSPF_SUMMARY_LSA)
p.prefixlen = ip_masklen (sl->mask);
else
p.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4 (&p);
if (sl->header.type == OSPF_SUMMARY_LSA &&
(range = ospf_area_range_match_any (ospf_top, &p)) &&
ospf_area_range_active (range))
return 0;
if (ospf_top->abr_type != OSPF_ABR_STAND &&
args->area->external_routing != OSPF_AREA_DEFAULT &&
p.prefix.s_addr == OSPF_DEFAULT_DESTINATION &&
p.prefixlen == 0)
return 0; /* Ignore summary default from a stub area */
abr.family = AF_INET;
abr.prefix = sl->header.adv_router;
abr.prefixlen = IPV4_MAX_BITLEN;
apply_mask_ipv4 (&abr);
abr_or = ospf_find_abr_route (args->rtrs, &abr, args->area);
if (abr_or == NULL)
return 0;
new_or = ospf_route_new ();
new_or->type = OSPF_DESTINATION_NETWORK;
new_or->id = sl->header.id;
new_or->mask = sl->mask;
new_or->u.std.options = sl->header.options;
new_or->u.std.origin = (struct lsa_header *) sl;
new_or->cost = abr_or->cost + metric;
new_or->u.std.area_id = args->area->area_id;
#ifdef HAVE_NSSA
new_or->u.std.external_routing = args->area->external_routing;
#endif /* HAVE_NSSA */
new_or->path_type = OSPF_PATH_INTER_AREA;
if (sl->header.type == OSPF_SUMMARY_LSA)
ospf_ia_network_route (args->rt, &p, new_or, abr_or);
else
{
new_or->type = OSPF_DESTINATION_ROUTER;
new_or->u.std.flags = ROUTER_LSA_EXTERNAL;
ospf_ia_router_route (args->rtrs, &p, new_or, abr_or);
}
return 0;
}
