mirror of
https://github.com/nmap/nmap.git
synced 2025-12-06 04:31:29 +00:00
fb67a6717e
Mostly found with:
for i in nselib/*.lua scripts/*.nse; do
echo $(perl -lne 'BEGIN{$a=$p=0}next unless $_;/^(\s*)/;' \
-e '$l=length$1;next if$l==$p;$a+=(abs($l-$p)-$a)/$.;' \
-e '$p=$l;END{print$a}' $i) $i
done | sort -nr
And indented with: https://gist.github.com/bonsaiviking/8845871
whois-ip.nse was particularly mangled (probably my fault due to using
vim's built-in indentation script, but it could be structured better)
85 lines
2.5 KiB
Lua
85 lines
2.5 KiB
Lua
local http = require "http"
|
|
local shortport = require "shortport"
|
|
local stdnse = require "stdnse"
|
|
local string = require "string"
|
|
|
|
description = [[
|
|
Displays the contents of the "generator" meta tag of a web page (default: /) if there is one.
|
|
]]
|
|
|
|
author = "Michael Kohl"
|
|
license = "Same as Nmap--See http://nmap.org/book/man-legal.html"
|
|
categories = {"default", "discovery", "safe"}
|
|
|
|
---
|
|
-- @usage
|
|
-- nmap --script http-generator [--script-args http-generator.path=<path>,http-generator.redirects=<number>,...] <host>
|
|
--
|
|
-- @output
|
|
-- PORT STATE SERVICE
|
|
-- 80/tcp open http
|
|
-- |_http-generator: TYPO3 4.2 CMS
|
|
-- 443/tcp open https
|
|
-- |_http-generator: TYPO3 4.2 CMS
|
|
--
|
|
-- @args http-generator.path Specify the path you want to check for a generator meta tag (default to '/').
|
|
-- @args http-generator.redirects Specify the maximum number of redirects to follow (defaults to 3).
|
|
|
|
-- Changelog:
|
|
-- 2011-12-23 Michael Kohl <citizen428@gmail.com>:
|
|
-- + Initial version
|
|
-- 2012-01-10 Michael Kohl <citizen428@gmail.com>:
|
|
-- + update documentation
|
|
-- + make pattern case insensitive
|
|
-- + only follow first redirect
|
|
-- 2012-01-11 Michael Kohl <citizen428@gmail.com>:
|
|
-- + more generic pattern
|
|
-- + simplified matching
|
|
-- 2012-01-13 Michael Kohl <citizen428@gmail.com>:
|
|
-- + add http-generator.path argument
|
|
-- + add http-generator.redirects argument
|
|
-- + restructure redirect handling
|
|
-- + improve redirect pattern
|
|
-- + update documentation
|
|
-- + add changelog
|
|
|
|
-- TODO:
|
|
-- more generic generator pattern
|
|
|
|
|
|
-- helper function
|
|
local follow_redirects = function(host, port, path, n)
|
|
local pattern = "^[hH][tT][tT][pP]/1.[01] 30[12]"
|
|
local response = http.get(host, port, path)
|
|
|
|
while (response['status-line'] or ""):match(pattern) and n > 0 do
|
|
n = n - 1
|
|
local loc = response.header['location']
|
|
response = http.get_url(loc)
|
|
end
|
|
|
|
return response
|
|
end
|
|
|
|
portrule = shortport.http
|
|
|
|
action = function(host, port)
|
|
local response, loc, generator
|
|
local path = stdnse.get_script_args('http-generator.path') or '/'
|
|
local redirects = tonumber(stdnse.get_script_args('http-generator.redirects')) or 3
|
|
|
|
-- Worst case: <meta name=Generator content="Microsoft Word 11">
|
|
local pattern = '<meta name="?generator"? content="([^\"]*)" ?/?>'
|
|
|
|
-- make pattern case-insensitive
|
|
pattern = pattern:gsub("%a", function (c)
|
|
return string.format("[%s%s]", string.lower(c),
|
|
string.upper(c))
|
|
end)
|
|
|
|
response = follow_redirects(host, port, path, redirects)
|
|
if ( response and response.body ) then
|
|
return response.body:match(pattern)
|
|
end
|
|
end
|