diff options
-rw-r--r-- | apt-panopticommon.lua | 6 | ||||
-rwxr-xr-x | apt-panopticon-report-email-web.lua | 14 |
2 files changed, 16 insertions, 4 deletions
diff --git a/apt-panopticommon.lua b/apt-panopticommon.lua index 6aabfee..99dbeaf 100644 --- a/apt-panopticommon.lua +++ b/apt-panopticommon.lua | |||
@@ -61,6 +61,12 @@ APT.options = | |||
61 | help = "", | 61 | help = "", |
62 | value = 3, | 62 | value = 3, |
63 | }, | 63 | }, |
64 | refresh = | ||
65 | { | ||
66 | typ = "number", | ||
67 | help = "", | ||
68 | value = 300, | ||
69 | }, | ||
64 | retries = | 70 | retries = |
65 | { | 71 | { |
66 | typ = "number", | 72 | typ = "number", |
diff --git a/apt-panopticon-report-email-web.lua b/apt-panopticon-report-email-web.lua index a30979d..cdfa5bd 100755 --- a/apt-panopticon-report-email-web.lua +++ b/apt-panopticon-report-email-web.lua | |||
@@ -310,11 +310,17 @@ faulty = "" | |||
310 | APT.html = true | 310 | APT.html = true |
311 | local web, e = io.open("results/Report-web.html", "w+") | 311 | local web, e = io.open("results/Report-web.html", "w+") |
312 | if nil == web then C("opening mirrors file - " .. e) else | 312 | if nil == web then C("opening mirrors file - " .. e) else |
313 | web:write( "<html><head><title>apt-panopticon results</title>\n" .. | 313 | web:write( "<html><head><title>apt-panopticon results</title>\n") |
314 | '</head><body bgcolor="black" text="white">' .. | 314 | if 0 < APT.options.refresh.value then |
315 | web:write('<meta http-equiv="refresh" content="' .. APT.options.refresh.value .. '">\n') | ||
316 | end | ||
317 | web:write( '</head><body bgcolor="black" text="white">' .. | ||
315 | "<h1>Welcome to the apt-panopticon results page.</h1>\n" .. | 318 | "<h1>Welcome to the apt-panopticon results page.</h1>\n" .. |
316 | "<p>This is the status of the mirror servers in the Devuan package mirror network.</p>\n" .. | 319 | "<p>This is the status of the mirror servers in the Devuan package mirror network.</p>\n") |
317 | "<p><font style='background-color:red; color:black'>EXPERIMENTAL CODE - double check all results you see here, and read the logs if it's important.</font></p>" .. | 320 | if 0 < APT.options.refresh.value then |
321 | web:write( '<p>This page will refresh every ' .. (APT.options.refresh.value / 60) .. ' minutes.</p>') | ||
322 | end | ||
323 | web:write( "<p><font style='background-color:red; color:black'>EXPERIMENTAL CODE - double check all results you see here, and read the logs if it's important.</font></p>" .. | ||
318 | "<p>The full list of Devuan package mirrors is available at the URL: " .. | 324 | "<p>The full list of Devuan package mirrors is available at the URL: " .. |
319 | "<a href='https://pkgmaster.devuan.org/mirror_list.txt'>https://pkgmaster.devuan.org/mirror_list.txt</a></p>\n" .. | 325 | "<a href='https://pkgmaster.devuan.org/mirror_list.txt'>https://pkgmaster.devuan.org/mirror_list.txt</a></p>\n" .. |
320 | "<p>Due to the nature of the tests, some errors or warnings will be counted several times. " .. | 326 | "<p>Due to the nature of the tests, some errors or warnings will be counted several times. " .. |