<%# LuCI - Lua Configuration Interface Copyright 2008 Steven Barth Copyright 2008 Jo-Philipp Wich Copyright 2011 Manuel Munz Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.apache.org/licenses/LICENSE-2.0 -%> <% local sys = require "luci.sys" local utl = require "luci.util" local fs = require "luci.fs" function get_version() local data = utl.split((utl.trim(sys.exec("/usr/sbin/olsrd -v")))) local buildfull = utl.trim(utl.split(data[2],": ")[2]) local ver = { version = utl.trim(utl.split(data[1]," - ")[2]), date = utl.trim(utl.split(buildfull, " ")[1]), time = utl.trim(utl.split(buildfull, " ")[2]), host = utl.trim(utl.split(buildfull, " ")[4]) } return ver end local ver = get_version() local ifaces = fetch_txtinfo("int") if not ifaces or not ifaces.Interfaces then luci.template.render("status-olsr/error_olsr") return nil end local interfaces = "" for k,v in pairs(ifaces.Interfaces) do interfaces = utl.trim(interfaces.." "..v.Name) end interfaces = string.gsub(interfaces, " ", ", ") local nr_ifaces = #ifaces.Interfaces local links = fetch_txtinfo("links") local nr_neigh = #links.Links local neighbors = "" for k,v in pairs(links.Links) do local link if v.Hostname then link = v.Hostname else link = v["Remote IP"] end neighbors = utl.trim(""..link.." "..neighbors) end local data = fetch_txtinfo("topology") local nr_topo = #data.Topology local utable = {} for k,v in pairs(data.Topology) do if utl.contains(utable, v["Dest. IP"]) == false then table.insert(utable, v["Dest. IP"]) end end local nr_nodes = #utable local data = fetch_txtinfo("hna") local nr_hna = #data.HNA local meshfactor = string.format("%.2f", nr_topo / nr_nodes) if luci.http.formvalue("status") == "1" then rv = { nr_neighbors = nr_neigbors, neighbors = neighbors, interfaces = interfaces, nr_ifaces = nr_ifaces, nr_links = nr_links, nr_topo = nr_topo, nr_nodes = nr_nodes, meshfactor = meshfactor } luci.http.prepare_content("application/json") luci.http.write_json(rv) return end local ipv = luci.model.uci.cursor():get_first("olsrd", "olsrd", "IpVersion", "4") function write_conf(conf, file) if fs.access(conf) then luci.http.header("Content-Disposition", "attachment; filename="..file) luci.http.prepare_content("text/plain") luci.http.write(fs.readfile(conf)) end end conf = luci.http.formvalue() if conf.openwrt then write_conf("/etc/config/olsrd", "olsrd") return false end if conf.conf_v4 then write_conf("/var/etc/olsrd.conf.ipv4", "olsrd.conf.ipv4") return false end if conf.conf_v6 then write_conf("/var/etc/olsrd.conf.ipv6", "olsrd.conf.ipv6") return false end if conf.conf then write_conf("/var/etc/olsrd.conf", "olsrd.conf") return false end %> <%+header%>