2000-03-30 20:00:42 +00:00
|
|
|
/*
|
|
|
|
* BIRD -- OSPF
|
|
|
|
*
|
2004-06-04 21:05:43 +00:00
|
|
|
* (c) 2000--2004 Ondrej Filip <feela@network.cz>
|
2000-03-30 20:00:42 +00:00
|
|
|
*
|
|
|
|
* Can be freely distributed and used under the terms of the GNU GPL.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "ospf.h"
|
|
|
|
|
2009-04-06 14:17:47 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
/*
|
2009-08-21 07:27:52 +00:00
|
|
|
struct ospf_lsupd_packet
|
|
|
|
{
|
2012-10-02 09:44:05 +00:00
|
|
|
struct ospf_packet hdr;
|
|
|
|
// union ospf_auth auth;
|
|
|
|
|
|
|
|
u32 lsa_count;
|
|
|
|
void lsas[];
|
2009-08-21 07:27:52 +00:00
|
|
|
};
|
2012-10-02 09:44:05 +00:00
|
|
|
*/
|
2009-08-21 07:27:52 +00:00
|
|
|
|
|
|
|
|
2009-10-29 22:57:42 +00:00
|
|
|
/* Beware of unaligned access */
|
2012-08-05 20:32:06 +00:00
|
|
|
void ospf_dump_lsahdr(struct proto_ospf *po, struct ospf_lsa_header *lsa_n)
|
2009-04-06 14:17:47 +00:00
|
|
|
{
|
|
|
|
struct ospf_lsa_header lsa;
|
2012-10-02 09:44:05 +00:00
|
|
|
u32 lsa_type;
|
|
|
|
|
|
|
|
lsa_ntoh_hdr(lsa_n, &lsa);
|
|
|
|
lsa_type = lsa_get_type(po, lsa.type_raw);
|
2009-04-06 14:17:47 +00:00
|
|
|
|
2009-12-14 16:29:33 +00:00
|
|
|
log(L_TRACE "%s: LSA Type: %04x, Id: %R, Rt: %R, Age: %u, Seq: %08x, Sum: %04x",
|
2012-10-02 09:44:05 +00:00
|
|
|
po->proto.name, lsa_type, lsa.id, lsa.rt, lsa.age, lsa.sn, lsa.checksum);
|
2009-04-06 14:17:47 +00:00
|
|
|
}
|
|
|
|
|
2012-08-05 20:32:06 +00:00
|
|
|
void ospf_dump_common(struct proto_ospf *po, struct ospf_packet *pkt)
|
2009-04-06 14:17:47 +00:00
|
|
|
{
|
2012-08-05 20:32:06 +00:00
|
|
|
struct proto *p = &po->proto;
|
|
|
|
log(L_TRACE "%s: length %d", p->name, ntohs(pkt->length));
|
|
|
|
log(L_TRACE "%s: router %R", p->name, ntohl(pkt->routerid));
|
2009-04-06 14:17:47 +00:00
|
|
|
}
|
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
static inline unsigned
|
|
|
|
ospf_lsupd_hdrlen(struct proto_ospf *po)
|
|
|
|
{
|
|
|
|
return ospf_pkt_hdrlen(po) + 4; /* + u32 lsa count field */
|
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
static inline u32
|
|
|
|
ospf_lsupd_get_lsa_count(struct ospf_packet *pkt, unsigned hdrlen)
|
|
|
|
{
|
|
|
|
u32 *c = ((void *) pkt) + hdrlen - 4;
|
|
|
|
return ntohl(*c);
|
|
|
|
}
|
|
|
|
|
|
|
|
static inline void
|
|
|
|
ospf_lsupd_set_lsa_count(struct ospf_packet *pkt, unsigned hdrlen, u32 val)
|
|
|
|
{
|
|
|
|
u32 *c = ((void *) pkt) + hdrlen - 4;
|
|
|
|
*c = htonl(val);
|
|
|
|
}
|
2012-10-02 09:44:05 +00:00
|
|
|
|
|
|
|
static inline void
|
|
|
|
ospf_lsupd_body(struct proto_ospf *po, struct ospf_packet *pkt,
|
|
|
|
unsigned *offset, unsigned *bound, unsigned *lsa_count)
|
|
|
|
{
|
|
|
|
unsigned hlen = ospf_lsupd_hdrlen(po);
|
|
|
|
*offset = hlen;
|
|
|
|
*bound = ntohs(pkt->length) - sizeof(struct ospf_lsa_header);
|
2013-04-15 23:14:57 +00:00
|
|
|
*lsa_count = ospf_lsupd_get_lsa_count(pkt, hlen);
|
2012-10-02 09:44:05 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
static void ospf_lsupd_dump(struct proto_ospf *po, struct ospf_packet *pkt)
|
2009-04-06 14:17:47 +00:00
|
|
|
{
|
2012-08-05 20:32:06 +00:00
|
|
|
struct proto *p = &po->proto;
|
2009-04-06 14:17:47 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
ASSERT(pkt->type == LSUPD_P);
|
|
|
|
ospf_dump_common(po, pkt);
|
2009-04-06 14:17:47 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
/* We know that ntohs(pkt->length) >= sizeof(struct ospf_lsa_header) */
|
|
|
|
unsigned offset, bound, i, lsa_count, lsalen;
|
|
|
|
ospf_lsupd_body(po, pkt, &offset, &bound, &lsa_count);
|
2009-04-06 14:17:47 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
for (i = 0; i < lsa_count; i++)
|
2009-04-06 14:17:47 +00:00
|
|
|
{
|
2011-06-20 05:37:55 +00:00
|
|
|
if (offset > bound)
|
2009-04-06 14:17:47 +00:00
|
|
|
{
|
|
|
|
log(L_TRACE "%s: LSA invalid", p->name);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
struct ospf_lsa_header *lsa = ((void *) pkt) + offset;
|
|
|
|
ospf_dump_lsahdr(po, lsa);
|
2011-06-20 05:37:55 +00:00
|
|
|
lsalen = ntohs(lsa->length);
|
|
|
|
offset += lsalen;
|
|
|
|
|
|
|
|
if (((lsalen % 4) != 0) || (lsalen <= sizeof(struct ospf_lsa_header)))
|
|
|
|
{
|
|
|
|
log(L_TRACE "%s: LSA invalid", p->name);
|
|
|
|
return;
|
|
|
|
}
|
2009-04-06 14:17:47 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
static void ospf_lsupd_flood_ifa(struct proto_ospf *po, struct ospf_iface *ifa, struct top_hash_entry *en);
|
2000-03-31 00:21:41 +00:00
|
|
|
|
2010-11-04 16:22:43 +00:00
|
|
|
|
2000-03-31 00:21:41 +00:00
|
|
|
|
2000-03-30 20:00:42 +00:00
|
|
|
void
|
2012-10-02 09:44:05 +00:00
|
|
|
ospf_lsupd_receive(struct ospf_packet *pkt, struct ospf_iface *ifa,
|
2009-08-21 07:27:52 +00:00
|
|
|
struct ospf_neighbor *n)
|
2000-03-30 20:00:42 +00:00
|
|
|
{
|
2004-07-15 16:37:52 +00:00
|
|
|
struct proto_ospf *po = ifa->oa->po;
|
|
|
|
struct proto *p = &po->proto;
|
2013-04-15 23:14:57 +00:00
|
|
|
struct ospf_neighbor *ntmp;
|
|
|
|
|
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
unsigned sendreq = 1;
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
unsigned plen = ntohs(pkt->length);
|
|
|
|
if (plen < (ospf_lsupd_hdrlen(po) + sizeof(struct ospf_lsa_header)))
|
2000-04-02 20:41:33 +00:00
|
|
|
{
|
2012-10-02 09:44:05 +00:00
|
|
|
log(L_ERR "OSPF: Bad LSUPD packet from %I - too short (%u B)", n->ip, plen);
|
2000-04-02 20:41:33 +00:00
|
|
|
return;
|
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
OSPF_PACKET(ospf_lsupd_dump, pkt, "LSUPD packet received from %I via %s", n->ip, ifa->iface->name);
|
2009-10-29 22:57:42 +00:00
|
|
|
|
|
|
|
if (n->state < NEIGHBOR_EXCHANGE)
|
2000-05-11 22:00:55 +00:00
|
|
|
{
|
2009-10-29 22:57:42 +00:00
|
|
|
OSPF_TRACE(D_PACKETS, "Received lsupd in lesser state than EXCHANGE from (%I)", n->ip);
|
2000-05-11 22:00:55 +00:00
|
|
|
return;
|
|
|
|
}
|
2000-04-02 20:41:33 +00:00
|
|
|
|
2004-06-04 12:53:10 +00:00
|
|
|
ospf_neigh_sm(n, INM_HELLOREC); /* Questionable */
|
2000-05-09 18:17:34 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
unsigned offset, bound, i, lsa_count;
|
|
|
|
ospf_lsupd_body(po, pkt, &offset, &bound, &lsa_count);
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2012-10-02 09:44:05 +00:00
|
|
|
for (i = 0; i < lsa_count; i++)
|
2000-04-02 20:41:33 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
struct ospf_lsa_header lsa, *lsa_n;
|
|
|
|
struct top_hash_entry *en, *ret;
|
|
|
|
u32 lsa_len, lsa_type, lsa_domain;
|
2000-05-10 15:04:21 +00:00
|
|
|
|
2009-10-29 22:57:42 +00:00
|
|
|
if (offset > bound)
|
2004-06-04 12:53:10 +00:00
|
|
|
{
|
2012-10-02 09:44:05 +00:00
|
|
|
log(L_WARN "OSPF: Received LSUPD from %I is too short", n->ip);
|
2004-06-04 12:53:10 +00:00
|
|
|
ospf_neigh_sm(n, INM_BADLSREQ);
|
2009-10-29 22:57:42 +00:00
|
|
|
return;
|
2004-06-04 12:53:10 +00:00
|
|
|
}
|
2000-05-10 15:04:21 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* LSA header in network order */
|
|
|
|
lsa_n = ((void *) pkt) + offset;
|
|
|
|
lsa_len = ntohs(lsa_n->length);
|
|
|
|
offset += lsa_len;
|
2009-12-03 17:25:14 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
if ((offset > plen) || ((lsa_len % 4) != 0) ||
|
|
|
|
(lsa_len <= sizeof(struct ospf_lsa_header)))
|
2000-05-10 15:04:21 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
log(L_WARN "%s: Received LSA from %I with bad length", p->name, n->ip);
|
2004-06-04 12:53:10 +00:00
|
|
|
ospf_neigh_sm(n, INM_BADLSREQ);
|
2000-05-10 15:04:21 +00:00
|
|
|
break;
|
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* RFC 2328 13. (1) - validate LSA checksum */
|
|
|
|
u16 chsum = lsa_n->checksum;
|
|
|
|
if (chsum != lsasum_check(lsa_n, NULL))
|
2000-04-02 20:41:33 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
log(L_WARN "%s: Received LSA from %I with bad checskum: %x %x",
|
|
|
|
p->name, n->ip, chsum, lsa_n->checksum);
|
2000-04-03 22:31:07 +00:00
|
|
|
continue;
|
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* LSA header in host order */
|
|
|
|
lsa_ntoh_hdr(lsa_n, &lsa);
|
|
|
|
lsa_xxxxtype(lsa.type_raw, ifa, &lsa_type, &lsa_domain);
|
|
|
|
|
|
|
|
DBG("Update Type: %04x, Id: %R, Rt: %R, Sn: 0x%08x, Age: %u, Sum: %u\n",
|
|
|
|
lsa_type, lsa.id, lsa.rt, lsa.sn, lsa.age, lsa.checksum);
|
2012-10-02 09:44:05 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* RFC 2328 13. (2) */
|
2012-10-02 09:44:05 +00:00
|
|
|
if (!lsa_type)
|
2000-04-03 22:31:07 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
log(L_WARN "%s: Received unknown LSA type from %I", p->name, n->ip);
|
2000-04-03 22:31:07 +00:00
|
|
|
continue;
|
2000-04-02 20:41:33 +00:00
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* RFC 5340 4.5.1 (2) and RFC 2328 13. (3) */
|
2012-08-05 20:32:06 +00:00
|
|
|
if ((LSA_SCOPE(lsa_type) == LSA_SCOPE_AS) && !oa_is_ext(ifa->oa))
|
2009-08-21 07:27:52 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
log(L_WARN "%s: Received LSA with AS scope in stub area from %I", p->name, n->ip);
|
2009-08-21 07:27:52 +00:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* RFC 5340 4.5.1 (3) */
|
2012-10-02 09:44:05 +00:00
|
|
|
if (LSA_SCOPE(lsa_type) == LSA_SCOPE_RES)
|
2009-08-21 07:27:52 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
log(L_WARN "%s: Received LSA with invalid scope from %I", p->name, n->ip);
|
2009-08-21 07:27:52 +00:00
|
|
|
continue;
|
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* Find local copy of LSA in link state database */
|
|
|
|
en = ospf_hash_find(po->gr, lsa_domain, lsa.id, lsa.rt, lsa_type);
|
2004-06-04 12:53:10 +00:00
|
|
|
|
|
|
|
#ifdef LOCAL_DEBUG
|
2013-04-15 23:14:57 +00:00
|
|
|
if (en)
|
2012-10-02 09:44:05 +00:00
|
|
|
DBG("I have Type: %04x, Id: %R, Rt: %R, Sn: 0x%08x, Age: %u, Sum: %u\n",
|
2013-04-15 23:14:57 +00:00
|
|
|
en->lsa_type, en->lsa.id, en->lsa.rt, en->lsa.sn, en->lsa.age, en->lsa.checksum);
|
2004-06-04 12:53:10 +00:00
|
|
|
#endif
|
2000-04-04 15:55:55 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* 13. (4) - ignore maxage LSA if i have no local copy */
|
|
|
|
if ((lsa.age == LSA_MAXAGE) && !en && can_flush_lsa(po))
|
2000-04-04 00:32:17 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DIRECT);
|
2004-06-04 12:53:10 +00:00
|
|
|
continue;
|
2000-04-04 00:32:17 +00:00
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
int cmp = : CMP_NEWER;
|
|
|
|
|
|
|
|
/* 13. (5) - received LSA is newer (or no local copy) */
|
|
|
|
if (!en || (lsa_comp(&lsa, &en->lsa) == CMP_NEWER))
|
2000-04-04 00:32:17 +00:00
|
|
|
{
|
2004-06-04 21:05:43 +00:00
|
|
|
struct ospf_iface *ift = NULL;
|
2013-04-15 23:14:57 +00:00
|
|
|
int self = (lsa.rt == po->router_id);
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2009-08-21 07:27:52 +00:00
|
|
|
#ifdef OSPFv2
|
|
|
|
/* 13.4 - check self-originated LSAs of NET type */
|
2012-08-05 20:32:06 +00:00
|
|
|
if ((!self) && (lsa_type == LSA_T_NET))
|
2004-06-04 12:53:10 +00:00
|
|
|
{
|
2009-08-25 14:42:14 +00:00
|
|
|
struct ospf_iface *nifa;
|
2004-06-04 21:05:43 +00:00
|
|
|
WALK_LIST(nifa, po->iface_list)
|
|
|
|
{
|
2004-07-14 21:46:20 +00:00
|
|
|
if (!nifa->iface)
|
|
|
|
continue;
|
2013-04-15 23:14:57 +00:00
|
|
|
if (ipa_equal(nifa->addr->ip, ipa_from_u32(lsa.id)))
|
2004-06-04 21:05:43 +00:00
|
|
|
{
|
|
|
|
self = 1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
}
|
2009-08-21 07:27:52 +00:00
|
|
|
#endif
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2009-08-21 07:27:52 +00:00
|
|
|
/* pg 145 (5f) - premature aging of self originated lsa */
|
2004-06-04 21:05:43 +00:00
|
|
|
if (self)
|
2004-06-04 12:53:10 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
if ((lsa.age == LSA_MAXAGE) && (lsa.sn == LSA_MAXSEQNO))
|
2004-06-04 21:05:43 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DIRECT);
|
2004-06-04 21:05:43 +00:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2009-12-14 19:37:32 +00:00
|
|
|
OSPF_TRACE(D_EVENTS, "Received old self-originated LSA (Type: %04x, Id: %R, Rt: %R)",
|
2013-04-15 23:14:57 +00:00
|
|
|
lsa_type, lsa.id, lsa.rt);
|
2009-12-12 00:35:51 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
if (en)
|
2009-12-12 00:35:51 +00:00
|
|
|
{
|
2009-12-14 19:37:32 +00:00
|
|
|
OSPF_TRACE(D_EVENTS, "Reflooding new self-originated LSA with newer sequence number");
|
2013-04-15 23:14:57 +00:00
|
|
|
en->lsa.sn = lsa.sn + 1;
|
|
|
|
en->lsa.age = 0;
|
|
|
|
en->inst_t = now;
|
|
|
|
en->ini_age = 0;
|
|
|
|
lsasum_calculate(&en->lsa, en->lsa_body);
|
|
|
|
ospf_lsupd_flood(po, NULL, NULL, &en->lsa, lsa_domain, 1);
|
2009-12-12 00:35:51 +00:00
|
|
|
}
|
|
|
|
else
|
2004-06-04 21:05:43 +00:00
|
|
|
{
|
2009-12-12 00:35:51 +00:00
|
|
|
OSPF_TRACE(D_EVENTS, "Premature aging it");
|
2013-04-15 23:14:57 +00:00
|
|
|
lsa.age = LSA_MAXAGE;
|
|
|
|
lsa.sn = LSA_MAXSEQNO;
|
|
|
|
lsa_n->age = htons(LSA_MAXAGE);
|
|
|
|
lsa_n->sn = htonl(LSA_MAXSEQNO);
|
|
|
|
lsasum_check(lsa_n, (lsa_n + 1)); /* It also calculates chsum! */
|
|
|
|
lsa.checksum = ntohs(lsa_n->checksum);
|
|
|
|
ospf_lsupd_flood(po, NULL, lsa_n, &lsa, lsa_domain, 0);
|
2004-06-04 21:05:43 +00:00
|
|
|
}
|
|
|
|
continue;
|
2004-06-04 12:53:10 +00:00
|
|
|
}
|
2000-05-09 21:06:48 +00:00
|
|
|
|
2000-04-05 00:51:25 +00:00
|
|
|
/* pg 144 (5a) */
|
2013-04-15 23:14:57 +00:00
|
|
|
if (en && ((now - en->inst_t) <= MINLSARRIVAL)) /* FIXME: test for flooding? */
|
2000-04-18 22:11:05 +00:00
|
|
|
{
|
2009-12-12 00:35:51 +00:00
|
|
|
OSPF_TRACE(D_EVENTS, "Skipping LSA received in less that MINLSARRIVAL");
|
2004-06-04 21:05:43 +00:00
|
|
|
sendreq = 0;
|
2000-04-18 22:11:05 +00:00
|
|
|
continue;
|
|
|
|
}
|
2004-06-04 21:05:43 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* 13. (5c) - remove old LSA from all retransmission lists */
|
2010-05-07 13:54:27 +00:00
|
|
|
/* Must be done before (5b), otherwise it also removes the new entries from (5b) */
|
2013-04-15 23:14:57 +00:00
|
|
|
if (en)
|
2005-02-14 11:54:16 +00:00
|
|
|
WALK_LIST(ift, po->iface_list)
|
|
|
|
WALK_LIST(ntmp, ift->neigh_list)
|
2000-06-02 13:52:50 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
struct top_hash_entry *ret;
|
2004-06-04 21:05:43 +00:00
|
|
|
if (ntmp->state > NEIGHBOR_EXSTART)
|
2013-04-15 23:14:57 +00:00
|
|
|
if ((ret = ospf_hash_find_header(ntmp->lsrth, lsa_domain, &en->lsa)) != NULL)
|
2004-06-04 21:05:43 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
s_rem_node(SNODE ret);
|
|
|
|
ospf_hash_delete(ntmp->lsrth, ret);
|
2004-06-04 21:05:43 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2010-05-07 13:54:27 +00:00
|
|
|
/* pg 144 (5b) */
|
2013-04-15 23:14:57 +00:00
|
|
|
if (ospf_lsupd_flood(po, n, lsa_n, &lsa, lsa_domain, 1) == 0)
|
2010-05-07 13:54:27 +00:00
|
|
|
{
|
|
|
|
DBG("Wasn't flooded back\n"); /* ps 144(5e), pg 153 */
|
|
|
|
if (ifa->state == OSPF_IS_BACKUP)
|
|
|
|
{
|
|
|
|
if (ifa->drid == n->rid)
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DELAY);
|
2010-05-07 13:54:27 +00:00
|
|
|
}
|
|
|
|
else
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DELAY);
|
2010-05-07 13:54:27 +00:00
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
if ((lsa.age == LSA_MAXAGE) && (lsa.sn == LSA_MAXSEQNO)
|
|
|
|
&& en && can_flush_lsa(po))
|
2004-06-04 21:05:43 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
flush_lsa(en, po);
|
2004-06-06 16:00:09 +00:00
|
|
|
schedule_rtcalc(po);
|
2004-06-04 21:05:43 +00:00
|
|
|
continue;
|
|
|
|
} /* FIXME lsack? */
|
2000-04-04 00:32:17 +00:00
|
|
|
|
2000-04-05 00:51:25 +00:00
|
|
|
/* pg 144 (5d) */
|
2013-04-15 23:14:57 +00:00
|
|
|
void *body = mb_alloc(p->pool, lsa.length - sizeof(struct ospf_lsa_header));
|
|
|
|
lsa_ntoh_body(lsa_n + 1, body, lsa.length - sizeof(struct ospf_lsa_header));
|
2009-10-29 22:57:42 +00:00
|
|
|
|
|
|
|
/* We will do validation check after flooding and
|
|
|
|
acknowledging given LSA to minimize problems
|
|
|
|
when communicating with non-validating peer */
|
2013-04-15 23:14:57 +00:00
|
|
|
if (lsa_validate(&lsa, lsa_type, ospf_is_v2(po), body) == 0)
|
2009-10-29 22:57:42 +00:00
|
|
|
{
|
|
|
|
log(L_WARN "Received invalid LSA from %I", n->ip);
|
|
|
|
mb_free(body);
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
en = lsa_install_new(po, &lsa, lsa_domain, body);
|
2000-04-04 22:27:19 +00:00
|
|
|
DBG("New LSA installed in DB\n");
|
2000-04-04 15:55:55 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* Events 6,7 from RFC 5340 4.4.3. */
|
2012-08-05 20:32:06 +00:00
|
|
|
if ((lsa_type == LSA_T_LINK) && (ifa->state == OSPF_IS_DR))
|
2009-09-08 11:45:02 +00:00
|
|
|
schedule_net_lsa(ifa);
|
|
|
|
|
2000-04-04 00:32:17 +00:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2004-06-04 14:03:30 +00:00
|
|
|
/* FIXME pg145 (6) */
|
2000-04-04 00:32:17 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* 13. (7) - received LSA is same */
|
|
|
|
if (lsa_comp(&lsa, &en->lsa) == CMP_SAME)
|
2000-04-04 00:32:17 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
ret = ospf_hash_find_entry(n->lsrth, en);
|
|
|
|
if (ret)
|
2000-04-18 21:40:11 +00:00
|
|
|
{
|
2004-06-04 21:05:43 +00:00
|
|
|
/* pg145 (7a) */
|
2013-04-15 23:14:57 +00:00
|
|
|
s_rem_node(SNODE ret);
|
|
|
|
ospf_hash_delete(n->lsrth, ret);
|
2010-05-07 13:54:27 +00:00
|
|
|
|
2004-06-04 21:05:43 +00:00
|
|
|
if (ifa->state == OSPF_IS_BACKUP)
|
|
|
|
{
|
|
|
|
if (n->rid == ifa->drid)
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DELAY);
|
2004-06-04 21:05:43 +00:00
|
|
|
}
|
2000-04-18 21:40:11 +00:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2004-06-04 21:05:43 +00:00
|
|
|
/* pg145 (7b) */
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsack_enqueue(n, lsa_n, ACKL_DIRECT);
|
2000-04-18 21:40:11 +00:00
|
|
|
}
|
2004-06-04 20:41:02 +00:00
|
|
|
sendreq = 0;
|
2000-04-18 21:40:11 +00:00
|
|
|
continue;
|
2000-04-04 00:32:17 +00:00
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* 13. (8) - received LSA is older */
|
2000-04-18 01:06:16 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
/* Seqnum is wrapping, wait until it is flushed */
|
|
|
|
if ((en->lsa.age == LSA_MAXAGE) && (en->lsa.sn == LSA_MAXSEQNO))
|
|
|
|
continue;
|
2000-04-04 00:32:17 +00:00
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
/* Send newer local copy back to neighbor */
|
|
|
|
/* FIXME - check for MinLSArrival ? */
|
|
|
|
ospf_lsupd_send(n, &en, 1);
|
|
|
|
}
|
2000-04-02 20:41:33 +00:00
|
|
|
}
|
2004-06-04 12:53:10 +00:00
|
|
|
|
2004-06-04 16:30:04 +00:00
|
|
|
/* Send direct LSAs */
|
|
|
|
ospf_lsack_send(n, ACKL_DIRECT);
|
|
|
|
|
2004-06-04 21:05:43 +00:00
|
|
|
if (sendreq && (n->state == NEIGHBOR_LOADING))
|
2000-06-02 09:53:26 +00:00
|
|
|
{
|
2004-06-04 21:05:43 +00:00
|
|
|
ospf_lsreq_send(n); /* Ask for another part of neighbor's database */
|
2000-06-02 09:53:26 +00:00
|
|
|
}
|
2000-03-30 20:00:42 +00:00
|
|
|
}
|
|
|
|
|
2013-04-15 23:14:57 +00:00
|
|
|
|
|
|
|
/**
|
|
|
|
* ospf_lsupd_flood - send received or generated LSA to the neighbors
|
|
|
|
* @po: OSPF protocol
|
|
|
|
* @en: LSA entry
|
|
|
|
* @from: neighbor than sent this LSA (or NULL if LSI is local)
|
|
|
|
*
|
|
|
|
* return value - was the LSA flooded back?
|
|
|
|
*/
|
|
|
|
|
|
|
|
int
|
|
|
|
ospf_lsupd_flood(struct proto_ospf *po, struct top_hash_entry *en, struct ospf_neighbor *from)
|
|
|
|
{
|
|
|
|
struct ospf_iface *ifa;
|
|
|
|
struct ospf_neighbor *n;
|
|
|
|
|
|
|
|
int back = 0;
|
|
|
|
WALK_LIST(ifa, po->iface_list)
|
|
|
|
{
|
|
|
|
if (ifa->stub)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
if (! lsa_flooding_allowed(en->lsa_type, en->domain, ifa))
|
|
|
|
continue;
|
|
|
|
|
|
|
|
DBG("Wanted to flood LSA: Type: %u, ID: %R, RT: %R, SN: 0x%x, Age %u\n",
|
|
|
|
hh->type, hh->id, hh->rt, hh->sn, hh->age);
|
|
|
|
|
|
|
|
int used = 0;
|
|
|
|
WALK_LIST(n, ifa->neigh_list)
|
|
|
|
{
|
|
|
|
/* 13.3 (1a) */
|
|
|
|
if (n->state < NEIGHBOR_EXCHANGE)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
/* 13.3 (1b) */
|
|
|
|
if (n->state < NEIGHBOR_FULL)
|
|
|
|
{
|
|
|
|
struct top_hash_entry *req = ospf_hash_find_entry(n->lsrqh, en);
|
|
|
|
if (req != NULL)
|
|
|
|
{
|
|
|
|
int cmp = lsa_comp(&en->lsa, &req->lsa);
|
|
|
|
|
|
|
|
/* If same or newer, remove LSA from the link state request list */
|
|
|
|
if (cmp > CMP_OLDER)
|
|
|
|
{
|
|
|
|
s_rem_node(SNODE req);
|
|
|
|
ospf_hash_delete(n->lsrqh, req);
|
|
|
|
if (EMPTY_SLIST(n->lsrql))
|
|
|
|
ospf_neigh_sm(n, INM_LOADDONE);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* If older or same, skip processing of this LSA */
|
|
|
|
if (cmp < CMP_NEWER)
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* 13.3 (1c) */
|
|
|
|
if (n == from)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
/* In OSPFv3, there should be check whether receiving router understand
|
|
|
|
that type of LSA (for LSA types with U-bit == 0). But as we do not support
|
|
|
|
any optional LSA types, this is not needed yet */
|
|
|
|
|
|
|
|
/* 13.3 (1d) - add LSA to the link state retransmission list */
|
|
|
|
{
|
|
|
|
struct top_hash_entry *ret = ospf_hash_get_entry(n->lsrth, en);
|
|
|
|
if (! ospf_hash_is_new(ret))
|
|
|
|
s_rem_node(SNODE ret);
|
|
|
|
|
|
|
|
s_add_tail(&n->lsrtl, SNODE ret);
|
|
|
|
memcpy(&ret->lsa, hh, sizeof(struct ospf_lsa_header));
|
|
|
|
}
|
|
|
|
|
|
|
|
used = 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* 13.3 (2) */
|
|
|
|
if (!used)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
if (from && (from->ifa == ifa))
|
|
|
|
{
|
|
|
|
/* 13.3 (3) */
|
|
|
|
if ((from->rid == ifa->drid) || from->rid == ifa->bdrid)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
/* 13.3 (4) */
|
|
|
|
if (ifa->state == OSPF_IS_BACKUP)
|
|
|
|
continue;
|
|
|
|
|
|
|
|
back = 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* 13.3 (5) - finally flood the packet */
|
|
|
|
ospf_lsupd_flood_ifa(po, ifa, en);
|
|
|
|
}
|
|
|
|
|
|
|
|
return back;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
|
|
|
ospf_lsupd_prepare(struct proto_ospf *po, struct ospf_iface *ifa,
|
|
|
|
struct top_hash_entry **lsa_list, unsigned lsa_count)
|
|
|
|
{
|
|
|
|
struct ospf_packet *pkt;
|
|
|
|
unsigned hlen, pos, i, maxsize;
|
|
|
|
|
|
|
|
pkt = ospf_tx_buffer(ifa);
|
|
|
|
hlen = ospf_lsupd_hdrlen(po);
|
|
|
|
maxsize = ospf_pkt_maxsize(ifa);
|
|
|
|
|
|
|
|
ospf_pkt_fill_hdr(ifa, pkt, LSUPD_P);
|
|
|
|
pos = hlen;
|
|
|
|
|
|
|
|
for (i = 0; i < lsa_count; i++)
|
|
|
|
{
|
|
|
|
struct top_hash_entry *en = lsa_list[i];
|
|
|
|
unsigned len = en->lsa.length;
|
|
|
|
|
|
|
|
if ((pos + len) > maxsize)
|
|
|
|
{
|
|
|
|
/* The packet if full, stop adding LSAs and sent it */
|
|
|
|
if (i > 0)
|
|
|
|
break;
|
|
|
|
|
|
|
|
/* LSA is larger than MTU, check buffer size */
|
|
|
|
if ((pos + len) > ospf_pkt_bufsize(ifa))
|
|
|
|
{
|
|
|
|
/* Cannot fit in a tx buffer, skip that */
|
|
|
|
log(L_WARN "OSPF: LSA too large to send (Type: %04x, Id: %R, Rt: %R)",
|
|
|
|
en->lsa_type, en->lsa.id, en->lsa.rt);
|
|
|
|
XXXX();
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
struct ospf_lsa_header *buf = ((void *) pkt) + pos;
|
|
|
|
lsa_hton_hdr(&en->lsa, buf);
|
|
|
|
lsa_hton_body(en->lsa_body, ((void *) buf) + sizeof(struct ospf_lsa_header),
|
|
|
|
len - sizeof(struct ospf_lsa_header));
|
|
|
|
buf->age = htons(MIN(en->lsa.age + ifa->inftransdelay, LSA_MAXAGE));
|
|
|
|
|
|
|
|
pos += len;
|
|
|
|
}
|
|
|
|
|
|
|
|
ospf_lsupd_set_lsa_count(pkt, hlen, i);
|
|
|
|
pkt->length = htons(pos);
|
|
|
|
|
|
|
|
return i;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
ospf_lsupd_flood_ifa(struct proto_ospf *po, struct ospf_iface *ifa, struct top_hash_entry *en)
|
|
|
|
{
|
|
|
|
ospf_lsupd_prepare(po, ifa, &en, 1);
|
|
|
|
|
|
|
|
OSPF_PACKET(ospf_lsupd_dump, ospf_tx_buffer(ifa),
|
|
|
|
"LSUPD packet flooded via %s", ifa->iface->name);
|
|
|
|
|
|
|
|
switch (ifa->type)
|
|
|
|
{
|
|
|
|
case OSPF_IT_BCAST:
|
|
|
|
if ((ifa->state == OSPF_IS_BACKUP) || (ifa->state == OSPF_IS_DR))
|
|
|
|
ospf_send_to_all(ifa);
|
|
|
|
else
|
|
|
|
ospf_send_to_des(ifa);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case OSPF_IT_NBMA:
|
|
|
|
if ((ifa->state == OSPF_IS_BACKUP) || (ifa->state == OSPF_IS_DR))
|
|
|
|
ospf_send_to_agt(ifa, NEIGHBOR_EXCHANGE);
|
|
|
|
else
|
|
|
|
ospf_send_to_bdr(ifa);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case OSPF_IT_PTP:
|
|
|
|
ospf_send_to_all(ifa);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case OSPF_IT_PTMP:
|
|
|
|
ospf_send_to_agt(ifa, NEIGHBOR_EXCHANGE);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case OSPF_IT_VLINK:
|
|
|
|
ospf_send_to(ifa, ifa->vip);
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
bug("Bug in ospf_lsupd_flood()");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
ospf_lsupd_send(struct ospf_neighbor *n, struct top_hash_entry **lsa_list, unsigned lsa_count)
|
|
|
|
{
|
|
|
|
struct ospf_iface *ifa = n->ifa;
|
|
|
|
struct proto_ospf *po = ifa->oa->po;
|
|
|
|
unsigned i, c;
|
|
|
|
|
|
|
|
for (i = 0; i < lsa_count; i += c)
|
|
|
|
{
|
|
|
|
c = ospf_lsupd_prepare(po, ifa, lsa_list + i, lsa_count - i);
|
|
|
|
|
|
|
|
OSPF_PACKET(ospf_lsupd_dump, ospf_tx_buffer(ifa),
|
|
|
|
"LSUPD packet sent to %I via %s", n->ip, ifa->iface->name);
|
|
|
|
|
|
|
|
ospf_send_to(ifa, n->ip);
|
|
|
|
}
|
|
|
|
|
|
|
|
return lsa_count;
|
|
|
|
}
|
|
|
|
|
2000-05-27 15:36:02 +00:00
|
|
|
void
|
2013-04-15 23:14:57 +00:00
|
|
|
ospf_lsupd_rxmt(struct ospf_neighbor *n)
|
2000-05-27 15:36:02 +00:00
|
|
|
{
|
2013-04-15 23:14:57 +00:00
|
|
|
struct proto_ospf *po = n->ifa->oa->po;
|
|
|
|
|
|
|
|
const unsigned max = 128;
|
|
|
|
struct top_hash_entry *entries[max];
|
|
|
|
struct top_hash_entry *ret, *en;
|
|
|
|
unsigned i = 0;
|
|
|
|
|
|
|
|
WALK_SLIST(ret, n->lsrtl)
|
|
|
|
{
|
|
|
|
en = ospf_hash_find_entry(po->gr, ret);
|
|
|
|
if (!en)
|
|
|
|
{
|
|
|
|
/* Probably flushed LSA, this should not happen */
|
|
|
|
log(L_WARN "%s: LSA disappeared (Type: %04x, Id: %R, Rt: %R)",
|
|
|
|
po->proto.name, ret->lsa_type, ret->lsa.id, ret->lsa.rt);
|
|
|
|
|
|
|
|
XXXX(); /* remove entry */
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
entries[i] = en;
|
|
|
|
i++;
|
|
|
|
|
|
|
|
if (i == max)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
ospf_lsupd_send(n, entries, i);
|
2000-05-27 15:36:02 +00:00
|
|
|
}
|