Implementation of route reflection for BGP
This commit is contained in:
parent
d51aa28190
commit
4847a894bf
8 changed files with 195 additions and 71 deletions
|
@ -11,6 +11,7 @@
|
||||||
|
|
||||||
#include "lib/resource.h"
|
#include "lib/resource.h"
|
||||||
#include "lib/ip.h"
|
#include "lib/ip.h"
|
||||||
|
#include "nest/route.h"
|
||||||
#include "nest/attrs.h"
|
#include "nest/attrs.h"
|
||||||
|
|
||||||
struct f_inst { /* Instruction */
|
struct f_inst { /* Instruction */
|
||||||
|
|
|
@ -40,9 +40,11 @@ int_set_format(struct adata *set, byte *buf, unsigned int size)
|
||||||
struct adata *
|
struct adata *
|
||||||
int_set_add(struct linpool *pool, struct adata *list, u32 val)
|
int_set_add(struct linpool *pool, struct adata *list, u32 val)
|
||||||
{
|
{
|
||||||
struct adata *res = lp_alloc(pool, list->length + sizeof(struct adata) + 4);
|
int len = list ? list->length : 0;
|
||||||
res->length = list->length+4;
|
struct adata *res = lp_alloc(pool, len + sizeof(struct adata) + 4);
|
||||||
|
res->length = len + 4;
|
||||||
* (u32 *) res->data = val;
|
* (u32 *) res->data = val;
|
||||||
|
if (list)
|
||||||
memcpy((char *) res->data + 4, list->data, list->length);
|
memcpy((char *) res->data + 4, list->data, list->length);
|
||||||
return res;
|
return res;
|
||||||
}
|
}
|
||||||
|
|
|
@ -47,4 +47,7 @@ struct adata *int_set_add(struct linpool *pool, struct adata *list, u32 val);
|
||||||
int int_set_contains(struct adata *list, u32 val);
|
int int_set_contains(struct adata *list, u32 val);
|
||||||
struct adata *int_set_del(struct linpool *pool, struct adata *list, u32 val);
|
struct adata *int_set_del(struct linpool *pool, struct adata *list, u32 val);
|
||||||
|
|
||||||
|
static inline int int_set_get_size(struct adata *list)
|
||||||
|
{ return list->length / 4; }
|
||||||
|
|
||||||
#endif
|
#endif
|
||||||
|
|
|
@ -104,13 +104,19 @@ bgp_check_next_hop(struct bgp_proto *p UNUSED, byte *a, int len)
|
||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
bgp_check_aggregator(struct bgp_proto *p UNUSED, UNUSED byte *a, int len)
|
bgp_check_aggregator(struct bgp_proto *p, UNUSED byte *a, int len)
|
||||||
{
|
{
|
||||||
int exp_len = (bgp_as4_support && p->as4_support) ? 8 : 6;
|
int exp_len = (bgp_as4_support && p->as4_support) ? 8 : 6;
|
||||||
|
|
||||||
return (len == exp_len) ? 0 : 5;
|
return (len == exp_len) ? 0 : 5;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static int
|
||||||
|
bgp_check_cluster_list(struct bgp_proto *p UNUSED, UNUSED byte *a, int len)
|
||||||
|
{
|
||||||
|
return ((len % 4) == 0) ? 0 : 5;
|
||||||
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
bgp_check_reach_nlri(struct bgp_proto *p UNUSED, byte *a UNUSED, int len UNUSED)
|
bgp_check_reach_nlri(struct bgp_proto *p UNUSED, byte *a UNUSED, int len UNUSED)
|
||||||
{
|
{
|
||||||
|
@ -150,8 +156,10 @@ static struct attr_desc bgp_attr_table[] = {
|
||||||
bgp_check_aggregator, NULL },
|
bgp_check_aggregator, NULL },
|
||||||
{ "community", -1, BAF_OPTIONAL | BAF_TRANSITIVE, EAF_TYPE_INT_SET, 1, /* BA_COMMUNITY */
|
{ "community", -1, BAF_OPTIONAL | BAF_TRANSITIVE, EAF_TYPE_INT_SET, 1, /* BA_COMMUNITY */
|
||||||
NULL, NULL },
|
NULL, NULL },
|
||||||
{ NULL, }, /* BA_ORIGINATOR_ID */
|
{ "originator_id", 4, BAF_OPTIONAL, EAF_TYPE_INT, 0, /* BA_ORIGINATOR_ID */
|
||||||
{ NULL, }, /* BA_CLUSTER_LIST */
|
NULL, NULL },
|
||||||
|
{ "cluster_list", -1, BAF_OPTIONAL, EAF_TYPE_INT_SET, 0, /* BA_CLUSTER_LIST */
|
||||||
|
bgp_check_cluster_list, NULL },
|
||||||
{ NULL, }, /* BA_DPA */
|
{ NULL, }, /* BA_DPA */
|
||||||
{ NULL, }, /* BA_ADVERTISER */
|
{ NULL, }, /* BA_ADVERTISER */
|
||||||
{ NULL, }, /* BA_RCID_PATH */
|
{ NULL, }, /* BA_RCID_PATH */
|
||||||
|
@ -173,35 +181,52 @@ static struct attr_desc bgp_attr_table[] = {
|
||||||
|
|
||||||
#define ATTR_KNOWN(code) ((code) < ARRAY_SIZE(bgp_attr_table) && bgp_attr_table[code].name)
|
#define ATTR_KNOWN(code) ((code) < ARRAY_SIZE(bgp_attr_table) && bgp_attr_table[code].name)
|
||||||
|
|
||||||
static byte *
|
static inline struct adata *
|
||||||
bgp_set_attr(eattr *e, struct linpool *pool, unsigned attr, unsigned val)
|
bgp_alloc_adata(struct linpool *pool, unsigned len)
|
||||||
|
{
|
||||||
|
struct adata *ad = lp_alloc(pool, sizeof(struct adata) + len);
|
||||||
|
ad->length = len;
|
||||||
|
return ad;
|
||||||
|
}
|
||||||
|
|
||||||
|
static void
|
||||||
|
bgp_set_attr(eattr *e, unsigned attr, uintptr_t val)
|
||||||
{
|
{
|
||||||
ASSERT(ATTR_KNOWN(attr));
|
ASSERT(ATTR_KNOWN(attr));
|
||||||
e->id = EA_CODE(EAP_BGP, attr);
|
e->id = EA_CODE(EAP_BGP, attr);
|
||||||
e->type = bgp_attr_table[attr].type;
|
e->type = bgp_attr_table[attr].type;
|
||||||
e->flags = bgp_attr_table[attr].expected_flags;
|
e->flags = bgp_attr_table[attr].expected_flags;
|
||||||
if (e->type & EAF_EMBEDDED)
|
if (e->type & EAF_EMBEDDED)
|
||||||
{
|
|
||||||
e->u.data = val;
|
e->u.data = val;
|
||||||
return NULL;
|
|
||||||
}
|
|
||||||
else
|
else
|
||||||
{
|
e->u.ptr = (struct adata *) val;
|
||||||
e->u.ptr = lp_alloc(pool, sizeof(struct adata) + val);
|
|
||||||
e->u.ptr->length = val;
|
|
||||||
return e->u.ptr->data;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
byte *
|
static byte *
|
||||||
bgp_attach_attr(ea_list **to, struct linpool *pool, unsigned attr, unsigned val)
|
bgp_set_attr_wa(eattr *e, struct linpool *pool, unsigned attr, unsigned len)
|
||||||
|
{
|
||||||
|
struct adata *ad = bgp_alloc_adata(pool, len);
|
||||||
|
bgp_set_attr(e, attr, (uintptr_t) ad);
|
||||||
|
return ad->data;
|
||||||
|
}
|
||||||
|
|
||||||
|
void
|
||||||
|
bgp_attach_attr(ea_list **to, struct linpool *pool, unsigned attr, uintptr_t val)
|
||||||
{
|
{
|
||||||
ea_list *a = lp_alloc(pool, sizeof(ea_list) + sizeof(eattr));
|
ea_list *a = lp_alloc(pool, sizeof(ea_list) + sizeof(eattr));
|
||||||
a->next = *to;
|
a->next = *to;
|
||||||
*to = a;
|
*to = a;
|
||||||
a->flags = EALF_SORTED;
|
a->flags = EALF_SORTED;
|
||||||
a->count = 1;
|
a->count = 1;
|
||||||
return bgp_set_attr(a->attrs, pool, attr, val);
|
bgp_set_attr(a->attrs, attr, val);
|
||||||
|
}
|
||||||
|
|
||||||
|
byte *
|
||||||
|
bgp_attach_attr_wa(ea_list **to, struct linpool *pool, unsigned attr, unsigned len)
|
||||||
|
{
|
||||||
|
struct adata *ad = bgp_alloc_adata(pool, len);
|
||||||
|
bgp_attach_attr(to, pool, attr, (uintptr_t) ad);
|
||||||
|
return ad->data;
|
||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
|
@ -713,6 +738,7 @@ bgp_rt_notify(struct proto *P, net *n, rte *new, rte *old UNUSED, ea_list *attrs
|
||||||
bgp_schedule_packet(p->conn, PKT_UPDATE);
|
bgp_schedule_packet(p->conn, PKT_UPDATE);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
static int
|
static int
|
||||||
bgp_create_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *pool)
|
bgp_create_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *pool)
|
||||||
{
|
{
|
||||||
|
@ -725,14 +751,14 @@ bgp_create_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *p
|
||||||
ea->flags = EALF_SORTED;
|
ea->flags = EALF_SORTED;
|
||||||
ea->count = 4;
|
ea->count = 4;
|
||||||
|
|
||||||
bgp_set_attr(ea->attrs, pool, BA_ORIGIN,
|
bgp_set_attr(ea->attrs, BA_ORIGIN,
|
||||||
((rta->source == RTS_OSPF_EXT1) || (rta->source == RTS_OSPF_EXT2)) ? ORIGIN_INCOMPLETE : ORIGIN_IGP);
|
((rta->source == RTS_OSPF_EXT1) || (rta->source == RTS_OSPF_EXT2)) ? ORIGIN_INCOMPLETE : ORIGIN_IGP);
|
||||||
|
|
||||||
if (p->is_internal)
|
if (p->is_internal)
|
||||||
bgp_set_attr(ea->attrs+1, pool, BA_AS_PATH, 0);
|
bgp_set_attr_wa(ea->attrs+1, pool, BA_AS_PATH, 0);
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
z = bgp_set_attr(ea->attrs+1, pool, BA_AS_PATH, bgp_as4_support ? 6 : 4);
|
z = bgp_set_attr_wa(ea->attrs+1, pool, BA_AS_PATH, bgp_as4_support ? 6 : 4);
|
||||||
z[0] = AS_PATH_SEQUENCE;
|
z[0] = AS_PATH_SEQUENCE;
|
||||||
z[1] = 1; /* 1 AS */
|
z[1] = 1; /* 1 AS */
|
||||||
|
|
||||||
|
@ -742,7 +768,7 @@ bgp_create_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *p
|
||||||
put_u16(z+2, p->local_as);
|
put_u16(z+2, p->local_as);
|
||||||
}
|
}
|
||||||
|
|
||||||
z = bgp_set_attr(ea->attrs+2, pool, BA_NEXT_HOP, sizeof(ip_addr));
|
z = bgp_set_attr_wa(ea->attrs+2, pool, BA_NEXT_HOP, sizeof(ip_addr));
|
||||||
if (p->cf->next_hop_self ||
|
if (p->cf->next_hop_self ||
|
||||||
!p->is_internal ||
|
!p->is_internal ||
|
||||||
rta->dest != RTD_ROUTER)
|
rta->dest != RTD_ROUTER)
|
||||||
|
@ -755,34 +781,55 @@ bgp_create_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *p
|
||||||
else
|
else
|
||||||
*(ip_addr *)z = e->attrs->gw;
|
*(ip_addr *)z = e->attrs->gw;
|
||||||
|
|
||||||
bgp_set_attr(ea->attrs+3, pool, BA_LOCAL_PREF, 0);
|
bgp_set_attr(ea->attrs+3, BA_LOCAL_PREF, 0);
|
||||||
|
|
||||||
return 0; /* Leave decision to the filters */
|
return 0; /* Leave decision to the filters */
|
||||||
}
|
}
|
||||||
|
|
||||||
static ea_list *
|
|
||||||
bgp_path_prepend(struct linpool *pool, eattr *a, ea_list *old, int as)
|
|
||||||
{
|
|
||||||
struct ea_list *e = lp_alloc(pool, sizeof(ea_list) + sizeof(eattr));
|
|
||||||
struct adata *olda = a->u.ptr;
|
|
||||||
|
|
||||||
e->next = old;
|
static inline int
|
||||||
e->flags = EALF_SORTED;
|
bgp_as_path_loopy(struct bgp_proto *p, rta *a)
|
||||||
e->count = 1;
|
{
|
||||||
e->attrs[0].id = EA_CODE(EAP_BGP, BA_AS_PATH);
|
eattr *e = ea_find(a->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH));
|
||||||
e->attrs[0].flags = BAF_TRANSITIVE;
|
return (e && as_path_is_member(e->u.ptr, p->local_as));
|
||||||
e->attrs[0].type = EAF_TYPE_AS_PATH;
|
}
|
||||||
e->attrs[0].u.ptr = as_path_prepend(pool, olda, as);
|
|
||||||
return e;
|
static inline int
|
||||||
|
bgp_originator_id_loopy(struct bgp_proto *p, rta *a)
|
||||||
|
{
|
||||||
|
eattr *e = ea_find(a->eattrs, EA_CODE(EAP_BGP, BA_ORIGINATOR_ID));
|
||||||
|
return (e && (e->u.data == p->local_id));
|
||||||
|
}
|
||||||
|
|
||||||
|
static inline int
|
||||||
|
bgp_cluster_list_loopy(struct bgp_proto *p, rta *a)
|
||||||
|
{
|
||||||
|
eattr *e = ea_find(a->eattrs, EA_CODE(EAP_BGP, BA_CLUSTER_LIST));
|
||||||
|
return (e && p->rr_client && int_set_contains(e->u.ptr, p->rr_cluster_id));
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
static inline void
|
||||||
|
bgp_path_prepend(rte *e, ea_list **attrs, struct linpool *pool, u32 as)
|
||||||
|
{
|
||||||
|
eattr *a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH));
|
||||||
|
bgp_attach_attr(attrs, pool, BA_AS_PATH, (uintptr_t) as_path_prepend(pool, a->u.ptr, as));
|
||||||
|
}
|
||||||
|
|
||||||
|
static inline void
|
||||||
|
bgp_cluster_list_prepend(rte *e, ea_list **attrs, struct linpool *pool, u32 cid)
|
||||||
|
{
|
||||||
|
eattr *a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_CLUSTER_LIST));
|
||||||
|
bgp_attach_attr(attrs, pool, BA_CLUSTER_LIST, (uintptr_t) int_set_add(pool, a ? a->u.ptr : NULL, cid));
|
||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
bgp_update_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *pool)
|
bgp_update_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *pool, int rr)
|
||||||
{
|
{
|
||||||
eattr *a;
|
eattr *a;
|
||||||
|
|
||||||
if (!p->is_internal && (a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH))))
|
if (!p->is_internal)
|
||||||
*attrs = bgp_path_prepend(pool, a, *attrs, p->local_as);
|
bgp_path_prepend(e, attrs, pool, p->local_as);
|
||||||
|
|
||||||
a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_NEXT_HOP));
|
a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_NEXT_HOP));
|
||||||
if (a && (p->is_internal || (!p->is_internal && e->attrs->iface == p->neigh->iface)))
|
if (a && (p->is_internal || (!p->is_internal && e->attrs->iface == p->neigh->iface)))
|
||||||
|
@ -792,7 +839,24 @@ bgp_update_attrs(struct bgp_proto *p, rte *e, ea_list **attrs, struct linpool *p
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
/* Need to create new one */
|
/* Need to create new one */
|
||||||
*(ip_addr *) bgp_attach_attr(attrs, pool, BA_NEXT_HOP, sizeof(ip_addr)) = p->local_addr;
|
bgp_attach_attr_ip(attrs, pool, BA_NEXT_HOP, p->local_addr);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (rr)
|
||||||
|
{
|
||||||
|
/* Handling route reflection, RFC 4456 */
|
||||||
|
struct bgp_proto *src = (struct bgp_proto *) e->attrs->proto;
|
||||||
|
|
||||||
|
a = ea_find(e->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGINATOR_ID));
|
||||||
|
if (!a)
|
||||||
|
bgp_attach_attr(attrs, pool, BA_ORIGINATOR_ID, src->remote_id);
|
||||||
|
|
||||||
|
/* We attach proper cluster ID according to whether the route is entering or leaving the cluster */
|
||||||
|
bgp_cluster_list_prepend(e, attrs, pool, src->rr_client ? src->rr_cluster_id : p->rr_cluster_id);
|
||||||
|
|
||||||
|
/* Two RR clients with different cluster ID, hmmm */
|
||||||
|
if (src->rr_client && p->rr_client && (src->rr_cluster_id != p->rr_cluster_id))
|
||||||
|
bgp_cluster_list_prepend(e, attrs, pool, p->rr_cluster_id);
|
||||||
}
|
}
|
||||||
|
|
||||||
return 0; /* Leave decision to the filters */
|
return 0; /* Leave decision to the filters */
|
||||||
|
@ -809,9 +873,22 @@ bgp_import_control(struct proto *P, rte **new, ea_list **attrs, struct linpool *
|
||||||
return -1;
|
return -1;
|
||||||
if (new_bgp)
|
if (new_bgp)
|
||||||
{
|
{
|
||||||
|
/* We should check here for cluster list loop, because the receiving BGP instance
|
||||||
|
might have different cluster ID */
|
||||||
|
if (bgp_cluster_list_loopy(p, e->attrs))
|
||||||
|
return -1;
|
||||||
|
|
||||||
if (p->local_as == new_bgp->local_as && p->is_internal && new_bgp->is_internal)
|
if (p->local_as == new_bgp->local_as && p->is_internal && new_bgp->is_internal)
|
||||||
return -1; /* Don't redistribute internal routes with IBGP */
|
{
|
||||||
return bgp_update_attrs(p, e, attrs, pool);
|
/* Redistribution of internal routes with IBGP */
|
||||||
|
if (p->rr_client || new_bgp->rr_client)
|
||||||
|
/* Route reflection, RFC 4456 */
|
||||||
|
return bgp_update_attrs(p, e, attrs, pool, 1);
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
return bgp_update_attrs(p, e, attrs, pool, 0);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
return bgp_create_attrs(p, e, attrs, pool);
|
return bgp_create_attrs(p, e, attrs, pool);
|
||||||
|
@ -835,7 +912,7 @@ bgp_rte_better(rte *new, rte *old)
|
||||||
if (n < o)
|
if (n < o)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
/* Use AS path lengths */
|
/* RFC 4271 9.1.2.2. a) Use AS path lengths */
|
||||||
if (new_bgp->cf->compare_path_lengths || old_bgp->cf->compare_path_lengths)
|
if (new_bgp->cf->compare_path_lengths || old_bgp->cf->compare_path_lengths)
|
||||||
{
|
{
|
||||||
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH));
|
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH));
|
||||||
|
@ -848,7 +925,7 @@ bgp_rte_better(rte *new, rte *old)
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Use origins */
|
/* RFC 4271 9.1.2.2. b) Use origins */
|
||||||
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGIN));
|
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGIN));
|
||||||
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGIN));
|
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGIN));
|
||||||
n = x ? x->u.data : ORIGIN_INCOMPLETE;
|
n = x ? x->u.data : ORIGIN_INCOMPLETE;
|
||||||
|
@ -858,7 +935,7 @@ bgp_rte_better(rte *new, rte *old)
|
||||||
if (n > o)
|
if (n > o)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
/* Compare MED's */
|
/* RFC 4271 9.1.2.2. c) Compare MED's */
|
||||||
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_MULTI_EXIT_DISC));
|
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_MULTI_EXIT_DISC));
|
||||||
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_MULTI_EXIT_DISC));
|
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_MULTI_EXIT_DISC));
|
||||||
n = x ? x->u.data : new_bgp->cf->default_med;
|
n = x ? x->u.data : new_bgp->cf->default_med;
|
||||||
|
@ -868,23 +945,40 @@ bgp_rte_better(rte *new, rte *old)
|
||||||
if (n > o)
|
if (n > o)
|
||||||
return 0;
|
return 0;
|
||||||
|
|
||||||
/* A tie breaking procedure according to RFC 1771, section 9.1.2.1 */
|
/* RFC 4271 9.1.2.2. d) Prefer external peers */
|
||||||
/* We don't have interior distances */
|
|
||||||
/* We prefer external peers */
|
|
||||||
if (new_bgp->is_internal > old_bgp->is_internal)
|
if (new_bgp->is_internal > old_bgp->is_internal)
|
||||||
return 0;
|
return 0;
|
||||||
if (new_bgp->is_internal < old_bgp->is_internal)
|
if (new_bgp->is_internal < old_bgp->is_internal)
|
||||||
return 1;
|
return 1;
|
||||||
/* Finally we compare BGP identifiers */
|
|
||||||
return (new_bgp->remote_id < old_bgp->remote_id);
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
/* Skipping RFC 4271 9.1.2.2. e) */
|
||||||
bgp_path_loopy(struct bgp_proto *p, eattr *a)
|
/* We don't have interior distances */
|
||||||
{
|
|
||||||
return as_path_is_member(a->u.ptr, p->local_as);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
/* RFC 4456 9. b) Compare cluster list lengths */
|
||||||
|
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_CLUSTER_LIST));
|
||||||
|
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_CLUSTER_LIST));
|
||||||
|
n = x ? int_set_get_size(x->u.ptr) : 0;
|
||||||
|
o = y ? int_set_get_size(y->u.ptr) : 0;
|
||||||
|
if (n < o)
|
||||||
|
return 1;
|
||||||
|
if (n > o)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
/* RFC 4271 9.1.2.2. f) Compare BGP identifiers */
|
||||||
|
/* RFC 4456 9. a) Use ORIGINATOR_ID instead of local neighor ID */
|
||||||
|
x = ea_find(new->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGINATOR_ID));
|
||||||
|
y = ea_find(old->attrs->eattrs, EA_CODE(EAP_BGP, BA_ORIGINATOR_ID));
|
||||||
|
n = x ? x->u.data : new_bgp->remote_id;
|
||||||
|
o = y ? y->u.data : old_bgp->remote_id;
|
||||||
|
if (n < o)
|
||||||
|
return 1;
|
||||||
|
if (n > o)
|
||||||
|
return 0;
|
||||||
|
|
||||||
|
|
||||||
|
/* RFC 4271 9.1.2.2. g) Compare peer IP adresses */
|
||||||
|
return (ipa_compare(new_bgp->cf->remote_ip, old_bgp->cf->remote_ip) < 0);
|
||||||
|
}
|
||||||
|
|
||||||
static struct adata *
|
static struct adata *
|
||||||
bgp_aggregator_convert_to_new(struct adata *old, struct linpool *pool)
|
bgp_aggregator_convert_to_new(struct adata *old, struct linpool *pool)
|
||||||
|
@ -916,7 +1010,7 @@ bgp_merge_as_paths(struct adata *old2, struct adata *old4, int req_as, struct li
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
/* Reconstruct 4B AS_PATH and AGGREGATOR according to RFC4893 4.2.3 */
|
/* Reconstruct 4B AS_PATH and AGGREGATOR according to RFC 4893 4.2.3 */
|
||||||
static void
|
static void
|
||||||
bgp_reconstruct_4b_atts(struct bgp_proto *p, rta *a, struct linpool *pool)
|
bgp_reconstruct_4b_atts(struct bgp_proto *p, rta *a, struct linpool *pool)
|
||||||
{
|
{
|
||||||
|
@ -1159,18 +1253,23 @@ bgp_decode_attrs(struct bgp_conn *conn, byte *attr, unsigned int len, struct lin
|
||||||
bgp_remove_as4_attrs(bgp, a);
|
bgp_remove_as4_attrs(bgp, a);
|
||||||
|
|
||||||
/* If the AS path attribute contains our AS, reject the routes */
|
/* If the AS path attribute contains our AS, reject the routes */
|
||||||
e = ea_find(a->eattrs, EA_CODE(EAP_BGP, BA_AS_PATH));
|
if (bgp_as_path_loopy(bgp, a))
|
||||||
if (e && bgp_path_loopy(bgp, e))
|
goto loop;
|
||||||
{
|
|
||||||
DBG("BGP: Path loop!\n");
|
/* Two checks for IBGP loops caused by route reflection, RFC 4456 */
|
||||||
return NULL;
|
if (bgp_originator_id_loopy(bgp, a) ||
|
||||||
}
|
bgp_cluster_list_loopy(bgp, a))
|
||||||
|
goto loop;
|
||||||
|
|
||||||
/* If there's no local preference, define one */
|
/* If there's no local preference, define one */
|
||||||
if (!(seen[0] && (1 << BA_LOCAL_PREF)))
|
if (!(seen[0] && (1 << BA_LOCAL_PREF)))
|
||||||
bgp_attach_attr(&a->eattrs, pool, BA_LOCAL_PREF, 0);
|
bgp_attach_attr(&a->eattrs, pool, BA_LOCAL_PREF, 0);
|
||||||
return a;
|
return a;
|
||||||
|
|
||||||
|
loop:
|
||||||
|
DBG("BGP: Path loop!\n");
|
||||||
|
return NULL;
|
||||||
|
|
||||||
malformed:
|
malformed:
|
||||||
bgp_error(conn, 3, 1, NULL, 0);
|
bgp_error(conn, 3, 1, NULL, 0);
|
||||||
return NULL;
|
return NULL;
|
||||||
|
|
|
@ -485,6 +485,13 @@ bgp_start_locked(struct object_lock *lock)
|
||||||
p->local_id = cf->c.global->router_id;
|
p->local_id = cf->c.global->router_id;
|
||||||
p->next_hop = cf->multihop ? cf->multihop_via : cf->remote_ip;
|
p->next_hop = cf->multihop ? cf->multihop_via : cf->remote_ip;
|
||||||
p->neigh = neigh_find(&p->p, &p->next_hop, NEF_STICKY);
|
p->neigh = neigh_find(&p->p, &p->next_hop, NEF_STICKY);
|
||||||
|
|
||||||
|
if (cf->rr_client)
|
||||||
|
{
|
||||||
|
p->rr_cluster_id = cf->rr_cluster_id ? cf->rr_cluster_id : p->local_id;
|
||||||
|
p->rr_client = cf->rr_client;
|
||||||
|
}
|
||||||
|
|
||||||
if (!p->neigh)
|
if (!p->neigh)
|
||||||
{
|
{
|
||||||
log(L_ERR "%s: Invalid next hop %I", p->p.name, p->next_hop);
|
log(L_ERR "%s: Invalid next hop %I", p->p.name, p->next_hop);
|
||||||
|
@ -633,6 +640,8 @@ bgp_check(struct bgp_config *c)
|
||||||
cf_error("Local AS number out of range");
|
cf_error("Local AS number out of range");
|
||||||
if (!bgp_as4_support && (c->remote_as > 0xFFFF))
|
if (!bgp_as4_support && (c->remote_as > 0xFFFF))
|
||||||
cf_error("Neighbor AS number out of range");
|
cf_error("Neighbor AS number out of range");
|
||||||
|
if ((c->local_as != c->remote_as) && (c->rr_client))
|
||||||
|
cf_error("Only internal neighbor can be RR client");
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
|
|
|
@ -25,6 +25,8 @@ struct bgp_config {
|
||||||
int compare_path_lengths; /* Use path lengths when selecting best route */
|
int compare_path_lengths; /* Use path lengths when selecting best route */
|
||||||
u32 default_local_pref; /* Default value for LOCAL_PREF attribute */
|
u32 default_local_pref; /* Default value for LOCAL_PREF attribute */
|
||||||
u32 default_med; /* Default value for MULTI_EXIT_DISC attribute */
|
u32 default_med; /* Default value for MULTI_EXIT_DISC attribute */
|
||||||
|
u32 rr_cluster_id; /* Route reflector cluster ID, if different from local ID */
|
||||||
|
int rr_client; /* Whether neighbor is RR client of me */
|
||||||
unsigned connect_retry_time;
|
unsigned connect_retry_time;
|
||||||
unsigned hold_time, initial_hold_time;
|
unsigned hold_time, initial_hold_time;
|
||||||
unsigned keepalive_time;
|
unsigned keepalive_time;
|
||||||
|
@ -60,6 +62,8 @@ struct bgp_proto {
|
||||||
int as4_support; /* Peer supports 4B AS numbers [RFC4893] */
|
int as4_support; /* Peer supports 4B AS numbers [RFC4893] */
|
||||||
u32 local_id; /* BGP identifier of this router */
|
u32 local_id; /* BGP identifier of this router */
|
||||||
u32 remote_id; /* BGP identifier of the neighbor */
|
u32 remote_id; /* BGP identifier of the neighbor */
|
||||||
|
u32 rr_cluster_id; /* Route reflector cluster ID */
|
||||||
|
int rr_client; /* Whether neighbor is RR client of me */
|
||||||
struct bgp_conn *conn; /* Connection we have established */
|
struct bgp_conn *conn; /* Connection we have established */
|
||||||
struct bgp_conn outgoing_conn; /* Outgoing connection we're working with */
|
struct bgp_conn outgoing_conn; /* Outgoing connection we're working with */
|
||||||
struct bgp_conn incoming_conn; /* Incoming connection we have neither accepted nor rejected yet */
|
struct bgp_conn incoming_conn; /* Incoming connection we have neither accepted nor rejected yet */
|
||||||
|
@ -121,7 +125,8 @@ void bgp_close_conn(struct bgp_conn *c);
|
||||||
|
|
||||||
/* attrs.c */
|
/* attrs.c */
|
||||||
|
|
||||||
byte *bgp_attach_attr(struct ea_list **to, struct linpool *, unsigned attr, unsigned val);
|
void bgp_attach_attr(struct ea_list **to, struct linpool *pool, unsigned attr, uintptr_t val);
|
||||||
|
byte *bgp_attach_attr_wa(struct ea_list **to, struct linpool *pool, unsigned attr, unsigned len);
|
||||||
struct rta *bgp_decode_attrs(struct bgp_conn *conn, byte *a, unsigned int len, struct linpool *pool, int mandatory);
|
struct rta *bgp_decode_attrs(struct bgp_conn *conn, byte *a, unsigned int len, struct linpool *pool, int mandatory);
|
||||||
int bgp_get_attr(struct eattr *e, byte *buf);
|
int bgp_get_attr(struct eattr *e, byte *buf);
|
||||||
int bgp_rte_better(struct rte *, struct rte *);
|
int bgp_rte_better(struct rte *, struct rte *);
|
||||||
|
@ -132,6 +137,9 @@ unsigned int bgp_encode_attrs(struct bgp_proto *p, byte *w, ea_list *attrs, int
|
||||||
void bgp_free_bucket(struct bgp_proto *p, struct bgp_bucket *buck);
|
void bgp_free_bucket(struct bgp_proto *p, struct bgp_bucket *buck);
|
||||||
void bgp_get_route_info(struct rte *, byte *buf, struct ea_list *attrs);
|
void bgp_get_route_info(struct rte *, byte *buf, struct ea_list *attrs);
|
||||||
|
|
||||||
|
inline static void bgp_attach_attr_ip(struct ea_list **to, struct linpool *pool, unsigned attr, ip_addr a)
|
||||||
|
{ *(ip_addr *) bgp_attach_attr_wa(to, pool, attr, sizeof(ip_addr)) = a; }
|
||||||
|
|
||||||
/* packets.c */
|
/* packets.c */
|
||||||
|
|
||||||
void bgp_schedule_packet(struct bgp_conn *conn, int type);
|
void bgp_schedule_packet(struct bgp_conn *conn, int type);
|
||||||
|
|
|
@ -20,7 +20,8 @@ CF_KEYWORDS(BGP, LOCAL, NEIGHBOR, AS, HOLD, TIME, CONNECT, RETRY, KEEPALIVE,
|
||||||
MULTIHOP, STARTUP, VIA, NEXT, HOP, SELF, DEFAULT, PATH, METRIC,
|
MULTIHOP, STARTUP, VIA, NEXT, HOP, SELF, DEFAULT, PATH, METRIC,
|
||||||
ERROR, START, DELAY, FORGET, WAIT, DISABLE, AFTER,
|
ERROR, START, DELAY, FORGET, WAIT, DISABLE, AFTER,
|
||||||
BGP_PATH, BGP_LOCAL_PREF, BGP_MED, BGP_ORIGIN, BGP_NEXT_HOP,
|
BGP_PATH, BGP_LOCAL_PREF, BGP_MED, BGP_ORIGIN, BGP_NEXT_HOP,
|
||||||
BGP_ATOMIC_AGGR, BGP_AGGREGATOR, BGP_COMMUNITY, SOURCE, ADDRESS, PASSWORD)
|
BGP_ATOMIC_AGGR, BGP_AGGREGATOR, BGP_COMMUNITY, SOURCE, ADDRESS,
|
||||||
|
PASSWORD, RR, CLIENT, CLUSTER, ID)
|
||||||
|
|
||||||
CF_GRAMMAR
|
CF_GRAMMAR
|
||||||
|
|
||||||
|
@ -38,7 +39,6 @@ bgp_proto_start: proto_start BGP {
|
||||||
BGP_CFG->error_amnesia_time = 300;
|
BGP_CFG->error_amnesia_time = 300;
|
||||||
BGP_CFG->error_delay_time_min = 60;
|
BGP_CFG->error_delay_time_min = 60;
|
||||||
BGP_CFG->error_delay_time_max = 300;
|
BGP_CFG->error_delay_time_max = 300;
|
||||||
BGP_CFG->password = NULL;
|
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
|
|
||||||
|
@ -52,6 +52,8 @@ bgp_proto:
|
||||||
BGP_CFG->remote_ip = $3;
|
BGP_CFG->remote_ip = $3;
|
||||||
BGP_CFG->remote_as = $5;
|
BGP_CFG->remote_as = $5;
|
||||||
}
|
}
|
||||||
|
| bgp_proto RR CLUSTER ID expr ';' { BGP_CFG->rr_cluster_id = $5; }
|
||||||
|
| bgp_proto RR CLIENT ';' { BGP_CFG->rr_client = 1; }
|
||||||
| bgp_proto HOLD TIME expr ';' { BGP_CFG->hold_time = $4; }
|
| bgp_proto HOLD TIME expr ';' { BGP_CFG->hold_time = $4; }
|
||||||
| bgp_proto STARTUP HOLD TIME expr ';' { BGP_CFG->initial_hold_time = $5; }
|
| bgp_proto STARTUP HOLD TIME expr ';' { BGP_CFG->initial_hold_time = $5; }
|
||||||
| bgp_proto CONNECT RETRY TIME expr ';' { BGP_CFG->connect_retry_time = $5; }
|
| bgp_proto CONNECT RETRY TIME expr ';' { BGP_CFG->connect_retry_time = $5; }
|
||||||
|
|
|
@ -193,7 +193,7 @@ bgp_create_update(struct bgp_conn *conn, byte *buf)
|
||||||
if ((buck = p->withdraw_bucket) && !EMPTY_LIST(buck->prefixes))
|
if ((buck = p->withdraw_bucket) && !EMPTY_LIST(buck->prefixes))
|
||||||
{
|
{
|
||||||
DBG("Withdrawn routes:\n");
|
DBG("Withdrawn routes:\n");
|
||||||
tmp = bgp_attach_attr(&ea, bgp_linpool, BA_MP_UNREACH_NLRI, remains-8);
|
tmp = bgp_attach_attr_wa(&ea, bgp_linpool, BA_MP_UNREACH_NLRI, remains-8);
|
||||||
*tmp++ = 0;
|
*tmp++ = 0;
|
||||||
*tmp++ = BGP_AF_IPV6;
|
*tmp++ = BGP_AF_IPV6;
|
||||||
*tmp++ = 1;
|
*tmp++ = 1;
|
||||||
|
@ -218,7 +218,7 @@ bgp_create_update(struct bgp_conn *conn, byte *buf)
|
||||||
size = bgp_encode_attrs(p, w, buck->eattrs, 1024);
|
size = bgp_encode_attrs(p, w, buck->eattrs, 1024);
|
||||||
w += size;
|
w += size;
|
||||||
remains -= size;
|
remains -= size;
|
||||||
tstart = tmp = bgp_attach_attr(&ea, bgp_linpool, BA_MP_REACH_NLRI, remains-8);
|
tstart = tmp = bgp_attach_attr_wa(&ea, bgp_linpool, BA_MP_REACH_NLRI, remains-8);
|
||||||
*tmp++ = 0;
|
*tmp++ = 0;
|
||||||
*tmp++ = BGP_AF_IPV6;
|
*tmp++ = BGP_AF_IPV6;
|
||||||
*tmp++ = 1;
|
*tmp++ = 1;
|
||||||
|
@ -702,7 +702,7 @@ bgp_do_rx_update(struct bgp_conn *conn,
|
||||||
/* Create fake NEXT_HOP attribute */
|
/* Create fake NEXT_HOP attribute */
|
||||||
if (len < 1 || (*x != 16 && *x != 32) || len < *x + 2)
|
if (len < 1 || (*x != 16 && *x != 32) || len < *x + 2)
|
||||||
goto bad;
|
goto bad;
|
||||||
memcpy(bgp_attach_attr(&a0->eattrs, bgp_linpool, BA_NEXT_HOP, 16), x+1, 16);
|
bgp_attach_attr_ip(&a0->eattrs, bgp_linpool, BA_NEXT_HOP, x[1]);
|
||||||
len -= *x + 2;
|
len -= *x + 2;
|
||||||
x += *x + 1;
|
x += *x + 1;
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue