package Javonet::Javonet;
use strict;
use warnings FATAL => 'all';
use Moose;
use lib 'lib';
use Try::Tiny;
use threads;
use aliased 'Javonet::Sdk::Internal::RuntimeFactory' => 'RuntimeFactory';
use aliased 'Javonet::Core::Transmitter::PerlTransmitter' => 'Transmitter', qw(activate send_command set_config_source set_javonet_working_directory);
use aliased 'Javonet::Core::Exception::SdkExceptionHelper' => 'SdkExceptionHelper';
use aliased 'Javonet::Sdk::Core::RuntimeLogger' => 'RuntimeLogger', qw(get_runtime_info);
BEGIN {
    SdkExceptionHelper->send_exception_to_app_insights("SdkMessage", "Javonet Sdk initialized");
}
sub activate {
    my($self, $licenseKey) = @_;
    try {
        return Transmitter->activate($licenseKey);
    } catch {
        Javonet::Core::Exception::SdkExceptionHelper->send_exception_to_app_insights($_,"licenseFile");
        die($_);
    };
}
sub in_memory {
    return RuntimeFactory->new(Javonet::Sdk::Internal::ConnectionType::get_connection_type('InMemory'), undef, undef);
}
sub tcp {
    my $class = shift;
    my $address = shift;
    return RuntimeFactory->new(Javonet::Sdk::Internal::ConnectionType::get_connection_type('Tcp'), $address, undef);
}
sub with_config {
    my ($self, $config_path) = @_;
    try {
        Transmitter->set_config_source($config_path);
        return RuntimeFactory->new(Javonet::Sdk::Internal::ConnectionType::get_connection_type('WithConfig'), undef, $config_path);
    } catch {
        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
        die $_;
    };
}
sub get_runtime_info() {
    RuntimeLogger->get_runtime_info();
}
sub set_config_source {
    my ($self, $config_path) = @_;
    try {
        Transmitter->set_config_source($config_path);
    } catch {
        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
        die $_;
    };
}
# Sets the working directory for the Javonet SDK.
# @param $path [String] The working directory path.
sub set_javonet_working_directory {
    my ($self, $path) = @_;
    try {
        $path =~ s{\\}{/}g;
        $path .= '/' unless $path =~ m{/$};
        mkdir $path, 0700 unless -d $path;
        #ActivationHelper->working_directory($path);
        Transmitter->set_javonet_working_directory($path);
    } catch {
        SdkExceptionHelper->send_exception_to_app_insights("SdkException", $_);
        die $_;
    };
}
1;