luci/applications/luci-app-qos/luasrc/model/cbi/qos/qos.lua

82 lines
2.3 KiB
Lua
Raw Normal View History

-- Copyright 2008 Steven Barth <steven@midlink.org>
-- Licensed to the public under the Apache License 2.0.
2009-07-19 00:24:58 +00:00
local wa = require "luci.tools.webadmin"
local fs = require "nixio.fs"
m = Map("qos", translate("Quality of Service"),
translate("With <abbr title=\"Quality of Service\">QoS</abbr> you " ..
"can prioritize network traffic selected by addresses, " ..
"ports or services."))
2008-04-14 17:15:49 +00:00
s = m:section(TypedSection, "interface", translate("Interfaces"))
2008-04-14 17:15:49 +00:00
s.addremove = true
2010-03-27 03:02:16 +00:00
s.anonymous = false
2008-04-14 17:15:49 +00:00
2010-05-15 18:46:58 +00:00
e = s:option(Flag, "enabled", translate("Enable"))
e.rmempty = false
2008-04-14 17:15:49 +00:00
c = s:option(ListValue, "classgroup", translate("Classification group"))
c:value("Default", translate("default"))
2008-04-14 17:15:49 +00:00
c.default = "Default"
s:option(Flag, "overhead", translate("Calculate overhead"))
2008-04-14 17:15:49 +00:00
s:option(Flag, "halfduplex", translate("Half-duplex"))
dl = s:option(Value, "download", translate("Download speed (kbit/s)"))
dl.datatype = "and(uinteger,min(1))"
2008-04-14 17:15:49 +00:00
ul = s:option(Value, "upload", translate("Upload speed (kbit/s)"))
ul.datatype = "and(uinteger,min(1))"
2008-04-14 17:15:49 +00:00
s = m:section(TypedSection, "classify", translate("Classification Rules"))
2008-08-13 16:18:39 +00:00
s.template = "cbi/tblsection"
2008-04-14 17:15:49 +00:00
s.anonymous = true
s.addremove = true
s.sortable = true
2008-04-14 17:15:49 +00:00
t = s:option(ListValue, "target", translate("Target"))
t:value("Priority", translate("priority"))
t:value("Express", translate("express"))
t:value("Normal", translate("normal"))
t:value("Bulk", translate("low"))
local uci = require "luci.model.uci"
uci.cursor():foreach("qos", "class",
function (section)
local n = section[".name"]
if string.sub(n,-string.len("_down"))~="_down" then
t:value(n)
end
end)
2008-04-14 17:15:49 +00:00
t.default = "Normal"
srch = s:option(Value, "srchost", translate("Source host"))
2008-08-13 16:18:39 +00:00
srch.rmempty = true
srch:value("", translate("all"))
2009-07-19 00:24:58 +00:00
wa.cbi_add_knownips(srch)
2008-08-13 16:18:39 +00:00
dsth = s:option(Value, "dsthost", translate("Destination host"))
2008-08-13 16:18:39 +00:00
dsth.rmempty = true
dsth:value("", translate("all"))
2009-07-19 00:24:58 +00:00
wa.cbi_add_knownips(dsth)
p = s:option(Value, "proto", translate("Protocol"))
2008-08-13 16:18:39 +00:00
p:value("", translate("all"))
2008-04-14 17:15:49 +00:00
p:value("tcp", "TCP")
p:value("udp", "UDP")
p:value("icmp", "ICMP")
2008-08-13 16:18:39 +00:00
p.rmempty = true
2008-04-14 17:15:49 +00:00
ports = s:option(Value, "ports", translate("Ports"))
2008-08-13 16:18:39 +00:00
ports.rmempty = true
ports:value("", translate("all"))
2008-04-14 17:15:49 +00:00
bytes = s:option(Value, "connbytes", translate("Number of bytes"))
2009-01-17 16:19:43 +00:00
comment = s:option(Value, "comment", translate("Comment"))
return m