[NSE] Updated Robtex scripts to make them work again. Primarily, changed the addresses to https and corrected some wrong patterns.

scripts/hostmap-robtex.nse

@@ -51,7 +51,7 @@ hostrule = function (host)
 end
 
 action = function (host)
-  local link = "http://ip.robtex.com/" .. host.ip .. ".html"
+  local link = "https://ip.robtex.com/" .. host.ip .. ".html"
   local htmldata = http.get_url(link)
   local domains = parse_robtex_response(htmldata.body)
   local output_tab = stdnse.output_table()

scripts/http-robtex-reverse-ip.nse

@@ -48,8 +48,8 @@ categories = {"discovery", "safe", "external"}
 function parse_robtex_response(data)
     local data = string.gsub(data,"\r?\n","")
     local result = {}
-	for num,href,link in string.gmatch(data,"<span id=\"dns(%d+)\"><a href=\"(.-)\">(.-)</a></span>") do
+    for href, link in string.gmatch(data,"<li><a href=\"([^\"^']-)\" >([^\"^']-)</a></li>") do
-		table.insert(result,link)
+        table.insert(result, link)
     end
 	return result
 end
@@ -57,13 +57,14 @@ end
 prerule = function() return stdnse.get_script_args("http-robtex-reverse-ip.host") ~= nil end
 
 action = function(host, port)
+
 	local target = stdnse.get_script_args("http-robtex-reverse-ip.host")
 	local ip = ipOps.ip_to_str(target)
 	if ( not(ip) or #ip ~= 4 ) then
 		return stdnse.format_output(false, "The argument \"http-robtex-reverse-ip.host\" did not contain a valid IPv4 address")
 	end
  
-	local link = "http://www.robtex.com/ip/"..target..".html"
+	local link = "https://www.robtex.com/ip/"..target..".html"
 	local htmldata = http.get_url(link)
 	local domains = parse_robtex_response(htmldata.body)
 	if ( #domains > 0 ) then

scripts/http-robtex-shared-ns.nse

@@ -13,7 +13,7 @@ The target must be specified by DNS name, not IP address.
 -- @usage
 -- nmap --script http-robtex-shared-ns
 --
--- @output
+-- @outt
 -- Host script results:
 -- | http-robtex-shared-ns:
 -- |   example.edu
@@ -43,12 +43,13 @@ end
 function parse_robtex_response(data)
   local result = {}
 
-	-- cut out the section we're interested in
-	data = data:match("<span id=\\\"sharednss?\\\">.-<ul.->(.-)</ul>")
 	if ( not(data) ) then
 		return
 	end
 
+	-- cut out the section we're interested in
+	data = data:match("<span id=\"sharednss\">.-<ul.->(.-)</ul>")
+	
 	-- process each html list item
 	for li in data:gmatch("<li>(.-)</li>") do
 		local domain = li:match("<a.->(.*)</a>")
@@ -65,34 +66,20 @@ local function lookup_dns_server(data)
 end
 
 local function fetch_robtex_data(url)
-  local htmldata = http.get_url(url)
+    local htmldata = http.get("www.robtex.com", 443, url)
 	if ( not(htmldata) or not(htmldata.body) ) then
 		return
 	end
   
-	local url = htmldata.body:match("var%s*uurl%s*='([^']*)")
-	if ( not(url) ) then
-		return
-	end
-	
-	-- retreive the url having the shared dns information
-	htmldata = http.get_url(url)
-	if ( not(htmldata) or not(htmldata.body) ) then
-		return
-	end
-	
-	-- fixup line breaks
-	htmldata = htmldata.body:gsub("(.-)\\\r?\n", "%1")
-
 	-- fixup hex encodings
-	return unescape(htmldata)
+	return unescape(htmldata.body)
 end
 
 hostrule = function (host) return host.targetname end
 
 action = function(host)
-	local base_url = "http://www.robtex.com/dns/%s.html"
+	local base_url = "/dns/" .. host.targetname .. ".html" 
-	local data = fetch_robtex_data(base_url:format(host.targetname))
+	local data = fetch_robtex_data(base_url)
     local domains = parse_robtex_response(data)
 	
 	if ( not(domains) ) then
@@ -103,6 +90,7 @@ action = function(host)
 		local url = base_url:format(server)
 		stdnse.print_debug(2, "%s: Querying URL: %s", SCRIPT_NAME, url)
 		data = fetch_robtex_data(url)
+
 		domains = parse_robtex_response(data)
 	end