Allow showurl option
diff --git a/www/members/page-scanner.cgi b/www/members/page-scanner.cgi
index 276d3ec..0df899c 100755
--- a/www/members/page-scanner.cgi
+++ b/www/members/page-scanner.cgi
@@ -12,14 +12,17 @@
# puts ENV['REQUEST_URI']
qs = ENV['QUERY_STRING']
-if qs =~ %r{^url=(https?://.+)}
+if qs =~ %r{^url=(https?://[^&]+)(?:&(.+))?}
url = $1
+ option = $2
+ # we only want full URLs
+ option = 'all' unless option == 'showurl'
print "Checking the page #{url}\n\n"
puts "The following references were found to hosts other than apache.org and apachecon.com"
puts "The first column shows if the host is recognised as being under ASF control according to"
puts "https://privacy.apache.org/policies/asf-domains"
print "=====\n"
- cmd = ['node', '/srv/whimsy/tools/scan-page.js', url, 'all']
+ cmd = ['node', '/srv/whimsy/tools/scan-page.js', url, option]
out, err, status = Open3.capture3(*cmd)
if status.success?
out.split("\n").each do |url|
@@ -31,6 +34,6 @@
end
print "=====\n"
else
- print "Expecting: ?url=http://.../\n"
+ print "Expecting: ?url=http://.../[&showurl]\n"
end
