2 LuCI - Lua Configuration Interface
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
7 Licensed under the Apache License, Version 2.0 (the "License");
8 you may not use this file except in compliance with the License.
9 You may obtain a copy of the License at
11 http://www.apache.org/licenses/LICENSE-2.0
18 local uci = require "luci.model.uci".cursor()
19 local tools = require "luci.tools.ffwizard"
20 local util = require "luci.util"
21 local sys = require "luci.sys"
24 -------------------- View --------------------
25 f = SimpleForm("ffwizward", "Freifunkassistent",
26 "Dieser Assistent unterstüzt bei der Einrichtung des Routers für das Freifunknetz.")
29 dev = f:field(ListValue, "device", "WLAN-Gerät")
30 uci:foreach("wireless", "wifi-device",
32 dev:value(section[".name"])
36 main = f:field(Flag, "wifi", "Freifunkzugang einrichten")
38 net = f:field(Value, "net", "Freifunknetz", "1. Teil der IP-Adresse")
40 net:depends("wifi", "1")
41 uci:foreach("freifunk", "community", function(s)
42 net:value(s[".name"], "%s (%s)" % {s.name, s.prefix})
45 function net.cfgvalue(self, section)
46 return uci:get("freifunk", "wizard", "net")
48 function net.write(self, section, value)
49 uci:set("freifunk", "wizard", "net", value)
54 subnet = f:field(Value, "subnet", "Subnetz (Projekt)", "2. Teil der IP-Adresse")
56 subnet:depends("wifi", "1")
57 function subnet.cfgvalue(self, section)
58 return uci:get("freifunk", "wizard", "subnet")
60 function subnet.write(self, section, value)
61 uci:set("freifunk", "wizard", "subnet", value)
65 node = f:field(Value, "node", "Knoten", "3. Teil der IP-Adresse")
67 node:depends("wifi", "1")
71 function node.cfgvalue(self, section)
72 return uci:get("freifunk", "wizard", "node")
74 function node.write(self, section, value)
75 uci:set("freifunk", "wizard", "node", value)
79 client = f:field(Flag, "client", "WLAN-DHCP anbieten")
80 client:depends("wifi", "1")
83 olsr = f:field(Flag, "olsr", "OLSR einrichten")
86 lat = f:field(Value, "lat", "Latitude")
87 lat:depends("olsr", "1")
89 lon = f:field(Value, "lon", "Longitude")
90 lon:depends("olsr", "1")
92 share = f:field(Flag, "sharenet", "Eigenen Internetzugang freigeben")
97 -------------------- Control --------------------
98 function f.handle(self, state, data)
99 if state == FORM_VALID then
100 luci.http.redirect(luci.dispatcher.build_url("admin", "uci", "changes"))
102 elseif state == FORM_INVALID then
103 self.errmessage = "Ungültige Eingabe: Bitte die Formularfelder auf Fehler prüfen."
108 local function _strip_internals(tbl)
110 for k, v in pairs(tbl) do
111 if k:sub(1, 1) == "." then
118 -- Configure Freifunk checked
119 function main.write(self, section, value)
124 local device = dev:formvalue(section)
125 local community, external
127 -- Collect IP-Address
128 local inet = net:formvalue(section)
129 local isubnet = subnet:formvalue(section)
130 local inode = node:formvalue(section)
134 net.tag_missing[section] = true
137 external = uci:get("freifunk", community, "external") or ""
138 inet = uci:get("freifunk", community, "prefix") or inet
141 subnet.tag_missing[section] = true
144 node.tag_missing[section] = true
147 if not inet or not isubnet or not inode then
151 local ip = "%s.%s.%s" % {inet, isubnet, inode}
155 tools.wifi_delete_ifaces(device)
156 tools.network_remove_interface(device)
157 tools.firewall_zone_remove_interface("freifunk", device)
159 -- Tune community settings
160 if community and uci:get("freifunk", community) then
161 uci:tset("freifunk", "community", uci:get_all("freifunk", community))
165 local devconfig = uci:get_all("freifunk", "wifi_device")
166 util.update(devconfig, uci:get_all(external, "wifi_device") or {})
167 uci:tset("wireless", device, devconfig)
170 local ifconfig = uci:get_all("freifunk", "wifi_iface")
171 util.update(ifconfig, uci:get_all(external, "wifi_iface") or {})
172 ifconfig.device = device
173 ifconfig.network = device
174 ifconfig.ssid = uci:get("freifunk", community, "ssid")
175 uci:section("wireless", "wifi-iface", nil, ifconfig)
180 -- Create firewall zone and add default rules (first time)
181 local newzone = tools.firewall_create_zone("freifunk", "REJECT", "ACCEPT", "REJECT", true)
183 uci:foreach("freifunk", "fw_forwarding", function(section)
184 uci:section("firewall", "forwarding", nil, section)
186 uci:foreach(external, "fw_forwarding", function(section)
187 uci:section("firewall", "forwarding", nil, section)
190 uci:foreach("freifunk", "fw_rule", function(section)
191 uci:section("firewall", "rule", nil, section)
193 uci:foreach(external, "fw_rule", function(section)
194 uci:section("firewall", "rule", nil, section)
198 -- Enforce firewall include
199 local has_include = false
200 uci:foreach("firewall", "include",
202 if section.path == "/etc/firewall.freifunk" then
207 if not has_include then
208 uci:section("firewall", "include", nil,
209 { path = "/etc/firewall.freifunk" })
212 -- Allow state: invalid packets
213 uci:foreach("firewall", "defaults",
215 uci:set("firewall", section[".name"], "drop_invalid", "0")
218 -- Prepare advanced config
219 local has_advanced = false
220 uci:foreach("firewall", "advanced",
221 function(section) has_advanced = true end)
223 if not has_advanced then
224 uci:section("firewall", "advanced", nil,
225 { tcp_ecn = "0", ip_conntrack_max = "8192", tcp_westwood = "1" })
231 -- Create network interface
232 local netconfig = uci:get_all("freifunk", "interface")
233 util.update(netconfig, uci:get_all(external, "interface") or {})
234 netconfig.proto = "static"
235 netconfig.ipaddr = ip
236 uci:section("network", "interface", device, netconfig)
240 tools.firewall_zone_add_interface("freifunk", device)
243 local new_hostname = ip:gsub("%.", "-")
244 local old_hostname = sys.hostname()
246 uci:foreach("system", "system",
249 uci:set("system", s['.name'], "cronloglevel", "10")
252 if old_hostname == "OpenWrt" or old_hostname:match("^%d+-%d+-%d+-%d+$") then
253 uci:set("system", s['.name'], "hostname", new_hostname)
254 sys.hostname(new_hostname)
262 function olsr.write(self, section, value)
268 local device = dev:formvalue(section)
270 local community = net:formvalue(section)
271 local external = community and uci:get("freifunk", community, "external") or ""
273 local latval = tonumber(lat:formvalue(section))
274 local lonval = tonumber(lon:formvalue(section))
277 -- Delete old interface
278 uci:delete_all("olsrd", "Interface", {interface=device})
280 -- Write new interface
281 local olsrbase = uci:get_all("freifunk", "olsr_interface")
282 util.update(olsrbase, uci:get_all(external, "olsr_interface") or {})
283 olsrbase.interface = device
284 olsrbase.ignore = "0"
285 uci:section("olsrd", "Interface", nil, olsrbase)
287 -- Delete old watchdog settings
288 uci:delete_all("olsrd", "LoadPlugin", {library="olsrd_watchdog.so.0.1"})
290 -- Write new watchdog settings
291 uci:section("olsrd", "LoadPlugin", nil, {
292 library = "olsrd_watchdog.so.0.1",
293 file = "/var/run/olsrd.watchdog",
297 -- Delete old nameservice settings
298 uci:delete_all("olsrd", "LoadPlugin", {library="olsrd_nameservice.so.0.3"})
300 -- Write new nameservice settings
301 uci:section("olsrd", "LoadPlugin", nil, {
302 library = "olsrd_nameservice.so.0.3",
304 hosts_file = "/var/etc/hosts.olsr",
305 latlon_file = "/var/run/latlon.js",
306 lat = latval and string.format("%.15f", latval) or "",
307 lon = lonval and string.format("%.15f", lonval) or ""
310 -- Save latlon to system too
311 if latval and lonval then
312 uci:foreach("system", "system", function(s)
313 uci:set("system", s[".name"], "latlon",
314 string.format("%.15f %.15f", latval, lonval))
317 uci:foreach("system", "system", function(s)
318 uci:delete("system", s[".name"], "latlon")
323 uci:foreach("dhcp", "dnsmasq", function(s)
324 uci:set("dhcp", s[".name"], "addnhosts", "/var/etc/hosts.olsr")
332 function share.write(self, section, value)
333 uci:delete_all("firewall", "forwarding", {src="freifunk", dest="wan"})
334 uci:delete_all("olsrd", "LoadPlugin", {library="olsrd_dyn_gw_plain.so.0.4"})
337 uci:section("firewall", "forwarding", nil, {src="freifunk", dest="wan"})
338 uci:section("olsrd", "LoadPlugin", nil, {library="olsrd_dyn_gw_plain.so.0.4"})
346 function client.write(self, section, value)
351 local device = dev:formvalue(section)
353 -- Collect IP-Address
354 local inet = net:formvalue(section)
355 local isubnet = subnet:formvalue(section)
356 local inode = node:formvalue(section)
358 if not inet or not isubnet or not inode then
361 local community = inet
362 local external = community and uci:get("freifunk", community, "external") or ""
363 inet = uci:get("freifunk", community, "prefix") or inet
365 local dhcpbeg = 48 + tonumber(inode) * 4
366 local dclient = "%s.%s.%s" % {inet:gsub("^[0-9]+", "10"), isubnet, dhcpbeg}
367 local limit = dhcpbeg < 252 and 3 or 2
370 uci:delete("network", device .. "dhcp")
373 local aliasbase = uci:get_all("freifunk", "alias")
374 util.update(aliasbase, uci:get_all(external, "alias") or {})
375 aliasbase.interface = device
376 aliasbase.ipaddr = dclient
377 aliasbase.proto = "static"
378 uci:section("network", "alias", device .. "dhcp", aliasbase)
383 local dhcpbase = uci:get_all("freifunk", "dhcp")
384 util.update(dhcpbase, uci:get_all(external, "dhcp") or {})
385 dhcpbase.interface = device .. "dhcp"
386 dhcpbase.start = dhcpbeg
387 dhcpbase.limit = limit
390 uci:section("dhcp", "dhcp", device .. "dhcp", dhcpbase)
393 uci:delete_all("firewall", "rule", {
398 uci:section("firewall", "rule", nil, {
404 uci:delete_all("firewall", "rule", {
410 uci:section("firewall", "rule", nil, {
417 uci:delete_all("firewall", "rule", {
422 uci:section("firewall", "rule", nil, {
432 uci:delete_all("luci_splash", "iface", {network=device.."dhcp", zone="freifunk"})
435 uci:section("luci_splash", "iface", nil, {network=device.."dhcp", zone="freifunk"})
436 uci:save("luci_splash")