applications/luci-ffwizard-leipzig: fix dhcp splash network configuration
[project/luci.git] / applications / luci-ffwizard-leipzig / luasrc / model / cbi / ffwizard.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
6
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
10
11 http://www.apache.org/licenses/LICENSE-2.0
12
13 $Id$
14
15 ]]--
16
17
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"
22
23
24 -------------------- View --------------------
25 f = SimpleForm("ffwizward", "Freifunkassistent",
26 "Dieser Assistent unterstüzt bei der Einrichtung des Routers für das Freifunknetz.")
27
28
29 dev = f:field(ListValue, "device", "WLAN-Gerät")
30 uci:foreach("wireless", "wifi-device",
31 function(section)
32 dev:value(section[".name"])
33 end)
34
35
36 main = f:field(Flag, "wifi", "Freifunkzugang einrichten")
37
38 net = f:field(Value, "net", "Freifunknetz", "1. Teil der IP-Adresse")
39 net.rmempty = true
40 net:depends("wifi", "1")
41 uci:foreach("freifunk", "community", function(s)
42 net:value(s[".name"], "%s (%s)" % {s.name, s.prefix})
43 end)
44
45 function net.cfgvalue(self, section)
46 return uci:get("freifunk", "wizard", "net")
47 end
48 function net.write(self, section, value)
49 uci:set("freifunk", "wizard", "net", value)
50 uci:save("freifunk")
51 end
52
53
54 subnet = f:field(Value, "subnet", "Subnetz (Projekt)", "2. Teil der IP-Adresse")
55 subnet.rmempty = true
56 subnet:depends("wifi", "1")
57 function subnet.cfgvalue(self, section)
58 return uci:get("freifunk", "wizard", "subnet")
59 end
60 function subnet.write(self, section, value)
61 uci:set("freifunk", "wizard", "subnet", value)
62 uci:save("freifunk")
63 end
64
65 node = f:field(Value, "node", "Knoten", "3. Teil der IP-Adresse")
66 node.rmempty = true
67 node:depends("wifi", "1")
68 for i=1, 51 do
69 node:value(i)
70 end
71 function node.cfgvalue(self, section)
72 return uci:get("freifunk", "wizard", "node")
73 end
74 function node.write(self, section, value)
75 uci:set("freifunk", "wizard", "node", value)
76 uci:save("freifunk")
77 end
78
79 client = f:field(Flag, "client", "WLAN-DHCP anbieten")
80 client:depends("wifi", "1")
81 client.rmempty = true
82
83
84 olsr = f:field(Flag, "olsr", "OLSR einrichten")
85 olsr.rmempty = true
86
87 share = f:field(Flag, "sharenet", "Eigenen Internetzugang freigeben")
88 share.rmempty = true
89
90
91
92 -------------------- Control --------------------
93 function f.handle(self, state, data)
94 if state == FORM_VALID then
95 luci.http.redirect(luci.dispatcher.build_url("admin", "uci", "changes"))
96 return false
97 elseif state == FORM_INVALID then
98 self.errmessage = "Ungültige Eingabe: Bitte die Formularfelder auf Fehler prüfen."
99 end
100 return true
101 end
102
103 local function _strip_internals(tbl)
104 tbl = tbl or {}
105 for k, v in pairs(tbl) do
106 if k:sub(1, 1) == "." then
107 tbl[k] = nil
108 end
109 end
110 return tbl
111 end
112
113 -- Configure Freifunk checked
114 function main.write(self, section, value)
115 if value == "0" then
116 return
117 end
118
119 local device = dev:formvalue(section)
120 local community, external
121
122 -- Collect IP-Address
123 local inet = net:formvalue(section)
124 local isubnet = subnet:formvalue(section)
125 local inode = node:formvalue(section)
126
127 -- Invalidate fields
128 if not inet then
129 net.tag_missing[section] = true
130 else
131 community = inet
132 external = uci:get("freifunk", community, "external") or ""
133 inet = uci:get("freifunk", community, "prefix") or inet
134 end
135 if not isubnet then
136 subnet.tag_missing[section] = true
137 end
138 if not inode then
139 node.tag_missing[section] = true
140 end
141
142 if not inet or not isubnet or not inode then
143 return
144 end
145
146 local ip = "%s.%s.%s" % {inet, isubnet, inode}
147
148
149 -- Cleanup
150 tools.wifi_delete_ifaces(device)
151 tools.network_remove_interface(device)
152 tools.firewall_zone_remove_interface("freifunk", device)
153
154 -- Tune community settings
155 if community and uci:get("freifunk", community) then
156 uci:tset("freifunk", "community", uci:get_all("freifunk", community))
157 end
158
159 -- Tune wifi device
160 local devconfig = uci:get_all("freifunk", "wifi_device")
161 util.update(devconfig, uci:get_all(external, "wifi_device") or {})
162 uci:tset("wireless", device, devconfig)
163
164 -- Create wifi iface
165 local ifconfig = uci:get_all("freifunk", "wifi_iface")
166 util.update(ifconfig, uci:get_all(external, "wifi_iface") or {})
167 ifconfig.device = device
168 ifconfig.network = device
169 ifconfig.ssid = uci:get("freifunk", community, "ssid")
170 uci:section("wireless", "wifi-iface", nil, ifconfig)
171
172 -- Save wifi
173 uci:save("wireless")
174
175 -- Create firewall zone and add default rules (first time)
176 local newzone = tools.firewall_create_zone("freifunk", "REJECT", "ACCEPT", "REJECT", true)
177 if newzone then
178 uci:foreach("freifunk", "fw_forwarding", function(section)
179 uci:section("firewall", "forwarding", nil, section)
180 end)
181 uci:foreach(external, "fw_forwarding", function(section)
182 uci:section("firewall", "forwarding", nil, section)
183 end)
184
185 uci:foreach("freifunk", "fw_rule", function(section)
186 uci:section("firewall", "rule", nil, section)
187 end)
188 uci:foreach(external, "fw_rule", function(section)
189 uci:section("firewall", "rule", nil, section)
190 end)
191 end
192
193 -- Enforce firewall include
194 local has_include = false
195 uci:foreach("firewall", "include",
196 function(section)
197 if section.path == "/etc/firewall.freifunk" then
198 has_include = true
199 end
200 end)
201
202 if not has_include then
203 uci:section("firewall", "include", nil,
204 { path = "/etc/firewall.freifunk" })
205 end
206
207 -- Allow state: invalid packets
208 uci:foreach("firewall", "defaults",
209 function(section)
210 uci:set("firewall", section[".name"], "drop_invalid", "0")
211 end)
212
213 -- Prepare advanced config
214 local has_advanced = false
215 uci:foreach("firewall", "advanced",
216 function(section) has_advanced = true end)
217
218 if not has_advanced then
219 uci:section("firewall", "advanced", nil,
220 { tcp_ecn = "0", ip_conntrack_max = "8192", tcp_westwood = "1" })
221 end
222
223 uci:save("firewall")
224
225
226 -- Create network interface
227 local netconfig = uci:get_all("freifunk", "interface")
228 util.update(netconfig, uci:get_all(external, "interface") or {})
229 netconfig.proto = "static"
230 netconfig.ipaddr = ip
231 uci:section("network", "interface", device, netconfig)
232
233 uci:save("network")
234
235 tools.firewall_zone_add_interface("freifunk", device)
236
237
238 -- Set hostname
239 local new_hostname = ip:gsub("%.", "-")
240 local old_hostname = sys.hostname()
241
242 if old_hostname == "OpenWrt" or old_hostname:match("^%d+-%d+-%d+-%d+$") then
243 uci:foreach("system", "system",
244 function(s)
245 uci:set("system", s['.name'], "hostname", new_hostname)
246 end)
247
248 sys.hostname(new_hostname)
249 uci:save("system")
250 end
251 end
252
253
254 function olsr.write(self, section, value)
255 if value == "0" then
256 return
257 end
258
259
260 local device = dev:formvalue(section)
261
262 local community = net:formvalue(section)
263 local external = community and uci:get("freifunk", community, "external") or ""
264
265 -- Configure nameservice
266 local hostname
267 uci:foreach("system", "system", function(s) hostname = s.hostname end)
268
269 if hostname then
270 uci:foreach("olsrd", "LoadPlugin",
271 function(s)
272 if s.library == "olsrd_nameservice.so.0.3" then
273 uci:set("olsrd", s['.name'], "name", hostname)
274 end
275 end)
276 end
277
278 -- Delete old interface
279 uci:delete_all("olsrd", "Interface", {interface=device})
280
281 -- Write new interface
282 local olsrbase = uci:get_all("freifunk", "olsr_interface")
283 util.update(olsrbase, uci:get_all(external, "olsr_interface") or {})
284 olsrbase.interface = device
285 olsrbase.ignore = "0"
286 uci:section("olsrd", "Interface", nil, olsrbase)
287 uci:save("olsrd")
288
289 -- Import hosts
290 uci:foreach("dhcp", "dnsmasq", function(s)
291 uci:set("dhcp", s[".name"], "addnhosts", "/var/etc/hosts.olsr")
292 end)
293 uci:save("dhcp")
294 end
295
296
297 function share.write(self, section, value)
298 uci:delete_all("firewall", "forwarding", {src="freifunk", dest="wan"})
299 uci:delete_all("olsrd", "LoadPlugin", {library="olsrd_dyn_gw_plain.so.0.4"})
300
301 if value == "1" then
302 uci:section("firewall", "forwarding", nil, {src="freifunk", dest="wan"})
303 uci:section("olsrd", "LoadPlugin", nil, {library="olsrd_dyn_gw_plain.so.0.4"})
304 end
305 uci:save("firewall")
306 uci:save("olsrd")
307 end
308
309
310 function client.write(self, section, value)
311 if value == "0" then
312 return
313 end
314
315 local device = dev:formvalue(section)
316
317 -- Collect IP-Address
318 local inet = net:formvalue(section)
319 local isubnet = subnet:formvalue(section)
320 local inode = node:formvalue(section)
321
322 if not inet or not isubnet or not inode then
323 return
324 end
325 local community = inet
326 local external = community and uci:get("freifunk", community, "external") or ""
327 inet = uci:get("freifunk", community, "prefix") or inet
328
329 local dhcpbeg = 48 + tonumber(inode) * 4
330 local dclient = "%s.%s.%s" % {inet:gsub("^[0-9]+", "10"), isubnet, dhcpbeg}
331 local limit = dhcpbeg < 252 and 3 or 2
332
333 -- Delete old alias
334 uci:delete("network", device .. "dhcp")
335
336 -- Create alias
337 local aliasbase = uci:get_all("freifunk", "alias")
338 util.update(aliasbase, uci:get_all(external, "alias") or {})
339 aliasbase.interface = device
340 aliasbase.ipaddr = dclient
341 aliasbase.proto = "static"
342 uci:section("network", "alias", device .. "dhcp", aliasbase)
343 uci:save("network")
344
345
346 -- Create dhcp
347 local dhcpbase = uci:get_all("freifunk", "dhcp")
348 util.update(dhcpbase, uci:get_all(external, "dhcp") or {})
349 dhcpbase.interface = device .. "dhcp"
350 dhcpbase.start = dhcpbeg
351 dhcpbase.limit = limit
352
353 uci:section("dhcp", "dhcp", device .. "dhcp", dhcpbase)
354 uci:save("dhcp")
355
356 uci:delete_all("firewall", "rule", {
357 src="freifunk",
358 proto="udp",
359 dest_port="53"
360 })
361 uci:section("firewall", "rule", nil, {
362 src="freifunk",
363 proto="udp",
364 dest_port="53",
365 target="ACCEPT"
366 })
367 uci:delete_all("firewall", "rule", {
368 src="freifunk",
369 proto="udp",
370 src_port="68",
371 dest_port="67"
372 })
373 uci:section("firewall", "rule", nil, {
374 src="freifunk",
375 proto="udp",
376 src_port="68",
377 dest_port="67",
378 target="ACCEPT"
379 })
380 uci:delete_all("firewall", "rule", {
381 src="freifunk",
382 proto="tcp",
383 dest_port="8082",
384 })
385 uci:section("firewall", "rule", nil, {
386 src="freifunk",
387 proto="tcp",
388 dest_port="8082",
389 target="ACCEPT"
390 })
391
392
393
394 -- Delete old splash
395 uci:delete_all("luci_splash", "iface", {network=device.."dhcp", zone="freifunk"})
396
397 -- Register splash
398 uci:section("luci_splash", "iface", nil, {network=device.."dhcp", zone="freifunk"})
399 uci:save("luci_splash")
400 end
401
402 return f