14 | >
17 | " />
18 |
19 |
38 |
--------------------------------------------------------------------------------
/src/www/luci-static/resources/icons/unknown_tracker.svg:
--------------------------------------------------------------------------------
1 |
2 |
--------------------------------------------------------------------------------
/Makefile:
--------------------------------------------------------------------------------
1 | NAME = luci-app-rtorrent
2 | VERSION = $(shell awk '/^Version:/ {print $$2}' control/control)
3 | ARCH = $(shell awk '/^Architecture:/ {print $$2}' control/control)
4 | IPK = $(NAME)_$(VERSION)_$(ARCH).ipk
5 |
6 | .PHONY: control
7 |
8 | all: packages-file
9 |
10 | ipk: clean control data
11 | mkdir -p ipk
12 | echo "2.0" > ipk/debian-binary
13 | cd ipk && tar czf $(IPK) control.tar.gz data.tar.gz debian-binary
14 | rm -f ipk/*.tar.gz ipk/debian-binary
15 |
16 | control:
17 | mkdir -p ipk
18 | rm -f ../ipk/control.tar.gz
19 | cd control && tar czf ../ipk/control.tar.gz *
20 |
21 | data:
22 | mkdir -p ipk
23 | cd src && tar czf ../ipk/data.tar.gz *
24 |
25 | key:
26 | mkdir -p key
27 | usign -G -s key/sign_key -p key/sign_key.pub -c "$(NAME) key"
28 | cd key && usign -F -p sign_key.pub | xargs cp sign_key.pub
29 |
30 | packages-file: ipk
31 | mkdir -p ipk
32 | cp control/control ipk/Packages
33 | echo "Filename: $(IPK)" >> ipk/Packages
34 | wc -c ipk/$(IPK) | awk '{print "Size:", $$1}' >> ipk/Packages
35 | sha256sum ipk/$(IPK) | awk '{print "SHA256sum:", $$1}' >> ipk/Packages
36 | usign -S -m ipk/Packages -s key/sign_key
37 | gzip ipk/Packages
38 |
39 | clean:
40 | rm -fr ipk
41 |
42 | test-deploy: test-remove
43 | cp -a src/usr/* /usr
44 | cp -a src/www/* /www
45 |
46 | test-remove:
47 | find src/usr src/www -type f -o -type l | sed 's/^src//' | xargs rm -f
48 | rm -fr /usr/lib/lua/luci/model/cbi/rtorrent
49 | rm -fr /usr/lib/lua/luci/view/rtorrent
50 | rm -fr /usr/lib/lua/xmlrpc
51 | rm -fr /www/luci-static/resources/icons/filetypes
52 | rm -fr /tmp/luci-indexcache* /tmp/luci-modulecache
53 |
54 | test-reinstall:
55 | opkg list-installed | grep -q $(NAME) \
56 | && opkg --force-reinstall install $(NAME) \
57 | || echo "$(NAME) not installed, skip reinstall"
58 |
59 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/model/cbi/rtorrent/logger.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2014-2021 Sandor Balazsi Download from this location is not permitted!
") 29 | elseif nixio.fs.stat(path, "type") == "reg" then 30 | download_file(path) 31 | elseif nixio.fs.stat(path, "type") == "dir" then 32 | download_folder(path) 33 | else 34 | http.write("No such file or directory: " .. path .. "
") 35 | end 36 | end 37 | 38 | function download_file(file) 39 | http.header("Content-Disposition", 'attachment; filename="%s"' % nixio.fs.basename(file)) 40 | http.header("Transfer-Encoding", "chunked") 41 | http.prepare_content("application/octet-stream") 42 | pump(nixio.open(file, "r")) 43 | end 44 | 45 | function download_folder(folder) 46 | if http.getenv("HTTP_USER_AGENT"):lower():find("linux") 47 | or nixio.fs.stat("/usr/bin/zip", "type") ~= "reg" then 48 | download_as_tar(folder) 49 | else 50 | download_as_zip(folder) 51 | end 52 | end 53 | 54 | function download_as_tar(folder) 55 | http.header("Content-Disposition", 'attachment; filename="%s.tar"' % nixio.fs.basename(folder)) 56 | http.header("Transfer-Encoding", "chunked") 57 | http.prepare_content("application/x-tar") 58 | pump(io.popen('tar -cf - -C "%s" .' % folder)) 59 | end 60 | 61 | function download_as_zip(folder) 62 | http.header("Content-Disposition", 'attachment; filename="%s.zip"' % nixio.fs.basename(folder)) 63 | http.header("Transfer-Encoding", "chunked") 64 | http.prepare_content("application/zip") 65 | pump(io.popen('cd "%s" && zip -0 -r - .' % folder)) 66 | end 67 | 68 | function pump(fh) 69 | local blocksize = 2^13 --8K 70 | repeat 71 | local chunk = fh:read(blocksize) 72 | http.write(string.format("%X", chunk and #chunk or 0) .. "\r\n" .. chunk .. "\r\n") 73 | until not chunk or chunk == "" 74 | fh:close() 75 | end 76 | -------------------------------------------------------------------------------- /src/usr/lib/lua/xmlrpc/scgi.lua: -------------------------------------------------------------------------------- 1 | -- Copyright 2003-2010 Kepler Project 2 | -- Copyright 2014-2021 Sandor Balazsi.* to download everything from the feed." )
41 | match.template = "rtorrent/tvalue"
42 | match.rmempty = false
43 | match.rows = 1
44 |
45 | exclude = rss_rule:option(TextValue, "exclude", "Exclude",
46 | 'Exclude torrents that names match this (case-insensitive) lua pattern.'
47 | % "https://www.lua.org/pil/20.2.html")
48 | exclude.rows = 1
49 |
50 | minsize = rss_rule:option(Value, "minsize", "Min size (MiB):")
51 |
52 | maxsize = rss_rule:option(Value, "maxsize", "Max size (MiB):")
53 |
54 | local feeds = common.uci_sections(map.config, "rss-feed")
55 | if feeds:empty() then
56 | feed = rss_rule:option(DummyValue, "feed", "Feed")
57 | feed.template = "rtorrent/dvalue"
58 | feed.rawhtml = true
59 | feed.value = 'RSS feeds not yet added. You can do it here.
'
60 | % build_url("admin", "rtorrent", "settings", "rss")
61 | else
62 | feed = rss_rule:option(DropDown, "feed", "Feed", 'You can manage RSS feeds here.'
63 | % build_url("admin", "rtorrent", "settings", "rss"))
64 | -- TODO: warning on disabled feed
65 | feed.template = "rtorrent/dropdown"
66 | feed.multiple = true
67 | feed.display = 3
68 | feed.delimiter = "|"
69 | feed.cfgvalue = function(self, section)
70 | local value = AbstractValue.cfgvalue(self, section)
71 | return type(value) == "string" and value:split(feed.delimiter) or value
72 | end
73 | feeds:foreach(function(f) feed:value(f:get("name"), f:get("name")
74 | .. (f:get("enabled") == "0" and " (disabled)" or "")) end)
75 | end
76 |
77 | tags = rss_rule:option(Value, "tags", "Add tags")
78 | -- tags.default = ""
79 |
80 | destdir = rss_rule:option(Value, "destdir", "Download directory")
81 | destdir.default = rtorrent.call("directory.default")
82 | -- destdir.datatype = "directory"
83 | destdir.rmempty = false
84 |
85 | autostart = rss_rule:option(Flag, "autostart", "Start download")
86 | autostart.default = "1"
87 | autostart.rmempty = false
88 |
89 | return map
90 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/model/cbi/rtorrent/torrent/info.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2014-2021 Sandor Balazsi %s
' % hash
37 |
38 | local torrent_url = torrent:get("custom_url"):urldecode()
39 | url = form:field(DummyValue, "url", "Torrent URL")
40 | url.template = "rtorrent/dvalue"
41 | url.rawhtml = true
42 | url.value = '%s
' % (torrent_url:blank()
43 | and 'Unknown, added by an uploaded torrent file or magnet URI.'
44 | or '%s' % { torrent_url , torrent_url })
45 |
46 | started = form:field(DummyValue, "started", "Download started")
47 | started.template = "rtorrent/dvalue"
48 | started.rawhtml = true
49 | started.value = '%s
' % (torrent:get("timestamp_started") == 0
50 | and "not yet started"
51 | or os.date("!%Y-%m-%d %H:%M:%S", torrent:get("timestamp_started")))
52 |
53 | finished = form:field(DummyValue, "finished", "Download finished")
54 | finished.template = "rtorrent/dvalue"
55 | finished.rawhtml = true
56 | finished.value = '%s
' % (torrent:get("timestamp_finished") == 0
57 | and "not yet finished"
58 | or os.date("!%Y-%m-%d %H:%M:%S", torrent:get("timestamp_finished")))
59 |
60 | status = form:field(DummyValue, "status", "Status")
61 | status.template = "rtorrent/dvalue"
62 | status.rawhtml = true
63 | status.value = '%s
' % torrent:get("message")
64 |
65 | tags = form:field(Value, "tags", "Tags")
66 | tags.cfgvalue = function(self, section) return torrent:get("custom1") end
67 | tags.write = function(self, section, value)
68 | rtorrent.call("d.custom1.set", hash, value)
69 | end
70 | tags.remove = function(self, section)
71 | if self:cfgvalue(section) ~= "" then
72 | self:write(section, "")
73 | end
74 | end
75 |
76 | comment = form:field(TextValue, "comment", "Comment")
77 | comment.rows = 5
78 | comment.cfgvalue = function(self, section)
79 | return torrent:get("custom_comment"):urldecode()
80 | end
81 | comment.write = function(self, section, value)
82 | rtorrent.call("d.custom.set", hash, "comment", value:urlencode())
83 | end
84 | comment.remove = function(self, section)
85 | if self:cfgvalue(section) ~= "" then
86 | self:write(section, "")
87 | end
88 | end
89 |
90 | return form
91 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/view/rtorrent/tblsection.htm:
--------------------------------------------------------------------------------
1 |
22 |
23 |
24 | <%+cbi/tblsection%>
25 |
26 | <% if self.pages and self.pages ~= "" then %>
27 | <%=self.pages%>
28 | <% end %>
29 |
94 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/model/cbi/rtorrent/torrent/chunks.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2014-2021 Sandor Balazsi or magnet URI(s)", 43 | "All torrent URL and magnet URI should be in a separate line.") 44 | uri.template = "rtorrent/tvalue" 45 | uri.rows = 3 46 | uri.validate = function(self, value, section) 47 | local errors = array() 48 | for _, line in ipairs(value:split("\r\n")) do 49 | if "magnet:" == line:trim():sub(1, 7) then 50 | local magnet, err = common.parse_magnet(line:trim()) 51 | if not magnet then errors:insert(err) 52 | else 53 | local content, err = bencode.encode({ ["magnet-uri"] = line:trim() }) 54 | if not content then errors:insert("Failed to encode torrent: " .. err .. "!") 55 | else 56 | torrents:insert({ 57 | ["name"] = magnet:get("dn") 58 | and magnet:get("dn"):get(1) or line:trim(), 59 | ["data"] = nixio.bin.b64encode(content), 60 | ["icon"] = common.tracker_icon(common.extract_urls(magnet)) 61 | }) 62 | end 63 | end 64 | elseif "file://" == line:trim():sub(1, 7) then 65 | local filename = line:trim():sub(8) 66 | if not filename:starts("/") then filename = uploads .. "/" .. filename end 67 | local result, err = file.validate(self, filename) 68 | if not result then errors:insert(err) end 69 | elseif "http://" == line:trim():sub(1, 7) or "https://" == line:trim():sub(1, 8) then 70 | local content, err = common.download(line:trim()) 71 | if not content then 72 | errors:insert("Failed to download torrent: " .. err .. "!") 73 | else 74 | local data, err = bencode.decode(content) 75 | if not data then 76 | errors:insert("Failed to parse torrent: " .. err .. "!") 77 | else 78 | -- TODO: extract comment from torrent file 79 | torrents:insert({ 80 | ["name"] = data.info.name, 81 | ["data"] = nixio.bin.b64encode(content), 82 | ["icon"] = common.tracker_icon(array({ line:trim(), 83 | unpack(common.extract_urls(array(data)):get()) })), 84 | ["url"] = line:trim() 85 | }) 86 | end 87 | end 88 | else 89 | errors:insert("Not supported URL/URI: \"%s\"! " % line:trim() 90 | .. "Supported schemes: \"http://\", \"https://\", \"file://\", \"magnet:\".") 91 | end 92 | end 93 | if not errors:empty() then 94 | for i, err in errors:pairs() do 95 | if not errors:last(i) then self:add_error(section, err) end 96 | end 97 | return nil, errors:last() 98 | end 99 | return value 100 | end 101 | 102 | file = form:field(FileUpload, "file", "Upload torrent file") 103 | file.template = "rtorrent/upload" 104 | file.root_directory = uploads 105 | file.unsafeupload = true 106 | file.validate = function(self, value, section) 107 | if not datatypes.file(value) then 108 | return nil, "File '" .. value .. "' does not exists!" 109 | elseif not nixio.fs.access(value, "r") then 110 | return nil, "File '" .. value .. "' read permission denied!" 111 | end 112 | local content = nixio.fs.readfile(value) 113 | local data, err = bencode.decode(content) 114 | if not data then 115 | return nil, "Failed to parse torrent file '" .. value .. "': " .. err .. "!" 116 | end 117 | -- TODO: extract comment from torrent file 118 | torrents:insert({ 119 | ["name"] = data.info.name, 120 | ["data"] = nixio.bin.b64encode(content), 121 | ["icon"] = common.tracker_icon(common.extract_urls(array(data))) 122 | }) 123 | return value 124 | end 125 | 126 | dir = form:field(Value, "dir", "Download directory") 127 | dir.default = rtorrent.call("directory.default") 128 | dir.rmempty = false 129 | dir.validate = function(self, value, section) 130 | if not value then 131 | return nil, "Download directory must be provided!" 132 | elseif not datatypes.directory(value) then 133 | return nil, "Directory '" .. value .. "' does not exists!" 134 | elseif not nixio.fs.access(value, "w") then 135 | return nil, "Directory '" .. value .. "' write permission denied!" 136 | end 137 | return value 138 | end 139 | 140 | tags = form:field(Value, "tags", "Tags") 141 | 142 | start = form:field(Flag, "start", "Start now") 143 | start.default = "1" 144 | start.rmempty = false 145 | 146 | return form 147 | -------------------------------------------------------------------------------- /src/usr/lib/lua/luci/model/cbi/rtorrent/array.lua: -------------------------------------------------------------------------------- 1 | -- Copyright 2014-2021 Sandor Balazsi
%s
' % {
93 | last_success, last_failed, color, text
94 | }
95 | end
96 |
97 | function format.peers(value)
98 | local latest_new_peers, latest_sum_peers = value % 1e9, math.floor(value / 1e9)
99 | return '%d/%d
' % {
100 | latest_new_peers, latest_sum_peers
101 | }
102 | end
103 |
104 | local total = array():set("count", 0):set("urls", array())
105 | local torrent = array(rtorrent.batchcall("d.", hash, "name", "state", "is_active"))
106 | local trackers = array(rtorrent.multicall("t.", hash, "",
107 | "is_enabled", "url", "latest_new_peers", "latest_sum_peers",
108 | "failed_counter", "success_counter", "success_time_last", "failed_time_last",
109 | "scrape_complete", "scrape_incomplete", "scrape_downloaded", "scrape_time_last"))
110 | :foreach(compute_values, torrent)
111 | :foreach(compute_total, total)
112 | :sort(sort_column, sort_order)
113 | :limit(10, (page - 1) * 10)
114 | :foreach(format_values)
115 | :insert(total:get("count") > 1 and total or nil)
116 |
117 | local form, list, icon, url, status, peers, seeds, leeches, downloaded, updated, enabled, add
118 |
119 | _G.redirect = build_url("admin", "rtorrent", "main", unpack(common.get_cookie("rtorrent-main", {})))
120 | form = SimpleForm("rtorrent", torrent:get("name"))
121 | form.template = "rtorrent/simpleform"
122 | form.notifications = common.get_cookie("rtorrent-notifications", {})
123 | form.all_tabs = array():append("info", "files", "trackers", "peers", "chunks"):get()
124 | form.tab_url_postfix = function(tab)
125 | local filters = (tab == "trackers") and array(arg) or array(common.get_cookie("rtorrent-" .. tab, {}))
126 | return filters:get(1) == hash and filters:join("/") or hash
127 | end
128 | form.handle = function(self, state, data)
129 | if state == FORM_VALID then
130 | common.set_cookie("rtorrent-notifications", form.notifications)
131 | luci.http.redirect(nixio.getenv("REQUEST_URI"))
132 | end
133 | return true
134 | end
135 | form.cancel = "Trigger tracker scrape"
136 | form.on_cancel = function()
137 | rtorrent.batchcall("d.", hash, "tracker.send_scrape=0", "save_resume")
138 | luci.http.redirect(nixio.getenv("REQUEST_URI"))
139 | end
140 |
141 | list = form:section(Table, trackers:get())
142 | list.template = "rtorrent/tblsection"
143 | list.name = "rtorrent-trackers"
144 | list.pages = common.pagination(total:get("count") or trackers:size(), page, common.pagination_link,
145 | build_url("admin", "rtorrent", "torrent", "trackers", hash, sort)):join()
146 | list.column = function(self, class, option, title, tooltip, sort_by)
147 | return self:option(class, option, '%s' % {
148 | build_url("admin", "rtorrent", "torrent", "trackers", hash, sort_by),
149 | tooltip, sort == sort_by and ' class="active"' or "", title
150 | })
151 | end
152 |
153 | icon = list:option(DummyValue, "icon")
154 | icon.rawhtml = true
155 | icon.width = "1%"
156 | icon.classes = { "nowrap" }
157 |
158 | url = list:column(DummyValue, "url", "Url", "Sort by url", "url-asc")
159 | url.classes = { "wrap" }
160 |
161 | status = list:column(DummyValue, "status", "Status", "Sort by tracker status", "status-asc")
162 | status.rawhtml = true
163 | status.width = "1%"
164 | status.classes = { "nowrap", "center" }
165 |
166 | peers = list:column(DummyValue, "peers", "Peers", "Sort by peers", "peers-desc")
167 | peers.rawhtml = true
168 | peers.width = "1%"
169 | peers.classes = { "nowrap", "center" }
170 |
171 | seeds = list:column(DummyValue, "seeds", "Seeds", "Sort by complete peers", "seeds-desc")
172 | seeds.classes = { "nowrap", "center" }
173 |
174 | leeches = list:column(DummyValue, "leeches", "Leeches", "Sort by incomplete peers", "leeches-desc")
175 | leeches.width = "1%"
176 | leeches.classes = { "nowrap", "center" }
177 |
178 | downloaded = list:column(DummyValue, "downloaded", "Downloaded",
179 | "Sort by number of downloads", "downloaded-desc")
180 | downloaded.width = "1%"
181 | downloaded.classes = { "nowrap", "center" }
182 |
183 | updated = list:column(DummyValue, "updated", "Updated", "Sort by last scrape time", "updated-desc")
184 | updated.rawhtml = true
185 | updated.width = "1%"
186 | updated.classes = { "nowrap", "center" }
187 |
188 | enabled = list:column(Flag, "enabled", "Enabled", "Sort by enabled state", "enabled-desc")
189 | enabled.width = "1%"
190 | enabled.classes = { "nowrap", "center" }
191 | enabled.rmempty = false
192 | enabled.write = function(self, section, value)
193 | if trackers:get(section):get("index") and value ~= trackers:get(section):get("is_enabled") then
194 | rtorrent.call("t.is_enabled.set",
195 | hash .. ":t" .. trackers:get(section):get("index"), tonumber(value))
196 | end
197 | end
198 |
199 | add = form:field(TextValue, "add_tracker", "Add tracker(s)", "All tracker URL should be in a separate line.")
200 | add.rows = 2
201 | add.validate = function(self, value, section)
202 | local errors = array()
203 | for _, line in ipairs(value:split("\r\n")) do
204 | if not line:trim():lower():match("^%w+://[%w_-]+%.[%w_-]+") then
205 | errors:insert("Invalid URL: %s" % line:trim())
206 | elseif total:get("urls"):contains(line:trim()) then
207 | table.insert(form.notifications, "Skipped existing tracker %s" % line:trim())
208 | else
209 | table.insert(form.notifications, "Added tracker %s" % line:trim())
210 | end
211 | end
212 | if not errors:empty() then
213 | form.notifications = {}
214 | for i, err in errors:pairs() do
215 | if not errors:last(i) then self:add_error(section, err) end
216 | end
217 | return nil, errors:last()
218 | end
219 | return value
220 | end
221 | add.write = function(self, section, value)
222 | local tracker_group = trackers:filter(function(value) return value:get("index") end):size()
223 | local tracker_added = false
224 | for _, line in ipairs(value:split("\r\n")) do
225 | if not total:get("urls"):contains(line:trim()) then
226 | rtorrent.call("d.tracker.insert", hash, tracker_group, line:trim())
227 | tracker_group, tracker_added = (tracker_group + 1) % 33, true
228 | end
229 | end
230 | if tracker_added and torrent:get("state") > 0 then
231 | if torrent:get("is_active") == 0 then
232 | rtorrent.batchcall("d.", hash, "stop", "close", "start", "pause")
233 | else
234 | rtorrent.batchcall("d.", hash, "stop", "close", "start")
235 | end
236 | end
237 | end
238 |
239 | return form
240 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/model/cbi/rtorrent/torrent/files.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2014-2021 Sandor Balazsi %s
' % { value, common.human_size(value) }
140 | end
141 |
142 | function format.done(value, key, file)
143 | return "%.1f%%" % value
144 | end
145 |
146 | local folders, total = array(), array():set("priority", array()):set("count", 0)
147 | local torrent = array(rtorrent.batchcall("d.", hash, "name", "is_multi_file"))
148 | local files = array(rtorrent.multicall("f.", hash, "/" .. array(path:get()):insert(""):join("/") .. "*",
149 | "path", "path_components", "frozen_path", "size_bytes",
150 | "size_chunks", "completed_chunks", "priority"))
151 | :filter(filter_by_folders, folders)
152 | :foreach(compute_values, torrent)
153 | :foreach(compute_total, total)
154 | :sort(sort_by_folders, sort_column, sort_order)
155 | :limit(10, (page - 1) * 10)
156 | :foreach(format_values)
157 | :insert(1, compute_navigate_up)
158 | :insert(total:get("count") > 1 and total or nil)
159 |
160 | local form, breadcrumb, list, icon, name, size, done, prio
161 |
162 | _G.redirect = build_url("admin", "rtorrent", "main", unpack(common.get_cookie("rtorrent-main", {})))
163 | form = SimpleForm("rtorrent", torrent:get("name"))
164 | form.template = "rtorrent/simpleform"
165 | form.all_tabs = array():append("info", "files", "trackers", "peers", "chunks"):get()
166 | form.tab_url_postfix = function(tab)
167 | local filters = (tab == "files") and args or array(common.get_cookie("rtorrent-" .. tab, {}))
168 | return filters:get(1) == hash and filters:join("/") or hash
169 | end
170 | form.handle = function(self, state, data)
171 | if state == FORM_VALID then luci.http.redirect(nixio.getenv("REQUEST_URI")) end
172 | return true
173 | end
174 | if torrent:get("is_multi_file") == 1 and total:get("size_chunks") == total:get("completed_chunks")
175 | and total:get("folders") > 0 or total:get("files") > 1 then
176 | form.cancel = "Download this folder"
177 | form.on_cancel = function()
178 | luci.http.redirect(build_url(unpack(array():append("admin", "rtorrent", "download", hash)
179 | :append(unpack(path:get())):map(string.urlencode):get())))
180 | end
181 | end
182 |
183 | if not path:empty() then
184 | breadcrumb = form:field(DummyValue, "breadcrumb")
185 | breadcrumb.rawhtml = true
186 | breadcrumb.value = array(path:get()):insert(1, ""):map(function(subpath, index, subpaths)
187 | return '%s' % {
188 | build_url("admin", "rtorrent", "torrent", "files", hash, sort,
189 | subpaths:limit(index):filter(string.not_blank):map(string.urlencode):join("/"), "1"),
190 | subpath:blank() and '
' or subpath
191 | }
192 | end):join(" / ")
193 | end
194 |
195 | list = form:section(Table, files:get())
196 | list.template = "rtorrent/tblsection"
197 | list.name = "rtorrent-files"
198 | list.pages = common.pagination(total:get("count") or files:size(), tonumber(page), common.pagination_link,
199 | build_url("admin", "rtorrent", "torrent", "files", hash, sort, path:map(string.urlencode):join("/"))):join()
200 | list.column = function(self, class, option, title, tooltip, sort_by)
201 | return self:option(class, option, '%s' % {
202 | build_url("admin", "rtorrent", "torrent", "files",
203 | hash, sort_by, path:map(string.urlencode):join("/"), "1"),
204 | tooltip, sort == sort_by and ' class="active"' or "", title
205 | })
206 | end
207 |
208 | icon = list:option(DummyValue, "icon")
209 | icon.rawhtml = true
210 | icon.width = "1%"
211 | icon.classes = { "nowrap" }
212 |
213 | name = list:column(DummyValue, "name", "Name", "Sort by name", "name-asc")
214 | name.rawhtml = true
215 | name.classes = { "wrap" }
216 |
217 | size = list:column(DummyValue, "size", "Size", "Sort by size", "size-desc")
218 | size.rawhtml = true
219 | size.width = "1%"
220 | size.classes = { "nowrap", "center" }
221 |
222 | done = list:column(DummyValue, "done", "Done", "Sort by download done percent", "done-desc")
223 | done.rawhtml = true
224 | done.width = "10%"
225 | done.classes = { "nowrap", "center" }
226 |
227 | local all_files
228 | prio = list:column(ListValue, "priority", "Priority", "Sort by priority", "priority-desc")
229 | prio.classes = { "nowrap", "center" }
230 | prio.width = "15%"
231 | prio:value("0", "off")
232 | prio:value("1", "normal")
233 | prio:value("2", "high")
234 | prio:value("", "hidden")
235 | prio:value("mixed", "mixed")
236 | prio.write = function(self, section, value)
237 | if files:get(section):get("type") == "total" then return end
238 | if not all_files then
239 | all_files = array(rtorrent.multicall("f.", hash, "", "path_components", "priority"))
240 | end
241 | local indices = array()
242 | all_files:foreach(function(file, index)
243 | if files:get(section):get("path_components"):limit(path:size() + 1):join("/")
244 | == file:get("path_components"):limit(path:size() + 1):join("/")
245 | and file:get("priority") ~= tonumber(value) then
246 | indices:insert(index - 1)
247 | end
248 | end)
249 | for _, index in indices:pairs() do
250 | rtorrent.call("f.priority.set", hash .. ":f" .. index, tonumber(value))
251 | rtorrent.call("d.update_priorities", hash)
252 | end
253 | end
254 |
255 | return form
256 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/luci/model/cbi/rtorrent/torrent/peers.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2014-2021 Sandor Balazsi %s
" % {
139 | value, value == 0 and "--" or common.human_size(value)
140 | }
141 | end
142 |
143 | function format.location(value, key, peer)
144 | if peer:get("latitude") and peer:get("latitude"):not_blank() then
145 | return '%s' % {
146 | map[map_provider](peer:get("latitude"), peer:get("longitude"), 12):get("url"),
147 | value
148 | }
149 | else return value end
150 | end
151 |
152 | function format.flags(value)
153 | local title = array()
154 | if value:match("B") then title:insert("Peer is banned") end
155 | if value:match("I") then title:insert("Peer is an incoming connection") end
156 | if value:match("E") then title:insert("Peer is using protocol encryption")
157 | elseif value:match("e") then title:insert("Peer is using header message obfuscation") end
158 | if value:match("S") then title:insert("Peer is snubbed") end
159 | if value:match("F") then title:insert("Peer is marked as preferred")
160 | elseif value:match("f") then title:insert("Peer is marked as unwanted") end
161 | return '%s
' % { title:join("
"), value }
162 | end
163 |
164 | local total = array():set("count", 0)
165 | local torrent = array(rtorrent.batchcall("d.", hash, "name"))
166 | local peers = array(rtorrent.multicall("p.", hash, "",
167 | "address", "client_version", "banned",
168 | "is_incoming", "is_encrypted", "is_obfuscated", "is_snubbed", "is_preferred", "is_unwanted",
169 | "completed_percent", "down_rate", "up_rate", "up_total", "down_total"))
170 | :foreach(compute_values)
171 | :foreach(compute_total, total)
172 | :sort(sort_column, sort_order)
173 | :limit(10, (page - 1) * 10)
174 | :foreach(compute_geolocation)
175 | :foreach(format_values)
176 | :insert(total:get("count") > 1 and total or nil)
177 |
178 | local form, list, icon, location, address, client, flags, done, down_speed, up_speed, downloaded, uploaded
179 |
180 | _G.redirect = build_url("admin", "rtorrent", "main", unpack(common.get_cookie("rtorrent-main", {})))
181 | form = SimpleForm("rtorrent", torrent:get("name"))
182 | form.template = "rtorrent/simpleform"
183 | form.submit = false
184 | form.reset = false
185 | form.all_tabs = array():append("info", "files", "trackers", "peers", "chunks"):get()
186 | form.tab_url_postfix = function(tab)
187 | local filters = (tab == "peers") and array(arg) or array(common.get_cookie("rtorrent-" .. tab, {}))
188 | return filters:get(1) == hash and filters:join("/") or hash
189 | end
190 | form.handle = function(self, state, data)
191 | if state == FORM_VALID then luci.http.redirect(nixio.getenv("REQUEST_URI")) end
192 | return true
193 | end
194 |
195 | list = form:section(Table, peers:get())
196 | list.template = "rtorrent/tblsection"
197 | list.name = "rtorrent-peers"
198 | list.pages = common.pagination(total:get("count") or peers:size(), page, common.pagination_link,
199 | build_url("admin", "rtorrent", "torrent", "peers", hash, sort)):join()
200 | list.column = function(self, class, option, title, tooltip, sort_by)
201 | return self:option(class, option, '%s' % {
202 | build_url("admin", "rtorrent", "torrent", "peers", hash, sort_by),
203 | tooltip, sort == sort_by and ' class="active"' or "", title
204 | })
205 | end
206 |
207 | icon = list:option(DummyValue, "icon")
208 | icon.rawhtml = true
209 | icon.width = "1%"
210 | icon.classes = { "nowrap" }
211 |
212 | location = list:option(DummyValue, "location",
213 | 'Location')
214 | location.rawhtml = true
215 | location.classes = { "wrap" }
216 |
217 | address = list:option(DummyValue, "address", "Address")
218 | address.rawhtml = true
219 | address.width = "1%"
220 | address.classes = { "nowrap", "center" }
221 |
222 | client = list:column(DummyValue, "client", "Client", "Sort by client version", "client-asc")
223 | client.width = "1%"
224 | client.classes = { "nowrap", "center" }
225 |
226 | flags = list:column(DummyValue, "flags", "Flags", "Sort by peer flags", "flags-asc")
227 | flags.rawhtml = true
228 | flags.width = "1%"
229 | flags.classes = { "nowrap", "center" }
230 |
231 | done = list:column(DummyValue, "done", "Done", "Sort by peer completed data percent", "done-desc")
232 | done.width = "1%"
233 | done.classes = { "nowrap", "center" }
234 |
235 | down_speed = list:column(DummyValue, "down_speed", "DownSpeed", 236 | "Sort by download speed (kB/s)", "down_speed-desc") 237 | down_speed.width = "1%" 238 | down_speed.classes = { "nowrap", "center" } 239 | 240 | up_speed = list:column(DummyValue, "up_speed", "Up
Speed", 241 | "Sort by upload speed (kB/s)", "up_speed-desc") 242 | up_speed.width = "1%" 243 | up_speed.classes = { "nowrap", "center" } 244 | 245 | downloaded = list:column(DummyValue, "downloaded", "Down-
loaded", 246 | "Sort by total downloaded from peer", "downloaded-desc") 247 | downloaded.rawhtml = true 248 | downloaded.width = "1%" 249 | downloaded.classes = { "nowrap", "center" } 250 | 251 | uploaded = list:column(DummyValue, "uploaded", "Up-
loaded", 252 | "Sort by total uploaded to peer", "uploaded-desc") 253 | uploaded.rawhtml = true 254 | uploaded.width = "1%" 255 | uploaded.classes = { "nowrap", "center" } 256 | 257 | return form 258 | -------------------------------------------------------------------------------- /src/usr/lib/lua/luci/model/cbi/rtorrent/settings/rtorrent.lua: -------------------------------------------------------------------------------- 1 | -- Copyright 2014-2021 Sandor Balazsi
" 24 | .. "If you want to make it permanent, please change them in " 25 | .. "the
/root/.rtorrent.rc config file.")
26 | form.handle = function(self, state, data)
27 | if state == FORM_VALID then luci.http.redirect(nixio.getenv("REQUEST_URI")) end
28 | return true
29 | end
30 |
31 | bandwidth_limits = form:section(SimpleSection, "Bandwidth limits")
32 |
33 | download_limit = bandwidth_limits:option(Value, "global_down_max_rate_kb", "Download limit (KiB/sec)",
34 | "Global download rate (0: unlimited).Related .rtorrent.rc config line: " 35 | .. "
throttle.global_down.max_rate.set_kb.")
36 | download_limit.template = "rtorrent/value"
37 | download_limit.rmempty = false
38 | download_limit.default = throttle:get("global_down_max_rate") / 1024
39 | download_limit.datatype = "uinteger"
40 | download_limit.write = function(self, section, value)
41 | if value ~= tostring(download_limit.default) then
42 | rtorrent.call("throttle.global_down.max_rate.set_kb", "", value)
43 | end
44 | end
45 |
46 | upload_limit = bandwidth_limits:option(Value, "global_up_max_rate_kb", "Upload limit (KiB/sec)",
47 | "Global upload rate (0: unlimited).Related .rtorrent.rc config line: " 48 | .. "
throttle.global_up.max_rate.set_kb.")
49 | upload_limit.template = "rtorrent/value"
50 | upload_limit.rmempty = false
51 | upload_limit.default = throttle:get("global_up_max_rate") / 1024
52 | upload_limit.datatype = "uinteger"
53 | upload_limit.write = function(self, section, value)
54 | if value ~= tostring(upload_limit.default) then
55 | rtorrent.call("throttle.global_up.max_rate.set_kb", "", value)
56 | end
57 | end
58 |
59 | global_limits = form:section(SimpleSection, "Global limits")
60 |
61 | max_downloads_global = global_limits:option(Value, "max_downloads_global", "Download slots",
62 | "Maximum number of simultaneous downloads (0: unlimited).Related .rtorrent.rc config line: " 63 | .. "
throttle.max_downloads.global.set.")
64 | max_downloads_global.rmempty = false
65 | max_downloads_global.default = throttle:get("max_downloads_global")
66 | max_downloads_global.datatype = "uinteger"
67 | max_downloads_global.write = function(self, section, value)
68 | if value ~= tostring(max_downloads_global.default) then
69 | rtorrent.call("throttle.max_downloads.global.set", "", value)
70 | end
71 | end
72 |
73 | max_uploads_global = global_limits:option(Value, "max_uploads_global", "Upload slots",
74 | "Maximum number of simultaneous uploads (0: unlimited).Related .rtorrent.rc config line: " 75 | .. "
throttle.max_uploads.global.set.")
76 | max_uploads_global.rmempty = false
77 | max_uploads_global.default = throttle:get("max_uploads_global")
78 | max_uploads_global.datatype = "uinteger"
79 | max_uploads_global.write = function(self, section, value)
80 | if value ~= tostring(max_uploads_global.default) then
81 | rtorrent.call("throttle.max_uploads.global.set", "", value)
82 | end
83 | end
84 |
85 | torrent_limits = form:section(SimpleSection, "Torrent limits")
86 |
87 | max_downloads = torrent_limits:option(Value, "max_downloads", "Maximum downloads",
88 | "Maximum number of simultanious downloads per torrent (0: unlimited)." 89 | .. "Related .rtorrent.rc config line:
throttle.max_downloads.set.")
90 | max_downloads.rmempty = false
91 | max_downloads.default = throttle:get("max_downloads")
92 | max_downloads.datatype = "uinteger"
93 | max_downloads.write = function(self, section, value)
94 | if value ~= tostring(max_downloads.default) then
95 | rtorrent.call("throttle.max_downloads.set", "", value)
96 | end
97 | end
98 |
99 | max_uploads = torrent_limits:option(Value, "max_uploads", "Maximum uploads",
100 | "Maximum number of simultanious uploads per torrent (0: unlimited)." 101 | .. "Related .rtorrent.rc config line:
throttle.max_uploads.set.")
102 | max_uploads.rmempty = false
103 | max_uploads.default = throttle:get("max_uploads")
104 | max_uploads.datatype = "uinteger"
105 | max_uploads.write = function(self, section, value)
106 | if value ~= tostring(max_uploads.default) then
107 | rtorrent.call("throttle.max_uploads.set", "", value)
108 | end
109 | end
110 |
111 | min_peers = torrent_limits:option(Value, "min_peers", "Minimum peers",
112 | "Minimum number of peers to connect to per torrent." 113 | .. "Related .rtorrent.rc config line:
throttle.min_peers.normal.set.")
114 | min_peers.rmempty = false
115 | min_peers.default = throttle:get("min_peers_normal")
116 | min_peers.datatype = "uinteger"
117 | min_peers.write = function(self, section, value)
118 | if value ~= tostring(min_peers.default) then
119 | rtorrent.call("throttle.min_peers.normal.set", "", value)
120 | end
121 | end
122 |
123 | max_peers = torrent_limits:option(Value, "max_peers", "Maximum peers",
124 | "Maximum number of peers to connect to per torrent." 125 | .. "Related .rtorrent.rc config line:
throttle.max_peers.normal.set.")
126 | max_peers.rmempty = false
127 | max_peers.default = throttle:get("max_peers_normal")
128 | max_peers.datatype = "uinteger"
129 | max_peers.write = function(self, section, value)
130 | if value ~= tostring(max_peers.default) then
131 | rtorrent.call("throttle.max_peers.normal.set", "", value)
132 | end
133 | end
134 |
135 | min_seeds = torrent_limits:option(Value, "min_seeds", "Minimum seeds",
136 | "Minimum number of seeds for completed torrents (-1: same as peers)." 137 | .. "Related .rtorrent.rc config line:
throttle.min_peers.seed.set.")
138 | min_seeds.rmempty = false
139 | min_seeds.default = throttle:get("min_peers_seed")
140 | min_seeds.datatype = "integer"
141 | min_seeds.write = function(self, section, value)
142 | if value ~= tostring(min_seeds.default) then
143 | rtorrent.call("throttle.min_peers.seed.set", "", value)
144 | end
145 | end
146 |
147 | max_seeds = torrent_limits:option(Value, "max_seeds", "Maximum seeds",
148 | "Maximum number of seeds for completed torrents (-1: same as peers)." 149 | .. "Related .rtorrent.rc config line:
throttle.max_peers.seed.set.")
150 | max_seeds.rmempty = false
151 | max_seeds.default = throttle:get("max_peers_seed")
152 | max_seeds.datatype = "integer"
153 | max_seeds.write = function(self, section, value)
154 | if value ~= tostring(max_seeds.default) then
155 | rtorrent.call("throttle.max_peers.seed.set", "", value)
156 | end
157 | end
158 |
159 | peers_numwant = torrent_limits:option(Value, "peers_numwant", "Wished peers",
160 | "Wished number of peers (-1: disable feature)." 161 | .. "Related .rtorrent.rc config line:
trackers.numwant.set.")
162 | peers_numwant.rmempty = false
163 | peers_numwant.default = trackers:get("numwant")
164 | peers_numwant.datatype = "integer"
165 | peers_numwant.write = function(self, section, value)
166 | if value ~= tostring(peers_numwant.default) then
167 | rtorrent.call("trackers.numwant.set", "", value)
168 | end
169 | end
170 |
171 | network_limits = form:section(SimpleSection, "Network limits")
172 |
173 | max_http_requests = network_limits:option(Value, "max_http_requests", "Maximum http requests",
174 | "Maximum number of simultaneous HTTP request (used by announce / scrape requests)." 175 | .. "Related .rtorrent.rc config line:
network.http.max_open.set.")
176 | max_http_requests.rmempty = false
177 | max_http_requests.default = network:get("http_max_open")
178 | max_http_requests.datatype = "uinteger"
179 | max_http_requests.write = function(self, section, value)
180 | if value ~= tostring(max_http_requests.default) then
181 | rtorrent.call("network.http.max_open.set", "", value)
182 | end
183 | end
184 |
185 | max_open_files = network_limits:option(Value, "max_open_files", "Maximum open files",
186 | "Maximum number of open files rTorrent can keep open." 187 | .. "Related .rtorrent.rc config line:
network.max_open_files.set.")
188 | max_open_files.rmempty = false
189 | max_open_files.default = network:get("max_open_files")
190 | max_open_files.datatype = "uinteger"
191 | max_open_files.write = function(self, section, value)
192 | if value ~= tostring(max_open_files.default) then
193 | rtorrent.call("network.max_open_files.set", "", value)
194 | end
195 | end
196 |
197 | max_open_sockets = network_limits:option(Value, "max_open_sockets", "Maximum open sockets",
198 | "Maximum number of connections rTorrent can accept / make (sockets)." 199 | .. "Related .rtorrent.rc config line:
network.max_open_sockets.set.")
200 | max_open_sockets.rmempty = false
201 | max_open_sockets.default = network:get("max_open_sockets")
202 | max_open_sockets.datatype = "uinteger"
203 | max_open_sockets.write = function(self, section, value)
204 | if value ~= tostring(max_open_sockets.default) then
205 | rtorrent.call("network.max_open_sockets.set", "", value)
206 | end
207 | end
208 |
209 | max_xmlrpc_size = network_limits:option(Value, "max_xmlrpc_size", "Maximum XML-RPC size",
210 | "Maximum size of any XML-RPC requests in bytes." 211 | .. "Human-readable forms such as 2M are also allowed (for 2 MiB, i.e. 2097152 bytes).
" 212 | .. "Related .rtorrent.rc config line:
network.xmlrpc.size_limit.set.")
213 | max_xmlrpc_size.rmempty = false
214 | max_xmlrpc_size.default = network:get("xmlrpc_size_limit")
215 | max_xmlrpc_size.write = function(self, section, value)
216 | if value ~= tostring(max_xmlrpc_size.default) then
217 | rtorrent.call("network.xmlrpc.size_limit.set", "", value)
218 | end
219 | end
220 |
221 | return form
222 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/rss_downloader.lua:
--------------------------------------------------------------------------------
1 | #!/usr/bin/lua
2 | -- Copyright 2014-2021 Sandor Balazsi %s
' % { value, common.human_size(value) }
135 | end
136 |
137 | function format.status(value)
138 | local text, color = "", ""
139 | if value == 1 then text, color = "down", ' class="green"'
140 | elseif value == 2 then text, color = "stop", ' class="red"'
141 | elseif value == 3 then text, color = "pause", ' class="orange"'
142 | elseif value == 4 then text, color = "hash", ' class="green"'
143 | elseif value == 5 then text, color = "seed", ' class="blue"'
144 | elseif value == 6 then text, color = "unknown", "" end
145 | return '%.2f
' % {
150 | common.human_size(torrent:get("up_total")),
151 | value < 1000 and "red" or "green",
152 | value / 1000
153 | }
154 | end
155 |
156 | function format.eta(value, key, torrent)
157 | local download_started = tonumber(torrent:get("timestamp_started")) ~= 0
158 | and os.date("!%Y-%m-%d %H:%M:%S", torrent:get("timestamp_started"))
159 | or "not yet started"
160 | local download_finished = tonumber(torrent:get("timestamp_finished")) ~= 0
161 | and os.date("!%Y-%m-%d %H:%M:%S", torrent:get("timestamp_finished"))
162 | or "not yet finished"
163 | local text, color = "", ""
164 | if value == 0 then text, color = "--", ""
165 | elseif value == math.huge then text, color = "∞", ' class="red"'
166 | else text, color = common.human_time(value), "" end
167 | return '%s
' % {
168 | download_started, download_finished, color, text
169 | }
170 | end
171 |
172 | function action.start(hash)
173 | local status = rtorrent.batchcall("d.", hash, "state", "is_active")
174 | if status.state == 0 then rtorrent.call("d.start", hash)
175 | elseif status.is_active == 0 then rtorrent.call("d.resume", hash) end
176 | end
177 |
178 | function action.pause(hash) rtorrent.batchcall("d.", hash, "start", "pause") end
179 | function action.stop(hash) rtorrent.batchcall("d.", hash, "stop", "close") end
180 | function action.hash(hash) rtorrent.call("d.check_hash", hash) end
181 | function action.remove(hash) rtorrent.batchcall("d.", hash, "close", "erase") end
182 | function action.purge(hash) rtorrent.batchcall("d.", hash, "custom5.set=1", "close", "erase") end
183 |
184 | function filter_by_tab(torrent, index, torrents, tab)
185 | return string.find(" " .. torrent:get("tags") .. " ", " " .. tab .. " ")
186 | end
187 |
188 | local tabs, checked, total = array({ "all" }), array(), array():set("count", 0)
189 | local torrents = array(rtorrent.multicall("d.", "", "default",
190 | "hash", "name", "hashing", "state", "is_active", "complete",
191 | "size_bytes", "bytes_done", "size_chunks", "wanted_chunks", "completed_chunks", "chunk_size",
192 | "peers_accounted", "peers_complete", "down.rate", "up.rate", "ratio", "up.total",
193 | "timestamp.started", "timestamp.finished", "custom1", "custom=icon"))
194 | :foreach(compute_values)
195 | :foreach(compute_tabs, tabs, tab)
196 | :filter(filter_by_tab, tab)
197 | :foreach(compute_total, total)
198 | :sort(sort_column, sort_order)
199 | :limit(10, (page - 1) * 10)
200 | :foreach(format_values)
201 | :insert(total:get("count") > 1 and total or nil)
202 |
203 | local form, list, icon, name, size, done, status, seeder, leecher, down_speed, up_speed, ratio, eta, check
204 |
205 | form = SimpleForm("rtorrent", "Torrent List")
206 | form.submit = false
207 | form.reset = false
208 | form.handle = function(self, state, data)
209 | if state == FORM_VALID then
210 | checked:foreach(function(hash) action[self:formvalue("cbi.action")](hash) end)
211 | luci.http.redirect(nixio.getenv("REQUEST_URI"))
212 | end
213 | return true
214 | end
215 |
216 | list = form:section(Table, torrents:get())
217 | list.template = "rtorrent/tblsection_main"
218 | list.name = "rtorrent-torrents"
219 | list.pages = common.pagination(total:get("count") or torrents:size(), tonumber(page),
220 | common.pagination_link, build_url("admin", "rtorrent", "main", tab, sort)):join()
221 | list.column = function(self, class, option, title, tooltip, sort_by)
222 | return self:option(class, option, '%s' % {
223 | build_url("admin", "rtorrent", "main", tab, sort_by),
224 | tooltip, sort == sort_by and ' class="active"' or "", title
225 | })
226 | end
227 | list.action = function(self, key, value, classes)
228 | self.actions[key] = value
229 | self.action_classes[key] = "btn cbi-button important " .. classes
230 | table.insert(self.action_order, key)
231 | end
232 | list.root_path = build_url("admin", "rtorrent", "main")
233 | tabs:unique():foreach(function(tab) list:tab(tab, tab:ucfirst()) end)
234 | list.selected_tab = tabs:contains(tab) and tab or "all"
235 | list.default_sort = default_sort
236 | list.sort = sort
237 | list.actions, list.action_classes, list.action_order = {}, {}, {}
238 | list:action("start", "Start", "cbi-button-save")
239 | list:action("pause", "Pause", "cbi-button-apply")
240 | list:action("stop", "Stop", "cbi-button-apply")
241 | list:action("hash", "Check hash", "cbi-button-apply")
242 | list:action("remove", "Remove", "cbi-button-negative")
243 | list:action("purge", "Remove and delete from disk", "cbi-button-negative")
244 |
245 | icon = list:option(DummyValue, "icon")
246 | icon.rawhtml = true
247 | icon.width = "1%"
248 | icon.classes = { "nowrap" }
249 |
250 | name = list:column(DummyValue, "name", "Name", "Sort by name", "name-asc")
251 | name.rawhtml = true
252 | name.classes = { "wrap" }
253 |
254 | size = list:column(DummyValue, "size", "Size", "Sort by total size", "size-desc")
255 | size.rawhtml = true
256 | size.width = "1%"
257 | size.classes = { "nowrap", "center" }
258 |
259 | done = list:column(DummyValue, "done", "Done", "Sort by download done percent", "done-desc")
260 | done.rawhtml = true
261 | done.width = "1%"
262 | done.classes = { "nowrap", "center" }
263 |
264 | status = list:column(DummyValue, "status", "Status", "Sort by status", "status-asc")
265 | status.rawhtml = true
266 | status.width = "1%"
267 | status.classes = { "nowrap", "center" }
268 |
269 | seeder = list:column(DummyValue, "seeder", "▼", "Sort by seeder count", "seeder-desc")
270 | seeder.rawhtml = true
271 | seeder.width = "1%"
272 | seeder.classes = { "nowrap", "center" }
273 |
274 | leecher = list:column(DummyValue, "leecher", "▲", "Sort by leecher count", "leecher-desc")
275 | leecher.rawhtml = true
276 | leecher.width = "1%"
277 | leecher.classes = { "nowrap", "center" }
278 |
279 | down_speed = list:column(DummyValue, "down_speed", "DownSpeed", 280 | "Sort by download speed (kB/s)", "down_speed-desc") 281 | down_speed.rawhtml = true 282 | down_speed.width = "1%" 283 | down_speed.classes = { "nowrap", "center" } 284 | 285 | up_speed = list:column(DummyValue, "up_speed", "Up
Speed", 286 | "Sort by upload speed (kB/s)", "up_speed-desc") 287 | up_speed.rawhtml = true 288 | up_speed.width = "1%" 289 | up_speed.classes = { "nowrap", "center" } 290 | 291 | ratio = list:column(DummyValue, "ratio", "Ratio", "Sort by download/upload ratio", "ratio-desc") 292 | ratio.rawhtml = true 293 | ratio.width = "1%" 294 | ratio.classes = { "nowrap", "center" } 295 | 296 | eta = list:column(DummyValue, "eta", "ETA", "Sort by Estimated Time of Arrival", "eta-desc") 297 | eta.rawhtml = true 298 | eta.width = "1%" 299 | eta.classes = { "nowrap", "center" } 300 | 301 | check = list:option(Flag, "check") 302 | check.width = "1%" 303 | check.classes = { "nowrap", "center" } 304 | check.write = function(self, section, value) 305 | if torrents:get(section):get("hash") then 306 | checked:insert(torrents:get(section):get("hash")) 307 | end 308 | end 309 | 310 | return form 311 | -------------------------------------------------------------------------------- /src/usr/lib/lua/luci/model/cbi/rtorrent/common.lua: -------------------------------------------------------------------------------- 1 | -- Copyright 2014-2021 Sandor Balazsi
%dh %dm", t["day"] - 1, t["hour"], t["min"]) 60 | elseif t["hour"] > 0 then 61 | return string.format("%dh
%dm %ds", t["hour"], t["min"], t["sec"]) 62 | elseif t["min"] > 0 then 63 | return string.format("%dm %ds", t["min"], t["sec"]) 64 | else return string.format("%ds", t["sec"]) end 65 | end 66 | 67 | function parse_magnet(uri) 68 | if not uri:starts("magnet:?") then return nil, "Not a valid magnet URI!" end 69 | local magnet = array() 70 | for key, value in uri:sub(9):gmatch("([^&=]+)=([^&=]+)") do 71 | key = key:gsub("%.%d+$", "") 72 | if not magnet:get(key) then magnet:set(key, array()) end 73 | magnet:get(key):insert(value:urldecode()) 74 | end 75 | if not magnet:keys():contains("xt") 76 | or not magnet:get("xt"):get(1):starts("urn:btih:") then 77 | return nil, "Magnet URI's BitTorrent info hash URN missing!" 78 | end 79 | return magnet 80 | end 81 | 82 | function get_domain(url, sub_domain) 83 | local domain = url:match("^%w+://([^/:]+)") or "" 84 | return sub_domain == true or datatypes.ipaddr(domain) and domain or domain:match("(%w+%.%w+)$") or "" 85 | end 86 | 87 | function tracker_icon(urls) 88 | for _, domain in urls:map(get_domain):filter(string.not_blank):unique():pairs() do 89 | local favicon = "http://" .. domain .. "/favicon.ico" 90 | if array(uci:get("rtorrent", "icon", "has")):contains(domain) then 91 | return favicon 92 | elseif not array(uci:get("rtorrent", "icon", "not")):contains(domain) then 93 | local icon, err, headers = download(favicon, 2) 94 | if icon and headers:get("content-type"):starts("image/") and #icon > 0 then 95 | uci_list_add("rtorrent", "frontend", "icon", "has", domain) 96 | return favicon 97 | else 98 | uci_list_add("rtorrent", "frontend", "icon", "not", domain) 99 | end 100 | end 101 | end 102 | return "/luci-static/resources/icons/unknown_tracker.svg" 103 | end 104 | 105 | function extract_urls(data) 106 | local urls = array() 107 | data:traverse(function(value) 108 | if type(value) == "string" and value:match("^%w+://%w+%.%w+") then 109 | urls:insert(value) 110 | end 111 | end) 112 | return urls:unique() 113 | end 114 | 115 | function add_to_rtorrent(torrent) 116 | local params = array() 117 | params:insert(torrent:get("start") == "1" and "load.raw_start" or "load.raw") 118 | params:insert("") -- target 119 | params:insert(xmlrpc.newTypedValue(torrent:get("data"), "base64")) 120 | params:insert('d.directory.set="%s"' % torrent:get("directory")) 121 | if torrent:get("tags") then params:insert('d.custom1.set="%s"' % torrent:get("tags")) end 122 | if torrent:get("icon") then params:insert('d.custom.set=icon, "%s"' % torrent:get("icon")) end 123 | if torrent:get("url") then params:insert('d.custom.set=url, "%s"' % torrent:get("url"):urlencode()) end 124 | rtorrent.call(unpack(params:get())) 125 | end 126 | 127 | function download(url, timeout) 128 | local proto = url:starts("https://") and https or http 129 | proto.TIMEOUT = timeout or 5 130 | local response_chunks = {} 131 | local request_headers = { 132 | ["Referer"] = "https://www.google.com", 133 | ["User-Agent"] = "unknown" 134 | } 135 | local cookie_section = uci_sections("rtorrent", "cookies") 136 | :filter(function(section) return get_domain(url, true) == section.domain end) 137 | :first() 138 | if cookie_section then request_headers["Cookie"] = cookie_section.cookie end 139 | local body, code, headers, status = proto.request({ 140 | url = url, 141 | method = "GET", 142 | headers = request_headers, 143 | redirect = (proto.PORT == 80) and true or nil, 144 | sink = ltn12.sink.table(response_chunks) 145 | }) 146 | if not body then return nil, code, array(headers), code, status end 147 | if code == 301 or code == 302 then return download(headers["location"]) 148 | elseif code == 200 then 149 | return table.concat(response_chunks), nil, array(headers), code, status 150 | else return nil, status, array(headers), code, status end 151 | end 152 | 153 | function pagination_link(page, current_page, last_page, root_path) 154 | local active = (page == current_page) and ' class="active"' or "" 155 | local text 156 | if page == "previous" then text, page = "<", math.max(current_page - 1, 1) 157 | elseif page == "next" then text, page = ">", math.min(current_page + 1, last_page) 158 | elseif page == "left-ellipsis" then text, page = "…", math.max(current_page - 10, 1) 159 | elseif page == "right-ellipsis" then text, page = "…", math.min(current_page + 10, last_page) 160 | else text = tostring(page) end 161 | return '%s' % { root_path, page, active, text } 162 | end 163 | 164 | function pagination(count, current_page, button_builder, ...) 165 | local pages = array() 166 | local last_page = math.floor(count / 10) + (count % 10 == 0 and 0 or 1) 167 | if last_page < 2 then return pages end 168 | current_page = current_page > last_page and last_page or current_page 169 | pages:insert(button_builder("previous", current_page, last_page, ...)) 170 | pages:insert(button_builder(1, current_page, last_page, ...)) 171 | pages:insert(last_page > 9 and current_page > 7 172 | and button_builder("left-ellipsis", current_page, last_page, ...) 173 | or button_builder(2, current_page, last_page, ...)) 174 | for column = 3, 9 do 175 | if last_page >= column then 176 | if last_page < 10 or (column < 8 and current_page < 8) then 177 | pages:insert(button_builder(column, current_page, last_page, ...)) 178 | elseif column == 8 then 179 | if current_page < 8 or (last_page > 14 and current_page < last_page - 6) then 180 | pages:insert(button_builder("right-ellipsis", current_page, last_page, ...)) 181 | else pages:insert(button_builder(last_page - 1, current_page, last_page, ...)) end 182 | elseif column == 9 then 183 | pages:insert(button_builder(last_page, current_page, last_page, ...)) 184 | elseif current_page > last_page - 7 then 185 | pages:insert(button_builder(last_page + column - 9, current_page, last_page, ...)) 186 | else pages:insert(button_builder(current_page + column - 5, current_page, last_page, ...)) end 187 | end 188 | end 189 | pages:insert(button_builder("next", current_page, last_page, ...)) 190 | return pages 191 | end 192 | 193 | function system_uptime() 194 | return nixio.fs.readfile("/proc/uptime"):split()[1] 195 | end 196 | 197 | function process_cmdline(pid) 198 | return array(nixio.fs.readfile("/proc/%d/cmdline" % pid):split("%z")) 199 | end 200 | 201 | function process_env(pid) 202 | local env = array() 203 | for _, entry in ipairs(nixio.fs.readfile("/proc/%d/environ" % pid):split("%z")) do 204 | env:set(unpack(entry:split("=", 2))) 205 | end 206 | return env 207 | end 208 | 209 | -- https://man7.org/linux/man-pages/man5/proc.5.html 210 | function process_stat(pid) 211 | local stat = nixio.fs.readfile("/proc/%d/stat" % pid) 212 | local fields, end_index, value = array() 213 | _, end_index, value = stat:find("(%d+)"); fields:set("pid", tonumber(value)) 214 | _, end_index, fields.table["comm"] = stat:find("%(([^)]+)%)", end_index + 2) 215 | _, end_index, fields.table["state"] = stat:find("(%a)", end_index + 2) 216 | for _, key in ipairs({ "ppid", "pgrp", "session", "tty_nr", "tpgid", "flags", "minflt", "cminflt", 217 | "majflt", "cmajflt", "utime", "stime", "cutime", "cstime", "priority", "nice", 218 | "num_threads", "itrealvalue", "starttime", "vsize", "rss", "rsslim", "startcode", 219 | "endcode", "startstack", "kstkesp", "kstkeip", "signal", "blocked", "sigignore", 220 | "sigcatch", "wchan", "nswap", "cnswap", "exit_signal", "processor", "rt_priority", 221 | "policy", "delayacct_blkio_ticks", "guest_time", "cguest_time", "start_data", 222 | "end_data", "start_brk", "arg_start", "arg_end", "env_start", "env_end", "exit_code" }) do 223 | _, end_index, value = stat:find("([-%d]+)", end_index + 2) 224 | fields:set(key, tonumber(value)) 225 | end 226 | return fields 227 | end 228 | 229 | function process_start(pid) 230 | local clk_tck = 100 -- TODO: find out value from sysconf(_SC_CLK_TCK) 231 | local process_start_time = process_stat(pid):get("starttime") / clk_tck 232 | local current_time = socket.gettime() 233 | return math.floor(current_time - system_uptime() + process_start_time) 234 | end 235 | 236 | function rtorrent_config(rtorrent_pid) 237 | rtorrent_pid = rtorrent_pid or rtorrent.call("system.pid") 238 | local rtorrent_config_file = process_env(rtorrent_pid):get("HOME") .. "/.rtorrent.rc" 239 | for _, arg in process_cmdline(rtorrent_pid):pairs() do 240 | if arg:starts("import=") then rtorrent_config_file = arg:sub(8) end 241 | end 242 | return array(nixio.fs.stat(rtorrent_config_file, "type") == "reg" 243 | and nixio.fs.readfile(rtorrent_config_file):split("\n") or {}) 244 | end 245 | 246 | function rtorrent_schedule_parse(schedule) 247 | local time = schedule:split(":") 248 | if #time == 1 then 249 | return time[1] 250 | elseif #time == 2 then 251 | return time[1] * 60 + time[2] 252 | elseif #time == 3 then 253 | return time[1] * 60 * 60 + time[2] * 60 + time[3] 254 | elseif #time == 4 then 255 | return time[1] * 24 * 60 * 60 + time[2] * 60 * 60 + time[3] * 60 + time[4] 256 | end 257 | end 258 | 259 | function rtorrent_schedule_start(rtorrent_start, second) 260 | local time, now = os.date("*t", rtorrent_start), socket.gettime() 261 | local start = rtorrent_start - time.hour * 60 * 60 - time.min * 60 - time.sec + second 262 | if now - rtorrent_start < 24 * 60 * 60 and start < rtorrent_start then start = start + 24 * 60 * 60 end 263 | return start 264 | end 265 | 266 | function rss_downloader_status() 267 | local rtorrent_pid, schedule = rtorrent.call("system.pid") 268 | for _, line in rtorrent_config(rtorrent_pid):pairs() do 269 | if line:match("^%s*schedule.*execute.*/usr/lib/lua/rss_downloader.lua") then 270 | schedule = line:split(",") 271 | end 272 | end 273 | if schedule then 274 | local rtorrent_start = process_start(rtorrent_pid) 275 | local start, start_text 276 | if schedule[2]:match(":") then 277 | start = rtorrent_schedule_start(rtorrent_start, rtorrent_schedule_parse(schedule[2])) 278 | start_text = "" .. schedule[2] .. " start time" 279 | else 280 | start = rtorrent_start + schedule[2] 281 | start_text = "" .. schedule[2] .. " seconds initial delay" 282 | end 283 | local interval = rtorrent_schedule_parse(schedule[3]) 284 | local interval_text = "" .. schedule[3] .. "" .. (schedule[3]:match(":") and "" or " seconds") 285 | return "RSS Downloader is scheduled by rTorrent with %s and %s interval.
" 286 | % { start_text, interval_text } 287 | .. 'The next fetch of RSS feed(s) will be at .' 288 | .. '' 289 | % { start, interval } 290 | else 291 | return 'Warning! RSS Downloader not scheduled by rTorrent! ' 292 | .. 'Please add a schedule2 line to your rTorrent config file (/root/.rtorrent.rc).
' 295 | .. "For example, to trigger it every 300 seconds, " 296 | .. "with an initial delay of 60 seconds after rTorrent startup:
schedule2 = "
297 | .. "rss_downloader, 60, 300, ((execute.throw, /usr/lib/lua/rss_downloader.lua, --uci))"
298 | end
299 | end
300 |
301 | function set_cookie(name, data, attributes)
302 | attributes = attributes or ""
303 | lhttp.header("Set-Cookie", "%s=%s; Path=%s; SameSite=Strict%s" % {
304 | name, data and util.serialize_data(data):urlencode() or "", build_url("admin", "rtorrent"), attributes
305 | })
306 | end
307 |
308 | function get_cookie(name, default)
309 | local cookie = lhttp.getcookie(name)
310 | return cookie and util.restore_data(cookie) or default
311 | end
312 |
313 | function remove_cookie(name)
314 | set_cookie(name, nil, "; Max-Age=0")
315 | end
316 |
--------------------------------------------------------------------------------
/src/usr/lib/lua/xmlrpc/init.lua:
--------------------------------------------------------------------------------
1 | -- Copyright 2003-2010 Kepler Project
2 | -- XML-RPC implementation for Lua.
3 |
4 | local lxp = require "lxp"
5 | local lom = require "lxp.lom"
6 |
7 | local assert, error, ipairs, pairs, select, type, tonumber, unpack = assert, error, ipairs, pairs, select, type, tonumber, unpack
8 | local format, gsub, strfind, strsub = string.format, string.gsub, string.find, string.sub
9 | local concat, tinsert = table.concat, table.insert
10 | local ceil = math.ceil
11 | local parse = lom.parse
12 |
13 | module (...)
14 |
15 | _COPYRIGHT = "Copyright (C) 2003-2014 Kepler Project"
16 | _DESCRIPTION = "LuaXMLRPC is a library to make remote procedure calls using XML-RPC"
17 | _PKGNAME = "LuaXMLRPC"
18 | _VERSION_MAJOR = 1
19 | _VERSION_MINOR = 2
20 | _VERSION_MICRO = 2
21 | _VERSION = _VERSION_MAJOR .. "." .. _VERSION_MINOR .. "." .. _VERSION_MICRO
22 |
23 | ---------------------------------------------------------------------
24 | -- XML-RPC Parser
25 | ---------------------------------------------------------------------
26 |
27 | ---------------------------------------------------------------------
28 | local function trim (s)
29 | return (type(s) == "string" and gsub (s, "^%s*(.-)%s*$", "%1"))
30 | end
31 |
32 | ---------------------------------------------------------------------
33 | local function is_space (s)
34 | return type(s) == "string" and trim(s) == ""
35 | end
36 |
37 | ---------------------------------------------------------------------
38 | -- Get next non-space element from tab starting from index i.
39 | -- @param tab Table.
40 | -- @param i Numeric index.
41 | -- @return Object and its position on table; nil and an invalid index
42 | -- when there is no more elements.
43 | ---------------------------------------------------------------------
44 | function next_nonspace (tab, i)
45 | if not i then i = 1 end
46 | while is_space (tab[i]) do i = i+1 end
47 | return tab[i], i
48 | end
49 |
50 | ---------------------------------------------------------------------
51 | -- Get next element of tab with the given tag starting from index i.
52 | -- @param tab Table.
53 | -- @param tag String with the name of the tag.
54 | -- @param i Numeric index.
55 | -- @return Object and its position on table; nil and an invalid index
56 | -- when there is no more elements.
57 | ---------------------------------------------------------------------
58 | local function next_tag (tab, tag, i)
59 | if not i then i = 1 end
60 | while tab[i] do
61 | if type (tab[i]) == "table" and tab[i].tag == tag then
62 | return tab[i], i
63 | end
64 | i = i + 1
65 | end
66 | return nil, i
67 | end
68 |
69 | ---------------------------------------------------------------------
70 | local function x2number (tab)
71 | if tab.tag == "int" or tab.tag == "i4" or tab.tag == "i8" or tab.tag == "double" then
72 | return tonumber (next_nonspace (tab, 1), 10)
73 | end
74 | end
75 |
76 | ---------------------------------------------------------------------
77 | local function x2boolean (tab)
78 | if tab.tag == "boolean" then
79 | local v = next_nonspace (tab, 1)
80 | return v == true or v == "true" or tonumber (v) == 1 or false
81 | end
82 | end
83 |
84 | ---------------------------------------------------------------------
85 | local function x2string (tab)
86 | return tab.tag == "string" and (tab[1] or "")
87 | end
88 |
89 | ---------------------------------------------------------------------
90 | local function x2date (tab)
91 | return tab.tag == "dateTime.iso8601" and next_nonspace (tab, 1)
92 | end
93 |
94 | ---------------------------------------------------------------------
95 | local function x2base64 (tab)
96 | return tab.tag == "base64" and next_nonspace (tab, 1)
97 | end
98 |
99 | ---------------------------------------------------------------------
100 | local function x2name (tab)
101 | return tab.tag == "name" and next_nonspace (tab, 1)
102 | end
103 |
104 | local x2value
105 |
106 | ---------------------------------------------------------------------
107 | -- Disassemble a member object in its name and value parts.
108 | -- @param tab Table with a DOM representation.
109 | -- @return String (name) and Object (value).
110 | -- @see x2name, x2value.
111 | ---------------------------------------------------------------------
112 | local function x2member (tab)
113 | return
114 | x2name (next_tag(tab,"name")),
115 | x2value (next_tag(tab,"value"))
116 | end
117 |
118 | ---------------------------------------------------------------------
119 | -- Disassemble a struct object into a Lua table.
120 | -- @param tab Table with DOM representation.
121 | -- @return Table with "name = value" pairs.
122 | ---------------------------------------------------------------------
123 | local function x2struct (tab)
124 | if tab.tag == "struct" then
125 | local res = {}
126 | for i = 1, #tab do
127 | if not is_space (tab[i]) then
128 | local name, val = x2member (tab[i])
129 | res[name] = val
130 | end
131 | end
132 | return res
133 | end
134 | end
135 |
136 | ---------------------------------------------------------------------
137 | -- Disassemble an array object into a Lua table.
138 | -- @param tab Table with DOM representation.
139 | -- @return Table.
140 | ---------------------------------------------------------------------
141 | local function x2array (tab)
142 | if tab.tag == "array" then
143 | local d = next_tag (tab, "data")
144 | local res = {}
145 | for i = 1, #d do
146 | if not is_space (d[i]) then
147 | tinsert (res, x2value (d[i]))
148 | end
149 | end
150 | return res
151 | end
152 | end
153 |
154 | ---------------------------------------------------------------------
155 | local xmlrpc_types = {
156 | int = x2number,
157 | i4 = x2number,
158 | i8 = x2number,
159 | boolean = x2boolean,
160 | string = x2string,
161 | double = x2number,
162 | ["dateTime.iso8601"] = x2date,
163 | base64 = x2base64,
164 | struct = x2struct,
165 | array = x2array,
166 | }
167 |
168 | local x2param, x2fault
169 |
170 | ---------------------------------------------------------------------
171 | -- Disassemble a methodResponse into a Lua object.
172 | -- @param tab Table with DOM representation.
173 | -- @return Boolean (indicating wether the response was successful)
174 | -- and (a Lua object representing the return values OR the fault
175 | -- string and the fault code).
176 | ---------------------------------------------------------------------
177 | local function x2methodResponse (tab)
178 | assert (type(tab) == "table", "Not a table")
179 | assert (tab.tag == "methodResponse",
180 | "Not a `methodResponse' tag: "..tab.tag)
181 | local t = next_nonspace (tab, 1)
182 | if t.tag == "params" then
183 | return true, unpack (x2param (t))
184 | elseif t.tag == "fault" then
185 | local f = x2fault (t)
186 | return false, f.faultString, f.faultCode
187 | else
188 | error ("Couldn't find a