diff options
| author | onefang | 2019-11-13 21:39:45 +1000 |
|---|---|---|
| committer | onefang | 2019-11-13 21:39:45 +1000 |
| commit | 33d4f9305aba6ef58f390c150792135f403cd6e3 (patch) | |
| tree | d5464110513a878edb16c15df95e971580f9cf09 | |
| parent | Actually show the IPv6 logs. (diff) | |
| download | apt-panopticon-33d4f9305aba6ef58f390c150792135f403cd6e3.zip apt-panopticon-33d4f9305aba6ef58f390c150792135f403cd6e3.tar.gz apt-panopticon-33d4f9305aba6ef58f390c150792135f403cd6e3.tar.bz2 apt-panopticon-33d4f9305aba6ef58f390c150792135f403cd6e3.tar.xz | |
Polish the web page a bit.
Diffstat (limited to '')
| -rwxr-xr-x | apt-panopticon-report-web.lua | 24 |
1 files changed, 14 insertions, 10 deletions
diff --git a/apt-panopticon-report-web.lua b/apt-panopticon-report-web.lua index 7bb48b0..75f2895 100755 --- a/apt-panopticon-report-web.lua +++ b/apt-panopticon-report-web.lua | |||
| @@ -192,7 +192,12 @@ local file, e = io.open("results/Report-web.html", "w+") | |||
| 192 | if nil == file then C("opening mirrors file - " .. e) else | 192 | if nil == file then C("opening mirrors file - " .. e) else |
| 193 | file:write( "<html><head>\n" .. | 193 | file:write( "<html><head>\n" .. |
| 194 | '</head><body bgcolor="black" text="white" alink="red" link="blue" vlink="purple">' .. | 194 | '</head><body bgcolor="black" text="white" alink="red" link="blue" vlink="purple">' .. |
| 195 | "Check date: " .. os.date("!%a %b %d %T %Z %Y") .. "\n<br>\n<table>\n") | 195 | "<p>Check time: " .. os.date("!%a %b %d %T %Z %Y") .. "</p>\n" .. |
| 196 | "<p>The full list of Devuan package mirrors is available at the URL: " .. | ||
| 197 | "<a href='https://pkgmaster.devuan.org/mirror_list.txt'>https://pkgmaster.devuan.org/mirror_list.txt</a><br>\n" .. | ||
| 198 | "Please see below the current status of the Devuan Package Mirror network:</p>\n" .. | ||
| 199 | "<h2>==== mirror status: ====</h2>\n<table>\n" | ||
| 200 | ) | ||
| 196 | for k, v in orderedPairs(mirrors) do | 201 | for k, v in orderedPairs(mirrors) do |
| 197 | local results = loadfile("results/" .. k .. ".lua")() | 202 | local results = loadfile("results/" .. k .. ".lua")() |
| 198 | file:write(" <tr><th>" .. k .. "</th> ") | 203 | file:write(" <tr><th>" .. k .. "</th> ") |
| @@ -213,12 +218,12 @@ if nil == file then C("opening mirrors file - " .. e) else | |||
| 213 | local sanity = "[<font color='gray'><b>skip</b></font>]" | 218 | local sanity = "[<font color='gray'><b>skip</b></font>]" |
| 214 | local integrity = "[<font color='gray'><b>skip</b></font>]" | 219 | local integrity = "[<font color='gray'><b>skip</b></font>]" |
| 215 | local updated = "[<font color='gray'><b>skip</b></font>]" | 220 | local updated = "[<font color='gray'><b>skip</b></font>]" |
| 216 | file:write("<td>http: " .. http .. "</td><td>https: " .. https .. "</td><td>DNS-RR: " .. | 221 | file:write("<td>http: " .. http .. " </td><td>https: " .. https .. " </td><td>DNS-RR: " .. |
| 217 | dns .. "</td><td>Protocol: " .. protocol .. "</td><td>URL-sanity: " .. sanity .. | 222 | dns .. " </td><td>Protocol: " .. protocol .. " </td><td>URL-sanity: " .. sanity .. |
| 218 | "</td><td>Integrity: " .. integrity .. "</td><td>Updated: " .. updated .. "</td></tr>\n") | 223 | " </td><td>Integrity: " .. integrity .. " </td><td>Updated: " .. updated .. "</td></tr>\n") |
| 219 | end | 224 | end |
| 220 | file:write( "</table>\n==== faulty mirrors: ====<br>\n<br>\n" .. faulty) | 225 | file:write( "</table>\n<br>\n<h2>==== faulty mirrors: ====</h2>\n" .. faulty) |
| 221 | file:write( "\n<br>\nLast Failure: NOT WRITTEN YET<br>\n<br>") | 226 | file:write( "<br>\n<br>\n<h2>==== DNS and logs: ====</h2>\n") |
| 222 | 227 | ||
| 223 | for k, v in pairs(mirrors) do | 228 | for k, v in pairs(mirrors) do |
| 224 | local n = {} | 229 | local n = {} |
| @@ -255,13 +260,12 @@ if nil == file then C("opening mirrors file - " .. e) else | |||
| 255 | end | 260 | end |
| 256 | m[k .. " DNS entries -"] = n | 261 | m[k .. " DNS entries -"] = n |
| 257 | end | 262 | end |
| 258 | file:write("<br>\n<br>\n<br>\n" .. | 263 | file:write( "<p>This lists each mirror, and the DNS entries for that mirror. " .. |
| 259 | "<p>This DNS report lists each mirror, and the DNS entries for that mirror. " .. | 264 | "The links point to the log files for each FDQN / IP combination that was checked. " .. |
| 260 | "If a mirror has a CNAME, that CNAME is listed along with that CNAMEs DNS entries. " .. | 265 | "If a mirror has a CNAME, that CNAME is listed along with that CNAMEs DNS entries. " .. |
| 261 | "deb.devuan.org is the DNS round robin, which points to the mirrors that are part of the DNS-RR. " .. | 266 | "deb.devuan.org is the DNS round robin, which points to the mirrors that are part of the DNS-RR. " .. |
| 262 | "pkgmaster.devuan.org is the master mirror, all the others sync to it. " .. | 267 | "pkgmaster.devuan.org is the master mirror, all the others sync to it. " .. |
| 263 | "The links point to the log files for each FDQN / IP combination that was checked. " .. | 268 | "</p>\n" |
| 264 | "</p>\n<br><br>" | ||
| 265 | ) | 269 | ) |
| 266 | file:write(dumpTableHTML(m, "", "")) | 270 | file:write(dumpTableHTML(m, "", "")) |
| 267 | file:write( "\n<br>\n\n</body></html>\n") | 271 | file:write( "\n<br>\n\n</body></html>\n") |