#---------------------------------------------------------------
# ____                   _ _         ____  _
#|  _ \ ___  _   _  __ _| | |_ _   _/ ___|| |__   __ _ _ __ ___
#| |_) / _ \| | | |/ _` | | __| | | \___ \| '_ \ / _` | '__/ _ \
#|  _ < (_) | |_| | (_| | | |_| |_| |___) | | | | (_| | | |  __/
#|_| \_\___/ \__, |\__,_|_|\__|\__, |____/|_| |_|\__,_|_|  \___|
#            |___/             |___/
#
# Copyright (C) 2010 RoyaltyShare, Inc.   All Rights Reserved
#---------------------------------------------------------------

package RPS::Import::Universal::v12;

use strict;

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

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

sub _fieldMap {
    {
        dateBegin   => 'K',
        productType => 'E',
        formatType  => 'F',
        artistName  => 'B',
        upc         => 'I',
        albumName   => 'D',
        isrc        => 'H',
        trackName   => 'C',
        units       => 'L',
        price       => 'M',
        mediaType   => 'F',
    };
}

my %mediaTypes = (
    1  => RPS::DB::Item::MediaType::kMediaTypeAudio,
    9  => RPS::DB::Item::MediaType::kMediaTypeAudio,
    12 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    14 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    16 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    2  => RPS::DB::Item::MediaType::kMediaTypeAudio,
    23 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    27 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    33 => RPS::DB::Item::MediaType::kMediaTypeAudio,
    4  => RPS::DB::Item::MediaType::kMediaTypeAudio,
    75 => RPS::DB::Item::MediaType::kMediaTypeVideo,
    76 => RPS::DB::Item::MediaType::kMediaTypeVideo,
    96 => RPS::DB::Item::MediaType::kMediaTypeVideo,
);

my %formatTypes = (
    1  => RPS::File::Sale::FORMAT_DOWNLOAD,
    9  => RPS::File::Sale::FORMAT_TETHERED,
    12 => RPS::File::Sale::FORMAT_STREAM,
    14 => RPS::File::Sale::FORMAT_TETHERED,
    16 => RPS::File::Sale::FORMAT_STREAM,
    2  => RPS::File::Sale::FORMAT_STREAM,
    23 => RPS::File::Sale::FORMAT_DOWNLOAD,
    27 => RPS::File::Sale::FORMAT_DOWNLOADUPGRADE,
    33 => RPS::File::Sale::FORMAT_TETHERED,
    4  => RPS::File::Sale::FORMAT_RINGTONE,
    75 => RPS::File::Sale::FORMAT_STREAM,
    76 => RPS::File::Sale::FORMAT_DOWNLOAD,
    96 => RPS::File::Sale::FORMAT_DOWNLOAD,
);

sub _headerIdentifier { ( formatType => 'Sales Channel' ) }

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

sub mediaType {
    my $self  = shift;
    my $value = $self->_getByFieldName('mediaType');
    return $mediaTypes{$value} if ( exists $mediaTypes{$value} );

    return $self->handleError( "Unknown media type: $value", RPS::DB::Item::SaleImportError::kErrorMediaType );
}

sub productType {
    my $self  = shift;
    my $value = $self->_getByFieldName('productType');

    if ( lc($value) eq 'a' ) {
        return RPS::File::Sale::TYPE_ALBUM;
    } elsif ( lc($value) eq 't' ) {
        return RPS::File::Sale::TYPE_TRACK;
    }

    return $self->handleError( "Unknown product type: $value", RPS::DB::Item::SaleImportError::kErrorProductType );
}

sub formatType {
    my $self  = shift;
    my $value = $self->_getByFieldName('formatType');
    return $formatTypes{$value} if ( exists $formatTypes{$value} );

    return $self->handleError( "Unknown format type: $value", RPS::DB::Item::SaleImportError::kErrorFormatType );
}

sub artistName {
    my $self  = shift;
    my $value = $self->_getByFieldName('artistName');

    if ($value) {
        $self->{_artistName} = $value;
    } else {
        $value = $self->{_artistName};
    }

    return $value;
}

sub unitPrice {
    my $self = shift;

    # We want to throw an error if we have zero units and non-zero revenue.
    my $units   = $self->_getByFieldName('units');
    my $revenue = $self->_getByFieldName('price');
    if ( $revenue && ( !$units || $units == 0 ) ) {
        $self->fail( "Revenue " . $revenue . " found with zero units" );
    }
    if ( $revenue && $units ) {
        return $revenue / $units;
    }
}

sub _getDateBegin {

    my $self = shift;
    my $dateBegin = $self->_getByFieldName('dateBegin') || return;

    my $year  = substr( $dateBegin, 0, 4 );
    my $month = substr( $dateBegin, 4, 2 );

    $dateBegin = $year . "-" . $month . "-01";
    return $dateBegin;
}

sub _isValidSaleRecord {
    my $self = shift;

    return ( defined( $self->units ) && ( $self->trackName || $self->albumName ) && ( $self->price ne 'Net Price' ) );
}

#####    MapFace    #####
#

sub _mapFaceServiceID {
    return ('serviceID');
}

sub _mapFaceCountryCode {
    return ('countryCode');
}

sub _mapFaceProductType {
    return ('productType');
}

sub _mapFaceFormatType {
    return ('formatType');
}

sub _mapFaceMediaType {
    return ('formatType');
}

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