1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
##
# This file is part of WhatWeb and may be subject to
# redistribution and commercial restrictions. Please see the WhatWeb
# web site for more information on licensing and terms of use.
# http://www.morningstarsecurity.com/research/whatweb
##
# Version 0.2 # 2016-04-20 # Andrew Horton
# Moved patterns from passive function to matches[]
##
Plugin.define "HP-ProCurve-Switch" do
author "Brendan Coles <bcoles@gmail.com>" # 2011-03-12
version "0.2"
description "HP ProCurve Switch"
website "http://www.hp.com/rnd/"
# ShodanHQ results as at 2011-03-12 #
# 10,344 for eHTTP
# 6,686 for eHTTP -Authenticate
# 3,370 for eHTTP Authenticate -ProCurve
# 288 for eHTTP Authenticate ProCurve
matches [
# HTTP Server Header
{ :regexp=>/^eHTTP/, :search=>"headers[server]" },
# Version Detection
{ :version=>/^eHTTP v([\d\.]{1,3})$/, :search=>"headers[server]" },
]
# Passive #
def passive
m=[]
# HTTP Server Header
if @headers["server"] =~ /^eHTTP/
# Model Detection # WWW-Authenticate
m << { :model=>@headers["www-authenticate"].scan(/Basic realm="(HP|ProCurve) ([^"]{6})"/)[0][1] } if @headers["www-authenticate"] =~ /Basic realm="(HP|ProCurve) ([^"]{6})"/
# Model Detection # Title
m << { :model=>@body.scan(/<title>[^\(]+ProCurve[^\(]+Switch[^\(]+\((ProCurve )?([^\(]+)\)[^\(]+<\/title>/m)[0][1] } if @body =~ /<title>[^\(]+ProCurve[^\(]+Switch[^\(]+\((ProCurve )?([^\(]+)\)[^\(]+<\/title>/
end
# Return passive matches
m
end
end
|
