[thirdparty/bird.git] / proto / bgp / config.Y

/*
 *	BIRD -- Border Gateway Protocol Configuration
 *
 *	(c) 2000 Martin Mares <mj@ucw.cz>
 *
 *	Can be freely distributed and used under the terms of the GNU GPL.
 */

CF_HDR

#include "proto/bgp/bgp.h"

CF_DEFINES

#define BGP_CFG ((struct bgp_config *) this_proto)
#define BGP_CC ((struct bgp_channel_config *) this_channel)

CF_DECLS

CF_KEYWORDS(BGP, LOCAL, NEIGHBOR, AS, HOLD, TIME, CONNECT, RETRY, KEEPALIVE,
	MULTIHOP, STARTUP, VIA, NEXT, HOP, SELF, DEFAULT, PATH, METRIC, ERROR,
	START, DELAY, FORGET, WAIT, ENABLE, DISABLE, AFTER, BGP_PATH,
	BGP_LOCAL_PREF, BGP_MED, BGP_ORIGIN, BGP_NEXT_HOP, BGP_ATOMIC_AGGR,
	BGP_AGGREGATOR, BGP_COMMUNITY, BGP_EXT_COMMUNITY, BGP_LARGE_COMMUNITY,
	SOURCE, ADDRESS, PASSWORD, RR, RS, CLIENT, CLUSTER, ID, AS4, ADVERTISE,
	IPV4, CAPABILITIES, LIMIT, PASSIVE, PREFER, OLDER, MISSING, LLADDR,
	DROP, IGNORE, ROUTE, REFRESH, INTERPRET, COMMUNITIES, BGP_ORIGINATOR_ID,
	BGP_CLUSTER_LIST, IGP, TABLE, GATEWAY, DIRECT, RECURSIVE, MED, TTL,
	SECURITY, DETERMINISTIC, SECONDARY, ALLOW, BFD, ADD, PATHS, RX, TX,
	GRACEFUL, RESTART, AWARE, CHECK, LINK, PORT, EXTENDED, MESSAGES, SETKEY,
	STRICT, BIND, CONFEDERATION, MEMBER, MULTICAST, FLOW4, FLOW6, LONG,
	LIVED, STALE, IMPORT, IBGP, EBGP, MANDATORY, INTERNAL, EXTERNAL, SETS,
	DYNAMIC, RANGE, NAME, DIGITS, BGP_AIGP, AIGP, ORIGINATE, COST)

%type <i> bgp_nh
%type <i32> bgp_afi

CF_KEYWORDS(CEASE, PREFIX, LIMIT, HIT, ADMINISTRATIVE, SHUTDOWN, RESET, PEER,
	CONFIGURATION, CHANGE, DECONFIGURED, CONNECTION, REJECTED, COLLISION,
	OUT, OF, RESOURCES)

%type<i> bgp_cease_mask bgp_cease_list bgp_cease_flag

CF_GRAMMAR

proto: bgp_proto '}'  ;

bgp_proto_start: proto_start BGP {
     this_proto = proto_config_new(&proto_bgp, $1);
     BGP_CFG->local_port = BGP_PORT;
     BGP_CFG->remote_port = BGP_PORT;
     BGP_CFG->multihop = -1;	/* undefined */
     BGP_CFG->hold_time = 240;
     BGP_CFG->initial_hold_time = 240;
     BGP_CFG->compare_path_lengths = 1;
     BGP_CFG->igp_metric = 1;
     BGP_CFG->connect_delay_time = 5;
     BGP_CFG->connect_retry_time = 120;
     BGP_CFG->error_amnesia_time = 300;
     BGP_CFG->error_delay_time_min = 60;
     BGP_CFG->error_delay_time_max = 300;
     BGP_CFG->enable_refresh = 1;
     BGP_CFG->enable_as4 = 1;
     BGP_CFG->capabilities = 2;
     BGP_CFG->interpret_communities = 1;
     BGP_CFG->allow_as_sets = 1;
     BGP_CFG->default_local_pref = 100;
     BGP_CFG->gr_mode = BGP_GR_AWARE;
     BGP_CFG->gr_time = 120;
     BGP_CFG->llgr_mode = -1;
     BGP_CFG->llgr_time = 3600;
     BGP_CFG->setkey = 1;
     BGP_CFG->dynamic_name = "dynbgp";
     BGP_CFG->check_link = -1;
   }
 ;

bgp_loc_opts:
   /* empty */
 | bgp_loc_opts PORT expr { BGP_CFG->local_port = $3; if (($3<1) || ($3>65535)) cf_error("Invalid port number"); }
 | bgp_loc_opts AS expr { BGP_CFG->local_as = $3; }
 ;

bgp_nbr_opts:
   /* empty */
 | bgp_nbr_opts PORT expr { BGP_CFG->remote_port = $3; if (($3<1) || ($3>65535)) cf_error("Invalid port number"); }
 | bgp_nbr_opts AS expr { BGP_CFG->remote_as = $3; }
 | bgp_nbr_opts INTERNAL { BGP_CFG->peer_type = BGP_PT_INTERNAL; }
 | bgp_nbr_opts EXTERNAL { BGP_CFG->peer_type = BGP_PT_EXTERNAL; }
 ;

bgp_cease_mask:
   /* true -> all except connection collision */
   bool { $$ = $1 ? ~(1 << 7) : 0; }
 | '{' bgp_cease_list '}' { $$ = $2; }
 ;

bgp_cease_list:
   bgp_cease_flag
 | bgp_cease_list ',' bgp_cease_flag { $$ = $1 | $3; }
 ;

bgp_cease_flag:
   CEASE			{ $$ = 1 << 0; }
 | PREFIX LIMIT HIT		{ $$ = 1 << 1; }
 | ADMINISTRATIVE SHUTDOWN	{ $$ = 1 << 2; }
 | PEER DECONFIGURED		{ $$ = 1 << 3; }
 | ADMINISTRATIVE RESET		{ $$ = 1 << 4; }
 | CONNECTION REJECTED		{ $$ = 1 << 5; }
 | CONFIGURATION CHANGE		{ $$ = 1 << 6; }
 | CONNECTION COLLISION		{ $$ = 1 << 7; }
 | OUT OF RESOURCES		{ $$ = 1 << 8; }
 ;

bgp_proto:
   bgp_proto_start proto_name '{'
 | bgp_proto proto_item ';'
 | bgp_proto bgp_proto_channel ';'
 | bgp_proto LOCAL bgp_loc_opts ';'
 | bgp_proto LOCAL ipa ipa_scope bgp_loc_opts ';' {
     BGP_CFG->local_ip = $3;
     if ($4) BGP_CFG->iface = $4;
   }
 | bgp_proto NEIGHBOR bgp_nbr_opts ';'
 | bgp_proto NEIGHBOR ipa ipa_scope bgp_nbr_opts ';' {
     if (ipa_nonzero(BGP_CFG->remote_ip) || BGP_CFG->remote_range)
       cf_error("Only one neighbor per BGP instance is allowed");
     BGP_CFG->remote_ip = $3;
     if ($4) BGP_CFG->iface = $4;
   }
 | bgp_proto NEIGHBOR RANGE net_ip bgp_nbr_opts ';' {
     if (ipa_nonzero(BGP_CFG->remote_ip) || BGP_CFG->remote_range)
       cf_error("Only one neighbor per BGP instance is allowed");
     net_addr *n = cfg_alloc($4.length);
     net_copy(n, &($4));
     BGP_CFG->remote_range = n;
   }
 | bgp_proto INTERFACE TEXT ';' { BGP_CFG->iface = if_get_by_name($3); }
 | bgp_proto RR CLUSTER ID idval ';' { BGP_CFG->rr_cluster_id = $5; }
 | bgp_proto RR CLIENT bool ';' { BGP_CFG->rr_client = $4; }
 | bgp_proto RS CLIENT bool ';' { BGP_CFG->rs_client = $4; }
 | bgp_proto CONFEDERATION expr ';' { BGP_CFG->confederation = $3; }
 | bgp_proto CONFEDERATION MEMBER bool ';' { BGP_CFG->confederation_member = $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 DIRECT ';' { BGP_CFG->multihop = 0; }
 | bgp_proto MULTIHOP ';' { BGP_CFG->multihop = 64; }
 | bgp_proto MULTIHOP expr ';' { BGP_CFG->multihop = $3; if (($3<1) || ($3>255)) cf_error("Multihop must be in range 1-255"); }
 | bgp_proto DYNAMIC NAME text ';' {
     if (strchr($4, '%')) cf_error("Forbidden character '%%' in dynamic name");
     if (strlen($4) > (SYM_MAX_LEN - 16)) cf_error("Dynamic name too long");
     BGP_CFG->dynamic_name = $4;
   }
 | bgp_proto DYNAMIC NAME DIGITS expr ';' { BGP_CFG->dynamic_name_digits = $5; if ($5>10) cf_error("Dynamic name digits must be at most 10"); }
 | bgp_proto STRICT BIND bool ';' { BGP_CFG->strict_bind = $4; }
 | bgp_proto PATH METRIC bool ';' { BGP_CFG->compare_path_lengths = $4; }
 | bgp_proto MED METRIC bool ';' { BGP_CFG->med_metric = $4; }
 | bgp_proto IGP METRIC bool ';' { BGP_CFG->igp_metric = $4; }
 | bgp_proto PREFER OLDER bool ';' { BGP_CFG->prefer_older = $4; }
 | bgp_proto DETERMINISTIC MED bool ';' { BGP_CFG->deterministic_med = $4; }
 | bgp_proto DEFAULT BGP_MED expr ';' { BGP_CFG->default_med = $4; }
 | bgp_proto DEFAULT BGP_LOCAL_PREF expr ';' { BGP_CFG->default_local_pref = $4; }
 | bgp_proto SOURCE ADDRESS ipa ';' { BGP_CFG->local_ip = $4; }
 | bgp_proto START DELAY TIME expr ';' { BGP_CFG->connect_delay_time = $5; log(L_WARN "%s: Start delay time option is deprecated, use connect delay time", this_proto->name); }
 | bgp_proto CONNECT DELAY TIME expr ';' { BGP_CFG->connect_delay_time = $5; }
 | bgp_proto CONNECT RETRY TIME expr ';' { BGP_CFG->connect_retry_time = $5; }
 | bgp_proto KEEPALIVE TIME expr ';' { BGP_CFG->keepalive_time = $4; }
 | bgp_proto ERROR FORGET TIME expr ';' { BGP_CFG->error_amnesia_time = $5; }
 | bgp_proto ERROR WAIT TIME expr ',' expr ';' { BGP_CFG->error_delay_time_min = $5; BGP_CFG->error_delay_time_max = $7; }
 | bgp_proto DISABLE AFTER ERROR bool ';' { BGP_CFG->disable_after_error = $5; }
 | bgp_proto DISABLE AFTER CEASE bgp_cease_mask ';' { BGP_CFG->disable_after_cease = $5; }
 | bgp_proto ENABLE ROUTE REFRESH bool ';' { BGP_CFG->enable_refresh = $5; }
 | bgp_proto ENABLE AS4 bool ';' { BGP_CFG->enable_as4 = $4; }
 | bgp_proto ENABLE EXTENDED MESSAGES bool ';' { BGP_CFG->enable_extended_messages = $5; }
 | bgp_proto CAPABILITIES bool ';' { BGP_CFG->capabilities = $3; }
 | bgp_proto PASSWORD text ';' { BGP_CFG->password = $3; }
 | bgp_proto SETKEY bool ';' { BGP_CFG->setkey = $3; }
 | bgp_proto PASSIVE bool ';' { BGP_CFG->passive = $3; }
 | bgp_proto INTERPRET COMMUNITIES bool ';' { BGP_CFG->interpret_communities = $4; }
 | bgp_proto ALLOW LOCAL AS ';' { BGP_CFG->allow_local_as = -1; }
 | bgp_proto ALLOW LOCAL AS expr ';' { BGP_CFG->allow_local_as = $5; }
 | bgp_proto ALLOW BGP_LOCAL_PREF bool ';' { BGP_CFG->allow_local_pref = $4; }
 | bgp_proto ALLOW AS SETS bool ';' { BGP_CFG->allow_as_sets = $5; }
 | bgp_proto GRACEFUL RESTART bool ';' { BGP_CFG->gr_mode = $4; }
 | bgp_proto GRACEFUL RESTART AWARE ';' { BGP_CFG->gr_mode = BGP_GR_AWARE; }
 | bgp_proto GRACEFUL RESTART TIME expr ';' { BGP_CFG->gr_time = $5; }
 | bgp_proto LONG LIVED GRACEFUL RESTART bool ';' { BGP_CFG->llgr_mode = $6; }
 | bgp_proto LONG LIVED GRACEFUL RESTART AWARE ';' { BGP_CFG->llgr_mode = BGP_LLGR_AWARE; }
 | bgp_proto LONG LIVED STALE TIME expr ';' { BGP_CFG->llgr_time = $6; }
 | bgp_proto TTL SECURITY bool ';' { BGP_CFG->ttl_security = $4; }
 | bgp_proto CHECK LINK bool ';' { BGP_CFG->check_link = $4; }
 | bgp_proto BFD bool ';' { BGP_CFG->bfd = $3; cf_check_bfd($3); }
 | bgp_proto BFD GRACEFUL ';' { BGP_CFG->bfd = BGP_BFD_GRACEFUL; cf_check_bfd(1); }
 ;

bgp_afi:
   IPV4			{ $$ = BGP_AF_IPV4; }
 | IPV6			{ $$ = BGP_AF_IPV6; }
 | IPV4 MULTICAST	{ $$ = BGP_AF_IPV4_MC; }
 | IPV6 MULTICAST	{ $$ = BGP_AF_IPV6_MC; }
 | IPV4 MPLS		{ $$ = BGP_AF_IPV4_MPLS; }
 | IPV6 MPLS		{ $$ = BGP_AF_IPV6_MPLS; }
 | VPN4 MPLS		{ $$ = BGP_AF_VPN4_MPLS; }
 | VPN6 MPLS		{ $$ = BGP_AF_VPN6_MPLS; }
 | VPN4 MULTICAST	{ $$ = BGP_AF_VPN4_MC; }
 | VPN6 MULTICAST	{ $$ = BGP_AF_VPN6_MC; }
 | FLOW4		{ $$ = BGP_AF_FLOW4; }
 | FLOW6		{ $$ = BGP_AF_FLOW6; }
 ;

bgp_channel_start: bgp_afi
{
  const struct bgp_af_desc *desc = bgp_get_af_desc($1);

  if (!desc)
    cf_error("Unknown AFI/SAFI");

  this_channel = channel_config_get(&channel_bgp, desc->name, desc->net, this_proto);

  /* New channel */
  if (!BGP_CC->desc)
  {
    BGP_CC->c.in_filter = FILTER_UNDEF;
    BGP_CC->c.out_filter = FILTER_UNDEF;
    BGP_CC->c.ra_mode = RA_UNDEF;
    BGP_CC->afi = $1;
    BGP_CC->desc = desc;
    BGP_CC->next_hop_keep = 0xff; /* undefined */
    BGP_CC->gr_able = 0xff;	/* undefined */
    BGP_CC->llgr_able = 0xff;	/* undefined */
    BGP_CC->llgr_time = ~0U;	/* undefined */
    BGP_CC->aigp = 0xff;	/* undefined */
  }
};

bgp_nh:
   bool { $$ = $1; }
 | IBGP { $$ = NH_IBGP; }
 | EBGP { $$ = NH_EBGP; }

bgp_channel_item:
   channel_item
 | NEXT HOP ADDRESS ipa { BGP_CC->next_hop_addr = $4; }
 | NEXT HOP SELF bgp_nh { BGP_CC->next_hop_self = $4; }
 | NEXT HOP KEEP bgp_nh { BGP_CC->next_hop_keep = $4; }
 | MANDATORY bool { BGP_CC->mandatory = $2; }
 | MISSING LLADDR SELF { BGP_CC->missing_lladdr = MLL_SELF; }
 | MISSING LLADDR DROP { BGP_CC->missing_lladdr = MLL_DROP; }
 | MISSING LLADDR IGNORE { BGP_CC->missing_lladdr = MLL_IGNORE; }
 | GATEWAY DIRECT { BGP_CC->gw_mode = GW_DIRECT; }
 | GATEWAY RECURSIVE { BGP_CC->gw_mode = GW_RECURSIVE; }
 | SECONDARY bool { BGP_CC->secondary = $2; }
 | GRACEFUL RESTART bool { BGP_CC->gr_able = $3; }
 | LONG LIVED GRACEFUL RESTART bool { BGP_CC->llgr_able = $5; }
 | LONG LIVED STALE TIME expr { BGP_CC->llgr_time = $5; }
 | EXTENDED NEXT HOP bool { BGP_CC->ext_next_hop = $4; }
 | ADD PATHS RX { BGP_CC->add_path = BGP_ADD_PATH_RX; }
 | ADD PATHS TX { BGP_CC->add_path = BGP_ADD_PATH_TX; }
 | ADD PATHS bool { BGP_CC->add_path = $3 ? BGP_ADD_PATH_FULL : 0; }
 | IMPORT TABLE bool { BGP_CC->import_table = $3; }
 | EXPORT TABLE bool { BGP_CC->export_table = $3; }
 | AIGP bool { BGP_CC->aigp = $2; BGP_CC->aigp_originate = 0; }
 | AIGP ORIGINATE { BGP_CC->aigp = 1; BGP_CC->aigp_originate = 1; }
 | COST expr { BGP_CC->cost = $2; if ($2 < 1) cf_error("Cost must be positive"); }
 | IGP TABLE rtable {
    if (BGP_CC->desc->no_igp)
      cf_error("IGP table not allowed here");

    if ($3->addr_type == NET_IP4)
      BGP_CC->igp_table_ip4 = $3;
    else if ($3->addr_type == NET_IP6)
      BGP_CC->igp_table_ip6 = $3;
    else
      cf_error("Mismatched IGP table type");
   }
 ;

bgp_channel_opts:
   /* empty */
 | bgp_channel_opts bgp_channel_item ';'
 ;

bgp_channel_opt_list:
   /* empty */
 | '{' bgp_channel_opts '}'
 ;

bgp_channel_end:
{
  if (!this_channel->table)
    cf_error("Routing table not specified");

  this_channel = NULL;
};

bgp_proto_channel: bgp_channel_start bgp_channel_opt_list bgp_channel_end;


dynamic_attr: BGP_ORIGIN
	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_ENUM_BGP_ORIGIN, EA_CODE(PROTOCOL_BGP, BA_ORIGIN)); } ;
dynamic_attr: BGP_PATH
	{ $$ = f_new_dynamic_attr(EAF_TYPE_AS_PATH, T_PATH, EA_CODE(PROTOCOL_BGP, BA_AS_PATH)); } ;
dynamic_attr: BGP_NEXT_HOP
	{ $$ = f_new_dynamic_attr(EAF_TYPE_IP_ADDRESS, T_IP, EA_CODE(PROTOCOL_BGP, BA_NEXT_HOP)); } ;
dynamic_attr: BGP_MED
	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_INT, EA_CODE(PROTOCOL_BGP, BA_MULTI_EXIT_DISC)); } ;
dynamic_attr: BGP_LOCAL_PREF
	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_INT, EA_CODE(PROTOCOL_BGP, BA_LOCAL_PREF)); } ;
dynamic_attr: BGP_ATOMIC_AGGR
	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_ATOMIC_AGGR)); } ;
dynamic_attr: BGP_AGGREGATOR
	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_AGGREGATOR)); } ;
dynamic_attr: BGP_COMMUNITY
	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT_SET, T_CLIST, EA_CODE(PROTOCOL_BGP, BA_COMMUNITY)); } ;
dynamic_attr: BGP_ORIGINATOR_ID
	{ $$ = f_new_dynamic_attr(EAF_TYPE_ROUTER_ID, T_QUAD, EA_CODE(PROTOCOL_BGP, BA_ORIGINATOR_ID)); } ;
dynamic_attr: BGP_CLUSTER_LIST
	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT_SET, T_CLIST, EA_CODE(PROTOCOL_BGP, BA_CLUSTER_LIST)); } ;
dynamic_attr: BGP_EXT_COMMUNITY
	{ $$ = f_new_dynamic_attr(EAF_TYPE_EC_SET, T_ECLIST, EA_CODE(PROTOCOL_BGP, BA_EXT_COMMUNITY)); } ;
dynamic_attr: BGP_AIGP
	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_AIGP)); } ;
dynamic_attr: BGP_LARGE_COMMUNITY
	{ $$ = f_new_dynamic_attr(EAF_TYPE_LC_SET, T_LCLIST, EA_CODE(PROTOCOL_BGP, BA_LARGE_COMMUNITY)); } ;


CF_ENUM(T_ENUM_BGP_ORIGIN, ORIGIN_, IGP, EGP, INCOMPLETE)

CF_CODE

CF_END
Commit	Line	Data
2638249d MM	1	/*
	2	* BIRD -- Border Gateway Protocol Configuration
	3	*
	4	* (c) 2000 Martin Mares <mj@ucw.cz>
	5	*
	6	* Can be freely distributed and used under the terms of the GNU GPL.
	7	*/
	8
	9	CF_HDR
	10
	11	#include "proto/bgp/bgp.h"
	12
cea63664 MM	13	CF_DEFINES
cea63664 MM	14
2638249d	15	#define BGP_CFG ((struct bgp_config *) this_proto)
d15b0b0a	16	#define BGP_CC ((struct bgp_channel_config *) this_channel)
2638249d MM	17
	18	CF_DECLS
	19
d15b0b0a OZ	20	CF_KEYWORDS(BGP, LOCAL, NEIGHBOR, AS, HOLD, TIME, CONNECT, RETRY, KEEPALIVE,
	21	MULTIHOP, STARTUP, VIA, NEXT, HOP, SELF, DEFAULT, PATH, METRIC, ERROR,
	22	START, DELAY, FORGET, WAIT, ENABLE, DISABLE, AFTER, BGP_PATH,
	23	BGP_LOCAL_PREF, BGP_MED, BGP_ORIGIN, BGP_NEXT_HOP, BGP_ATOMIC_AGGR,
	24	BGP_AGGREGATOR, BGP_COMMUNITY, BGP_EXT_COMMUNITY, BGP_LARGE_COMMUNITY,
	25	SOURCE, ADDRESS, PASSWORD, RR, RS, CLIENT, CLUSTER, ID, AS4, ADVERTISE,
	26	IPV4, CAPABILITIES, LIMIT, PASSIVE, PREFER, OLDER, MISSING, LLADDR,
	27	DROP, IGNORE, ROUTE, REFRESH, INTERPRET, COMMUNITIES, BGP_ORIGINATOR_ID,
	28	BGP_CLUSTER_LIST, IGP, TABLE, GATEWAY, DIRECT, RECURSIVE, MED, TTL,
	29	SECURITY, DETERMINISTIC, SECONDARY, ALLOW, BFD, ADD, PATHS, RX, TX,
	30	GRACEFUL, RESTART, AWARE, CHECK, LINK, PORT, EXTENDED, MESSAGES, SETKEY,
5bd73431	31	STRICT, BIND, CONFEDERATION, MEMBER, MULTICAST, FLOW4, FLOW6, LONG,
a52476c9	32	LIVED, STALE, IMPORT, IBGP, EBGP, MANDATORY, INTERNAL, EXTERNAL, SETS,
09ee846d	33	DYNAMIC, RANGE, NAME, DIGITS, BGP_AIGP, AIGP, ORIGINATE, COST)
d15b0b0a	34
1cab2b4a	35	%type <i> bgp_nh
d15b0b0a	36	%type <i32> bgp_afi
2638249d	37
63472779 OZ	38	CF_KEYWORDS(CEASE, PREFIX, LIMIT, HIT, ADMINISTRATIVE, SHUTDOWN, RESET, PEER,
	39	CONFIGURATION, CHANGE, DECONFIGURED, CONNECTION, REJECTED, COLLISION,
	40	OUT, OF, RESOURCES)
	41
	42	%type<i> bgp_cease_mask bgp_cease_list bgp_cease_flag
	43
2638249d MM	44	CF_GRAMMAR
2638249d MM	45
f851f0d7	46	proto: bgp_proto '}' ;
2638249d MM	47
2638249d MM	48	bgp_proto_start: proto_start BGP {
2bbc3083	49	this_proto = proto_config_new(&proto_bgp, $1);
d15b0b0a	50	BGP_CFG->local_port = BGP_PORT;
a1beb8f3	51	BGP_CFG->remote_port = BGP_PORT;
f3e59178	52	BGP_CFG->multihop = -1; /* undefined */
c01e3741	53	BGP_CFG->hold_time = 240;
b552ecc4	54	BGP_CFG->initial_hold_time = 240;
56a2bed4	55	BGP_CFG->compare_path_lengths = 1;
d1e146f2	56	BGP_CFG->igp_metric = 1;
6cf72d7a OZ	57	BGP_CFG->connect_delay_time = 5;
6cf72d7a OZ	58	BGP_CFG->connect_retry_time = 120;
6fd766c1 MM	59	BGP_CFG->error_amnesia_time = 300;
	60	BGP_CFG->error_delay_time_min = 60;
	61	BGP_CFG->error_delay_time_max = 300;
bf47fe4b	62	BGP_CFG->enable_refresh = 1;
43c1cecc	63	BGP_CFG->enable_as4 = 1;
e8ba557c	64	BGP_CFG->capabilities = 2;
41677025	65	BGP_CFG->interpret_communities = 1;
a52476c9	66	BGP_CFG->allow_as_sets = 1;
fbcb7d5f	67	BGP_CFG->default_local_pref = 100;
0c791f87 OZ	68	BGP_CFG->gr_mode = BGP_GR_AWARE;
0c791f87 OZ	69	BGP_CFG->gr_time = 120;
5bd73431 OZ	70	BGP_CFG->llgr_mode = -1;
5bd73431 OZ	71	BGP_CFG->llgr_time = 3600;
a7baa098	72	BGP_CFG->setkey = 1;
e0835db4	73	BGP_CFG->dynamic_name = "dynbgp";
dea98864	74	BGP_CFG->check_link = -1;
d15b0b0a OZ	75	}
	76	;
	77
	78	bgp_loc_opts:
	79	/* empty */
	80	\| bgp_loc_opts PORT expr { BGP_CFG->local_port = $3; if (($3<1) \|\| ($3>65535)) cf_error("Invalid port number"); }
	81	\| bgp_loc_opts AS expr { BGP_CFG->local_as = $3; }
2638249d MM	82	;
2638249d MM	83
a1beb8f3 OZ	84	bgp_nbr_opts:
a1beb8f3 OZ	85	/* empty */
d15b0b0a	86	\| bgp_nbr_opts PORT expr { BGP_CFG->remote_port = $3; if (($3<1) \|\| ($3>65535)) cf_error("Invalid port number"); }
a1beb8f3	87	\| bgp_nbr_opts AS expr { BGP_CFG->remote_as = $3; }
23ee6b1c OZ	88	\| bgp_nbr_opts INTERNAL { BGP_CFG->peer_type = BGP_PT_INTERNAL; }
23ee6b1c OZ	89	\| bgp_nbr_opts EXTERNAL { BGP_CFG->peer_type = BGP_PT_EXTERNAL; }
a1beb8f3 OZ	90	;
a1beb8f3 OZ	91
63472779 OZ	92	bgp_cease_mask:
	93	/* true -> all except connection collision */
	94	bool { $$ = $1 ? ~(1 << 7) : 0; }
	95	\| '{' bgp_cease_list '}' { $$ = $2; }
	96	;
	97
	98	bgp_cease_list:
	99	bgp_cease_flag
	100	\| bgp_cease_list ',' bgp_cease_flag { $$ = $1 \| $3; }
	101	;
	102
	103	bgp_cease_flag:
	104	CEASE { $$ = 1 << 0; }
	105	\| PREFIX LIMIT HIT { $$ = 1 << 1; }
	106	\| ADMINISTRATIVE SHUTDOWN { $$ = 1 << 2; }
	107	\| PEER DECONFIGURED { $$ = 1 << 3; }
	108	\| ADMINISTRATIVE RESET { $$ = 1 << 4; }
	109	\| CONNECTION REJECTED { $$ = 1 << 5; }
	110	\| CONFIGURATION CHANGE { $$ = 1 << 6; }
	111	\| CONNECTION COLLISION { $$ = 1 << 7; }
	112	\| OUT OF RESOURCES { $$ = 1 << 8; }
	113	;
	114
2638249d MM	115	bgp_proto:
	116	bgp_proto_start proto_name '{'
	117	\| bgp_proto proto_item ';'
d15b0b0a OZ	118	\| bgp_proto bgp_proto_channel ';'
	119	\| bgp_proto LOCAL bgp_loc_opts ';'
	120	\| bgp_proto LOCAL ipa ipa_scope bgp_loc_opts ';' {
	121	BGP_CFG->local_ip = $3;
	122	if ($4) BGP_CFG->iface = $4;
	123	}
a1beb8f3 OZ	124	\| bgp_proto NEIGHBOR bgp_nbr_opts ';'
a1beb8f3 OZ	125	\| bgp_proto NEIGHBOR ipa ipa_scope bgp_nbr_opts ';' {
e0835db4	126	if (ipa_nonzero(BGP_CFG->remote_ip) \|\| BGP_CFG->remote_range)
53ffbff3	127	cf_error("Only one neighbor per BGP instance is allowed");
2638249d	128	BGP_CFG->remote_ip = $3;
a1beb8f3	129	if ($4) BGP_CFG->iface = $4;
2638249d	130	}
e0835db4 OZ	131	\| bgp_proto NEIGHBOR RANGE net_ip bgp_nbr_opts ';' {
	132	if (ipa_nonzero(BGP_CFG->remote_ip) \|\| BGP_CFG->remote_range)
	133	cf_error("Only one neighbor per BGP instance is allowed");
	134	net_addr *n = cfg_alloc($4.length);
	135	net_copy(n, &($4));
	136	BGP_CFG->remote_range = n;
	137	}
a1beb8f3	138	\| bgp_proto INTERFACE TEXT ';' { BGP_CFG->iface = if_get_by_name($3); }
89534cda	139	\| bgp_proto RR CLUSTER ID idval ';' { BGP_CFG->rr_cluster_id = $5; }
d15b0b0a OZ	140	\| bgp_proto RR CLIENT bool ';' { BGP_CFG->rr_client = $4; }
	141	\| bgp_proto RS CLIENT bool ';' { BGP_CFG->rs_client = $4; }
	142	\| bgp_proto CONFEDERATION expr ';' { BGP_CFG->confederation = $3; }
	143	\| bgp_proto CONFEDERATION MEMBER bool ';' { BGP_CFG->confederation_member = $4; }
e3f2d5fc MM	144	\| bgp_proto HOLD TIME expr ';' { BGP_CFG->hold_time = $4; }
e3f2d5fc MM	145	\| bgp_proto STARTUP HOLD TIME expr ';' { BGP_CFG->initial_hold_time = $5; }
f3e59178	146	\| bgp_proto DIRECT ';' { BGP_CFG->multihop = 0; }
9be9a264	147	\| bgp_proto MULTIHOP ';' { BGP_CFG->multihop = 64; }
b1b19433	148	\| bgp_proto MULTIHOP expr ';' { BGP_CFG->multihop = $3; if (($3<1) \|\| ($3>255)) cf_error("Multihop must be in range 1-255"); }
e0835db4 OZ	149	\| bgp_proto DYNAMIC NAME text ';' {
	150	if (strchr($4, '%')) cf_error("Forbidden character '%%' in dynamic name");
	151	if (strlen($4) > (SYM_MAX_LEN - 16)) cf_error("Dynamic name too long");
	152	BGP_CFG->dynamic_name = $4;
	153	}
	154	\| bgp_proto DYNAMIC NAME DIGITS expr ';' { BGP_CFG->dynamic_name_digits = $5; if ($5>10) cf_error("Dynamic name digits must be at most 10"); }
d15b0b0a	155	\| bgp_proto STRICT BIND bool ';' { BGP_CFG->strict_bind = $4; }
7294f68b	156	\| bgp_proto PATH METRIC bool ';' { BGP_CFG->compare_path_lengths = $4; }
73272f04	157	\| bgp_proto MED METRIC bool ';' { BGP_CFG->med_metric = $4; }
d1e146f2	158	\| bgp_proto IGP METRIC bool ';' { BGP_CFG->igp_metric = $4; }
3228c72c	159	\| bgp_proto PREFER OLDER bool ';' { BGP_CFG->prefer_older = $4; }
be4cd99a	160	\| bgp_proto DETERMINISTIC MED bool ';' { BGP_CFG->deterministic_med = $4; }
e3f2d5fc MM	161	\| bgp_proto DEFAULT BGP_MED expr ';' { BGP_CFG->default_med = $4; }
e3f2d5fc MM	162	\| bgp_proto DEFAULT BGP_LOCAL_PREF expr ';' { BGP_CFG->default_local_pref = $4; }
d15b0b0a	163	\| bgp_proto SOURCE ADDRESS ipa ';' { BGP_CFG->local_ip = $4; }
6cf72d7a OZ	164	\| bgp_proto START DELAY TIME expr ';' { BGP_CFG->connect_delay_time = $5; log(L_WARN "%s: Start delay time option is deprecated, use connect delay time", this_proto->name); }
	165	\| bgp_proto CONNECT DELAY TIME expr ';' { BGP_CFG->connect_delay_time = $5; }
	166	\| bgp_proto CONNECT RETRY TIME expr ';' { BGP_CFG->connect_retry_time = $5; }
	167	\| bgp_proto KEEPALIVE TIME expr ';' { BGP_CFG->keepalive_time = $4; }
523f020b	168	\| bgp_proto ERROR FORGET TIME expr ';' { BGP_CFG->error_amnesia_time = $5; }
e3f2d5fc	169	\| bgp_proto ERROR WAIT TIME expr ',' expr ';' { BGP_CFG->error_delay_time_min = $5; BGP_CFG->error_delay_time_max = $7; }
7294f68b	170	\| bgp_proto DISABLE AFTER ERROR bool ';' { BGP_CFG->disable_after_error = $5; }
63472779	171	\| bgp_proto DISABLE AFTER CEASE bgp_cease_mask ';' { BGP_CFG->disable_after_cease = $5; }
bf47fe4b	172	\| bgp_proto ENABLE ROUTE REFRESH bool ';' { BGP_CFG->enable_refresh = $5; }
ba5ed6f3	173	\| bgp_proto ENABLE AS4 bool ';' { BGP_CFG->enable_as4 = $4; }
06e0d1b6	174	\| bgp_proto ENABLE EXTENDED MESSAGES bool ';' { BGP_CFG->enable_extended_messages = $5; }
e8ba557c	175	\| bgp_proto CAPABILITIES bool ';' { BGP_CFG->capabilities = $3; }
9eceab33	176	\| bgp_proto PASSWORD text ';' { BGP_CFG->password = $3; }
a7baa098	177	\| bgp_proto SETKEY bool ';' { BGP_CFG->setkey = $3; }
be6e39eb	178	\| bgp_proto PASSIVE bool ';' { BGP_CFG->passive = $3; }
41677025	179	\| bgp_proto INTERPRET COMMUNITIES bool ';' { BGP_CFG->interpret_communities = $4; }
a15dab76 OZ	180	\| bgp_proto ALLOW LOCAL AS ';' { BGP_CFG->allow_local_as = -1; }
a15dab76 OZ	181	\| bgp_proto ALLOW LOCAL AS expr ';' { BGP_CFG->allow_local_as = $5; }
e919601a	182	\| bgp_proto ALLOW BGP_LOCAL_PREF bool ';' { BGP_CFG->allow_local_pref = $4; }
a52476c9	183	\| bgp_proto ALLOW AS SETS bool ';' { BGP_CFG->allow_as_sets = $5; }
0c791f87 OZ	184	\| bgp_proto GRACEFUL RESTART bool ';' { BGP_CFG->gr_mode = $4; }
	185	\| bgp_proto GRACEFUL RESTART AWARE ';' { BGP_CFG->gr_mode = BGP_GR_AWARE; }
	186	\| bgp_proto GRACEFUL RESTART TIME expr ';' { BGP_CFG->gr_time = $5; }
5bd73431 OZ	187	\| bgp_proto LONG LIVED GRACEFUL RESTART bool ';' { BGP_CFG->llgr_mode = $6; }
	188	\| bgp_proto LONG LIVED GRACEFUL RESTART AWARE ';' { BGP_CFG->llgr_mode = BGP_LLGR_AWARE; }
	189	\| bgp_proto LONG LIVED STALE TIME expr ';' { BGP_CFG->llgr_time = $6; }
b1b19433	190	\| bgp_proto TTL SECURITY bool ';' { BGP_CFG->ttl_security = $4; }
523f020b	191	\| bgp_proto CHECK LINK bool ';' { BGP_CFG->check_link = $4; }
1ec52253	192	\| bgp_proto BFD bool ';' { BGP_CFG->bfd = $3; cf_check_bfd($3); }
5bd73431	193	\| bgp_proto BFD GRACEFUL ';' { BGP_CFG->bfd = BGP_BFD_GRACEFUL; cf_check_bfd(1); }
2638249d MM	194	;
2638249d MM	195
d15b0b0a	196	bgp_afi:
711d617d OZ	197	IPV4 { $$ = BGP_AF_IPV4; }
	198	\| IPV6 { $$ = BGP_AF_IPV6; }
	199	\| IPV4 MULTICAST { $$ = BGP_AF_IPV4_MC; }
	200	\| IPV6 MULTICAST { $$ = BGP_AF_IPV6_MC; }
	201	\| IPV4 MPLS { $$ = BGP_AF_IPV4_MPLS; }
	202	\| IPV6 MPLS { $$ = BGP_AF_IPV6_MPLS; }
	203	\| VPN4 MPLS { $$ = BGP_AF_VPN4_MPLS; }
	204	\| VPN6 MPLS { $$ = BGP_AF_VPN6_MPLS; }
	205	\| VPN4 MULTICAST { $$ = BGP_AF_VPN4_MC; }
	206	\| VPN6 MULTICAST { $$ = BGP_AF_VPN6_MC; }
	207	\| FLOW4 { $$ = BGP_AF_FLOW4; }
	208	\| FLOW6 { $$ = BGP_AF_FLOW6; }
d15b0b0a OZ	209	;
	210
	211	bgp_channel_start: bgp_afi
	212	{
	213	const struct bgp_af_desc *desc = bgp_get_af_desc($1);
	214
	215	if (!desc)
	216	cf_error("Unknown AFI/SAFI");
	217
72163bd5 OZ	218	this_channel = channel_config_get(&channel_bgp, desc->name, desc->net, this_proto);
	219
	220	/* New channel */
	221	if (!BGP_CC->desc)
	222	{
3831b619 OZ	223	BGP_CC->c.in_filter = FILTER_UNDEF;
3831b619 OZ	224	BGP_CC->c.out_filter = FILTER_UNDEF;
72163bd5 OZ	225	BGP_CC->c.ra_mode = RA_UNDEF;
	226	BGP_CC->afi = $1;
	227	BGP_CC->desc = desc;
1cab2b4a	228	BGP_CC->next_hop_keep = 0xff; /* undefined */
72163bd5	229	BGP_CC->gr_able = 0xff; /* undefined */
5bd73431 OZ	230	BGP_CC->llgr_able = 0xff; /* undefined */
5bd73431 OZ	231	BGP_CC->llgr_time = ~0U; /* undefined */
09ee846d	232	BGP_CC->aigp = 0xff; /* undefined */
72163bd5	233	}
d15b0b0a OZ	234	};
d15b0b0a OZ	235
1cab2b4a OZ	236	bgp_nh:
	237	bool { $$ = $1; }
	238	\| IBGP { $$ = NH_IBGP; }
	239	\| EBGP { $$ = NH_EBGP; }
	240
d15b0b0a OZ	241	bgp_channel_item:
	242	channel_item
	243	\| NEXT HOP ADDRESS ipa { BGP_CC->next_hop_addr = $4; }
1cab2b4a OZ	244	\| NEXT HOP SELF bgp_nh { BGP_CC->next_hop_self = $4; }
1cab2b4a OZ	245	\| NEXT HOP KEEP bgp_nh { BGP_CC->next_hop_keep = $4; }
3c360581	246	\| MANDATORY bool { BGP_CC->mandatory = $2; }
d15b0b0a OZ	247	\| MISSING LLADDR SELF { BGP_CC->missing_lladdr = MLL_SELF; }
	248	\| MISSING LLADDR DROP { BGP_CC->missing_lladdr = MLL_DROP; }
	249	\| MISSING LLADDR IGNORE { BGP_CC->missing_lladdr = MLL_IGNORE; }
	250	\| GATEWAY DIRECT { BGP_CC->gw_mode = GW_DIRECT; }
	251	\| GATEWAY RECURSIVE { BGP_CC->gw_mode = GW_RECURSIVE; }
	252	\| SECONDARY bool { BGP_CC->secondary = $2; }
	253	\| GRACEFUL RESTART bool { BGP_CC->gr_able = $3; }
5bd73431 OZ	254	\| LONG LIVED GRACEFUL RESTART bool { BGP_CC->llgr_able = $5; }
5bd73431 OZ	255	\| LONG LIVED STALE TIME expr { BGP_CC->llgr_time = $5; }
d8022d26	256	\| EXTENDED NEXT HOP bool { BGP_CC->ext_next_hop = $4; }
d15b0b0a OZ	257	\| ADD PATHS RX { BGP_CC->add_path = BGP_ADD_PATH_RX; }
	258	\| ADD PATHS TX { BGP_CC->add_path = BGP_ADD_PATH_TX; }
	259	\| ADD PATHS bool { BGP_CC->add_path = $3 ? BGP_ADD_PATH_FULL : 0; }
682d3f7d	260	\| IMPORT TABLE bool { BGP_CC->import_table = $3; }
b7d7599c	261	\| EXPORT TABLE bool { BGP_CC->export_table = $3; }
09ee846d OZ	262	\| AIGP bool { BGP_CC->aigp = $2; BGP_CC->aigp_originate = 0; }
	263	\| AIGP ORIGINATE { BGP_CC->aigp = 1; BGP_CC->aigp_originate = 1; }
	264	\| COST expr { BGP_CC->cost = $2; if ($2 < 1) cf_error("Cost must be positive"); }
ef57b70f	265	\| IGP TABLE rtable {
6fe11c99 OZ	266	if (BGP_CC->desc->no_igp)
	267	cf_error("IGP table not allowed here");
	268
	269	if ($3->addr_type == NET_IP4)
	270	BGP_CC->igp_table_ip4 = $3;
	271	else if ($3->addr_type == NET_IP6)
	272	BGP_CC->igp_table_ip6 = $3;
	273	else
	274	cf_error("Mismatched IGP table type");
ef57b70f	275	}
d15b0b0a OZ	276	;
	277
	278	bgp_channel_opts:
	279	/* empty */
	280	\| bgp_channel_opts bgp_channel_item ';'
	281	;
	282
	283	bgp_channel_opt_list:
	284	/* empty */
	285	\| '{' bgp_channel_opts '}'
	286	;
	287
	288	bgp_channel_end:
	289	{
	290	if (!this_channel->table)
	291	cf_error("Routing table not specified");
	292
	293	this_channel = NULL;
	294	};
	295
	296	bgp_proto_channel: bgp_channel_start bgp_channel_opt_list bgp_channel_end;
	297
	298
f851f0d7 JMM	299	dynamic_attr: BGP_ORIGIN
	300	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_ENUM_BGP_ORIGIN, EA_CODE(PROTOCOL_BGP, BA_ORIGIN)); } ;
	301	dynamic_attr: BGP_PATH
	302	{ $$ = f_new_dynamic_attr(EAF_TYPE_AS_PATH, T_PATH, EA_CODE(PROTOCOL_BGP, BA_AS_PATH)); } ;
	303	dynamic_attr: BGP_NEXT_HOP
	304	{ $$ = f_new_dynamic_attr(EAF_TYPE_IP_ADDRESS, T_IP, EA_CODE(PROTOCOL_BGP, BA_NEXT_HOP)); } ;
	305	dynamic_attr: BGP_MED
	306	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_INT, EA_CODE(PROTOCOL_BGP, BA_MULTI_EXIT_DISC)); } ;
	307	dynamic_attr: BGP_LOCAL_PREF
	308	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT, T_INT, EA_CODE(PROTOCOL_BGP, BA_LOCAL_PREF)); } ;
	309	dynamic_attr: BGP_ATOMIC_AGGR
	310	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_ATOMIC_AGGR)); } ;
	311	dynamic_attr: BGP_AGGREGATOR
1127887a	312	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_AGGREGATOR)); } ;
f851f0d7 JMM	313	dynamic_attr: BGP_COMMUNITY
	314	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT_SET, T_CLIST, EA_CODE(PROTOCOL_BGP, BA_COMMUNITY)); } ;
	315	dynamic_attr: BGP_ORIGINATOR_ID
	316	{ $$ = f_new_dynamic_attr(EAF_TYPE_ROUTER_ID, T_QUAD, EA_CODE(PROTOCOL_BGP, BA_ORIGINATOR_ID)); } ;
	317	dynamic_attr: BGP_CLUSTER_LIST
	318	{ $$ = f_new_dynamic_attr(EAF_TYPE_INT_SET, T_CLIST, EA_CODE(PROTOCOL_BGP, BA_CLUSTER_LIST)); } ;
	319	dynamic_attr: BGP_EXT_COMMUNITY
	320	{ $$ = f_new_dynamic_attr(EAF_TYPE_EC_SET, T_ECLIST, EA_CODE(PROTOCOL_BGP, BA_EXT_COMMUNITY)); } ;
09ee846d OZ	321	dynamic_attr: BGP_AIGP
09ee846d OZ	322	{ $$ = f_new_dynamic_attr(EAF_TYPE_OPAQUE, T_ENUM_EMPTY, EA_CODE(PROTOCOL_BGP, BA_AIGP)); } ;
f851f0d7 JMM	323	dynamic_attr: BGP_LARGE_COMMUNITY
f851f0d7 JMM	324	{ $$ = f_new_dynamic_attr(EAF_TYPE_LC_SET, T_LCLIST, EA_CODE(PROTOCOL_BGP, BA_LARGE_COMMUNITY)); } ;
42a0c054	325
126683fe	326
12d5677a	327
cea63664 MM	328	CF_ENUM(T_ENUM_BGP_ORIGIN, ORIGIN_, IGP, EGP, INCOMPLETE)
cea63664 MM	329
2638249d MM	330	CF_CODE
	331
	332	CF_END