luci-0.11: merge outstanding trunk changes
[project/luci.git] / modules / admin-full / luasrc / controller / admin / network.lua
1 --[[
2 LuCI - Lua Configuration Interface
3
4 Copyright 2008 Steven Barth <steven@midlink.org>
5 Copyright 2011 Jo-Philipp Wich <xm@subsignal.org>
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 ]]--
14
15 module("luci.controller.admin.network", package.seeall)
16
17 function index()
18 local uci = require("luci.model.uci").cursor()
19 local page
20
21 page = node("admin", "network")
22 page.target = firstchild()
23 page.title = _("Network")
24 page.order = 50
25 page.index = true
26
27 -- if page.inreq then
28 local has_switch = false
29
30 uci:foreach("network", "switch",
31 function(s)
32 has_switch = true
33 return false
34 end)
35
36 if has_switch then
37 page = node("admin", "network", "vlan")
38 page.target = cbi("admin_network/vlan")
39 page.title = _("Switch")
40 page.order = 20
41
42 page = entry({"admin", "network", "switch_status"}, call("switch_status"), nil)
43 page.leaf = true
44 end
45
46
47 local has_wifi = false
48
49 uci:foreach("wireless", "wifi-device",
50 function(s)
51 has_wifi = true
52 return false
53 end)
54
55 if has_wifi then
56 page = entry({"admin", "network", "wireless_join"}, call("wifi_join"), nil)
57 page.leaf = true
58
59 page = entry({"admin", "network", "wireless_add"}, call("wifi_add"), nil)
60 page.leaf = true
61
62 page = entry({"admin", "network", "wireless_delete"}, call("wifi_delete"), nil)
63 page.leaf = true
64
65 page = entry({"admin", "network", "wireless_status"}, call("wifi_status"), nil)
66 page.leaf = true
67
68 page = entry({"admin", "network", "wireless_reconnect"}, call("wifi_reconnect"), nil)
69 page.leaf = true
70
71 page = entry({"admin", "network", "wireless_shutdown"}, call("wifi_shutdown"), nil)
72 page.leaf = true
73
74 page = entry({"admin", "network", "wireless"}, arcombine(template("admin_network/wifi_overview"), cbi("admin_network/wifi")), _("Wifi"), 15)
75 page.leaf = true
76 page.subindex = true
77
78 if page.inreq then
79 local wdev
80 local net = require "luci.model.network".init(uci)
81 for _, wdev in ipairs(net:get_wifidevs()) do
82 local wnet
83 for _, wnet in ipairs(wdev:get_wifinets()) do
84 entry(
85 {"admin", "network", "wireless", wnet:id()},
86 alias("admin", "network", "wireless"),
87 wdev:name() .. ": " .. wnet:shortname()
88 )
89 end
90 end
91 end
92 end
93
94
95 page = entry({"admin", "network", "iface_add"}, cbi("admin_network/iface_add"), nil)
96 page.leaf = true
97
98 page = entry({"admin", "network", "iface_delete"}, call("iface_delete"), nil)
99 page.leaf = true
100
101 page = entry({"admin", "network", "iface_status"}, call("iface_status"), nil)
102 page.leaf = true
103
104 page = entry({"admin", "network", "iface_reconnect"}, call("iface_reconnect"), nil)
105 page.leaf = true
106
107 page = entry({"admin", "network", "iface_shutdown"}, call("iface_shutdown"), nil)
108 page.leaf = true
109
110 page = entry({"admin", "network", "network"}, arcombine(cbi("admin_network/network"), cbi("admin_network/ifaces")), _("Interfaces"), 10)
111 page.leaf = true
112 page.subindex = true
113
114 if page.inreq then
115 uci:foreach("network", "interface",
116 function (section)
117 local ifc = section[".name"]
118 if ifc ~= "loopback" then
119 entry({"admin", "network", "network", ifc},
120 true, ifc:upper())
121 end
122 end)
123 end
124
125
126 if nixio.fs.access("/etc/config/dhcp") then
127 page = node("admin", "network", "dhcp")
128 page.target = cbi("admin_network/dhcp")
129 page.title = _("DHCP and DNS")
130 page.order = 30
131
132 page = entry({"admin", "network", "dhcplease_status"}, call("lease_status"), nil)
133 page.leaf = true
134
135 page = node("admin", "network", "hosts")
136 page.target = cbi("admin_network/hosts")
137 page.title = _("Hostnames")
138 page.order = 40
139 end
140
141 page = node("admin", "network", "routes")
142 page.target = cbi("admin_network/routes")
143 page.title = _("Static Routes")
144 page.order = 50
145
146 page = node("admin", "network", "diagnostics")
147 page.target = template("admin_network/diagnostics")
148 page.title = _("Diagnostics")
149 page.order = 60
150
151 page = entry({"admin", "network", "diag_ping"}, call("diag_ping"), nil)
152 page.leaf = true
153
154 page = entry({"admin", "network", "diag_nslookup"}, call("diag_nslookup"), nil)
155 page.leaf = true
156
157 page = entry({"admin", "network", "diag_traceroute"}, call("diag_traceroute"), nil)
158 page.leaf = true
159
160 page = entry({"admin", "network", "diag_ping6"}, call("diag_ping6"), nil)
161 page.leaf = true
162
163 page = entry({"admin", "network", "diag_traceroute6"}, call("diag_traceroute6"), nil)
164 page.leaf = true
165 -- end
166 end
167
168 function wifi_join()
169 local function param(x)
170 return luci.http.formvalue(x)
171 end
172
173 local function ptable(x)
174 x = param(x)
175 return x and (type(x) ~= "table" and { x } or x) or {}
176 end
177
178 local dev = param("device")
179 local ssid = param("join")
180
181 if dev and ssid then
182 local cancel = (param("cancel") or param("cbi.cancel")) and true or false
183
184 if cancel then
185 luci.http.redirect(luci.dispatcher.build_url("admin/network/wireless_join?device=" .. dev))
186 else
187 local cbi = require "luci.cbi"
188 local tpl = require "luci.template"
189 local map = luci.cbi.load("admin_network/wifi_add")[1]
190
191 if map:parse() ~= cbi.FORM_DONE then
192 tpl.render("header")
193 map:render()
194 tpl.render("footer")
195 end
196 end
197 else
198 luci.template.render("admin_network/wifi_join")
199 end
200 end
201
202 function wifi_add()
203 local dev = luci.http.formvalue("device")
204 local ntm = require "luci.model.network".init()
205
206 dev = dev and ntm:get_wifidev(dev)
207
208 if dev then
209 local net = dev:add_wifinet({
210 mode = "ap",
211 ssid = "OpenWrt",
212 encryption = "none"
213 })
214
215 ntm:save("wireless")
216 luci.http.redirect(net:adminlink())
217 end
218 end
219
220 function wifi_delete(network)
221 local ntm = require "luci.model.network".init()
222 local wnet = ntm:get_wifinet(network)
223 if wnet then
224 local dev = wnet:get_device()
225 local nets = wnet:get_networks()
226 if dev then
227 luci.sys.call("env -i /sbin/wifi down %q >/dev/null" % dev:name())
228 ntm:del_wifinet(network)
229 ntm:commit("wireless")
230 local _, net
231 for _, net in ipairs(nets) do
232 if net:is_empty() then
233 ntm:del_network(net:name())
234 ntm:commit("network")
235 end
236 end
237 luci.sys.call("env -i /sbin/wifi up %q >/dev/null" % dev:name())
238 end
239 end
240
241 luci.http.redirect(luci.dispatcher.build_url("admin/network/wireless"))
242 end
243
244 function iface_status(ifaces)
245 local netm = require "luci.model.network".init()
246 local rv = { }
247
248 local iface
249 for iface in ifaces:gmatch("[%w%.%-_]+") do
250 local net = netm:get_network(iface)
251 local device = net and net:get_interface()
252 if device then
253 local data = {
254 id = iface,
255 proto = net:proto(),
256 uptime = net:uptime(),
257 gwaddr = net:gwaddr(),
258 dnsaddrs = net:dnsaddrs(),
259 name = device:shortname(),
260 type = device:type(),
261 ifname = device:name(),
262 macaddr = device:mac(),
263 is_up = device:is_up(),
264 rx_bytes = device:rx_bytes(),
265 tx_bytes = device:tx_bytes(),
266 rx_packets = device:rx_packets(),
267 tx_packets = device:tx_packets(),
268
269 ipaddrs = { },
270 ip6addrs = { },
271 subdevices = { }
272 }
273
274 local _, a
275 for _, a in ipairs(device:ipaddrs()) do
276 data.ipaddrs[#data.ipaddrs+1] = {
277 addr = a:host():string(),
278 netmask = a:mask():string(),
279 prefix = a:prefix()
280 }
281 end
282 for _, a in ipairs(device:ip6addrs()) do
283 if not a:is6linklocal() then
284 data.ip6addrs[#data.ip6addrs+1] = {
285 addr = a:host():string(),
286 netmask = a:mask():string(),
287 prefix = a:prefix()
288 }
289 end
290 end
291
292 for _, device in ipairs(net:get_interfaces() or {}) do
293 data.subdevices[#data.subdevices+1] = {
294 name = device:shortname(),
295 type = device:type(),
296 ifname = device:name(),
297 macaddr = device:mac(),
298 macaddr = device:mac(),
299 is_up = device:is_up(),
300 rx_bytes = device:rx_bytes(),
301 tx_bytes = device:tx_bytes(),
302 rx_packets = device:rx_packets(),
303 tx_packets = device:tx_packets(),
304 }
305 end
306
307 rv[#rv+1] = data
308 else
309 rv[#rv+1] = {
310 id = iface,
311 name = iface,
312 type = "ethernet"
313 }
314 end
315 end
316
317 if #rv > 0 then
318 luci.http.prepare_content("application/json")
319 luci.http.write_json(rv)
320 return
321 end
322
323 luci.http.status(404, "No such device")
324 end
325
326 function iface_reconnect(iface)
327 local netmd = require "luci.model.network".init()
328 local net = netmd:get_network(iface)
329 if net then
330 luci.sys.call("env -i /sbin/ifup %q >/dev/null 2>/dev/null" % iface)
331 luci.http.status(200, "Reconnected")
332 return
333 end
334
335 luci.http.status(404, "No such interface")
336 end
337
338 function iface_shutdown(iface)
339 local netmd = require "luci.model.network".init()
340 local net = netmd:get_network(iface)
341 if net then
342 luci.sys.call("env -i /sbin/ifdown %q >/dev/null 2>/dev/null" % iface)
343 luci.http.status(200, "Shutdown")
344 return
345 end
346
347 luci.http.status(404, "No such interface")
348 end
349
350 function iface_delete(iface)
351 local netmd = require "luci.model.network".init()
352 local net = netmd:del_network(iface)
353 if net then
354 luci.sys.call("env -i /sbin/ifdown %q >/dev/null 2>/dev/null" % iface)
355 luci.http.redirect(luci.dispatcher.build_url("admin/network/network"))
356 netmd:commit("network")
357 netmd:commit("wireless")
358 return
359 end
360
361 luci.http.status(404, "No such interface")
362 end
363
364 function wifi_status(devs)
365 local s = require "luci.tools.status"
366 local rv = { }
367
368 local dev
369 for dev in devs:gmatch("[%w%.%-]+") do
370 rv[#rv+1] = s.wifi_network(dev)
371 end
372
373 if #rv > 0 then
374 luci.http.prepare_content("application/json")
375 luci.http.write_json(rv)
376 return
377 end
378
379 luci.http.status(404, "No such device")
380 end
381
382 local function wifi_reconnect_shutdown(shutdown, wnet)
383 local netmd = require "luci.model.network".init()
384 local net = netmd:get_wifinet(wnet)
385 local dev = net:get_device()
386 if dev and net then
387 luci.sys.call("env -i /sbin/wifi down >/dev/null 2>/dev/null")
388
389 dev:set("disabled", nil)
390 net:set("disabled", shutdown and 1 or nil)
391 netmd:commit("wireless")
392
393 luci.sys.call("env -i /sbin/wifi up >/dev/null 2>/dev/null")
394 luci.http.status(200, shutdown and "Shutdown" or "Reconnected")
395
396 return
397 end
398
399 luci.http.status(404, "No such radio")
400 end
401
402 function wifi_reconnect(wnet)
403 wifi_reconnect_shutdown(false, wnet)
404 end
405
406 function wifi_shutdown(wnet)
407 wifi_reconnect_shutdown(true, wnet)
408 end
409
410 function lease_status()
411 local s = require "luci.tools.status"
412
413 luci.http.prepare_content("application/json")
414 luci.http.write('[')
415 luci.http.write_json(s.dhcp_leases())
416 luci.http.write(',')
417 luci.http.write_json(s.dhcp6_leases())
418 luci.http.write(']')
419 end
420
421 function switch_status(switches)
422 local s = require "luci.tools.status"
423
424 luci.http.prepare_content("application/json")
425 luci.http.write_json(s.switch_status(switches))
426 end
427
428 function diag_command(cmd, addr)
429 if addr and addr:match("^[a-zA-Z0-9%-%.:_]+$") then
430 luci.http.prepare_content("text/plain")
431
432 local util = io.popen(cmd % addr)
433 if util then
434 while true do
435 local ln = util:read("*l")
436 if not ln then break end
437 luci.http.write(ln)
438 luci.http.write("\n")
439 end
440
441 util:close()
442 end
443
444 return
445 end
446
447 luci.http.status(500, "Bad address")
448 end
449
450 function diag_ping(addr)
451 diag_command("ping -c 5 -W 1 %q 2>&1", addr)
452 end
453
454 function diag_traceroute(addr)
455 diag_command("traceroute -q 1 -w 1 -n %q 2>&1", addr)
456 end
457
458 function diag_nslookup(addr)
459 diag_command("nslookup %q 2>&1", addr)
460 end
461
462 function diag_ping6(addr)
463 diag_command("ping6 -c 5 %q 2>&1", addr)
464 end
465
466 function diag_traceroute6(addr)
467 diag_command("traceroute6 -q 1 -w 2 -n %q 2>&1", addr)
468 end