diff options
Diffstat (limited to '7/bgp.pl')
-rw-r--r-- | 7/bgp.pl | 7 |
1 files changed, 1 insertions, 6 deletions
@@ -83,7 +83,7 @@ to_dict(router(R), Dict) :- to_dict(neighbor(_, Remote), Dict) :- host_config(Remote, RC), - get_assoc("ip", RC, Ip), + get_assoc(ip, RC, Ip), Dict = { "neighbor":{ "name": Remote, @@ -91,11 +91,6 @@ to_dict(neighbor(_, Remote), Dict) :- } }. -bird_config(BirdConfig) :- - routers(Routers), - maplist(to_dict, Routers, RouterDicts), - dict_pairs(BirdConfig, bird_config, RouterDicts). - create_firewall :- firewall:retract_all_from(bgp), findall(fw(Host, Attrs), fw(Host, Attrs), Goals), |