File Coverage

blib/lib/Footprintless/Resource/Provider.pm

Criterion	Covered	Total	%
statement	23	29	79.3
branch	2	4	50.0
condition	2	3	66.6
subroutine	7	10	70.0
pod	3	3	100.0
total	37	49	75.5

use strict;
use warnings;

package Footprintless::Resource::Provider;
$Footprintless::Resource::Provider::VERSION = '1.28';
# ABSTRACT: A contract for providing resources to the resource manager
# PODNAME: Footprintless::Resource::Provider

use parent qw(Footprintless::MixableBase);

use Carp;
use Footprintless::Util qw(
    temp_file
);
use Log::Any;

my $logger = Log::Any->get_logger();

sub download {
    my ( $self, $resource, @options ) = @_;

    my $ref = ref($resource);
    $resource = $self->resource($resource) if ( !$ref || $ref eq 'HASH' );

    croak("invalid resource [$resource]")
        unless ( $resource->isa('Footprintless::Resource') );

    return $self->_download( $resource, @options );
}

sub _download {
    my ( $self, $resource, @options ) = @_;
    croak( __PACKAGE__ . " does not support [$resource]" );
}

sub resource {
    my ( $self, $spec ) = @_;
    croak( __PACKAGE__ . " does not support [$spec]" );
}

sub supports {
    my ( $self, $spec ) = @_;
    return 0;
}

1;

__END__