int
ospf_db_summary_add (struct ospf_neighbor *nbr, struct ospf_lsa *lsa)
{
#ifdef HAVE_OPAQUE_LSA
switch (lsa->data->type)
{
case OSPF_OPAQUE_LINK_LSA:
/* Exclude type-9 LSAs that does not have the same "oi" with "nbr". */
if (lsa->oi != nbr->oi)
return 0;
break;
case OSPF_OPAQUE_AREA_LSA:
/*
* It is assured by the caller function "nsm_negotiation_done()"
* that every given LSA belongs to the same area with "nbr".
*/
break;
case OSPF_OPAQUE_AS_LSA:
default:
break;
}
#endif /* HAVE_OPAQUE_LSA */
/* Stay away from any Local Translated Type-7 LSAs */
if (CHECK_FLAG (lsa->flags, OSPF_LSA_LOCAL_XLT))
return 0;
if (IS_LSA_MAXAGE (lsa))
ospf_ls_retransmit_add (nbr, lsa);
else
ospf_lsdb_add (&nbr->db_sum, lsa);
return 0;
}
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;
}
int
ospf_db_summary_add (struct ospf_lsa *lsa, void *v, int i)
{
struct ospf_neighbor *nbr = (struct ospf_neighbor *) v;
if (lsa == NULL)
return 0;
#ifdef HAVE_NSSA
/* Stay away from any Local Translated Type-7 LSAs */
if (CHECK_FLAG (lsa->flags, OSPF_LSA_LOCAL_XLT))
return 0;
#endif /* HAVE_NSSA */
if (IS_LSA_MAXAGE (lsa))
ospf_ls_retransmit_add (nbr, lsa);
else
ospf_lsdb_add (&nbr->db_sum, lsa);
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;
}
void
ospf6_asbr_external_lsa_add (struct ospf6_lsa *lsa)
{
struct ospf6_lsa_as_external *external;
struct prefix_ls asbr_id;
struct ospf6_route_req asbr_entry;
struct ospf6_route_req request;
external = OSPF6_LSA_HEADER_END (lsa->header);
if (IS_LSA_MAXAGE (lsa))
return;
if (IS_OSPF6_DUMP_ASBR)
zlog_info ("ASBR: Calculate %s", lsa->str);
if (lsa->header->adv_router == ospf6->router_id)
{
if (IS_OSPF6_DUMP_ASBR)
zlog_info ("ASBR: Self-originated, ignore");
return;
}
if (OSPF6_ASBR_METRIC (external) == LS_INFINITY)
{
if (IS_OSPF6_DUMP_ASBR)
zlog_info ("ASBR: Metric is Infinity, ignore");
return;
}
memset (&asbr_id, 0, sizeof (asbr_id));
asbr_id.family = AF_UNSPEC;
asbr_id.prefixlen = 64; /* xxx */
asbr_id.adv_router.s_addr = lsa->header->adv_router;
ospf6_route_lookup (&asbr_entry, (struct prefix *) &asbr_id,
ospf6->topology_table);
if (ospf6_route_end (&asbr_entry))
{
if (IS_OSPF6_DUMP_ASBR)
{
char buf[64];
inet_ntop (AF_INET, &asbr_id.adv_router, buf, sizeof (buf));
zlog_info ("ASBR: ASBR %s not found, ignore", buf);
}
return;
}
memset (&request, 0, sizeof (request));
request.route.type = OSPF6_DEST_TYPE_NETWORK;
request.route.prefix.family = AF_INET6;
request.route.prefix.prefixlen = external->prefix.prefix_length;
memcpy (&request.route.prefix.u.prefix6, (char *)(external + 1),
OSPF6_PREFIX_SPACE (request.route.prefix.prefixlen));
request.path.area_id = asbr_entry.path.area_id;
request.path.origin.type = htons (OSPF6_LSA_TYPE_AS_EXTERNAL);
request.path.origin.id = lsa->header->id;
request.path.origin.adv_router = lsa->header->adv_router;
if (CHECK_FLAG (external->bits_metric, OSPF6_ASBR_BIT_E))
{
request.path.type = OSPF6_PATH_TYPE_EXTERNAL2;
request.path.metric_type = 2;
request.path.cost = asbr_entry.path.cost;
request.path.cost_e2 = OSPF6_ASBR_METRIC (external);
}
else
{
request.path.type = OSPF6_PATH_TYPE_EXTERNAL1;
request.path.metric_type = 1;
request.path.cost = asbr_entry.path.cost
+ OSPF6_ASBR_METRIC (external);
request.path.cost_e2 = 0;
}
request.path.prefix_options = external->prefix.prefix_options;
while (((struct prefix_ls *)&asbr_entry.route.prefix)->adv_router.s_addr ==
asbr_id.adv_router.s_addr &&
asbr_entry.route.type == OSPF6_DEST_TYPE_ROUTER)
{
memcpy (&request.nexthop, &asbr_entry.nexthop,
sizeof (struct ospf6_nexthop));
ospf6_route_add (&request, ospf6->route_table);
ospf6_route_next (&asbr_entry);
}
}