package pfconfig::config;

=head1 NAME

pfconfig::config

=cut

=head1 DESCRIPTION

pfconfig::config

Configuration access to pfconfig.conf

=cut

use pfconfig::constants;
use UNIVERSAL::require;
use pf::IniFiles;
use pf::util;
use pf::log;

our $INI_CONFIG = pfconfig::config->new();

=head2 new

Create a new pfconfig configuration object

=cut

sub new {
    my ($class) = @_;
    my $self = bless {}, $class;
    $self->init();
    return $self;
}

=head2 init

Init the pfconfig configuration object

=cut

sub init {
    my ($self) = @_;
    my $file = $pfconfig::constants::CONFIG_FILE_PATH;
    my $defaults = $pfconfig::constants::CONFIG_DEFAULTS_FILE_PATH;
    my %cfg;
    tie %cfg, 'pf::IniFiles', ( -file => $file, -import => pf::IniFiles->new( -file => $defaults, -envsubst => 1), -envsubst => 1 );

    $self->{cfg} = \%cfg;
}

=head2 section

Get a configuration section

=cut

sub section {
    my ( $self, $name ) = @_;
    return $self->{cfg}{$name};
}

=head2 get_backend

Get the backend object defined in the configuration or the default one

=cut

sub get_backend {
    my ( $self ) = @_;
    my $cfg    = $self->section('general');
    my $logger = get_logger;

    my $name = $cfg->{backend} || $pfconfig::constants::DEFAULT_BACKEND;

    my $type   = "pfconfig::backend::$name";

    $type = untaint_chain($type);

    # load the module to instantiate
    if ( !( eval "$type->require()" ) ) {
        $logger->error( "Can not load backend $name " . "Read the following message for details: $@" );
    }

    $self->{cache} = $type->new();
}

sub get_proto {
	my ( $self ) = @_;
    return $self->section("general")->{proto} || "unix";	
}


=head1 AUTHOR

Inverse inc. <info@inverse.ca>

=head1 COPYRIGHT

Copyright (C) 2005-2023 Inverse inc.

=head1 LICENSE

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301,
USA.

=cut

1;

# vim: set shiftwidth=4:
# vim: set expandtab:
# vim: set backspace=indent,eol,start:

