#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::LabelRoyalty::Job::RunLabelRoyalties;

use strict;
use warnings;
use Sys::Hostname;

use lib '/app/tools/common/lib';
use Common::Log; 
use Common::Assert;
use Common::RSApp;
use Common::DB::Item::Client;

use lib '/app/tools/rps/lib';
use RPS::Config;

use lib '/app/tools/job/lib';
use Job::Job;
use Job::DB::Item::Job;

use base 'Job::Job';

use constant kJobClass => 'LabelRoyaltyRun';
use constant kLogBasePath => '/app/data/royalty_logs/';
sub _generateCommandLine
{
    my ($self) = @_;

    my $runID = $self->getCommandLineArg('runID');
    assert($runID);

    my $clientID = $self->clientID();

    my $logLevel = $self->getCommandLineArg('logLevel');
    $logLevel = 2 unless $logLevel;


    # JPK - Going to hard-code the paths for now.

#    my $config = RPS::Config->new();
#    my $scriptPath = $config->get('royalty_script_dir');
#
#    my $commandLine = "nice $scriptPath/run_label_royalties.pl -c $clientID -r $runID -V $logLevel";
    my $commandLine = "/app/tools/rps/lib/RPS/LabelRoyalty/Fast/bin/run.pl -c $clientID -r $runID";

    return $commandLine;
}

sub _defaultClass       { return 'RunController'; }
sub _defaultSubclass    { return 'LabelRoyalties'; }
sub _defaultPriority    { return Job::Job::kPriorityNormal; }

sub generateLogBasePath
{
    my ($self) = @_;

    my $clientID = $self->clientID();
    assert($clientID);
    my $runID = $self->getCommandLineArg('runID');

    return (ref($self))->LogFilePath($clientID, $runID);
}


sub _defaultLogFile
{  
    my ($self) = @_;

    my $runID = $self->getCommandLineArg('runID');
    assert($runID);

    my $clientID = Common::RSApp::GetClientID();
#    my $clientID = $self->clientID();
    assert($clientID);

    my $clientData = Common::DB::Item::Client->Lookup(client_id => $clientID);
    return $clientData->client_name_clean . ".label." . $runID;
}


sub LogFilePath
{
    my ($class, $clientID, $runID) = @_;
    assert($clientID);
    assert($runID);

    my $rpsConfig = RPS::Config->new();
    my $basePath = $rpsConfig->get('royalty_log_dir');

    my $clientData = Common::DB::Item::Client->Lookup(client_id => $clientID);

    $basePath .= '/' . $clientData->client_name_clean . "/label/$runID";

    return $basePath;
}

sub _defaultPriority
{
    my $self = shift;
    my $clientID = Common::RSApp::GetClientID();
    my $count = Job::DB::Item::Job->GetActiveJobCount( $clientID, $self->_defaultSubclass() );
    
    
    return Job::Job::kPriorityNormal - $count * 50;
}


###
1;#
###