* Removed High-Level UCI-API due to Lua compiler bugs
[project/luci.git] / applications / luci-ffwizard-leipzig / luasrc / controller / luci_ffwizard_leipzig / wizard.lua
index 4f2390b..6c3ad8c 100644 (file)
@@ -1,7 +1,7 @@
 module("luci.controller.luci_ffwizard_leipzig.wizard", package.seeall)
 
 function index()
-       entry({"admin", "index", "wizard"}, action_wizard, "Freifunkassistent", 20)
+       entry({"admin", "index", "wizard"}, call("action_wizard"), "Freifunkassistent", 20)
 end
 
 
@@ -11,233 +11,219 @@ function action_wizard()
        end
        
        local ifaces = {}
-       local wldevs = luci.model.uci.sections("wireless")
-       
-       if wldevs then
-               for k, v in pairs(wldevs) do
-                       if v[".type"] == "wifi-device" then
-                               table.insert(ifaces, k)
-                       end
-               end
-       end
+       luci.model.uci.foreach("wireless", "wifi-device",
+               function(section)
+                       table.insert(ifaces, section[".name"])
+               end)
        
        luci.template.render("freifunk/wizard", {ifaces=ifaces})
 end
 
 function configure_freifunk()
        local ip  = luci.http.formvalue("ip")
-       local uci = luci.model.uci.Session()
-       
-       -- Load UCI
-       uci:t_load("network")
-       uci:t_load("dhcp")
-       uci:t_load("freifunk")
-       uci:t_load("luci_splash")
-       uci:t_load("olsr")
-       uci:t_load("wireless")
-       uci:t_load("luci_fw")
-       
+       local uci = luci.model.uci
+       local cfg = {
+               wireless = uci.load("wireless"),
+               luci_fw = uci.load("luci_fw"),
+               luci_splash = uci.load("luci_splash"),
+               olsr = uci.load("olsr")
+       }
        
        -- Configure FF-Interface
-       uci:t_del("network", "ff")
-       uci:t_del("network", "ffdhcp")
+       uci.delete("network", "ff")
+       uci.delete("network", "ffdhcp")
        
-       uci:t_set("network", "ff", nil, "interface")
-       uci:t_set("network", "ff", "type", "bridge")
-       uci:t_set("network", "ff", "proto", "static")
-       uci:t_set("network", "ff", "ipaddr", ip)
-       uci:t_set("network", "ff", "netmask", uci:t_get("freifunk", "community", "mask")) 
-       uci:t_set("network", "ff", "dns", uci:t_get("freifunk", "community", "dns")) 
+       uci.section("network", "interface", "ff", {
+               type = "bridge",
+               proto = "static",
+               ipaddr = ip,
+               netmask = uci.get("freifunk", "community", "mask"), 
+               dns = uci.get("freifunk", "community", "dns")
+       }) 
        
        -- Reset Routing
-       local routing = uci:t_sections("luci_fw")
-       if routing then
-               for k, v in pairs(routing) do
-                       if v[".type"] == "routing" and (v.iface == "ff" or v.oface == "ff") then
-                               uci:t_del("luci_fw", k)
-                       end
-               end
-       
-               local int = uci:t_add("luci_fw", "routing")
-               uci:t_set("luci_fw", int, "iface", "ff")
-               uci:t_set("luci_fw", int, "oface", "ff")
-               uci:t_set("luci_fw", int, "fwd", "1")
+       uci.delete_all("luci_fw", "routing",
+               function (section)
+                       return (section.iface == "ff" or section.oface == "ff")
+               end)
+       
+       if cfg.luci_fw then
+               uci.section("luci_fw", "routing", nil, {
+                       iface = "ff",
+                       oface = "ff",
+                       fwd = "1"
+               })
        end
        
        -- Routing from Internal
        local iface = luci.http.formvalue("frominternal")
        if iface and iface ~= "" then
-               local routing = uci:t_sections("luci_fw")
-               if routing then
-                       for k, v in pairs(routing) do
-                               if v[".type"] == "routing" and (v.iface == iface and v.oface == "ff") then
-                                       uci:t_del("luci_fw", k)
-                               end
-                       end
+               uci.delete_all("luci_fw", "routing",
+                       function (section)
+                               return (section.iface == iface and section.oface == "ff")
+                       end)
                
-                       local int = uci:t_add("luci_fw", "routing")
-                       uci:t_set("luci_fw", int, "iface", iface)
-                       uci:t_set("luci_fw", int, "oface", "ff")
-                       uci:t_set("luci_fw", int, "fwd", "1")
-                       uci:t_set("luci_fw", int, "nat", "1")
-               end             
+               if cfg.luci_fw then
+                       uci.section("luci_fw", "routing", nil, {
+                               iface = iface,
+                               oface = "ff",
+                               fwd = "1",
+                               nat = "1"
+                       })
+               end     
        end     
-       
+                                                       
        -- Routing to External
        local iface = luci.http.formvalue("toexternal")
        if iface and iface ~= "" then
-               local routing = uci:t_sections("luci_fw")
-               if routing then
-                       for k, v in pairs(routing) do
-                               if v[".type"] == "routing" and (v.oface == iface and v.iface == "ff") then
-                                       uci:t_del("luci_fw", k)
-                               end
-                       end
+               uci.delete_all("luci_fw", "routing",
+                       function (section)
+                               return (section.oface == iface and section.iface == "ff")
+                       end)
                
-                       local int = uci:t_add("luci_fw", "routing")
-                       uci:t_set("luci_fw", int, "iface", "ff")
-                       uci:t_set("luci_fw", int, "oface", iface)
-                       uci:t_set("luci_fw", int, "fwd", "1")
-                       uci:t_set("luci_fw", int, "nat", "1")
-               end             
+               if cfg.luci_fw then
+                       uci.section("luci_fw", "routing", nil, {
+                               oface = iface,
+                               iface = "ff",
+                               fwd = "1",
+                               nat = "1"
+                       })
+               end     
        end     
        
        -- Configure DHCP
        if luci.http.formvalue("dhcp") then
-               local dhcpnet = uci:t_get("freifunk", "community", "dhcp"):match("^([0-9]+)")
+               local dhcpnet = uci.get("freifunk", "community", "dhcp"):match("^([0-9]+)")
                local dhcpip  = ip:gsub("^[0-9]+", dhcpnet)
        
-               uci:t_set("network", "ffdhcp", nil, "interface")
-               uci:t_set("network", "ffdhcp", "proto", "static")
-               uci:t_set("network", "ffdhcp", "ifname", "br-ff:dhcp")
-               uci:t_set("network", "ffdhcp", "ipaddr", dhcpip)
-               uci:t_set("network", "ffdhcp", "netmask", uci:t_get("freifunk", "community", "dhcpmask"))
+               uci.section("network", "interface", "ffdhcp", {
+                       proto = "static",
+                       ifname = "br-ff:dhcp",
+                       ipaddr = dhcpip,
+                       netmask = uci.get("freifunk", "community", "dhcpmask")
+               })
                
-               local dhcp = uci:t_sections("dhcp")
-               if dhcp then
-                       for k, v in pairs(dhcp) do
-                               if v[".type"] == "dhcp" and v.interface == "ffdhcp" then
-                                       uci:t_del("dhcp", k)
-                               end
-                       end             
-                       
-                       local dhcpbeg = 48 + tonumber(ip:match("[0-9]+$")) * 4
+               uci.delete_all("dhcp", "dhcp",
+                       function (section)      
+                               return (section.interface == "ffdhcp")
+                       end)                            
                        
-                       local sk = uci:t_add("dhcp", "dhcp")
-                       uci:t_set("dhcp", sk, "interface", "ffdhcp")
-                       uci:t_set("dhcp", sk, "start", dhcpbeg)
-                       uci:t_set("dhcp", sk, "limit", (dhcpbeg < 252) and 3 or 2)
-                       uci:t_set("dhcp", sk, "leasetime", "30m")
-               end 
+               local dhcpbeg = 48 + tonumber(ip:match("[0-9]+$")) * 4
+               uci.section("dhcp", "dhcp", nil, {
+                       interface = "ffdhcp",
+                       start = dhcpbeg,
+                       limit = ((dhcpbeg < 252) and 3 or 2),
+                       leasetime = "30m"
+               })
+
+                                       
+               uci.delete_all("luci_splash", "iface",
+                       function (section)
+                               return (section.network == "ffdhcp")
+                       end)    
                
-               local splash = uci:t_sections("luci_splash")
-               if splash then
-                       for k, v in pairs(splash) do
-                               if v[".type"] == "iface" then
-                                       uci:t_del("luci_splash", k)
-                               end
-                       end             
-                       
-                       local sk = uci:t_add("luci_splash", "iface")
-                       uci:t_set("luci_splash", sk, "network", "ffdhcp")
-               end     
+               if cfg.luci_splash then
+                       uci.section("luci_splash", "iface", nil, {
+                               network = "ffdhcp"
+                       })
+               end
                
-               local routing = uci:t_sections("luci_fw")
-               if routing then
-                       for k, v in pairs(routing) do
-                               if v[".type"] == "routing" and (v.iface == "ffdhcp" or v.oface == "ffdhcp") then
-                                       uci:t_del("luci_fw", k)
-                               end
-                       end
-                       
-                       local int = uci:t_add("luci_fw", "routing")
-                       uci:t_set("luci_fw", int, "iface", "ffdhcp")
-                       uci:t_set("luci_fw", int, "oface", "ff")
-                       uci:t_set("luci_fw", int, "nat", "1")                   
+               
+               uci.delete_all("luci_fw", "routing",
+                       function (section)
+                               return (section.iface == "ffdhcp" or section.oface == "ffdhcp")
+                       end)
+
+               if cfg.luci_fw then     
+                       uci.section("luci_fw", "routing", nil, {                
+                               iface = "ffdhcp",
+                               oface = "ff",
+                               nat = "1"
+                       })      
                        
                        local iface = luci.http.formvalue("toexternal")
                        if iface and iface ~= "" then
-                               local int = uci:t_add("luci_fw", "routing")
-                               uci:t_set("luci_fw", int, "iface", "ffdhcp")
-                               uci:t_set("luci_fw", int, "oface", iface)
-                               uci:t_set("luci_fw", int, "nat", "1")                           
+                               uci.section("luci_fw", "routing", nil, {                
+                                       iface = "ffdhcp",
+                                       oface = iface,
+                                       nat = "1"
+                               })              
                        end
                end     
        end
-       
+
        -- Configure OLSR
-       if luci.http.formvalue("olsr") and uci:t_sections("olsr") then
-               for k, v in pairs(uci:t_sections("olsr")) do
-                       if v[".type"] == "Interface" or v[".type"] == "LoadPlugin" then
-                               uci:t_del("olsr", k)
-                       end
-               end
+       if luci.http.formvalue("olsr") and cfg.olsr then
+               uci.delete_all("olsr", "Interface")
+               uci.delete_all("olsr", "LoadPlugin")
                
                if luci.http.formvalue("shareinet") then
-                       uci:t_set("olsr", "dyn_gw", nil, "LoadPlugin")
-                       uci:t_set("olsr", "dyn_gw", "Library", "olsrd_dyn_gw.so.0.4")
+                       uci.section("olsr", "LoadPlugin", "dyn_gw", {
+                               Library = "olsrd_dyn_gw.so.0.4"
+                       })
                end
                
-               uci:t_set("olsr", "nameservice", nil, "LoadPlugin")
-               uci:t_set("olsr", "nameservice", "Library", "olsrd_nameservice.so.0.3")
-               uci:t_set("olsr", "nameservice", "name", ip:gsub("%.", "-"))
-               uci:t_set("olsr", "nameservice", "hosts_file", "/var/etc/hosts")
-               uci:t_set("olsr", "nameservice", "suffix", ".olsr")
-               uci:t_set("olsr", "nameservice", "latlon_infile", "/tmp/latlon.txt")
+               uci.section("olsr", "LoadPlugin", "nameservice", {
+                       Library = "olsrd_nameservice.so.0.3",
+                       name = ip:gsub("%.", "-"),
+                       hosts_file = "/var/etc/hosts",
+                       suffix = ".olsr",
+                       latlon_infile = "/tmp/latlon.txt"
+               })
                
-               uci:t_set("olsr", "txtinfo", nil, "LoadPlugin")
-               uci:t_set("olsr", "txtinfo", "Library", "olsrd_txtinfo.so.0.1")
-               uci:t_set("olsr", "txtinfo", "Accept", "127.0.0.1")
+               uci.section("olsr", "LoadPlugin", "txtinfo", {
+                       Library = "olsrd_txtinfo.so.0.1",
+                       Accept = "127.0.0.1"
+               })
                
-               local oif = uci:t_add("olsr", "Interface")
-               uci:t_set("olsr", oif, "Interface", "ff")
-               uci:t_set("olsr", oif, "HelloInterval", "6.0")
-               uci:t_set("olsr", oif, "HelloValidityTime", "108.0")
-               uci:t_set("olsr", oif, "TcInterval", "4.0")
-               uci:t_set("olsr", oif, "TcValidityTime", "324.0")
-               uci:t_set("olsr", oif, "MidInterval", "18.0")
-               uci:t_set("olsr", oif, "MidValidityTime", "324.0")
-               uci:t_set("olsr", oif, "HnaInterval", "18.0")
-               uci:t_set("olsr", oif, "HnaValidityTime", "108.0")
+               uci.section("olsr", "Interface", nil, {
+                       Interface = "ff",
+                       HelloInterval = "6.0",
+                       HelloValidityTime = "108.0",
+                       TcInterval = "4.0",
+                       TcValidityTime = "324.0",
+                       MidInterval = "18.0",
+                       MidValidityTime = "324.0",
+                       HnaInterval = "18.0",
+                       HnaValidityTime = "108.0"
+               })
        end
-       
+
        -- Configure Wifi
-       local wcfg = uci:t_sections("wireless")
-       if wcfg then
-               for iface, v in pairs(wcfg) do
-                       if v[".type"] == "wifi-device" and luci.http.formvalue("wifi."..iface) then
-                               -- Cleanup
-                               for k, j in pairs(wcfg) do
-                                       if j[".type"] == "wifi-iface" and j.device == iface then
-                                               uci:t_del("wireless", k)
-                                       end
+       if cfg.wireless then
+               uci.foreach("wireless", "wifi-device",
+                       function (section)
+                               local device = section[".name"]
+                               
+                               if luci.http.formvalue("wifi."..iface) then
+                                       uci.delete_all("wireless", "wifi-iface",
+                                               function (section)
+                                                       return (section.device == device)
+                                               end)
                                end
                                
-                               uci:t_set("wireless", iface, "disabled", "0")
-                               uci:t_set("wireless", iface, "mode", "11g")
-                               uci:t_set("wireless", iface, "txantenna", 1)
-                               uci:t_set("wireless", iface, "rxantenna", 1)
-                               uci:t_set("wireless", iface, "channel", uci:t_get("freifunk", "community", "channel")) 
+                               uci.tset("wireless", "device", {
+                                       disabled = "0",
+                                       mode = "11g",
+                                       txantenna = "1",
+                                       rxantenna = "1",
+                                       channel = uci.get("freifunk", "community", "channel")
+                               })
                                
-                               local wif = uci:t_add("wireless", "wifi-iface")
-                               uci:t_set("wireless", wif, "device", iface)
-                               uci:t_set("wireless", wif, "network", "ff")
-                               uci:t_set("wireless", wif, "mode", "adhoc")
-                               uci:t_set("wireless", wif, "ssid", uci:t_get("freifunk", "community", "essid"))
-                               uci:t_set("wireless", wif, "bssid", uci:t_get("freifunk", "community", "bssid"))
-                               uci:t_set("wireless", wif, "txpower", 13)
-                       end
-               end
+                               uci.section("wireless", "wifi-iface", nil, {
+                                       device = iface,
+                                       network = "ff",
+                                       mode = "adhoc",
+                                       ssid = uci.get("freifunk", "community", "essid"),
+                                       bssid = uci.get("freifunk", "community", "bssid"),
+                                       txpower = 13
+                               })
+                       end)
        end
-       
+
        -- Save UCI
-       uci:t_save("network")
-       uci:t_save("dhcp")
-       uci:t_save("freifunk")
-       uci:t_save("luci_splash")
-       uci:t_save("olsr")
-       uci:t_save("wireless")
-       uci:t_save("luci_fw")
+       uci.save()
+
 
        luci.http.redirect(luci.dispatcher.build_url("admin", "uci", "changes"))
 end
\ No newline at end of file