File Coverage

blib/lib/FusionInventory/Agent/Task/Deploy/ActionProcessor.pm

Criterion	Covered	Total	%
statement	27	50	54.0
branch	0	16	0.0
condition	0	3	0.0
subroutine	9	11	81.8
pod	0	2	0.0
total	36	82	43.9

package FusionInventory::Agent::Task::Deploy::ActionProcessor;

use strict;
use warnings;

use Cwd;
use English qw(-no_match_vars);

use FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Move;
use FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Copy;
use FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Mkdir;
use FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Delete;
use FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Cmd;

sub new {
    my ($class, %params) = @_;

    die "no workdir parameter" unless $params{workdir};

    my $self = {
        workdir => $params{workdir}
    };

    bless $self, $class;

    return $self;
}

sub process {
    my ( $self, $actionName, $params, $logger ) = @_;

    my $workdir = $self->{workdir};

    if ( ( $OSNAME ne 'MSWin32' ) && ( $actionName eq 'messageBox' ) ) {
        return {
            status => 1,
            msg    => ["not Windows: action `$actionName' ignored"]
        };
    }

    my $ret;
    my $cwd = getcwd();
    chdir( $workdir->{path} );
    if ( $actionName eq 'checks' ) {
        # not an action
    } elsif ( $actionName eq 'move' ) {
        $ret =
          FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Move::do(
            $params, $logger);
    } elsif ( $actionName eq 'copy' ) {
        $ret =
          FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Copy::do(
            $params, $logger);
    } elsif ( $actionName eq 'mkdir' ) {
        $ret =
          FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Mkdir::do(
            $params, $logger);
    } elsif ( $actionName eq 'delete' ) {
        $ret =
          FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Delete::do(
            $params, $logger);
    } elsif ( $actionName eq 'cmd' ) {
        $ret =
          FusionInventory::Agent::Task::Deploy::ActionProcessor::Action::Cmd::do(
            $params, $logger);
   } else {
        $logger->debug("Unknown action type: `$actionName'");
        chdir($cwd);
        return {
            status => 0,
            msg    => ["unknown action `$actionName'"]
        };
    }
    chdir($cwd);

    return $ret;
}

1;