File Coverage

blib/lib/FusionInventory/Agent/Task/Deploy/Job.pm
Criterion Covered Total %
statement 9 22 40.9
branch 0 6 0.0
condition n/a
subroutine 3 7 42.8
pod 0 4 0.0
total 12 39 30.7


line stmt bran cond sub pod time code
1             package FusionInventory::Agent::Task::Deploy::Job;
2              
3 2     2   28855054 use strict;
  2         8  
  2         97  
4 2     2   14 use warnings;
  2         2  
  2         89  
5              
6 2     2   8 use English qw(-no_match_vars);
  2         45  
  2         28  
7              
8             sub new {
9 0     0 0   my ($class, %params) = @_;
10              
11 0           my $self = {
12             uuid => $params{data}->{uuid},
13             requires => $params{data}->{requires},
14             checks => $params{data}->{checks},
15             actions => $params{data}->{actions},
16             associatedFiles => $params{associatedFiles}
17             };
18              
19 0           bless $self, $class;
20              
21 0           return $self;
22             }
23              
24              
25             sub checkWinkey {
26 0     0 0   my ($self) = @_;
27              
28 0 0         return 1 unless $self->{requires}{winkey};
29              
30 0 0         return unless $OSNAME eq 'MSWin32'
31             }
32              
33             sub checkFreespace {
34 0     0 0   my ($self) = @_;
35              
36 0           return 1;
37             }
38              
39             sub getNextToProcess {
40 0     0 0   my ($self) = @_;
41              
42 0 0         return unless $self->{actions};
43              
44 0           shift @{$self->{actions}};
  0            
45             }
46              
47             1;