package NGCP::BulkProcessor::Projects::ETL::SetProfilePackage::Settings;
use strict;

## no critic

use NGCP::BulkProcessor::Globals qw(
    $enablemultithreading
    $cpucount
);
#$working_path
#create_path

use NGCP::BulkProcessor::Logging qw(
    getlogger
    scriptinfo
    configurationinfo
);

use NGCP::BulkProcessor::LogError qw(
    fileerror
    configurationwarn
    configurationerror
);

use NGCP::BulkProcessor::LoadConfig qw(
    split_tuple
    parse_regexp
);
use NGCP::BulkProcessor::Utils qw(prompt stringtobool);
#format_number check_ipnet

require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(
    update_settings
    update_mappings
    check_dry

    $defaultsettings
    $defaultconfig

    $mappings_yml
    $mappings

    $dry
    $skip_errors
    $force

    $set_profile_package_multithreading
    $set_profile_package_numofthreads

);

our $defaultconfig = 'config.cfg';
our $defaultsettings = 'settings.cfg';

our $mappings_yml = undef;
our $mappings = {};

our $force = 0;
our $dry = 0;
our $skip_errors = 0;

our $set_profile_package_multithreading = $enablemultithreading;
our $set_profile_package_numofthreads = $cpucount;

sub update_settings {

    my ($data,$configfile) = @_;

    if (defined $data) {

        my $result = 1;
        #my $regexp_result;

        #&$configurationinfocode("testinfomessage",$configlogger);

        #$result &= _prepare_working_paths(1);

        $dry = $data->{dry} if exists $data->{dry};
        $skip_errors = $data->{skip_errors} if exists $data->{skip_errors};

        $set_profile_package_multithreading = $data->{set_profile_package_multithreading} if exists $data->{set_profile_package_multithreading};
        $set_profile_package_numofthreads = _get_numofthreads($cpucount,$data,'set_profile_package_numofthreads');

        $mappings_yml = $data->{mappings_yml} if exists $data->{mappings_yml};

        return $result;

    }
    return 0;

}

sub update_mappings {

    my ($data,$configfile) = @_;

    if (defined $data) {

        my $result = 1;

        eval {
            $mappings = $data->{'mappings'};
        };
        if ($@ or 'HASH' ne ref $mappings or (scalar keys %$mappings) == 0) {
            $mappings //= {};
            configurationerror($configfile,'no mappings found',getlogger(__PACKAGE__));
            $result = 0;
        }

        return $result;
    }
    return 0;

}

sub check_dry {

    if ($dry) {
        scriptinfo('running in dry mode - NGCP databases will not be modified',getlogger(__PACKAGE__));
        return 1;
    } else {
        scriptinfo('NO DRY MODE - NGCP DATABASES WILL BE MODIFIED!',getlogger(__PACKAGE__));
        if (!$force) {
            if ('yes' eq lc(prompt("Type 'yes' to proceed: "))) {
                return 1;
            } else {
                return 0;
            }
        } else {
            scriptinfo('force option applied',getlogger(__PACKAGE__));
            return 1;
        }
    }

}

sub _get_numofthreads {
    my ($default_value,$data,$key) = @_;
    my $_numofthreads = $default_value;
    $_numofthreads = $data->{$key} if exists $data->{$key};
    $_numofthreads = $cpucount if $_numofthreads > $cpucount;
    return $_numofthreads;
}

1;