package RPS::Import::Musiwave::Digital;

use strict;

use lib '/app/tools/common/lib';
use Common::Date;

use lib '/app/tools/rps/lib';
use base 'RPS::Import::Importer';

use Data::Dumper;

sub _headerIdentifier { { artistName => 'Artist' } }

sub _getDateBegin {
    my $self = shift;

    my $filename = $self->filename() || return;
    $filename =~ /(\d{8})_\d{8}/ || $self->fail("Could not determine date from filename: $filename");

    return $1;
}

sub _getDateEnd {
    my $self = shift;

    my $filename = $self->filename() || return;
    $filename =~ /\d{8}_(\d{8})/ || $self->fail("Could not determine date from filename: $filename");

    return $1;
}

sub formatType { RPS::File::Sale::FORMAT_DOWNLOAD }

sub mediaType {
    my $self = shift;
    my $type = $self->_getByFieldName('productType') || return;

    if ( $type =~ /single full-track/i || $type =~ /album full-track/i ) {
        return RPS::DB::Item::MediaType::kMediaTypeAudio;
    } elsif ( $type =~ /video full length/i ) {
        return RPS::DB::Item::MediaType::kMediaTypeVideo;
    }
    $self->fail("Unable to determine media type from '$type'");
}

sub productType {
    my $self = shift;
    my $type = $self->_getByFieldName('productType') || return;

    if ( $type =~ /single full-track/i || $type =~ /video full length/i ) {
        return RPS::File::Sale::TYPE_TRACK;
    } elsif ( $type =~ /album full-track/i ) {
        return RPS::File::Sale::TYPE_ALBUM;
    }
    $self->fail("Unable to determine product type from '$type'");
}

sub albumName {
    my $self         = shift;
    my $productTitle = $self->_getByFieldName('productTitle');
    my $parentTitle  = $self->_getByFieldName('parentTitle');

    return $self->productType eq RPS::File::Sale::TYPE_TRACK ? $parentTitle : $productTitle;
}

sub trackName {
    my $self         = shift;
    my $productTitle = $self->_getByFieldName('productTitle');

    return $self->productType eq RPS::File::Sale::TYPE_TRACK ? $productTitle : undef;
}

sub serviceID {
    my $self    = shift;
    my $service = $self->_getByFieldName('serviceID');

    my $serviceID = $self->getServiceID($service) if ($service);

    $self->fail("Unknown service '$service'") unless ($serviceID);

    return $serviceID;
}

###
1;    # Play nicely.
###