package RPS::Import::Sony::v6;

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 { (upc => 'UPC') }

sub _fieldMap {
    {
        # Header
        dateBegin        => 'A',

        # Data
        type             => 'J',
        artistName       => 'C',
        upc              => 'H',
        albumName        => 'E',
        isrc             => 'G',
        trackName        => 'D',
        units            => 'L',
        price            => 'M',
    }
}

sub _unverifiedFieldMap {
    {
        format           => 'K',
    }
}

sub countryCode  { 'CA' }
sub currencyCode { 'CAD' }

sub _getDateBegin { shift->{_dateBegin} }

sub _processHeader {
    my $self = shift;
    my $date = $self->SUPER::_getDateBegin() || return;

    $self->{_dateBegin} = $date if( $date =~ /^\w{3,4} \d+$/ );
}

sub _productTypes {
    {
         'audio album' =>
         {
             formatType  => RPS::File::Sale::FORMAT_RINGTONE,
             mediaType   => RPS::DB::Item::MediaType::kMediaTypeAudio,
             productType => RPS::File::Sale::TYPE_ALBUM,
         },
         'audio track' =>
         {
             formatType => RPS::File::Sale::FORMAT_RINGTONE,
             mediaType => RPS::DB::Item::MediaType::kMediaTypeAudio,
             productType => RPS::File::Sale::TYPE_TRACK,
         },
         'video track' =>
         {
             formatType => RPS::File::Sale::FORMAT_DOWNLOAD,
             mediaType => RPS::DB::Item::MediaType::kMediaTypeVideo,
             productType => RPS::File::Sale::TYPE_TRACK,
         },
         'digital video ep' =>
         {
             formatType => RPS::File::Sale::FORMAT_DOWNLOAD,
             mediaType => RPS::DB::Item::MediaType::kMediaTypeVideo,
             productType => RPS::File::Sale::TYPE_ALBUM,
         },         
         'ringback tone' =>
         {
             formatType => RPS::File::Sale::FORMAT_DOWNLOAD,
             mediaType => RPS::DB::Item::MediaType::kMediaTypeAudio,
             productType => RPS::File::Sale::TYPE_TRACK,
         },
         'mastertone' =>
         {
             formatType => RPS::File::Sale::FORMAT_VPD,
             mediaType => RPS::DB::Item::MediaType::kMediaTypeAudio,
             productType => RPS::File::Sale::TYPE_TRACK,
         },
    }
}


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

    if( $type eq 'ringback tone' ) {
        return RPS::File::Sale::FORMAT_RINGTONE,

    } elsif( $type eq 'mastertone' ) {
        return RPS::File::Sale::FORMAT_RINGTONE,

    } elsif( $format eq 'mobile permanent download' ) {
        return RPS::File::Sale::FORMAT_DOWNLOAD,

    } elsif( $format eq 'mobile tethered (non-ad supported)' ) {
        return RPS::File::Sale::FORMAT_TETHERED,

    } elsif( $format eq 'multi-platform permanent download' ) {
        return RPS::File::Sale::FORMAT_DOWNLOAD,

    } elsif( $format eq 'multi-platform tethered (non-ad supported)' ) {
        return RPS::File::Sale::FORMAT_TETHERED,

    } elsif( $format eq 'online permanent download' ) {
        return RPS::File::Sale::FORMAT_DOWNLOAD,

    } elsif( $format eq 'online stream (ad supported)' ) {
        return RPS::File::Sale::FORMAT_STREAM,

    } elsif( $format eq 'online stream (non-ad supported)' ) {
        return RPS::File::Sale::FORMAT_STREAM,
        
    } elsif( $format eq 'multi-platform stream (non-ad supported)' ) {
        return RPS::File::Sale::FORMAT_STREAM,        

    } elsif( $format eq 'online tethered (non-ad supported)' ) {
        return RPS::File::Sale::FORMAT_TETHERED,
    }

    $self->fail( "Could not determine format type from format: '$format' type: '$type'" );
}

sub trackName {
    my $self = shift;
    return $self->productType eq  RPS::File::Sale::TYPE_ALBUM ? undef : $self->SUPER::trackName;
}

sub albumName {
    my $self = shift;
    return $self->SUPER::albumName ? $self->SUPER::albumName : $self->SUPER::trackName;
}


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