215 lines
6.6 KiB
Perl
215 lines
6.6 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::V1beta1NetworkPolicyEgressRule;
|
|
|
|
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 Kubernetes::Object::V1beta1NetworkPolicyPeer;
|
|
use Kubernetes::Object::V1beta1NetworkPolicyPort;
|
|
|
|
use base ( "Class::Accessor", "Class::Data::Inheritable" );
|
|
|
|
#
|
|
#DEPRECATED 1.9 - This group version of NetworkPolicyEgressRule is deprecated by networking/v1/NetworkPolicyEgressRule. NetworkPolicyEgressRule describes a particular set of traffic that is allowed out of pods matched by a NetworkPolicySpec's podSelector. The traffic must match both ports and to. This type is beta-level in 1.8
|
|
#
|
|
# 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 =>
|
|
'DEPRECATED 1.9 - This group version of NetworkPolicyEgressRule is deprecated by networking/v1/NetworkPolicyEgressRule. NetworkPolicyEgressRule describes a particular set of traffic that is allowed out of pods matched by a NetworkPolicySpec's podSelector. The traffic must match both ports and to. This type is beta-level in 1.8',
|
|
class => 'V1beta1NetworkPolicyEgressRule',
|
|
required => [], # TODO
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->method_documentation(
|
|
{
|
|
'ports' => {
|
|
datatype => 'ARRAY[V1beta1NetworkPolicyPort]',
|
|
base_name => 'ports',
|
|
description =>
|
|
'List of destination ports for outgoing traffic. Each item in this list is combined using a logical OR. If this field is empty or missing, this rule matches all ports (traffic not restricted by port). If this field is present and contains at least one item, then this rule allows traffic only if the traffic matches at least one port in the list.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
'to' => {
|
|
datatype => 'ARRAY[V1beta1NetworkPolicyPeer]',
|
|
base_name => 'to',
|
|
description =>
|
|
'List of destinations for outgoing traffic of pods selected for this rule. Items in this list are combined using a logical OR operation. If this field is empty or missing, this rule matches all destinations (traffic not restricted by destination). If this field is present and contains at least one item, this rule allows traffic only if the traffic matches at least one item in the to list.',
|
|
format => '',
|
|
read_only => '',
|
|
},
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->openapi_types(
|
|
{
|
|
'ports' => 'ARRAY[V1beta1NetworkPolicyPort]',
|
|
'to' => 'ARRAY[V1beta1NetworkPolicyPeer]'
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->attribute_map(
|
|
{
|
|
'ports' => 'ports',
|
|
'to' => 'to'
|
|
}
|
|
);
|
|
|
|
__PACKAGE__->mk_accessors( keys %{ __PACKAGE__->attribute_map } );
|
|
|
|
1;
|