summaryrefslogtreecommitdiffhomepage
path: root/applications/luci-splash/luasrc/view/admin_status/splash.htm
blob: 4151c66c3812da0c9367580fc93e36d537ae7bd4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
<%#
LuCI - Lua Configuration Interface
Copyright 2009 Jo-Philipp Wich <xm@leipzig.freifunk.net>

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

	http://www.apache.org/licenses/LICENSE-2.0

$Id$

-%>

<%-

local utl = require "luci.util"
local ipt = require "luci.sys.iptparser".IptParser()
local uci = require "luci.model.uci".cursor_state()
local wat = require "luci.tools.webadmin"
local fs  = require "nixio.fs"

local clients = { }
local leasetime = tonumber(uci:get("luci_splash", "general", "leasetime") or 1) * 60 * 60
local leasefile = "/tmp/dhcp.leases"

uci:foreach("dhcp", "dnsmasq",
	function(s)
		if s.leasefile then leasefile = s.leasefile end
	end)


uci:foreach("luci_splash", "lease",
	function(s)
		if s.start and s.mac then
			clients[s.mac:lower()] = {
				start   = tonumber(s.start),
				limit   = ( tonumber(s.start) + leasetime ),
				mac     = s.mac:upper(),
				ipaddr  = s.ipaddr,
				policy  = "normal",
				packets = 0,
				bytes   = 0,
			}
		end
	end)

for _, r in ipairs(ipt:find({table="nat", chain="luci_splash_leases"})) do
	if r.options and #r.options >= 2 and r.options[1] == "MAC" then
		if not clients[r.options[2]:lower()] then
			clients[r.options[2]:lower()] = {
				start  = 0,
				limit  = 0,
				mac    = r.options[2]:upper(),
				policy = ( r.target == "RETURN" ) and "whitelist" or "blacklist",
				packets = 0,
				bytes   = 0
			}
		end
	end
end

for mac, client in pairs(clients) do
	client.bytes_in    = 0
	client.bytes_out   = 0
	client.packets_in  = 0
	client.packets_out = 0

	if client.ipaddr then
		local rin  = ipt:find({table="mangle", chain="luci_splash_mark_in", destination=client.ipaddr})
		local rout = ipt:find({table="mangle", chain="luci_splash_mark_out", options={"MAC", client.mac:upper()}})

		if rin and #rin > 0 then
			client.bytes_in   = rin[1].bytes
			client.packets_in = rin[1].packets
		end

		if rout and #rout > 0 then
			client.bytes_out   = rout[1].bytes
			client.packets_out = rout[1].packets
		end
	end
end

uci:foreach("luci_splash", "whitelist",
	function(s)
		if s.mac and clients[s.mac:lower()] then
			clients[s.mac:lower()].policy="whitelist"
		end
	end)

uci:foreach("luci_splash", "blacklist",
	function(s)
		if s.mac and clients[s.mac:lower()] then
			clients[s.mac:lower()].policy=(s.kicked and "kicked" or "blacklist")
		end
	end)		

if fs.access(leasefile) then
	for l in io.lines(leasefile) do
		local time, mac, ip, name = l:match("^(%d+) (%S+) (%S+) (%S+)")
		if time and mac and ip then
			local c = clients[mac:lower()]
			if c then
				c.ip = ip
				c.hostname = ( name ~= "*" ) and name or nil
			end
		end
	end
end

for i, a in ipairs(luci.sys.net.arptable()) do
	local c = clients[a["HW address"]:lower()]
	if c and not c.ip then
		c.ip = a["IP address"]
	end
end

local function showmac(mac)
	if not is_admin then
		mac = mac:gsub("(%S%S:%S%S):%S%S:%S%S:(%S%S:%S%S)", "%1:XX:XX:%2")
	end
	return mac
end

-%>

<%+header%>

<div id="cbi-splash-leases" class="cbi-map">
	<h2><a id="content" name="content"><%:ff_splash Client-Splash%></a></h2>
	<fieldset id="cbi-table-table" class="cbi-section">
		<legend><%:ff_splash_clients Active Clients%></legend>
		<div class="cbi-section-node">
			<% if is_admin then %><form action="<%=REQUEST_URI%>" method="post"><% end %>
			<table class="cbi-section-table">
				<tr class="cbi-section-table-titles">
					<th class="cbi-section-table-cell"><%:ff_splash_hostname Hostname%></th>
					<th class="cbi-section-table-cell"><%:ff_splash_ip IP Address%></th>
					<th class="cbi-section-table-cell"><%:ff_splash_mac MAC Address%></th>
					<th class="cbi-section-table-cell"><%:ff_splash_timeleft Time remaining%></th>
					<th class="cbi-section-table-cell"><%:ff_splash_traffic Traffic in/out%></th>
					<th class="cbi-section-table-cell"><%:ff_splash_policy Policy%></th>
				</tr>

				<%-
					local count = 0
					for _, c in utl.spairs(clients,
						function(a,b)
							if clients[a].policy == clients[b].policy then
								return (clients[a].start > clients[b].start)
							else
								return (clients[a].policy > clients[b].policy)
							end
						end)
					do
						if c.ip then
							count = count + 1
				-%>
					<tr class="cbi-section-table-row cbi-rowstyle-<%=2-(count%2)%>">
						<td class="cbi-section-table-cell"><%=c.hostname or "<em>" .. translate("ff_splash_unknown", "unknown") .. "</em>"%></td>
						<td class="cbi-section-table-cell"><%=c.ip or "<em>" .. translate("ff_splash_unknown", "unknown") .. "</em>"%></td>
						<td class="cbi-section-table-cell"><%=showmac(c.mac)%></td>
						<td class="cbi-section-table-cell"><%=
							(c.limit >= os.time()) and wat.date_format(c.limit-os.time()) or
								(c.policy ~= "normal") and "-" or "<em>" .. translate("ff_splash_expired", "expired") .. "</em>"
						%></td>
						<td class="cbi-section-table-cell"><%=wat.byte_format(c.bytes_in)%> / <%=wat.byte_format(c.bytes_out)%></td>
						<td class="cbi-section-table-cell">
							<% if is_admin then %>
							<select name="policy.<%=c.mac:lower()%>" style="width:200px">
								<option value="whitelist"<%=c.policy=="whitelist" and ' selected="selected"'%>><%:ff_splash_whitelisted whitelisted%></option>
								<option value="normal"<%=c.policy=="normal" and not c.kicked and ' selected="selected"'%>><%:ff_splash_splashed splashed%></option>
								<option value="blacklist"<%=c.policy=="blacklist" and ' selected="selected"'%>><%:ff_splash_blacklisted blacklisted%></option>
								<% if c.policy == "normal" then -%>
									<option value="kicked"><%:ff_splash_tempblock temporarily blocked%></option>
								<%- end %>
							</select>
							<input type="submit" class="cbi-button cbi-button-save" name="save.<%=c.mac:lower()%>" value="<%:save Save%>" />
							<% else %>
							<%=c.policy%>
							<% end %>
						</td>
					</tr>
				<%- 
						end
					end

					if count == 0 then
				-%>
					<tr class="cbi-section-table-row">
						<td colspan="7" class="cbi-section-table-cell">
							<br /><em><%:ff_splash_noclients No clients connected%></em><br />
						</td>
					</tr>
				<%- end -%>
			</table>
			<% if is_admin then %></form><% end %>
		</div>
	</fieldset>
</div>

<%+footer%>