4388864eb1e7c3678777a3e9be36b34171da4948
[project/luci.git] / modules / luci-mod-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                         ntm:del_wifinet(network)
228                         ntm:commit("wireless")
229                         local _, net
230                         for _, net in ipairs(nets) do
231                                 if net:is_empty() then
232                                         ntm:del_network(net:name())
233                                         ntm:commit("network")
234                                 end
235                         end
236                         luci.sys.call("env -i /bin/ubus call network reload >/dev/null 2>/dev/null")
237                 end
238         end
239
240         luci.http.redirect(luci.dispatcher.build_url("admin/network/wireless"))
241 end
242
243 function iface_status(ifaces)
244         local netm = require "luci.model.network".init()
245         local rv   = { }
246
247         local iface
248         for iface in ifaces:gmatch("[%w%.%-_]+") do
249                 local net = netm:get_network(iface)
250                 local device = net and net:get_interface()
251                 if device then
252                         local data = {
253                                 id         = iface,
254                                 proto      = net:proto(),
255                                 uptime     = net:uptime(),
256                                 gwaddr     = net:gwaddr(),
257                                 dnsaddrs   = net:dnsaddrs(),
258                                 name       = device:shortname(),
259                                 type       = device:type(),
260                                 ifname     = device:name(),
261                                 macaddr    = device:mac(),
262                                 is_up      = device:is_up(),
263                                 rx_bytes   = device:rx_bytes(),
264                                 tx_bytes   = device:tx_bytes(),
265                                 rx_packets = device:rx_packets(),
266                                 tx_packets = device:tx_packets(),
267
268                                 ipaddrs    = { },
269                                 ip6addrs   = { },
270                                 subdevices = { }
271                         }
272
273                         local _, a
274                         for _, a in ipairs(device:ipaddrs()) do
275                                 data.ipaddrs[#data.ipaddrs+1] = {
276                                         addr      = a:host():string(),
277                                         netmask   = a:mask():string(),
278                                         prefix    = a:prefix()
279                                 }
280                         end
281                         for _, a in ipairs(device:ip6addrs()) do
282                                 if not a:is6linklocal() then
283                                         data.ip6addrs[#data.ip6addrs+1] = {
284                                                 addr      = a:host():string(),
285                                                 netmask   = a:mask():string(),
286                                                 prefix    = a:prefix()
287                                         }
288                                 end
289                         end
290
291                         for _, device in ipairs(net:get_interfaces() or {}) do
292                                 data.subdevices[#data.subdevices+1] = {
293                                         name       = device:shortname(),
294                                         type       = device:type(),
295                                         ifname     = device:name(),
296                                         macaddr    = device:mac(),
297                                         macaddr    = device:mac(),
298                                         is_up      = device:is_up(),
299                                         rx_bytes   = device:rx_bytes(),
300                                         tx_bytes   = device:tx_bytes(),
301                                         rx_packets = device:rx_packets(),
302                                         tx_packets = device:tx_packets(),
303                                 }
304                         end
305
306                         rv[#rv+1] = data
307                 else
308                         rv[#rv+1] = {
309                                 id   = iface,
310                                 name = iface,
311                                 type = "ethernet"
312                         }
313                 end
314         end
315
316         if #rv > 0 then
317                 luci.http.prepare_content("application/json")
318                 luci.http.write_json(rv)
319                 return
320         end
321
322         luci.http.status(404, "No such device")
323 end
324
325 function iface_reconnect(iface)
326         local netmd = require "luci.model.network".init()
327         local net = netmd:get_network(iface)
328         if net then
329                 luci.sys.call("env -i /sbin/ifup %q >/dev/null 2>/dev/null" % iface)
330                 luci.http.status(200, "Reconnected")
331                 return
332         end
333
334         luci.http.status(404, "No such interface")
335 end
336
337 function iface_shutdown(iface)
338         local netmd = require "luci.model.network".init()
339         local net = netmd:get_network(iface)
340         if net then
341                 luci.sys.call("env -i /sbin/ifdown %q >/dev/null 2>/dev/null" % iface)
342                 luci.http.status(200, "Shutdown")
343                 return
344         end
345
346         luci.http.status(404, "No such interface")
347 end
348
349 function iface_delete(iface)
350         local netmd = require "luci.model.network".init()
351         local net = netmd:del_network(iface)
352         if net then
353                 luci.sys.call("env -i /sbin/ifdown %q >/dev/null 2>/dev/null" % iface)
354                 luci.http.redirect(luci.dispatcher.build_url("admin/network/network"))
355                 netmd:commit("network")
356                 netmd:commit("wireless")
357                 return
358         end
359
360         luci.http.status(404, "No such interface")
361 end
362
363 function wifi_status(devs)
364         local s    = require "luci.tools.status"
365         local rv   = { }
366
367         local dev
368         for dev in devs:gmatch("[%w%.%-]+") do
369                 rv[#rv+1] = s.wifi_network(dev)
370         end
371
372         if #rv > 0 then
373                 luci.http.prepare_content("application/json")
374                 luci.http.write_json(rv)
375                 return
376         end
377
378         luci.http.status(404, "No such device")
379 end
380
381 local function wifi_reconnect_shutdown(shutdown, wnet)
382         local netmd = require "luci.model.network".init()
383         local net = netmd:get_wifinet(wnet)
384         local dev = net:get_device()
385         if dev and net then
386                 dev:set("disabled", nil)
387                 net:set("disabled", shutdown and 1 or nil)
388                 netmd:commit("wireless")
389
390                 luci.sys.call("env -i /bin/ubus call network reload >/dev/null 2>/dev/null")
391                 luci.http.status(200, shutdown and "Shutdown" or "Reconnected")
392
393                 return
394         end
395
396         luci.http.status(404, "No such radio")
397 end
398
399 function wifi_reconnect(wnet)
400         wifi_reconnect_shutdown(false, wnet)
401 end
402
403 function wifi_shutdown(wnet)
404         wifi_reconnect_shutdown(true, wnet)
405 end
406
407 function lease_status()
408         local s = require "luci.tools.status"
409
410         luci.http.prepare_content("application/json")
411         luci.http.write('[')
412         luci.http.write_json(s.dhcp_leases())
413         luci.http.write(',')
414         luci.http.write_json(s.dhcp6_leases())
415         luci.http.write(']')
416 end
417
418 function switch_status(switches)
419         local s = require "luci.tools.status"
420
421         luci.http.prepare_content("application/json")
422         luci.http.write_json(s.switch_status(switches))
423 end
424
425 function diag_command(cmd, addr)
426         if addr and addr:match("^[a-zA-Z0-9%-%.:_]+$") then
427                 luci.http.prepare_content("text/plain")
428
429                 local util = io.popen(cmd % addr)
430                 if util then
431                         while true do
432                                 local ln = util:read("*l")
433                                 if not ln then break end
434                                 luci.http.write(ln)
435                                 luci.http.write("\n")
436                         end
437
438                         util:close()
439                 end
440
441                 return
442         end
443
444         luci.http.status(500, "Bad address")
445 end
446
447 function diag_ping(addr)
448         diag_command("ping -c 5 -W 1 %q 2>&1", addr)
449 end
450
451 function diag_traceroute(addr)
452         diag_command("traceroute -q 1 -w 1 -n %q 2>&1", addr)
453 end
454
455 function diag_nslookup(addr)
456         diag_command("nslookup %q 2>&1", addr)
457 end
458
459 function diag_ping6(addr)
460         diag_command("ping6 -c 5 %q 2>&1", addr)
461 end
462
463 function diag_traceroute6(addr)
464         diag_command("traceroute6 -q 1 -w 2 -n %q 2>&1", addr)
465 end