r' => (is => 'ro', isa => 'Str' );
has 'tolerationSeconds' => (is => 'ro', isa => 'Int' );
has 'value' => (is => 'ro', isa => 'Str' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
MIT License
# @link https://gluu.org/
# @since Version 3.1.3
# @filesource
#/
use JSON::PP;
package UpdateRegistration;
use vars qw($VERSION);
$VERSION = '0.01';
package OxdConfig;
use vars qw($VERSION);
$VERSION = '0.01';
use strict;
use warnings;
use JSON::PP;
sub new{
my $class = shift;
my $self = {
# @static
# @var stri
our $oxdHostPort;
$oxdHostPort = 'package';
bless $self, $class;
$self->json_read;
return $self;
}
sub setOpHost {
#my ( $self, $op_host,$oxd_host_port,$authori
t};
}
sub json_read{
my ($self) = @_;
my $filename = 'oxd-settings.json';
#my $baseUrl = $self->{_base_url};
#print $baseUrl;
my $configOBJECT;
if (open (my $configJSON, $filename))
@see OxdClient
# @see OxdConfig
#######################################
use JSON::PP;
package GetAuthorizationUrl;
use OxdPackages::OxdClient;
use base qw(OxdClient Class
use lib './modules';
use Attribute::Handlers;
#use strict;
use warnings;
use 5.010;
use JSON::PP;
use Data::Dumper qw(Dumper);
use utf8;
use Encode;
use File::Basename;
use warn
> shift,
# @var string $base_url Base url for log file directory and oxd-rp-setting.json file.
_base_url => dirname(__FILE__)
};
bless $self, $class;
return $self;
my $json = JSON::PP->new;
my $jsonContent = $json->decode($data);
my $accessToken = '';
if ($jsonContent->{protection_access_token}) {
$accessToken = "Bearer ".$jsonCon
ta1::SubjectAccessReviewSpec' );
has 'status' => (is => 'ro', isa => 'IO::K8s::Api::Authorization::V1beta1::SubjectAccessReviewStatus' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
ses/MIT MIT License
# @link https://gluu.org/
# @since Version 3.1.3
# @filesource
#/
use JSON::PP;
package GetClientToken; # This is the "Class"
use vars qw($VERSION);
s available
use lib './modules';
use Attribute::Handlers;
use strict;
use warnings;
use JSON::PP;
use OxdPackages::OxdConfig;
use Data::Dumper qw(Dumper);
use utf8;
use Encode;
se data from oxd
_data => [],
# @var string $response_json Response data from oxd in format json
_response_json=>shift,
# @var object $response_object Response data
ds the command to the oxd server.
# Args:
# command (dict) - Dict representation of the JSON command string
# @return void
#
# Method: request
# This method i
ses/MIT MIT License
# @link https://gluu.org/
# @since Version 3.1.3
# @filesource
#/
use JSON::PP;
package OxdRemove; # This is the "Class"
use vars qw($VERSION);
$VERS
1beta1::NonResourceRule]' );
has 'resourceRules' => (is => 'ro', isa => 'ArrayRef[IO::K8s::Api::Authorization::V1beta1::ResourceRule]' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
ses/MIT MIT License
# @link https://gluu.org/
# @since Version 3.1.3
# @filesource
#/
use JSON::PP;
package OxdRegister; # This is the "Class"
use vars qw($VERSION);
$VE
s::Api::Authorization::V1::ResourceAttributes' );
has 'uid' => (is => 'ro', isa => 'Str' );
has 'user' => (is => 'ro', isa => 'Str' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
n::V1::NonResourceAttributes' );
has 'resourceAttributes' => (is => 'ro', isa => 'IO::K8s::Api::Authorization::V1::ResourceAttributes' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
nResourceAttributes;
use Moose;
use IO::K8s;
has 'path' => (is => 'ro', isa => 'Str' );
has 'verb' => (is => 'ro', isa => 'Str' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
::V1::SelfSubjectAccessReviewSpec' );
has 'status' => (is => 'ro', isa => 'IO::K8s::Api::Authorization::V1::SubjectAccessReviewStatus' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
=> 'ArrayRef[Str]' );
has 'resources' => (is => 'ro', isa => 'ArrayRef[Str]' );
has 'verbs' => (is => 'ro', isa => 'ArrayRef[Str]' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
d' => (is => 'ro', isa => 'Bool' );
has 'evaluationError' => (is => 'ro', isa => 'Str' );
has 'reason' => (is => 'ro', isa => 'Str' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
'subresource' => (is => 'ro', isa => 'Str' );
has 'verb' => (is => 'ro', isa => 'Str' );
has 'version' => (is => 'ro', isa => 'Str' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;
MIT License
# @link https://gluu.org/
# @since Version 3.1.3
# @filesource
#/
use JSON::PP;
package OxdSetupClient; # This is the "Class"
use vars qw($VERSION);
ta1::SubjectAccessReviewSpec' );
has 'status' => (is => 'ro', isa => 'IO::K8s::Api::Authorization::V1beta1::SubjectAccessReviewStatus' );
sub to_json { IO::K8s->new->object_to_json(shift) }
1;