#!/usr/bin/perl

use strict;
use warnings;

use lib '/app/tools/common/lib';
use Common::Log;
use Common::RSDB;
use Common::DB::Deploy;
use Common::DB::Deploy::Config;
use Common::DB::Deploy::Logger;

use constant CONF_FILE => '/app/tools/common/conf/db_deploy.conf';

my $oConfig = Common::DB::Deploy::Config->new( config_file => CONF_FILE );
my $oLogger = Common::DB::Deploy::Logger->new( config_file => $oConfig->get('db_deploy_log_conf_file'), category => 'db_deploy' );

$oLogger->info("Start process.");

my $oDeploy = Common::DB::Deploy->new(
    oConfig             => $oConfig,
    oLogger             => $oLogger,
    client_db_list     => \%Common::RSDB::CLIENT_DB,
    repository_dirs    => {
        rscommon => $oConfig->get('db_deploy_common_scripts_dir'),
        rps      => $oConfig->get('db_deploy_rps_scripts_dir'),
        dtmv     => $oConfig->get('db_deploy_dtmv_scripts_dir')
    },
    allowed_dir_prefix => $oConfig->get('db_deploy_allowed_dir_prefix'),
);

$oDeploy->process();

$oLogger->info("Finish process.");
exit 0;