line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# $Id: Port.pm 18 2008-05-05 23:55:18Z jabra $ |
2
|
|
|
|
|
|
|
package NexposeSimpleXML::Parser::Host::Service; |
3
|
|
|
|
|
|
|
{ |
4
|
1
|
|
|
1
|
|
2227
|
use Object::InsideOut; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
9
|
|
5
|
|
|
|
|
|
|
|
6
|
|
|
|
|
|
|
my @name : Field : Arg(name) : Get(name); |
7
|
|
|
|
|
|
|
my @protocol : Field : Arg(protocol) : Get(protocol); |
8
|
|
|
|
|
|
|
my @port : Field : Arg(port) : Get(port); |
9
|
|
|
|
|
|
|
my @fingerprint : Field : Arg(fingerprint) : Get(get_fingerprint) : Type(NexposeSimpleXML::Parser::Fingerprint); |
10
|
|
|
|
|
|
|
my @vulnerabilities : Field : Arg(vulnerabilities) : Get(vulnerabilities) : Type(List(NexposeSimpleXML::Parser::Vulnerability)); |
11
|
|
|
|
|
|
|
sub get_all_vulnerabilities { |
12
|
0
|
|
|
0
|
0
|
|
my ($self) = @_; |
13
|
0
|
|
|
|
|
|
my @all_vulnerabilities = @{ $self->vulnerabilities }; |
|
0
|
|
|
|
|
|
|
14
|
0
|
|
|
|
|
|
return @all_vulnerabilities; |
15
|
|
|
|
|
|
|
} |
16
|
|
|
|
|
|
|
|
17
|
|
|
|
|
|
|
} |
18
|
|
|
|
|
|
|
1; |