line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
# AWS::EC2::VPNConnection generated from spec 5.3.0 |
2
|
4
|
|
|
4
|
|
2854
|
use Moose::Util::TypeConstraints; |
|
4
|
|
|
|
|
13
|
|
|
4
|
|
|
|
|
46
|
|
3
|
|
|
|
|
|
|
|
4
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::EC2::VPNConnection', |
5
|
|
|
|
|
|
|
from 'HashRef', |
6
|
|
|
|
|
|
|
via { Cfn::Resource::Properties::AWS::EC2::VPNConnection->new( %$_ ) }; |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
package Cfn::Resource::AWS::EC2::VPNConnection { |
9
|
4
|
|
|
4
|
|
9413
|
use Moose; |
|
4
|
|
|
|
|
13
|
|
|
4
|
|
|
|
|
32
|
|
10
|
|
|
|
|
|
|
extends 'Cfn::Resource'; |
11
|
|
|
|
|
|
|
has Properties => (isa => 'Cfn::Resource::Properties::AWS::EC2::VPNConnection', is => 'rw', coerce => 1); |
12
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
sub AttributeList { |
14
|
1
|
|
|
1
|
0
|
4
|
[ ] |
15
|
|
|
|
|
|
|
} |
16
|
|
|
|
|
|
|
sub supported_regions { |
17
|
1
|
|
|
1
|
0
|
1495
|
[ 'ap-east-1','ap-northeast-1','ap-northeast-2','ap-northeast-3','ap-south-1','ap-southeast-1','ap-southeast-2','ca-central-1','cn-north-1','cn-northwest-1','eu-central-1','eu-north-1','eu-west-1','eu-west-2','eu-west-3','me-south-1','sa-east-1','us-east-1','us-east-2','us-gov-east-1','us-gov-west-1','us-west-1','us-west-2' ] |
18
|
|
|
|
|
|
|
} |
19
|
|
|
|
|
|
|
} |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
subtype 'ArrayOfCfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification', |
23
|
|
|
|
|
|
|
as 'Cfn::Value', |
24
|
|
|
|
|
|
|
where { $_->isa('Cfn::Value::Array') or $_->isa('Cfn::Value::Function') }, |
25
|
|
|
|
|
|
|
message { "$_ is not a Cfn::Value or a Cfn::Value::Function" }; |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
coerce 'ArrayOfCfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification', |
28
|
|
|
|
|
|
|
from 'HashRef', |
29
|
|
|
|
|
|
|
via { |
30
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
31
|
|
|
|
|
|
|
return $f |
32
|
|
|
|
|
|
|
} else { |
33
|
|
|
|
|
|
|
die 'Only accepts functions'; |
34
|
|
|
|
|
|
|
} |
35
|
|
|
|
|
|
|
}, |
36
|
|
|
|
|
|
|
from 'ArrayRef', |
37
|
|
|
|
|
|
|
via { |
38
|
|
|
|
|
|
|
Cfn::Value::Array->new(Value => [ |
39
|
|
|
|
|
|
|
map { |
40
|
|
|
|
|
|
|
Moose::Util::TypeConstraints::find_type_constraint('Cfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification')->coerce($_) |
41
|
|
|
|
|
|
|
} @$_ |
42
|
|
|
|
|
|
|
]); |
43
|
|
|
|
|
|
|
}; |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
subtype 'Cfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification', |
46
|
|
|
|
|
|
|
as 'Cfn::Value'; |
47
|
|
|
|
|
|
|
|
48
|
|
|
|
|
|
|
coerce 'Cfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification', |
49
|
|
|
|
|
|
|
from 'HashRef', |
50
|
|
|
|
|
|
|
via { |
51
|
|
|
|
|
|
|
if (my $f = Cfn::TypeLibrary::try_function($_)) { |
52
|
|
|
|
|
|
|
return $f |
53
|
|
|
|
|
|
|
} else { |
54
|
|
|
|
|
|
|
return Cfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecificationValue->new( %$_ ); |
55
|
|
|
|
|
|
|
} |
56
|
|
|
|
|
|
|
}; |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecificationValue { |
59
|
4
|
|
|
4
|
|
31954
|
use Moose; |
|
4
|
|
|
|
|
12
|
|
|
4
|
|
|
|
|
22
|
|
60
|
4
|
|
|
4
|
|
28520
|
use MooseX::StrictConstructor; |
|
4
|
|
|
|
|
13
|
|
|
4
|
|
|
|
|
44
|
|
61
|
|
|
|
|
|
|
extends 'Cfn::Value::TypedValue'; |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
has PreSharedKey => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
64
|
|
|
|
|
|
|
has TunnelInsideCidr => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
65
|
|
|
|
|
|
|
} |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
package Cfn::Resource::Properties::AWS::EC2::VPNConnection { |
68
|
4
|
|
|
4
|
|
14842
|
use Moose; |
|
4
|
|
|
|
|
14
|
|
|
4
|
|
|
|
|
20
|
|
69
|
4
|
|
|
4
|
|
27315
|
use MooseX::StrictConstructor; |
|
4
|
|
|
|
|
9
|
|
|
4
|
|
|
|
|
25
|
|
70
|
|
|
|
|
|
|
extends 'Cfn::Resource::Properties'; |
71
|
|
|
|
|
|
|
|
72
|
|
|
|
|
|
|
has CustomerGatewayId => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
73
|
|
|
|
|
|
|
has StaticRoutesOnly => (isa => 'Cfn::Value::Boolean', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
74
|
|
|
|
|
|
|
has Tags => (isa => 'ArrayOfCfn::Resource::Properties::TagType', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Mutable'); |
75
|
|
|
|
|
|
|
has TransitGatewayId => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
76
|
|
|
|
|
|
|
has Type => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, required => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
77
|
|
|
|
|
|
|
has VpnGatewayId => (isa => 'Cfn::Value::String', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
78
|
|
|
|
|
|
|
has VpnTunnelOptionsSpecifications => (isa => 'ArrayOfCfn::Resource::Properties::AWS::EC2::VPNConnection::VpnTunnelOptionsSpecification', is => 'rw', coerce => 1, traits => [ 'CfnMutability' ], mutability => 'Immutable'); |
79
|
|
|
|
|
|
|
} |
80
|
|
|
|
|
|
|
|
81
|
|
|
|
|
|
|
1; |