24 lines
894 B
Plaintext
24 lines
894 B
Plaintext
/system/script remove [find name="bgp_lokal_export"]
|
|
|
|
/system/script add name=bgp_lokal_export dont-require-permissions=yes source={ \
|
|
:log info "BGP Export: mulai..."; \
|
|
/ip firewall address-list remove [find list="bgp-export"]; \
|
|
:local cnt 0; \
|
|
:foreach r in=[/routing/route find where distance=15] do={ \
|
|
:local dst [/routing/route get $r dst-address]; \
|
|
:if ($dst != "0.0.0.0/0" && $dst != "::/0") do={ \
|
|
/ip firewall address-list add list="bgp-export" address=$dst; \
|
|
:set cnt ($cnt + 1); \
|
|
}; \
|
|
}; \
|
|
:log info "BGP Export: CDN selesai ($cnt)"; \
|
|
:foreach r in=[/routing/route find where distance=200] do={ \
|
|
:local dst [/routing/route get $r dst-address]; \
|
|
:if ($dst != "0.0.0.0/0" && $dst != "::/0") do={ \
|
|
/ip firewall address-list add list="bgp-export" address=$dst; \
|
|
:set cnt ($cnt + 1); \
|
|
}; \
|
|
}; \
|
|
:log info "BGP Export: selesai total $cnt rute"; \
|
|
}
|