bird-openwrt: BIRD daemon integration with UCI and LuCI configuration
[feed/routing.git] / bird-openwrt / bird6-openwrt / src / model / bgp_proto.lua
diff --git a/bird-openwrt/bird6-openwrt/src/model/bgp_proto.lua b/bird-openwrt/bird6-openwrt/src/model/bgp_proto.lua
new file mode 100644 (file)
index 0000000..e243fa6
--- /dev/null
@@ -0,0 +1,237 @@
+--[[ 
+Copyright (C) 2014 - Eloi Carbó Solé (GSoC2014) 
+BGP/Bird integration with OpenWRT and QMP
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.
+--]]
+
+require("luci.sys")
+local http = require "luci.http"
+local uci = require "luci.model.uci"
+local uciout = uci.cursor()
+
+m=Map("bird6", "Bird6 BGP protocol's configuration")
+
+tab_templates = {}
+uciout:foreach('bird6', 'bgp_template', function (s)
+       local name = s[".name"]
+       if (name ~= nil) then
+               table.insert(tab_templates, name)
+       end
+end)
+
+-- Section BGP Templates
+
+sect_templates = m:section(TypedSection, "bgp_template", "BGP Templates", "Configuration of the templates used in BGP instances.")
+sect_templates.addremove = true
+sect_templates.anonymous = false
+
+disabled = sect_templates:option(Flag, "disabled", "Disabled", "Enable/Disable BGP Protocol")
+disabled.optional=true
+table = sect_templates:option(ListValue, "table", "Table", "Set the table used for BGP Routing")
+table.optional=true
+uciout:foreach("bird6", "table",
+       function (s)
+               table:value(s.name)
+       end)
+table:value("")
+
+import = sect_templates:option(Value, "import", "Import","")
+import.optional=true
+export = sect_templates:option(Value, "export", "Export", "")
+export.optional=true
+
+source_addr = sect_templates:option(Value, "source_address", "Source Address", "Source address for BGP routing. By default uses Router ID")
+source_addr.optional = true
+
+description = sect_templates:option(TextValue, "description", "Description", "Description of the current BGP instance")
+description.optional = true
+
+next_hop_self = sect_templates:option(Flag, "next_hop_self", "Next hop self", "Avoid next hop calculation and advertise own source address as next hop")
+next_hop_self.default = nil
+next_hop_self.optional = true
+
+next_hop_keep = sect_templates:option(Flag, "next_hop_keep", "Next hop keep", "Forward the received Next Hop attribute event in situations where the local address should be used instead, like subneting")
+next_hop_keep.default = nil
+next_hop_keep.optional = true
+
+rr_client = sect_templates:option(Flag, "rr_client", "Route Reflector server", "This router serves as a Route Reflector server and treats neighbors as clients")
+rr_client.default = nil
+rr_client.optional = true
+
+rr_cluster_id = sect_templates:option(Value, "rr_cluster_id", "Route Reflector Cluster ID", "Identificator of the RR cluster. By default uses the Router ID")
+rr_cluster_id.optional = true
+
+import_limit = sect_templates:option(Value, "import_limit", "Routes import limit", "Specify an import route limit. By default is disabled '0'")
+import_limit.default= "0"
+import_limit.optional = true
+
+import_limit_action = sect_templates:option(ListValue, "import_limit_action", "Routes import limit action", "Action to take when import routes limit ir reached")
+import_limit_action:value("warn")
+import_limit_action:value("block")
+import_limit_action:value("disable")
+import_limit_action:value("restart")
+import_limit_action.default = "warn"
+import_limit_action.optional = true
+
+export_limit = sect_templates:option(Value, "export_limit", "Routes export limit", "Specify an export route limit. By default is disabled '0'")
+export_limit.default="0"
+export_limit.optional = true
+
+export_limit_action = sect_templates:option(ListValue, "export_limit_action", "Routes export limit action", "Action to take when export routes limit is reached")
+export_limit_action:value("warn")
+export_limit_action:value("block")
+export_limit_action:value("disable")
+export_limit_action:value("restart")
+export_limit_action.default = "warn"
+export_limit_action.optional = true
+
+receive_limit = sect_templates:option(Value, "receive_limit", "Routes received limit", "Specify a received route limit. By default is disabled '0'")
+receive_limit.default="0"
+receive_limit.optional = true
+
+receive_limit_action = sect_templates:option(ListValue, "receive_limit_action", "Routes received limit action", "Action to take when received routes limit is reached")
+receive_limit_action:value("warn")
+receive_limit_action:value("block")
+receive_limit_action:value("disable")
+receive_limit_action:value("restart")
+receive_limit_action.default = "warn"
+receive_limit_action.optional = true
+
+local_address = sect_templates:option(Value, "local_address", "Local BGP address", "")
+local_address.optional=true
+local_as = sect_templates:option(Value, "local_as", "Local AS", "")
+local_as.optional=true
+
+-- Section BGP Instances:
+
+sect_instances = m:section(TypedSection, "bgp", "BGP Instances", "Configuration of the BGP protocol instances")
+sect_instances.addremove = true
+sect_instances.anonymous = false
+
+templates = sect_instances:option(ListValue, "template", "Templates", "Available BGP templates")
+
+uciout:foreach("bird6", "bgp_template",
+       function(s)
+               templates:value(s[".name"])
+       end)
+templates:value("")
+neighbor_address = sect_instances:option(Value, "neighbor_address", "Neighbor IP Address", "")
+neighbor_as = sect_instances:option(Value, "neighbor_as", "Neighbor AS", "")
+
+disabled = sect_instances:option(Flag, "disabled", "Disabled", "Enable/Disable BGP Protocol")
+disabled.optional=true
+disabled.default=nil
+table = sect_instances:option(ListValue, "table", "Table", "Set the table used for BGP Routing")
+table.optional=true
+uciout:foreach("bird6", "table",
+    function (s)
+               table:value(s.name)
+                           end)
+table:value("")
+
+description = sect_instances:option(TextValue, "description", "Description", "Description of the current BGP instance")
+description.optional = true
+
+import = sect_instances:option(Value, "import", "Import","")
+import.optional=true
+export = sect_instances:option(Value, "export", "Export", "")
+export.optional=true
+
+source_addr = sect_instances:option(Value, "source_address", "Source Address", "Source address for BGP routing. By default uses Router ID")
+source_addr.optional = true
+
+local_address = sect_instances:option(Value, "local_address", "Local BGP address", "")
+local_address.optional=true
+local_as = sect_instances:option(Value, "local_as", "Local AS", "")
+local_as.optional=true
+
+next_hop_self = sect_instances:option(Flag, "next_hop_self", "Next hop self", "Avoid next hop calculation and advertise own source address as next hop")
+next_hop_self.default = nil
+next_hop_self.optional = true
+
+next_hop_keep = sect_instances:option(Flag, "next_hop_keep", "Next hop keep", "Forward the received Next Hop attribute event in situations where the local address should be used instead, like subneting")
+next_hop_keep.default = nil
+next_hop_keep.optional = true
+
+rr_client = sect_instances:option(Flag, "rr_client", "Route Reflector server", "This router serves as a Route Reflector server and treats neighbors as clients")
+rr_client.default = nil
+rr_client.optional = true
+
+rr_cluster_id = sect_instances:option(Value, "rr_cluster_id", "Route Reflector Cluster ID", "Identificator of the RR cluster. By default uses the Router ID")
+rr_cluster_id.optional = true
+
+import_limit = sect_instances:option(Value, "import_limit", "Routes import limit", "Specify an import route limit. By default is disabled '0'")
+import_limit.default="0"
+import_limit.optional = true
+
+import_limit_action = sect_instances:option(ListValue, "import_limit_action", "Routes import limit action", "Action to take when import routes limit ir reached")
+import_limit_action:value("warn")
+import_limit_action:value("block")
+import_limit_action:value("disable")
+import_limit_action:value("restart")
+import_limit_action.default = "warn"
+import_limit_action.optional = true
+
+export_limit = sect_instances:option(Value, "export_limit", "Routes export limit", "Specify an export route limit. By default is disabled '0'")
+export_limit.default="0"
+export_limit.optional = true
+
+export_limit_action = sect_instances:option(ListValue, "export_limit_action", "Routes export limit action", "Action to take when export routes limit is reached")
+export_limit_action:value("warn")
+export_limit_action:value("block")
+export_limit_action:value("disable")
+export_limit_action:value("restart")
+export_limit_action.default = "warn"
+export_limit_action.optional = true
+
+receive_limit = sect_instances:option(Value, "receive_limit", "Routes received limit", "Specify a received route limit. By default is disabled '0'")
+receive_limit.default="0"
+receive_limit.optional = true
+
+receive_limit_action = sect_instances:option(ListValue, "receive_limit_action", "Routes received limit action", "Action to take when received routes limit is reached")
+receive_limit_action:value("warn")
+receive_limit_action:value("block")
+receive_limit_action:value("disable")
+receive_limit_action:value("restart")
+receive_limit_action.default = "warn"
+receive_limit_action.optional = true
+
+-- Section BGP Filters
+
+sect_filters = m:section(TypedSection, "filter", "BGP Filters", "Filters of the BGP instances")
+sect_filters.addremove = true
+sect_filters.anonymous = false
+sect_filters:depends("type", "bgp")
+
+instance = sect_filters:option(ListValue, "instance", "BGP instance", "Filter's BGP instance")
+instance:depends("type", "bgp")
+
+uciout:foreach("bird6", "bgp",
+       function (s)
+               instance:value(s[".name"])
+       end)
+
+type = sect_filters:option(Value, "type", "Filter type", "")
+type.default = "bgp"
+
+path = sect_filters:option(Value, "file_path", "Filter's file path", "Path to the Filter's file")
+path:depends("type", "bgp")
+
+function m.on_commit(self,map)
+        luci.sys.call('/etc/init.d/bird6 stop; /etc/init.d/bird6 start')
+end
+
+return m
+