File Coverage

blib/lib/Docker/CLI/Wrapper/Container.pm

Criterion	Covered	Total	%
statement	14	32	43.7
branch	0	2	0.0
condition			n/a
subroutine	5	9	55.5
pod	4	4	100.0
total	23	47	48.9

package Docker::CLI::Wrapper::Container;
$Docker::CLI::Wrapper::Container::VERSION = '0.0.7';
use strict;
use warnings;
use 5.014;
use autodie;

use Moo;

extends('Docker::CLI::Wrapper::Base');

has 'container' => ( is => 'ro', required => 1, );
has 'sys'       => ( is => 'ro', required => 1, );

sub clean_up
{
    my ($self) = @_;

    eval { $self->docker( { cmd => [ 'stop', $self->container(), ] } ); };

    eval { $self->docker( { cmd => [ 'rm', $self->container(), ] } ); };

    return;
}

sub run_docker
{
    my ($self) = @_;

    $self->docker( { cmd => [ 'pull', $self->sys() ] } );
    $self->docker(
        {
            cmd => [
                'run',              "-t",
                "-d",               "--name",
                $self->container(), $self->sys(),
            ]
        }
    );

    return;
}

sub exe
{
    my ( $self, $args ) = @_;

    my @user;
    if ( exists $args->{user} )
    {
        push @user, ( '--user', $args->{user} );
    }

    return $self->docker(
        { cmd => [ 'exec', @user, $self->container(), @{ $args->{cmd} } ] } );
}

sub exe_bash_code
{
    my ( $self, $args ) = @_;

    return $self->exe(
        {
            %$args, cmd => [ 'bash', '-c', $args->{code}, ],
        }
    );
}

1;

__END__