File Coverage

blib/lib/FusionInventory/Agent/Target/Local.pm
Criterion Covered Total %
statement 16 22 72.7
branch 2 4 50.0
condition n/a
subroutine 4 7 57.1
pod 2 2 100.0
total 24 35 68.5


line stmt bran cond sub pod time code
1             package FusionInventory::Agent::Target::Local;
2              
3 32     32   23337885 use strict;
  32         42  
  32         910  
4 32     32   98 use warnings;
  32         32  
  32         699  
5 32     32   101 use base 'FusionInventory::Agent::Target';
  32         72  
  32         11169  
6              
7             my $count = 0;
8              
9             sub new {
10 2     2 1 1002 my ($class, %params) = @_;
11              
12 2 50       9 die "no path parameter" unless $params{path};
13              
14 2         21 my $self = $class->SUPER::new(%params);
15              
16 2         11 $self->{path} = $params{path};
17              
18 2 50       8 $self->{format} = $params{html} ? 'html' :'xml';
19              
20             $self->_init(
21             id => 'local' . $count++,
22 2         16 vardir => $params{basevardir} . '/__LOCAL__',
23             );
24              
25 2         13 return $self;
26             }
27              
28             sub getPath {
29 0     0 1   my ($self) = @_;
30              
31 0           return $self->{path};
32             }
33              
34             sub _getName {
35 0     0     my ($self) = @_;
36              
37 0           return $self->{path};
38             }
39              
40             sub _getType {
41 0     0     my ($self) = @_;
42              
43 0           return 'local';
44             }
45              
46             1;
47              
48             __END__