#!/usr/bin/lua

local fs = require("nixio.fs")
local lan = require("lime.proto.lan")
local utils = require("lime.utils")
local network = require("lime.network")
local config = require("lime.config")

batadv = {}

batadv.configured = false

function batadv.configure(args)
	if batadv.configured then return end
	batadv.configured = true

	local uci = config.get_uci_cursor()

	uci:set("network", "bat0", "interface")
	uci:set("network", "bat0", "proto", "batadv")
	-- BATMAN_V uses throughput rather than packet loss (as in BATMAN_IV) for evaluating
	-- the quality of a link. Still, by default we continue selecting BATMAN_IV
	local routing_algo = config.get("network", "batadv_routing_algo", "BATMAN_IV")
	uci:set("network", "bat0", "routing_algo", routing_algo)
	uci:set("network", "bat0", "bridge_loop_avoidance", "1")
	uci:set("network", "bat0", "multicast_mode", "0")
	-- by default, BATMAN-adv sends out one Originator Message (OGM) every second (orig_interval=1000)
	-- in a network with static nodes, a larger interval between OGM packets can be used (e.g. 2000)
	-- see https://github.com/libremesh/lime-packages/issues/1010
	local orig_interval = config.get("network", "batadv_orig_interval", "2000")
        uci:set("network", "bat0", "orig_interval", orig_interval)

	-- if anygw enabled disable DAT that doesn't play well with it
	-- and set gw_mode=client everywhere. Since there's no gw_mode=server, this makes bat0 never forward requests
	-- so a rogue DHCP server doesn't affect whole network (DHCP requests are always answered locally)
	for _,proto in pairs(config.get("network", "protocols")) do
		if proto == "anygw" then
			uci:set("network", "bat0", "distributed_arp_table", "0")
			uci:set("network", "bat0", "gw_mode", "client")
		end
	end
	uci:save("network")
	lan.setup_interface("bat0", nil)

	-- enable alfred on bat0 if installed
	if utils.is_installed("alfred") then
		uci:set("alfred", "alfred", "batmanif", "bat0")
		uci:save("alfred")
	end
end

function batadv.setup_interface(ifname, args)
	if not args["specific"] then
		if ifname:match("^wlan%d+.ap") then
			utils.log( "lime.proto.batadv.setup_interface(%s, ...) ignored",
			           ifname )
			return
		end
	end

	utils.log("lime.proto.batadv.setup_interface(%s, ...)", ifname)

	local vlanId = args[2] or "%N1"
	local vlanProto = args[3] or "8021ad"
	local nameSuffix = args[4] or "_batadv"
	local mtu = 1532

	if not tonumber(vlanId) then vlanId = 29 + (utils.applyNetTemplate10(vlanId) - 13) % 256 end

	local owrtInterfaceName, _, owrtDeviceName = network.createVlanIface(ifname, vlanId, nameSuffix, vlanProto)

	local uci = config.get_uci_cursor()
	uci:set("network", owrtInterfaceName, "proto", "batadv_hardif")
	uci:set("network", owrtInterfaceName, "master", "bat0")

	if ifname:match("^eth") then
		mtu = network.MTU_ETH_WITH_VLAN
	end

	local id = utils.get_id(ifname)
	local vMacaddr = network.primary_mac();
	vMacaddr[1] = "02"
	vMacaddr[2] = id[2]
	vMacaddr[3] = id[3]
	uci:set("network", owrtDeviceName, "macaddr", table.concat(vMacaddr, ":"))

	uci:set("network", owrtDeviceName, "mtu", mtu)
	uci:save("network")
end


return batadv