File Coverage

blib/lib/OpenSearch.pm

Criterion	Covered	Total	%
statement	42	71	59.1
branch			n/a
condition	0	12	0.0
subroutine	14	21	66.6
pod	6	7	85.7
total	62	111	55.8

package OpenSearch;
use strict;
use warnings;
use Moo;
use Types::Standard qw(InstanceOf);
use feature         qw(signatures);
no warnings qw(experimental::signatures);
use Data::Dumper;
use OpenSearch::Base;

use OpenSearch::Cluster;
use OpenSearch::Remote;
use OpenSearch::Search;
use OpenSearch::Index;
use OpenSearch::Document;
use OpenSearch::Security;

our $VERSION = '0.94';

has '_base' => (
  is       => 'rw',
  isa      => InstanceOf ['OpenSearch::Base'],
  init_arg => undef,
);

sub BUILD( $self, $args ) {
  $self->_base( OpenSearch::Base->new(
    user            => $args->{user},
    pass            => $args->{pass},
    hosts           => $args->{hosts},
    secure          => $args->{secure}          // 0,
    allow_insecure  => $args->{allow_insecure}  // 1,
    pool_count      => $args->{pool_count}      // 10,
    clear_attrs     => $args->{clear_attrs}     // 0,
    async           => $args->{async}           // 0,
    max_connections => $args->{max_connections} // 10,
  ) );
}

sub cluster($self) {
  return ( OpenSearch::Cluster->new( _base => $self->_base ) );
}

sub remote($self) {
  return ( OpenSearch::Remote->new( _base => $self->_base ) );
}

sub search($self) {
  return ( OpenSearch::Search->new( _base => $self->_base ) );
}

sub index($self) {
  return ( OpenSearch::Index->new( _base => $self->_base ) );
}

sub document($self) {
  return ( OpenSearch::Document->new( _base => $self->_base ) );
}

sub security($self) {
  return ( OpenSearch::Security->new( _base => $self->_base ) );
}

1;

__END__