package RPS::Import::Youtube::v27;

use lib '/app/tools/rps/lib';
use lib '/app/tools/data_classes/lib';

use Client::Service;
use RPS::Import::ServiceMap;

use base 'RPS::Import::Importer';

sub _fieldMap {
    {
        labelName        => 'Q',
        countryCode      => 'C',
        dateBegin        => 'B',
        dateEnd          => 'B',
        productType      => 'J',
        formatType       => 'R',
        serviceProductID => 'H',
        artistName       => 'O',
        upc              => 'M',
        albumName        => 'P',
        isrc             => 'L',
        trackName        => 'I',
        units            => 'S',
        price            => 'V',
        mediaType        => 'J',
    };
}

sub _headerIdentifier { upc => 'upc' }

sub serviceID    { Client::Service::DSP_YOUTUBE }
sub productType  { RPS::File::Sale::TYPE_TRACK }
sub currencyCode { 'USD' }

sub dateBegin {
    my $self = shift;

    my $date = $self->_getByFieldName('dateBegin') || '';
    if ( $date =~ /^(\d{4})(\d{2})(\d{2})$/g ) {
        return sprintf "%04d-%02d-%02d", $1, $2, $3;
    }

    $self->fail("Unable to determine date_degin from: '$date'");
}

sub dateEnd {
    my $self = shift;

    my $date = $self->_getByFieldName('dateEnd') || '';
    if ( $date =~ /^(\d{4})(\d{2})(\d{2})$/g ) {
        return sprintf "%04d-%02d-%02d", $1, $2, $3;
    }

    $self->fail("Unable to determine date_end from: '$date'");
}

sub formatType {
    my $self = shift;

    my $type = $self->_getByFieldName('formatType') || '';
    if ( $type =~ /^YouTube (?:Premium|Music) (?:Family|Individual|Student) monthly$/i ) {
        return RPS::File::Sale::FORMAT_STREAM;
    }

    $self->fail("Unable to determine format_type from: '$type'");
}

sub mediaType {
    my $self = shift;

    my $type = $self->_getByFieldName('mediaType') || '';

    if ( $type =~ /^Sound Recording$/i ) {
        return RPS::DB::Item::MediaType::kMediaTypeAudio;
    }

    $self->fail("Unable to determine media_type from: '$type'");
}

# digital
sub price     { abs( shift->_getByFieldName('price') || 0 ) }
sub unitPrice { abs shift->SUPER::unitPrice }
sub units {
    my $self = shift;

    my $units = $self->_getByFieldName('units') || 0;
    my $price = $self->_getByFieldName('price') || 0;

    if ( $price > 0 ) {
        $units = $units ? abs($units) : 1;
    } elsif ( $price < 0 ) {
       $units = $units ? -1 * abs($units) : -1;
    }

    return $units;
}


1;