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 31     31   25772309 use strict;
  31         66  
  31         820  
4 31     31   158 use warnings;
  31         55  
  31         990  
5 31     31   153 use base 'FusionInventory::Agent::Target';
  31         178  
  31         18431  
6              
7             my $count = 0;
8              
9             sub new {
10 1     1 1 1194 my ($class, %params) = @_;
11              
12 1 50       7 die "no path parameter" unless $params{path};
13              
14 1         14 my $self = $class->SUPER::new(%params);
15              
16 1         6 $self->{path} = $params{path};
17              
18 1 50       6 $self->{format} = $params{html} ? 'html' :'xml';
19              
20             $self->_init(
21             id => 'local' . $count++,
22 1         10 vardir => $params{basevardir} . '/__LOCAL__',
23             );
24              
25 1         10 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__