232 lines
6.9 KiB
Perl
232 lines
6.9 KiB
Perl
|
|
=begin comment
|
|
|
|
Kubernetes
|
|
|
|
No description provided (generated by Openapi Generator https://github.com/openapitools/openapi-generator)
|
|
|
|
The version of the OpenAPI document: v1.13.7
|
|
|
|
Generated by: https://openapi-generator.tech
|
|
|
|
=end comment
|
|
|
|
=cut
|
|
|
|
#
|
|
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech).
|
|
# Do not edit the class manually.
|
|
# Ref: https://openapi-generator.tech
|
|
#
|
|
package Kubernetes::Object::V1beta1RuleWithOperations;
|
|
|
|
require 5.6.0;
|
|
use strict;
|
|
use warnings;
|
|
use utf8;
|
|
use JSON qw(decode_json);
|
|
use Data::Dumper;
|
|
use Module::Runtime qw(use_module);
|
|
use Log::Any qw($log);
|
|
use Date::Parse;
|
|
use DateTime;
|
|
|
|
use base ( "Class::Accessor", "Class::Data::Inheritable" );
|
|
|
|
#
|
|
#RuleWithOperations is a tuple of Operations and Resources. It is recommended to make sure that all the tuple expansions are valid.
|
|
#
|
|
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech). Do not edit the class manually.
|
|
# REF: https://openapi-generator.tech
|
|
#
|
|
|
|
=begin comment
|
|
|
|
Kubernetes
|
|
|
|
No description provided (generated by Openapi Generator https://github.com/openapitools/openapi-generator)
|
|
|
|
The version of the OpenAPI document: v1.13.7
|
|
|
|
Generated by: https://openapi-generator.tech
|
|
|
|
=end comment
|
|
|
|
=cut
|
|
|
|
#
|
|
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech).
|
|
# Do not edit the class manually.
|
|
# Ref: https://openapi-generator.tech
|
|
#
|
|
__PACKAGE__->mk_classdata( 'attribute_map' => {} );
|
|
__PACKAGE__->mk_classdata( 'openapi_types' => {} );
|
|
__PACKAGE__->mk_classdata( 'method_documentation' => {} );
|
|
__PACKAGE__->mk_classdata( 'class_documentation' => {} );
|
|
|
|
# new plain object
|
|
sub new {
|
|
my ( $class, %args ) = @_;
|
|
|
|
my $self = bless {}, $class;
|
|
|
|
$self->init(%args);
|
|
|
|
return $self;
|
|
}
|
|
|
|
# initialize the object
|
|
sub init {
|
|
my ( $self, %args ) = @_;
|
|
|
|
foreach my $attribute ( keys %{ $self->attribute_map } ) {
|
|
my $args_key = $self->attribute_map->{$attribute};
|
|
$self->$attribute( $args{$args_key} );
|
|
}
|
|
}
|
|
|
|
# return perl hash
|
|
sub to_hash {
|
|
my $self = shift;
|
|
my $_hash = decode_json( JSON->new->convert_blessed->encode($self) );
|
|
|
|
return $_hash;
|
|
}
|
|
|
|
# used by JSON for serialization
|
|
sub TO_JSON {
|
|
my $self = shift;
|
|
my $_data = {};
|
|
foreach my $_key ( keys %{ $self->attribute_map } ) {
|
|
if ( defined $self->{$_key} ) {
|
|
$_data->{ $self->attribute_map->{$_key} } = $self->{$_key};
|
|
}
|
|
}
|
|
|
|
return $_data;
|
|
}
|
|
|
|
# from Perl hashref
|
|
sub from_hash {
|
|
my ( $self, $hash ) = @_;
|
|
|
|
# loop through attributes and use openapi_types to deserialize the data
|
|
while ( my ( $_key, $_type ) = each %{ $self->openapi_types } ) {
|
|
my $_json_attribute = $self->attribute_map->{$_key};
|
|
if ( $_type =~ /^array\[(.+)\]$/i ) { # array
|
|
my $_subclass = $1;
|
|
my @_array = ();
|
|
foreach my $_element ( @{ $hash->{$_json_attribute} } ) {
|
|
push @_array, $self->_deserialize( $_subclass, $_element );
|
|
}
|
|
$self->{$_key} = \@_array;
|
|
}
|
|
elsif ( $_type =~ /^hash\[string,(.+)\]$/i ) { # hash
|
|
my $_subclass = $1;
|
|
my %_hash = ();
|
|
while ( my ( $_key, $_element ) =
|
|
each %{ $hash->{$_json_attribute} } )
|
|
{
|
|
$_hash{$_key} = $self->_deserialize( $_subclass, $_element );
|
|
}
|
|
$self->{$_key} = \%_hash;
|
|
}
|
|
elsif ( exists $hash->{$_json_attribute} )
|
|
{ #hash(model), primitive, datetime
|
|
$self->{$_key} =
|
|
$self->_deserialize( $_type, $hash->{$_json_attribute} );
|
|
}
|
|
else {
|
|
$log->debugf( "Warning: %s (%s) does not exist in input hash\n",
|
|
$_key, $_json_attribute );
|
|
}
|
|
}
|
|
|
|
return $self;
|
|
}
|
|
|
|
# deserialize non-array data
|
|
sub _deserialize {
|
|
my ( $self, $type, $data ) = @_;
|
|
$log->debugf( "deserializing %s with %s", Dumper($data), $type );
|
|
|
|
if ( $type eq 'DateTime' ) {
|
|
return DateTime->from_epoch( epoch => str2time($data) );
|
|
}
|
|
elsif ( grep( /^$type$/, ( 'int', 'double', 'string', 'boolean' ) ) ) {
|
|
return $data;
|
|
}
|
|
else { # hash(model)
|
|
my $_instance = eval "Kubernetes::Object::$type->new()";
|
|
return $_instance->from_hash($data);
|
|
}
|
|
}
|
|
|
|
__PACKAGE__->class_documentation(
|
|
{
|
|
description =>
|
|
'RuleWithOperations is a tuple of Operations and Resources. It is recommended to make sure that all the tuple expansions are valid.',
|
|
class => 'V1beta1RuleWithOperations',
|
|
required => [], # TODO
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->method_documentation(
|
|
{
|
|
'api_groups' => {
|
|
datatype => 'ARRAY[string]',
|
|
base_name => 'apiGroups',
|
|
description =>
|
|
'APIGroups is the API groups the resources belong to. '*' is all groups. If '*' is present, the length of the slice must be one. Required.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
'api_versions' => {
|
|
datatype => 'ARRAY[string]',
|
|
base_name => 'apiVersions',
|
|
description =>
|
|
'APIVersions is the API versions the resources belong to. '*' is all versions. If '*' is present, the length of the slice must be one. Required.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
'operations' => {
|
|
datatype => 'ARRAY[string]',
|
|
base_name => 'operations',
|
|
description =>
|
|
'Operations is the operations the admission hook cares about - CREATE, UPDATE, or * for all operations. If '*' is present, the length of the slice must be one. Required.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
'resources' => {
|
|
datatype => 'ARRAY[string]',
|
|
base_name => 'resources',
|
|
description =>
|
|
'Resources is a list of resources this rule applies to. For example: 'pods' means pods. 'pods/log' means the log subresource of pods. '*' means all resources, but not subresources. 'pods/*' means all subresources of pods. '*/scale' means all scale subresources. '*/*' means all resources and their subresources. If wildcard is present, the validation rule will ensure resources do not overlap with each other. Depending on the enclosing object, subresources might not be allowed. Required.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->openapi_types(
|
|
{
|
|
'api_groups' => 'ARRAY[string]',
|
|
'api_versions' => 'ARRAY[string]',
|
|
'operations' => 'ARRAY[string]',
|
|
'resources' => 'ARRAY[string]'
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->attribute_map(
|
|
{
|
|
'api_groups' => 'apiGroups',
|
|
'api_versions' => 'apiVersions',
|
|
'operations' => 'operations',
|
|
'resources' => 'resources'
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->mk_accessors( keys %{ __PACKAGE__->attribute_map } );
|
|
|
|
1;
|