packages feed

amazonka-directconnect 1.6.1 → 2.0

raw patch · 221 files changed

+24002/−9922 lines, 221 filesdep +case-insensitivedep ~amazonka-coredep ~amazonka-testdep ~basesetup-changedPVP ok

version bump matches the API change (PVP)

Dependencies added: case-insensitive

Dependency ranges changed: amazonka-core, amazonka-test, base

API changes (from Hackage documentation)

- Network.AWS.DirectConnect: ApplicationPdf :: LoaContentType
- Network.AWS.DirectConnect: Associated :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect: Associating :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect: Attached :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect: Attaching :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect: Available :: BGPPeerState
- Network.AWS.DirectConnect: CSAvailable :: ConnectionState
- Network.AWS.DirectConnect: CSDeleted :: ConnectionState
- Network.AWS.DirectConnect: CSDeleting :: ConnectionState
- Network.AWS.DirectConnect: CSDown :: ConnectionState
- Network.AWS.DirectConnect: CSOrdering :: ConnectionState
- Network.AWS.DirectConnect: CSPending :: ConnectionState
- Network.AWS.DirectConnect: CSRejected :: ConnectionState
- Network.AWS.DirectConnect: CSRequested :: ConnectionState
- Network.AWS.DirectConnect: DCGSAvailable :: DirectConnectGatewayState
- Network.AWS.DirectConnect: DCGSDeleted :: DirectConnectGatewayState
- Network.AWS.DirectConnect: DCGSDeleting :: DirectConnectGatewayState
- Network.AWS.DirectConnect: DCGSPending :: DirectConnectGatewayState
- Network.AWS.DirectConnect: Deleted :: BGPPeerState
- Network.AWS.DirectConnect: Deleting :: BGPPeerState
- Network.AWS.DirectConnect: Detached :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect: Detaching :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect: Disassociated :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect: Disassociating :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect: Down :: BGPStatus
- Network.AWS.DirectConnect: IPV4 :: AddressFamily
- Network.AWS.DirectConnect: IPV6 :: AddressFamily
- Network.AWS.DirectConnect: ISAvailable :: InterconnectState
- Network.AWS.DirectConnect: ISDeleted :: InterconnectState
- Network.AWS.DirectConnect: ISDeleting :: InterconnectState
- Network.AWS.DirectConnect: ISDown :: InterconnectState
- Network.AWS.DirectConnect: ISPending :: InterconnectState
- Network.AWS.DirectConnect: ISRequested :: InterconnectState
- Network.AWS.DirectConnect: LSAvailable :: LagState
- Network.AWS.DirectConnect: LSDeleted :: LagState
- Network.AWS.DirectConnect: LSDeleting :: LagState
- Network.AWS.DirectConnect: LSDown :: LagState
- Network.AWS.DirectConnect: LSPending :: LagState
- Network.AWS.DirectConnect: LSRequested :: LagState
- Network.AWS.DirectConnect: Pending :: BGPPeerState
- Network.AWS.DirectConnect: UP :: BGPStatus
- Network.AWS.DirectConnect: VISAvailable :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISConfirming :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISDeleted :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISDeleting :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISDown :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISPending :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISRejected :: VirtualInterfaceState
- Network.AWS.DirectConnect: VISVerifying :: VirtualInterfaceState
- Network.AWS.DirectConnect: Verifying :: BGPPeerState
- Network.AWS.DirectConnect: _DirectConnectClientException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect: _DirectConnectServerException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect: _DuplicateTagKeysException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect: _TooManyTagsException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect: bgpPeer :: BGPPeer
- Network.AWS.DirectConnect: bpAddressFamily :: Lens' BGPPeer (Maybe AddressFamily)
- Network.AWS.DirectConnect: bpAmazonAddress :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect: bpAsn :: Lens' BGPPeer (Maybe Int)
- Network.AWS.DirectConnect: bpAuthKey :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect: bpBgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)
- Network.AWS.DirectConnect: bpBgpStatus :: Lens' BGPPeer (Maybe BGPStatus)
- Network.AWS.DirectConnect: bpCustomerAddress :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect: cConnections :: Lens' Connections [Connection]
- Network.AWS.DirectConnect: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect: connection :: Connection
- Network.AWS.DirectConnect: connections :: Connections
- Network.AWS.DirectConnect: dAttachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)
- Network.AWS.DirectConnect: dDirectConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect: dStateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect: dVirtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect: dVirtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect: dVirtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect: data AddressFamily
- Network.AWS.DirectConnect: data BGPPeer
- Network.AWS.DirectConnect: data BGPPeerState
- Network.AWS.DirectConnect: data BGPStatus
- Network.AWS.DirectConnect: data Connection
- Network.AWS.DirectConnect: data ConnectionState
- Network.AWS.DirectConnect: data Connections
- Network.AWS.DirectConnect: data DirectConnectGateway
- Network.AWS.DirectConnect: data DirectConnectGatewayAssociation
- Network.AWS.DirectConnect: data DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect: data DirectConnectGatewayAttachment
- Network.AWS.DirectConnect: data DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect: data DirectConnectGatewayState
- Network.AWS.DirectConnect: data Interconnect
- Network.AWS.DirectConnect: data InterconnectState
- Network.AWS.DirectConnect: data Lag
- Network.AWS.DirectConnect: data LagState
- Network.AWS.DirectConnect: data LoaContentType
- Network.AWS.DirectConnect: data Location
- Network.AWS.DirectConnect: data NewBGPPeer
- Network.AWS.DirectConnect: data NewPrivateVirtualInterface
- Network.AWS.DirectConnect: data NewPrivateVirtualInterfaceAllocation
- Network.AWS.DirectConnect: data NewPublicVirtualInterface
- Network.AWS.DirectConnect: data NewPublicVirtualInterfaceAllocation
- Network.AWS.DirectConnect: data ResourceTag
- Network.AWS.DirectConnect: data RouteFilterPrefix
- Network.AWS.DirectConnect: data Tag
- Network.AWS.DirectConnect: data VirtualGateway
- Network.AWS.DirectConnect: data VirtualInterface
- Network.AWS.DirectConnect: data VirtualInterfaceState
- Network.AWS.DirectConnect: dcgAmazonSideASN :: Lens' DirectConnectGateway (Maybe Integer)
- Network.AWS.DirectConnect: dcgDirectConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect: dcgDirectConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect: dcgDirectConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)
- Network.AWS.DirectConnect: dcgOwnerAccount :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect: dcgStateChangeError :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect: dcgaAssociationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)
- Network.AWS.DirectConnect: dcgaDirectConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect: dcgaStateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect: dcgaVirtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect: dcgaVirtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect: dcgaVirtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect: directConnect :: Service
- Network.AWS.DirectConnect: directConnectGateway :: DirectConnectGateway
- Network.AWS.DirectConnect: directConnectGatewayAssociation :: DirectConnectGatewayAssociation
- Network.AWS.DirectConnect: directConnectGatewayAttachment :: DirectConnectGatewayAttachment
- Network.AWS.DirectConnect: iAwsDevice :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iBandwidth :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iInterconnectId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iInterconnectName :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iInterconnectState :: Lens' Interconnect (Maybe InterconnectState)
- Network.AWS.DirectConnect: iLagId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iLoaIssueTime :: Lens' Interconnect (Maybe UTCTime)
- Network.AWS.DirectConnect: iLocation :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: iRegion :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect: interconnect :: Interconnect
- Network.AWS.DirectConnect: lLocationCode :: Lens' Location (Maybe Text)
- Network.AWS.DirectConnect: lLocationName :: Lens' Location (Maybe Text)
- Network.AWS.DirectConnect: lag :: Lag
- Network.AWS.DirectConnect: lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)
- Network.AWS.DirectConnect: lagAwsDevice :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagConnections :: Lens' Lag [Connection]
- Network.AWS.DirectConnect: lagConnectionsBandwidth :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagLagId :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagLagName :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagLagState :: Lens' Lag (Maybe LagState)
- Network.AWS.DirectConnect: lagLocation :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagMinimumLinks :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect: lagNumberOfConnections :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect: lagOwnerAccount :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: lagRegion :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect: location :: Location
- Network.AWS.DirectConnect: nAddressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect: nAmazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: nAsn :: Lens' NewPrivateVirtualInterface Int
- Network.AWS.DirectConnect: nAuthKey :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: nCustomerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: nDirectConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: nVirtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: nVirtualInterfaceName :: Lens' NewPrivateVirtualInterface Text
- Network.AWS.DirectConnect: nVlan :: Lens' NewPrivateVirtualInterface Int
- Network.AWS.DirectConnect: nbpAddressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)
- Network.AWS.DirectConnect: nbpAmazonAddress :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect: nbpAsn :: Lens' NewBGPPeer (Maybe Int)
- Network.AWS.DirectConnect: nbpAuthKey :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect: nbpCustomerAddress :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect: newAddressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)
- Network.AWS.DirectConnect: newAmazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: newAsn :: Lens' NewPublicVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect: newAuthKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: newBGPPeer :: NewBGPPeer
- Network.AWS.DirectConnect: newCustomerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: newPrivateVirtualInterface :: Text -> Int -> Int -> NewPrivateVirtualInterface
- Network.AWS.DirectConnect: newPrivateVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
- Network.AWS.DirectConnect: newPublicVirtualInterface :: Text -> Int -> Int -> NewPublicVirtualInterface
- Network.AWS.DirectConnect: newPublicVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
- Network.AWS.DirectConnect: newRouteFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation [RouteFilterPrefix]
- Network.AWS.DirectConnect: newVirtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text
- Network.AWS.DirectConnect: newVlan :: Lens' NewPublicVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect: npviAddressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect: npviAmazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: npviAsn :: Lens' NewPublicVirtualInterface Int
- Network.AWS.DirectConnect: npviAuthKey :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: npviCustomerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: npviRouteFilterPrefixes :: Lens' NewPublicVirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect: npviVirtualInterfaceName :: Lens' NewPublicVirtualInterface Text
- Network.AWS.DirectConnect: npviVlan :: Lens' NewPublicVirtualInterface Int
- Network.AWS.DirectConnect: npviaAddressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)
- Network.AWS.DirectConnect: npviaAmazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: npviaAsn :: Lens' NewPrivateVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect: npviaAuthKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: npviaCustomerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect: npviaVirtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text
- Network.AWS.DirectConnect: npviaVlan :: Lens' NewPrivateVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect: resourceTag :: ResourceTag
- Network.AWS.DirectConnect: rfpCidr :: Lens' RouteFilterPrefix (Maybe Text)
- Network.AWS.DirectConnect: routeFilterPrefix :: RouteFilterPrefix
- Network.AWS.DirectConnect: rtResourceARN :: Lens' ResourceTag (Maybe Text)
- Network.AWS.DirectConnect: rtTags :: Lens' ResourceTag (Maybe (NonEmpty Tag))
- Network.AWS.DirectConnect: tag :: Text -> Tag
- Network.AWS.DirectConnect: tagKey :: Lens' Tag Text
- Network.AWS.DirectConnect: tagValue :: Lens' Tag (Maybe Text)
- Network.AWS.DirectConnect: vgVirtualGatewayId :: Lens' VirtualGateway (Maybe Text)
- Network.AWS.DirectConnect: vgVirtualGatewayState :: Lens' VirtualGateway (Maybe Text)
- Network.AWS.DirectConnect: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect: virtualGateway :: VirtualGateway
- Network.AWS.DirectConnect: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.AllocateHostedConnection: ahcBandwidth :: Lens' AllocateHostedConnection Text
- Network.AWS.DirectConnect.AllocateHostedConnection: ahcConnectionId :: Lens' AllocateHostedConnection Text
- Network.AWS.DirectConnect.AllocateHostedConnection: ahcConnectionName :: Lens' AllocateHostedConnection Text
- Network.AWS.DirectConnect.AllocateHostedConnection: ahcOwnerAccount :: Lens' AllocateHostedConnection Text
- Network.AWS.DirectConnect.AllocateHostedConnection: ahcVlan :: Lens' AllocateHostedConnection Int
- Network.AWS.DirectConnect.AllocateHostedConnection: allocateHostedConnection :: Text -> Text -> Text -> Text -> Int -> AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.AllocateHostedConnection: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.AllocateHostedConnection: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AllocateHostedConnection: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.AllocateHostedConnection: connection :: Connection
- Network.AWS.DirectConnect.AllocateHostedConnection: data AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: data Connection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Data.Data.Data Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance GHC.Read.Read Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance GHC.Show.Show Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocateHostedConnection: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: allocatePrivateVirtualInterface :: Text -> Text -> NewPrivateVirtualInterfaceAllocation -> AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: apviConnectionId :: Lens' AllocatePrivateVirtualInterface Text
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: apviNewPrivateVirtualInterfaceAllocation :: Lens' AllocatePrivateVirtualInterface NewPrivateVirtualInterfaceAllocation
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: apviOwnerAccount :: Lens' AllocatePrivateVirtualInterface Text
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: data AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: data VirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: aConnectionId :: Lens' AllocatePublicVirtualInterface Text
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: aNewPublicVirtualInterfaceAllocation :: Lens' AllocatePublicVirtualInterface NewPublicVirtualInterfaceAllocation
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: aOwnerAccount :: Lens' AllocatePublicVirtualInterface Text
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: allocatePublicVirtualInterface :: Text -> Text -> NewPublicVirtualInterfaceAllocation -> AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: data AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: data VirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AllocatePublicVirtualInterface: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.AssociateConnectionWithLag: acwlConnectionId :: Lens' AssociateConnectionWithLag Text
- Network.AWS.DirectConnect.AssociateConnectionWithLag: acwlLagId :: Lens' AssociateConnectionWithLag Text
- Network.AWS.DirectConnect.AssociateConnectionWithLag: associateConnectionWithLag :: Text -> Text -> AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.AssociateConnectionWithLag: connection :: Connection
- Network.AWS.DirectConnect.AssociateConnectionWithLag: data AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: data Connection
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Data.Data.Data Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance GHC.Classes.Eq Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance GHC.Generics.Generic Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance GHC.Read.Read Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance GHC.Show.Show Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateConnectionWithLag: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
- Network.AWS.DirectConnect.AssociateHostedConnection: assConnectionId :: Lens' AssociateHostedConnection Text
- Network.AWS.DirectConnect.AssociateHostedConnection: assParentConnectionId :: Lens' AssociateHostedConnection Text
- Network.AWS.DirectConnect.AssociateHostedConnection: associateHostedConnection :: Text -> Text -> AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.AssociateHostedConnection: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.AssociateHostedConnection: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.AssociateHostedConnection: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.AssociateHostedConnection: connection :: Connection
- Network.AWS.DirectConnect.AssociateHostedConnection: data AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: data Connection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Data.Data.Data Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance GHC.Read.Read Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance GHC.Show.Show Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateHostedConnection: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
- Network.AWS.DirectConnect.AssociateVirtualInterface: associateVirtualInterface :: Text -> Text -> AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: aviConnectionId :: Lens' AssociateVirtualInterface Text
- Network.AWS.DirectConnect.AssociateVirtualInterface: aviVirtualInterfaceId :: Lens' AssociateVirtualInterface Text
- Network.AWS.DirectConnect.AssociateVirtualInterface: data AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: data VirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
- Network.AWS.DirectConnect.AssociateVirtualInterface: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.AssociateVirtualInterface: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.AssociateVirtualInterface: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.AssociateVirtualInterface: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.ConfirmConnection: ccConnectionId :: Lens' ConfirmConnection Text
- Network.AWS.DirectConnect.ConfirmConnection: ccrsConnectionState :: Lens' ConfirmConnectionResponse (Maybe ConnectionState)
- Network.AWS.DirectConnect.ConfirmConnection: ccrsResponseStatus :: Lens' ConfirmConnectionResponse Int
- Network.AWS.DirectConnect.ConfirmConnection: confirmConnection :: Text -> ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: confirmConnectionResponse :: Int -> ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: data ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: data ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
- Network.AWS.DirectConnect.ConfirmConnection: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmConnection: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.ConfirmConnection.ConfirmConnection
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterface :: Text -> ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterfaceResponse :: Int -> ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: cpviDirectConnectGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: cpviVirtualGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: cpviVirtualInterfaceId :: Lens' ConfirmPrivateVirtualInterface Text
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: cpvirsResponseStatus :: Lens' ConfirmPrivateVirtualInterfaceResponse Int
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: cpvirsVirtualInterfaceState :: Lens' ConfirmPrivateVirtualInterfaceResponse (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: data ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: data ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: cVirtualInterfaceId :: Lens' ConfirmPublicVirtualInterface Text
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: confirmPublicVirtualInterface :: Text -> ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: confirmPublicVirtualInterfaceResponse :: Int -> ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: crsResponseStatus :: Lens' ConfirmPublicVirtualInterfaceResponse Int
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: crsVirtualInterfaceState :: Lens' ConfirmPublicVirtualInterfaceResponse (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: data ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: data ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.ConfirmPublicVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
- Network.AWS.DirectConnect.CreateBGPPeer: cbpNewBGPPeer :: Lens' CreateBGPPeer (Maybe NewBGPPeer)
- Network.AWS.DirectConnect.CreateBGPPeer: cbpVirtualInterfaceId :: Lens' CreateBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.CreateBGPPeer: cbprsResponseStatus :: Lens' CreateBGPPeerResponse Int
- Network.AWS.DirectConnect.CreateBGPPeer: cbprsVirtualInterface :: Lens' CreateBGPPeerResponse (Maybe VirtualInterface)
- Network.AWS.DirectConnect.CreateBGPPeer: createBGPPeer :: CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: createBGPPeerResponse :: Int -> CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: data CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: data CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Data.Data.Data Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Data.Data.Data Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Read.Read Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Read.Read Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Show.Show Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance GHC.Show.Show Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
- Network.AWS.DirectConnect.CreateBGPPeer: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateBGPPeer: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateBGPPeer.CreateBGPPeer
- Network.AWS.DirectConnect.CreateConnection: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.CreateConnection: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.CreateConnection: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.CreateConnection: ccBandwidth :: Lens' CreateConnection Text
- Network.AWS.DirectConnect.CreateConnection: ccConnectionName :: Lens' CreateConnection Text
- Network.AWS.DirectConnect.CreateConnection: ccLagId :: Lens' CreateConnection (Maybe Text)
- Network.AWS.DirectConnect.CreateConnection: ccLocation :: Lens' CreateConnection Text
- Network.AWS.DirectConnect.CreateConnection: connection :: Connection
- Network.AWS.DirectConnect.CreateConnection: createConnection :: Text -> Text -> Text -> CreateConnection
- Network.AWS.DirectConnect.CreateConnection: data Connection
- Network.AWS.DirectConnect.CreateConnection: data CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Data.Data.Data Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance GHC.Read.Read Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance GHC.Show.Show Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateConnection: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateConnection.CreateConnection
- Network.AWS.DirectConnect.CreateDirectConnectGateway: cdcgAmazonSideASN :: Lens' CreateDirectConnectGateway (Maybe Integer)
- Network.AWS.DirectConnect.CreateDirectConnectGateway: cdcgDirectConnectGatewayName :: Lens' CreateDirectConnectGateway Text
- Network.AWS.DirectConnect.CreateDirectConnectGateway: cdcgrsDirectConnectGateway :: Lens' CreateDirectConnectGatewayResponse (Maybe DirectConnectGateway)
- Network.AWS.DirectConnect.CreateDirectConnectGateway: cdcgrsResponseStatus :: Lens' CreateDirectConnectGatewayResponse Int
- Network.AWS.DirectConnect.CreateDirectConnectGateway: createDirectConnectGateway :: Text -> CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: createDirectConnectGatewayResponse :: Int -> CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: data CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: data CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Data.Data.Data Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Data.Data.Data Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Read.Read Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Read.Read Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Show.Show Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance GHC.Show.Show Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGateway: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: cdcgaDirectConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: cdcgaVirtualGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: cdcgarsDirectConnectGatewayAssociation :: Lens' CreateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: cdcgarsResponseStatus :: Lens' CreateDirectConnectGatewayAssociationResponse Int
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociation :: Text -> Text -> CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociationResponse :: Int -> CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: data CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: data CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Data.Data Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Data.Data Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Read.Read Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Read.Read Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Show.Show Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Show.Show Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.CreateInterconnect: ciBandwidth :: Lens' CreateInterconnect Text
- Network.AWS.DirectConnect.CreateInterconnect: ciInterconnectName :: Lens' CreateInterconnect Text
- Network.AWS.DirectConnect.CreateInterconnect: ciLagId :: Lens' CreateInterconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: ciLocation :: Lens' CreateInterconnect Text
- Network.AWS.DirectConnect.CreateInterconnect: createInterconnect :: Text -> Text -> Text -> CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: data CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: data Interconnect
- Network.AWS.DirectConnect.CreateInterconnect: iAwsDevice :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iBandwidth :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iInterconnectId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iInterconnectName :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iInterconnectState :: Lens' Interconnect (Maybe InterconnectState)
- Network.AWS.DirectConnect.CreateInterconnect: iLagId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iLoaIssueTime :: Lens' Interconnect (Maybe UTCTime)
- Network.AWS.DirectConnect.CreateInterconnect: iLocation :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: iRegion :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.CreateInterconnect: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Data.Data.Data Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance GHC.Read.Read Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance GHC.Show.Show Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateInterconnect.CreateInterconnect
- Network.AWS.DirectConnect.CreateInterconnect: interconnect :: Interconnect
- Network.AWS.DirectConnect.CreateLag: clConnectionId :: Lens' CreateLag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: clConnectionsBandwidth :: Lens' CreateLag Text
- Network.AWS.DirectConnect.CreateLag: clLagName :: Lens' CreateLag Text
- Network.AWS.DirectConnect.CreateLag: clLocation :: Lens' CreateLag Text
- Network.AWS.DirectConnect.CreateLag: clNumberOfConnections :: Lens' CreateLag Int
- Network.AWS.DirectConnect.CreateLag: createLag :: Int -> Text -> Text -> Text -> CreateLag
- Network.AWS.DirectConnect.CreateLag: data CreateLag
- Network.AWS.DirectConnect.CreateLag: data Lag
- Network.AWS.DirectConnect.CreateLag: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Data.Data.Data Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance GHC.Read.Read Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance GHC.Show.Show Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreateLag.CreateLag
- Network.AWS.DirectConnect.CreateLag: lag :: Lag
- Network.AWS.DirectConnect.CreateLag: lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)
- Network.AWS.DirectConnect.CreateLag: lagAwsDevice :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagConnections :: Lens' Lag [Connection]
- Network.AWS.DirectConnect.CreateLag: lagConnectionsBandwidth :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagLagId :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagLagName :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagLagState :: Lens' Lag (Maybe LagState)
- Network.AWS.DirectConnect.CreateLag: lagLocation :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagMinimumLinks :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.CreateLag: lagNumberOfConnections :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.CreateLag: lagOwnerAccount :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreateLag: lagRegion :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: creConnectionId :: Lens' CreatePrivateVirtualInterface Text
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: creNewPrivateVirtualInterface :: Lens' CreatePrivateVirtualInterface NewPrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: createPrivateVirtualInterface :: Text -> NewPrivateVirtualInterface -> CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: data CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: data VirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.CreatePrivateVirtualInterface: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: cpviConnectionId :: Lens' CreatePublicVirtualInterface Text
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: cpviNewPublicVirtualInterface :: Lens' CreatePublicVirtualInterface NewPublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: createPublicVirtualInterface :: Text -> NewPublicVirtualInterface -> CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: data CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: data VirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.CreatePublicVirtualInterface: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.DeleteBGPPeer: data DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: data DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: dbpAsn :: Lens' DeleteBGPPeer (Maybe Int)
- Network.AWS.DirectConnect.DeleteBGPPeer: dbpCustomerAddress :: Lens' DeleteBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.DeleteBGPPeer: dbpVirtualInterfaceId :: Lens' DeleteBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.DeleteBGPPeer: dbprsResponseStatus :: Lens' DeleteBGPPeerResponse Int
- Network.AWS.DirectConnect.DeleteBGPPeer: dbprsVirtualInterface :: Lens' DeleteBGPPeerResponse (Maybe VirtualInterface)
- Network.AWS.DirectConnect.DeleteBGPPeer: deleteBGPPeer :: DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: deleteBGPPeerResponse :: Int -> DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Data.Data.Data Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Data.Data.Data Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteBGPPeer: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
- Network.AWS.DirectConnect.DeleteConnection: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.DeleteConnection: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.DeleteConnection: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DeleteConnection: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.DeleteConnection: connection :: Connection
- Network.AWS.DirectConnect.DeleteConnection: data Connection
- Network.AWS.DirectConnect.DeleteConnection: data DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: dcConnectionId :: Lens' DeleteConnection Text
- Network.AWS.DirectConnect.DeleteConnection: deleteConnection :: Text -> DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Data.Data.Data Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteConnection: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteConnection.DeleteConnection
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: data DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: data DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: ddcgdDirectConnectGatewayId :: Lens' DeleteDirectConnectGateway Text
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: ddcgdrsDirectConnectGateway :: Lens' DeleteDirectConnectGatewayResponse (Maybe DirectConnectGateway)
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: ddcgdrsResponseStatus :: Lens' DeleteDirectConnectGatewayResponse Int
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: deleteDirectConnectGateway :: Text -> DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: deleteDirectConnectGatewayResponse :: Int -> DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Data.Data.Data Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Data.Data.Data Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGateway: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: data DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: data DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: delDirectConnectGatewayId :: Lens' DeleteDirectConnectGatewayAssociation Text
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: delVirtualGatewayId :: Lens' DeleteDirectConnectGatewayAssociation Text
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociation :: Text -> Text -> DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociationResponse :: Int -> DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: delrsDirectConnectGatewayAssociation :: Lens' DeleteDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: delrsResponseStatus :: Lens' DeleteDirectConnectGatewayAssociationResponse Int
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Data.Data Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Data.Data Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
- Network.AWS.DirectConnect.DeleteInterconnect: dInterconnectId :: Lens' DeleteInterconnect Text
- Network.AWS.DirectConnect.DeleteInterconnect: data DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: data DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: deleteInterconnect :: Text -> DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: deleteInterconnectResponse :: Int -> DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: drsInterconnectState :: Lens' DeleteInterconnectResponse (Maybe InterconnectState)
- Network.AWS.DirectConnect.DeleteInterconnect: drsResponseStatus :: Lens' DeleteInterconnectResponse Int
- Network.AWS.DirectConnect.DeleteInterconnect: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Data.Data.Data Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Data.Data.Data Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
- Network.AWS.DirectConnect.DeleteInterconnect: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteInterconnect: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteInterconnect.DeleteInterconnect
- Network.AWS.DirectConnect.DeleteLag: dLagId :: Lens' DeleteLag Text
- Network.AWS.DirectConnect.DeleteLag: data DeleteLag
- Network.AWS.DirectConnect.DeleteLag: data Lag
- Network.AWS.DirectConnect.DeleteLag: deleteLag :: Text -> DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Data.Data.Data Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteLag.DeleteLag
- Network.AWS.DirectConnect.DeleteLag: lag :: Lag
- Network.AWS.DirectConnect.DeleteLag: lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)
- Network.AWS.DirectConnect.DeleteLag: lagAwsDevice :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagConnections :: Lens' Lag [Connection]
- Network.AWS.DirectConnect.DeleteLag: lagConnectionsBandwidth :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagLagId :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagLagName :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagLagState :: Lens' Lag (Maybe LagState)
- Network.AWS.DirectConnect.DeleteLag: lagLocation :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagMinimumLinks :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.DeleteLag: lagNumberOfConnections :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.DeleteLag: lagOwnerAccount :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteLag: lagRegion :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.DeleteVirtualInterface: data DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: data DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: delVirtualInterfaceId :: Lens' DeleteVirtualInterface Text
- Network.AWS.DirectConnect.DeleteVirtualInterface: deleteVirtualInterface :: Text -> DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: deleteVirtualInterfaceResponse :: Int -> DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: dvirsResponseStatus :: Lens' DeleteVirtualInterfaceResponse Int
- Network.AWS.DirectConnect.DeleteVirtualInterface: dvirsVirtualInterfaceState :: Lens' DeleteVirtualInterfaceResponse (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Data.Data.Data Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Classes.Eq Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Generics.Generic Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Read.Read Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance GHC.Show.Show Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DeleteVirtualInterface: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
- Network.AWS.DirectConnect.DescribeConnections: cConnections :: Lens' Connections [Connection]
- Network.AWS.DirectConnect.DescribeConnections: connections :: Connections
- Network.AWS.DirectConnect.DescribeConnections: dConnectionId :: Lens' DescribeConnections (Maybe Text)
- Network.AWS.DirectConnect.DescribeConnections: data Connections
- Network.AWS.DirectConnect.DescribeConnections: data DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: describeConnections :: DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Data.Data.Data Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeConnections: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeConnections.DescribeConnections
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: data DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: data DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgaDirectConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgaMaxResults :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Int)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgaNextToken :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgaVirtualGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgarsDirectConnectGatewayAssociations :: Lens' DescribeDirectConnectGatewayAssociationsResponse [DirectConnectGatewayAssociation]
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgarsNextToken :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: ddcgarsResponseStatus :: Lens' DescribeDirectConnectGatewayAssociationsResponse Int
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociationsResponse :: Int -> DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: data DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: data DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasDirectConnectGatewayId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasMaxResults :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Int)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasNextToken :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasVirtualInterfaceId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasrsDirectConnectGatewayAttachments :: Lens' DescribeDirectConnectGatewayAttachmentsResponse [DirectConnectGatewayAttachment]
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasrsNextToken :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: ddcgasrsResponseStatus :: Lens' DescribeDirectConnectGatewayAttachmentsResponse Int
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachmentsResponse :: Int -> DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: data DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: data DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgDirectConnectGatewayId :: Lens' DescribeDirectConnectGateways (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgMaxResults :: Lens' DescribeDirectConnectGateways (Maybe Int)
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgNextToken :: Lens' DescribeDirectConnectGateways (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgrsDirectConnectGateways :: Lens' DescribeDirectConnectGatewaysResponse [DirectConnectGateway]
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgrsNextToken :: Lens' DescribeDirectConnectGatewaysResponse (Maybe Text)
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: ddcgrsResponseStatus :: Lens' DescribeDirectConnectGatewaysResponse Int
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGateways :: DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGatewaysResponse :: Int -> DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Data.Data.Data Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeDirectConnectGateways: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
- Network.AWS.DirectConnect.DescribeHostedConnections: cConnections :: Lens' Connections [Connection]
- Network.AWS.DirectConnect.DescribeHostedConnections: connections :: Connections
- Network.AWS.DirectConnect.DescribeHostedConnections: data Connections
- Network.AWS.DirectConnect.DescribeHostedConnections: data DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: describeHostedConnections :: Text -> DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: dhcConnectionId :: Lens' DescribeHostedConnections Text
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Data.Data.Data Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeHostedConnections: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
- Network.AWS.DirectConnect.DescribeInterconnects: data DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: data DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: describeInterconnects :: DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: describeInterconnectsResponse :: Int -> DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: diInterconnectId :: Lens' DescribeInterconnects (Maybe Text)
- Network.AWS.DirectConnect.DescribeInterconnects: dirsInterconnects :: Lens' DescribeInterconnectsResponse [Interconnect]
- Network.AWS.DirectConnect.DescribeInterconnects: dirsResponseStatus :: Lens' DescribeInterconnectsResponse Int
- Network.AWS.DirectConnect.DescribeInterconnects: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Data.Data.Data Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Data.Data.Data Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
- Network.AWS.DirectConnect.DescribeInterconnects: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeInterconnects: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeInterconnects.DescribeInterconnects
- Network.AWS.DirectConnect.DescribeLags: data DescribeLags
- Network.AWS.DirectConnect.DescribeLags: data DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: describeLags :: DescribeLags
- Network.AWS.DirectConnect.DescribeLags: describeLagsResponse :: Int -> DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: desrsLags :: Lens' DescribeLagsResponse [Lag]
- Network.AWS.DirectConnect.DescribeLags: desrsResponseStatus :: Lens' DescribeLagsResponse Int
- Network.AWS.DirectConnect.DescribeLags: dlLagId :: Lens' DescribeLags (Maybe Text)
- Network.AWS.DirectConnect.DescribeLags: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLags.DescribeLagsResponse
- Network.AWS.DirectConnect.DescribeLags: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLags: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeLags.DescribeLags
- Network.AWS.DirectConnect.DescribeLoa: data DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: data DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: describeLoa :: Text -> DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: describeLoaResponse :: Int -> DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: dlConnectionId :: Lens' DescribeLoa Text
- Network.AWS.DirectConnect.DescribeLoa: dlLoaContentType :: Lens' DescribeLoa (Maybe LoaContentType)
- Network.AWS.DirectConnect.DescribeLoa: dlProviderName :: Lens' DescribeLoa (Maybe Text)
- Network.AWS.DirectConnect.DescribeLoa: dlrsLoaContent :: Lens' DescribeLoaResponse (Maybe ByteString)
- Network.AWS.DirectConnect.DescribeLoa: dlrsLoaContentType :: Lens' DescribeLoaResponse (Maybe LoaContentType)
- Network.AWS.DirectConnect.DescribeLoa: dlrsResponseStatus :: Lens' DescribeLoaResponse Int
- Network.AWS.DirectConnect.DescribeLoa: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLoa.DescribeLoaResponse
- Network.AWS.DirectConnect.DescribeLoa: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLoa: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeLoa.DescribeLoa
- Network.AWS.DirectConnect.DescribeLocations: data DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: data DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: describeLocations :: DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: describeLocationsResponse :: Int -> DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: dlsrsLocations :: Lens' DescribeLocationsResponse [Location]
- Network.AWS.DirectConnect.DescribeLocations: dlsrsResponseStatus :: Lens' DescribeLocationsResponse Int
- Network.AWS.DirectConnect.DescribeLocations: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Data.Data.Data Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeLocations.DescribeLocationsResponse
- Network.AWS.DirectConnect.DescribeLocations: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeLocations: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeLocations.DescribeLocations
- Network.AWS.DirectConnect.DescribeTags: data DescribeTags
- Network.AWS.DirectConnect.DescribeTags: data DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: describeTags :: DescribeTags
- Network.AWS.DirectConnect.DescribeTags: describeTagsResponse :: Int -> DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: dtResourceARNs :: Lens' DescribeTags [Text]
- Network.AWS.DirectConnect.DescribeTags: dtrsResourceTags :: Lens' DescribeTagsResponse [ResourceTag]
- Network.AWS.DirectConnect.DescribeTags: dtrsResponseStatus :: Lens' DescribeTagsResponse Int
- Network.AWS.DirectConnect.DescribeTags: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Data.Data.Data Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Data.Data.Data Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeTags.DescribeTagsResponse
- Network.AWS.DirectConnect.DescribeTags: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeTags: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeTags.DescribeTags
- Network.AWS.DirectConnect.DescribeVirtualGateways: data DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: data DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: describeVirtualGateways :: DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: describeVirtualGatewaysResponse :: Int -> DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: dvgrsResponseStatus :: Lens' DescribeVirtualGatewaysResponse Int
- Network.AWS.DirectConnect.DescribeVirtualGateways: dvgrsVirtualGateways :: Lens' DescribeVirtualGatewaysResponse [VirtualGateway]
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Data.Data.Data Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Data.Data.Data Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualGateways: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: data DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: data DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfaces :: DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfacesResponse :: Int -> DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: dviConnectionId :: Lens' DescribeVirtualInterfaces (Maybe Text)
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: dviVirtualInterfaceId :: Lens' DescribeVirtualInterfaces (Maybe Text)
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: dvisrsResponseStatus :: Lens' DescribeVirtualInterfacesResponse Int
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: dvisrsVirtualInterfaces :: Lens' DescribeVirtualInterfacesResponse [VirtualInterface]
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Data.Data.Data Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Data.Data.Data Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Classes.Eq Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Generics.Generic Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Read.Read Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance GHC.Show.Show Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DescribeVirtualInterfaces: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: connection :: Connection
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: data Connection
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: data DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: dcflConnectionId :: Lens' DisassociateConnectionFromLag Text
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: dcflLagId :: Lens' DisassociateConnectionFromLag Text
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: disassociateConnectionFromLag :: Text -> Text -> DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Data.Data.Data Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance GHC.Classes.Eq Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance GHC.Generics.Generic Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance GHC.Read.Read Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance GHC.Show.Show Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.DisassociateConnectionFromLag: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
- Network.AWS.DirectConnect.TagResource: data TagResource
- Network.AWS.DirectConnect.TagResource: data TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Data.Data.Data Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Data.Data.Data Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance GHC.Classes.Eq Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance GHC.Classes.Eq Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance GHC.Generics.Generic Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance GHC.Generics.Generic Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance GHC.Read.Read Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance GHC.Read.Read Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance GHC.Show.Show Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance GHC.Show.Show Network.AWS.DirectConnect.TagResource.TagResourceResponse
- Network.AWS.DirectConnect.TagResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.TagResource.TagResource
- Network.AWS.DirectConnect.TagResource: tagResource :: Text -> NonEmpty Tag -> TagResource
- Network.AWS.DirectConnect.TagResource: tagResourceResponse :: Int -> TagResourceResponse
- Network.AWS.DirectConnect.TagResource: trResourceARN :: Lens' TagResource Text
- Network.AWS.DirectConnect.TagResource: trTags :: Lens' TagResource (NonEmpty Tag)
- Network.AWS.DirectConnect.TagResource: trrsResponseStatus :: Lens' TagResourceResponse Int
- Network.AWS.DirectConnect.Types: ApplicationPdf :: LoaContentType
- Network.AWS.DirectConnect.Types: Associated :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect.Types: Associating :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect.Types: Attached :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect.Types: Attaching :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect.Types: Available :: BGPPeerState
- Network.AWS.DirectConnect.Types: CSAvailable :: ConnectionState
- Network.AWS.DirectConnect.Types: CSDeleted :: ConnectionState
- Network.AWS.DirectConnect.Types: CSDeleting :: ConnectionState
- Network.AWS.DirectConnect.Types: CSDown :: ConnectionState
- Network.AWS.DirectConnect.Types: CSOrdering :: ConnectionState
- Network.AWS.DirectConnect.Types: CSPending :: ConnectionState
- Network.AWS.DirectConnect.Types: CSRejected :: ConnectionState
- Network.AWS.DirectConnect.Types: CSRequested :: ConnectionState
- Network.AWS.DirectConnect.Types: DCGSAvailable :: DirectConnectGatewayState
- Network.AWS.DirectConnect.Types: DCGSDeleted :: DirectConnectGatewayState
- Network.AWS.DirectConnect.Types: DCGSDeleting :: DirectConnectGatewayState
- Network.AWS.DirectConnect.Types: DCGSPending :: DirectConnectGatewayState
- Network.AWS.DirectConnect.Types: Deleted :: BGPPeerState
- Network.AWS.DirectConnect.Types: Deleting :: BGPPeerState
- Network.AWS.DirectConnect.Types: Detached :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect.Types: Detaching :: DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect.Types: Disassociated :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect.Types: Disassociating :: DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect.Types: Down :: BGPStatus
- Network.AWS.DirectConnect.Types: IPV4 :: AddressFamily
- Network.AWS.DirectConnect.Types: IPV6 :: AddressFamily
- Network.AWS.DirectConnect.Types: ISAvailable :: InterconnectState
- Network.AWS.DirectConnect.Types: ISDeleted :: InterconnectState
- Network.AWS.DirectConnect.Types: ISDeleting :: InterconnectState
- Network.AWS.DirectConnect.Types: ISDown :: InterconnectState
- Network.AWS.DirectConnect.Types: ISPending :: InterconnectState
- Network.AWS.DirectConnect.Types: ISRequested :: InterconnectState
- Network.AWS.DirectConnect.Types: LSAvailable :: LagState
- Network.AWS.DirectConnect.Types: LSDeleted :: LagState
- Network.AWS.DirectConnect.Types: LSDeleting :: LagState
- Network.AWS.DirectConnect.Types: LSDown :: LagState
- Network.AWS.DirectConnect.Types: LSPending :: LagState
- Network.AWS.DirectConnect.Types: LSRequested :: LagState
- Network.AWS.DirectConnect.Types: Pending :: BGPPeerState
- Network.AWS.DirectConnect.Types: UP :: BGPStatus
- Network.AWS.DirectConnect.Types: VISAvailable :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISConfirming :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISDeleted :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISDeleting :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISDown :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISPending :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISRejected :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: VISVerifying :: VirtualInterfaceState
- Network.AWS.DirectConnect.Types: Verifying :: BGPPeerState
- Network.AWS.DirectConnect.Types: _DirectConnectClientException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect.Types: _DirectConnectServerException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect.Types: _DuplicateTagKeysException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect.Types: _TooManyTagsException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.DirectConnect.Types: bgpPeer :: BGPPeer
- Network.AWS.DirectConnect.Types: bpAddressFamily :: Lens' BGPPeer (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: bpAmazonAddress :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: bpAsn :: Lens' BGPPeer (Maybe Int)
- Network.AWS.DirectConnect.Types: bpAuthKey :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: bpBgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)
- Network.AWS.DirectConnect.Types: bpBgpStatus :: Lens' BGPPeer (Maybe BGPStatus)
- Network.AWS.DirectConnect.Types: bpCustomerAddress :: Lens' BGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: cAwsDevice :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cBandwidth :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cConnectionId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cConnectionName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cConnectionState :: Lens' Connection (Maybe ConnectionState)
- Network.AWS.DirectConnect.Types: cConnections :: Lens' Connections [Connection]
- Network.AWS.DirectConnect.Types: cLagId :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cLoaIssueTime :: Lens' Connection (Maybe UTCTime)
- Network.AWS.DirectConnect.Types: cLocation :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cOwnerAccount :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cPartnerName :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cRegion :: Lens' Connection (Maybe Text)
- Network.AWS.DirectConnect.Types: cVlan :: Lens' Connection (Maybe Int)
- Network.AWS.DirectConnect.Types: connection :: Connection
- Network.AWS.DirectConnect.Types: connections :: Connections
- Network.AWS.DirectConnect.Types: dAttachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)
- Network.AWS.DirectConnect.Types: dDirectConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect.Types: dStateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect.Types: dVirtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect.Types: dVirtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect.Types: dVirtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)
- Network.AWS.DirectConnect.Types: data AddressFamily
- Network.AWS.DirectConnect.Types: data BGPPeer
- Network.AWS.DirectConnect.Types: data BGPPeerState
- Network.AWS.DirectConnect.Types: data BGPStatus
- Network.AWS.DirectConnect.Types: data Connection
- Network.AWS.DirectConnect.Types: data ConnectionState
- Network.AWS.DirectConnect.Types: data Connections
- Network.AWS.DirectConnect.Types: data DirectConnectGateway
- Network.AWS.DirectConnect.Types: data DirectConnectGatewayAssociation
- Network.AWS.DirectConnect.Types: data DirectConnectGatewayAssociationState
- Network.AWS.DirectConnect.Types: data DirectConnectGatewayAttachment
- Network.AWS.DirectConnect.Types: data DirectConnectGatewayAttachmentState
- Network.AWS.DirectConnect.Types: data DirectConnectGatewayState
- Network.AWS.DirectConnect.Types: data Interconnect
- Network.AWS.DirectConnect.Types: data InterconnectState
- Network.AWS.DirectConnect.Types: data Lag
- Network.AWS.DirectConnect.Types: data LagState
- Network.AWS.DirectConnect.Types: data LoaContentType
- Network.AWS.DirectConnect.Types: data Location
- Network.AWS.DirectConnect.Types: data NewBGPPeer
- Network.AWS.DirectConnect.Types: data NewPrivateVirtualInterface
- Network.AWS.DirectConnect.Types: data NewPrivateVirtualInterfaceAllocation
- Network.AWS.DirectConnect.Types: data NewPublicVirtualInterface
- Network.AWS.DirectConnect.Types: data NewPublicVirtualInterfaceAllocation
- Network.AWS.DirectConnect.Types: data ResourceTag
- Network.AWS.DirectConnect.Types: data RouteFilterPrefix
- Network.AWS.DirectConnect.Types: data Tag
- Network.AWS.DirectConnect.Types: data VirtualGateway
- Network.AWS.DirectConnect.Types: data VirtualInterface
- Network.AWS.DirectConnect.Types: data VirtualInterfaceState
- Network.AWS.DirectConnect.Types: dcgAmazonSideASN :: Lens' DirectConnectGateway (Maybe Integer)
- Network.AWS.DirectConnect.Types: dcgDirectConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgDirectConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgDirectConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)
- Network.AWS.DirectConnect.Types: dcgOwnerAccount :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgStateChangeError :: Lens' DirectConnectGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgaAssociationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)
- Network.AWS.DirectConnect.Types: dcgaDirectConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgaStateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgaVirtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgaVirtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect.Types: dcgaVirtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)
- Network.AWS.DirectConnect.Types: directConnect :: Service
- Network.AWS.DirectConnect.Types: directConnectGateway :: DirectConnectGateway
- Network.AWS.DirectConnect.Types: directConnectGatewayAssociation :: DirectConnectGatewayAssociation
- Network.AWS.DirectConnect.Types: directConnectGatewayAttachment :: DirectConnectGatewayAttachment
- Network.AWS.DirectConnect.Types: iAwsDevice :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iBandwidth :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iInterconnectId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iInterconnectName :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iInterconnectState :: Lens' Interconnect (Maybe InterconnectState)
- Network.AWS.DirectConnect.Types: iLagId :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iLoaIssueTime :: Lens' Interconnect (Maybe UTCTime)
- Network.AWS.DirectConnect.Types: iLocation :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: iRegion :: Lens' Interconnect (Maybe Text)
- Network.AWS.DirectConnect.Types: interconnect :: Interconnect
- Network.AWS.DirectConnect.Types: lLocationCode :: Lens' Location (Maybe Text)
- Network.AWS.DirectConnect.Types: lLocationName :: Lens' Location (Maybe Text)
- Network.AWS.DirectConnect.Types: lag :: Lag
- Network.AWS.DirectConnect.Types: lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)
- Network.AWS.DirectConnect.Types: lagAwsDevice :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagConnections :: Lens' Lag [Connection]
- Network.AWS.DirectConnect.Types: lagConnectionsBandwidth :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagLagId :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagLagName :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagLagState :: Lens' Lag (Maybe LagState)
- Network.AWS.DirectConnect.Types: lagLocation :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagMinimumLinks :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.Types: lagNumberOfConnections :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.Types: lagOwnerAccount :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: lagRegion :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.Types: location :: Location
- Network.AWS.DirectConnect.Types: nAddressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: nAmazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: nAsn :: Lens' NewPrivateVirtualInterface Int
- Network.AWS.DirectConnect.Types: nAuthKey :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: nCustomerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: nDirectConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: nVirtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: nVirtualInterfaceName :: Lens' NewPrivateVirtualInterface Text
- Network.AWS.DirectConnect.Types: nVlan :: Lens' NewPrivateVirtualInterface Int
- Network.AWS.DirectConnect.Types: nbpAddressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: nbpAmazonAddress :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: nbpAsn :: Lens' NewBGPPeer (Maybe Int)
- Network.AWS.DirectConnect.Types: nbpAuthKey :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: nbpCustomerAddress :: Lens' NewBGPPeer (Maybe Text)
- Network.AWS.DirectConnect.Types: newAddressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: newAmazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: newAsn :: Lens' NewPublicVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect.Types: newAuthKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: newBGPPeer :: NewBGPPeer
- Network.AWS.DirectConnect.Types: newCustomerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: newPrivateVirtualInterface :: Text -> Int -> Int -> NewPrivateVirtualInterface
- Network.AWS.DirectConnect.Types: newPrivateVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
- Network.AWS.DirectConnect.Types: newPublicVirtualInterface :: Text -> Int -> Int -> NewPublicVirtualInterface
- Network.AWS.DirectConnect.Types: newPublicVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
- Network.AWS.DirectConnect.Types: newRouteFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation [RouteFilterPrefix]
- Network.AWS.DirectConnect.Types: newVirtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text
- Network.AWS.DirectConnect.Types: newVlan :: Lens' NewPublicVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect.Types: npviAddressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: npviAmazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: npviAsn :: Lens' NewPublicVirtualInterface Int
- Network.AWS.DirectConnect.Types: npviAuthKey :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: npviCustomerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: npviRouteFilterPrefixes :: Lens' NewPublicVirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.Types: npviVirtualInterfaceName :: Lens' NewPublicVirtualInterface Text
- Network.AWS.DirectConnect.Types: npviVlan :: Lens' NewPublicVirtualInterface Int
- Network.AWS.DirectConnect.Types: npviaAddressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: npviaAmazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: npviaAsn :: Lens' NewPrivateVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect.Types: npviaAuthKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: npviaCustomerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
- Network.AWS.DirectConnect.Types: npviaVirtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text
- Network.AWS.DirectConnect.Types: npviaVlan :: Lens' NewPrivateVirtualInterfaceAllocation Int
- Network.AWS.DirectConnect.Types: resourceTag :: ResourceTag
- Network.AWS.DirectConnect.Types: rfpCidr :: Lens' RouteFilterPrefix (Maybe Text)
- Network.AWS.DirectConnect.Types: routeFilterPrefix :: RouteFilterPrefix
- Network.AWS.DirectConnect.Types: rtResourceARN :: Lens' ResourceTag (Maybe Text)
- Network.AWS.DirectConnect.Types: rtTags :: Lens' ResourceTag (Maybe (NonEmpty Tag))
- Network.AWS.DirectConnect.Types: tag :: Text -> Tag
- Network.AWS.DirectConnect.Types: tagKey :: Lens' Tag Text
- Network.AWS.DirectConnect.Types: tagValue :: Lens' Tag (Maybe Text)
- Network.AWS.DirectConnect.Types: vgVirtualGatewayId :: Lens' VirtualGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: vgVirtualGatewayState :: Lens' VirtualGateway (Maybe Text)
- Network.AWS.DirectConnect.Types: viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
- Network.AWS.DirectConnect.Types: viAmazonAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)
- Network.AWS.DirectConnect.Types: viAsn :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.Types: viAuthKey :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viBgpPeers :: Lens' VirtualInterface [BGPPeer]
- Network.AWS.DirectConnect.Types: viConnectionId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viCustomerAddress :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viLocation :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viOwnerAccount :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]
- Network.AWS.DirectConnect.Types: viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
- Network.AWS.DirectConnect.Types: viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
- Network.AWS.DirectConnect.Types: viVlan :: Lens' VirtualInterface (Maybe Int)
- Network.AWS.DirectConnect.Types: virtualGateway :: VirtualGateway
- Network.AWS.DirectConnect.Types: virtualInterface :: VirtualInterface
- Network.AWS.DirectConnect.UntagResource: data UntagResource
- Network.AWS.DirectConnect.UntagResource: data UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Data.Data.Data Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Data.Data.Data Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance GHC.Classes.Eq Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance GHC.Classes.Eq Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance GHC.Generics.Generic Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance GHC.Generics.Generic Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance GHC.Read.Read Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance GHC.Read.Read Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance GHC.Show.Show Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance GHC.Show.Show Network.AWS.DirectConnect.UntagResource.UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.UntagResource.UntagResource
- Network.AWS.DirectConnect.UntagResource: untagResource :: Text -> UntagResource
- Network.AWS.DirectConnect.UntagResource: untagResourceResponse :: Int -> UntagResourceResponse
- Network.AWS.DirectConnect.UntagResource: urResourceARN :: Lens' UntagResource Text
- Network.AWS.DirectConnect.UntagResource: urTagKeys :: Lens' UntagResource [Text]
- Network.AWS.DirectConnect.UntagResource: urrsResponseStatus :: Lens' UntagResourceResponse Int
- Network.AWS.DirectConnect.UpdateLag: data Lag
- Network.AWS.DirectConnect.UpdateLag: data UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Control.DeepSeq.NFData Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Data.Data.Data Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Data.Hashable.Class.Hashable Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance GHC.Classes.Eq Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance GHC.Generics.Generic Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance GHC.Read.Read Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance GHC.Show.Show Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Network.AWS.Data.Path.ToPath Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Network.AWS.Data.Query.ToQuery Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: instance Network.AWS.Types.AWSRequest Network.AWS.DirectConnect.UpdateLag.UpdateLag
- Network.AWS.DirectConnect.UpdateLag: lag :: Lag
- Network.AWS.DirectConnect.UpdateLag: lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)
- Network.AWS.DirectConnect.UpdateLag: lagAwsDevice :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagConnections :: Lens' Lag [Connection]
- Network.AWS.DirectConnect.UpdateLag: lagConnectionsBandwidth :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagLagId :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagLagName :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagLagState :: Lens' Lag (Maybe LagState)
- Network.AWS.DirectConnect.UpdateLag: lagLocation :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagMinimumLinks :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.UpdateLag: lagNumberOfConnections :: Lens' Lag (Maybe Int)
- Network.AWS.DirectConnect.UpdateLag: lagOwnerAccount :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: lagRegion :: Lens' Lag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: ulLagId :: Lens' UpdateLag Text
- Network.AWS.DirectConnect.UpdateLag: ulLagName :: Lens' UpdateLag (Maybe Text)
- Network.AWS.DirectConnect.UpdateLag: ulMinimumLinks :: Lens' UpdateLag (Maybe Int)
- Network.AWS.DirectConnect.UpdateLag: updateLag :: Text -> UpdateLag
+ Amazonka.DirectConnect: AcceptDirectConnectGatewayAssociationProposal' :: Maybe [RouteFilterPrefix] -> Text -> Text -> Text -> AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: AcceptDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: AddressFamily' :: Text -> AddressFamily
+ Amazonka.DirectConnect: AllocateHostedConnection' :: Maybe (NonEmpty Tag) -> Text -> Text -> Text -> Text -> Int -> AllocateHostedConnection
+ Amazonka.DirectConnect: AllocatePrivateVirtualInterface' :: Text -> Text -> NewPrivateVirtualInterfaceAllocation -> AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect: AllocatePublicVirtualInterface' :: Text -> Text -> NewPublicVirtualInterfaceAllocation -> AllocatePublicVirtualInterface
+ Amazonka.DirectConnect: AllocateTransitVirtualInterface' :: Text -> Text -> NewTransitVirtualInterfaceAllocation -> AllocateTransitVirtualInterface
+ Amazonka.DirectConnect: AllocateTransitVirtualInterfaceResponse' :: Maybe VirtualInterface -> Int -> AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: AssociateConnectionWithLag' :: Text -> Text -> AssociateConnectionWithLag
+ Amazonka.DirectConnect: AssociateHostedConnection' :: Text -> Text -> AssociateHostedConnection
+ Amazonka.DirectConnect: AssociateMacSecKey' :: Maybe Text -> Maybe Text -> Maybe Text -> Text -> AssociateMacSecKey
+ Amazonka.DirectConnect: AssociateMacSecKeyResponse' :: Maybe Text -> Maybe [MacSecKey] -> Int -> AssociateMacSecKeyResponse
+ Amazonka.DirectConnect: AssociateVirtualInterface' :: Text -> Text -> AssociateVirtualInterface
+ Amazonka.DirectConnect: AssociatedGateway' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe GatewayType -> AssociatedGateway
+ Amazonka.DirectConnect: BGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe BGPPeerState -> Maybe BGPStatus -> Maybe Text -> BGPPeer
+ Amazonka.DirectConnect: BGPPeerState' :: Text -> BGPPeerState
+ Amazonka.DirectConnect: BGPStatus' :: Text -> BGPStatus
+ Amazonka.DirectConnect: ConfirmConnection' :: Text -> ConfirmConnection
+ Amazonka.DirectConnect: ConfirmConnectionResponse' :: Maybe ConnectionState -> Int -> ConfirmConnectionResponse
+ Amazonka.DirectConnect: ConfirmCustomerAgreement' :: Maybe Text -> ConfirmCustomerAgreement
+ Amazonka.DirectConnect: ConfirmCustomerAgreementResponse' :: Maybe Text -> Int -> ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect: ConfirmPrivateVirtualInterface' :: Maybe Text -> Maybe Text -> Text -> ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect: ConfirmPrivateVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect: ConfirmPublicVirtualInterface' :: Text -> ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect: ConfirmPublicVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect: ConfirmTransitVirtualInterface' :: Text -> Text -> ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect: ConfirmTransitVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect: ConnectionState' :: Text -> ConnectionState
+ Amazonka.DirectConnect: Connections' :: Maybe [Connection] -> Connections
+ Amazonka.DirectConnect: CreateBGPPeer' :: Maybe NewBGPPeer -> Maybe Text -> CreateBGPPeer
+ Amazonka.DirectConnect: CreateBGPPeerResponse' :: Maybe VirtualInterface -> Int -> CreateBGPPeerResponse
+ Amazonka.DirectConnect: CreateConnection' :: Maybe Text -> Maybe Text -> Maybe Bool -> Maybe (NonEmpty Tag) -> Text -> Text -> Text -> CreateConnection
+ Amazonka.DirectConnect: CreateDirectConnectGateway' :: Maybe Integer -> Text -> CreateDirectConnectGateway
+ Amazonka.DirectConnect: CreateDirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe Text -> Text -> CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: CreateDirectConnectGatewayAssociationProposal' :: Maybe [RouteFilterPrefix] -> Maybe [RouteFilterPrefix] -> Text -> Text -> Text -> CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: CreateDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociationProposal -> Int -> CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: CreateDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: CreateDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: CreateInterconnect' :: Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Text -> Text -> Text -> CreateInterconnect
+ Amazonka.DirectConnect: CreateLag' :: Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe (NonEmpty Tag) -> Int -> Text -> Text -> Text -> CreateLag
+ Amazonka.DirectConnect: CreatePrivateVirtualInterface' :: Text -> NewPrivateVirtualInterface -> CreatePrivateVirtualInterface
+ Amazonka.DirectConnect: CreatePublicVirtualInterface' :: Text -> NewPublicVirtualInterface -> CreatePublicVirtualInterface
+ Amazonka.DirectConnect: CreateTransitVirtualInterface' :: Text -> NewTransitVirtualInterface -> CreateTransitVirtualInterface
+ Amazonka.DirectConnect: CreateTransitVirtualInterfaceResponse' :: Maybe VirtualInterface -> Int -> CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: CustomerAgreement' :: Maybe Text -> Maybe Text -> CustomerAgreement
+ Amazonka.DirectConnect: DeleteBGPPeer' :: Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> DeleteBGPPeer
+ Amazonka.DirectConnect: DeleteBGPPeerResponse' :: Maybe VirtualInterface -> Int -> DeleteBGPPeerResponse
+ Amazonka.DirectConnect: DeleteConnection' :: Text -> DeleteConnection
+ Amazonka.DirectConnect: DeleteDirectConnectGateway' :: Text -> DeleteDirectConnectGateway
+ Amazonka.DirectConnect: DeleteDirectConnectGatewayAssociation' :: Maybe Text -> Maybe Text -> Maybe Text -> DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: DeleteDirectConnectGatewayAssociationProposal' :: Text -> DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: DeleteDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociationProposal -> Int -> DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: DeleteDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: DeleteDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect: DeleteInterconnect' :: Text -> DeleteInterconnect
+ Amazonka.DirectConnect: DeleteInterconnectResponse' :: Maybe InterconnectState -> Int -> DeleteInterconnectResponse
+ Amazonka.DirectConnect: DeleteLag' :: Text -> DeleteLag
+ Amazonka.DirectConnect: DeleteVirtualInterface' :: Text -> DeleteVirtualInterface
+ Amazonka.DirectConnect: DeleteVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect: DescribeConnections' :: Maybe Text -> DescribeConnections
+ Amazonka.DirectConnect: DescribeCustomerMetadata' :: DescribeCustomerMetadata
+ Amazonka.DirectConnect: DescribeCustomerMetadataResponse' :: Maybe [CustomerAgreement] -> Maybe NniPartnerType -> Int -> DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAssociationProposals' :: Maybe Text -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAssociationProposalsResponse' :: Maybe [DirectConnectGatewayAssociationProposal] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAssociations' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAssociationsResponse' :: Maybe [DirectConnectGatewayAssociation] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAttachments' :: Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect: DescribeDirectConnectGatewayAttachmentsResponse' :: Maybe [DirectConnectGatewayAttachment] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect: DescribeDirectConnectGateways' :: Maybe Text -> Maybe Int -> Maybe Text -> DescribeDirectConnectGateways
+ Amazonka.DirectConnect: DescribeDirectConnectGatewaysResponse' :: Maybe [DirectConnectGateway] -> Maybe Text -> Int -> DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect: DescribeHostedConnections' :: Text -> DescribeHostedConnections
+ Amazonka.DirectConnect: DescribeInterconnects' :: Maybe Text -> DescribeInterconnects
+ Amazonka.DirectConnect: DescribeInterconnectsResponse' :: Maybe [Interconnect] -> Int -> DescribeInterconnectsResponse
+ Amazonka.DirectConnect: DescribeLags' :: Maybe Text -> DescribeLags
+ Amazonka.DirectConnect: DescribeLagsResponse' :: Maybe [Lag] -> Int -> DescribeLagsResponse
+ Amazonka.DirectConnect: DescribeLoa' :: Maybe LoaContentType -> Maybe Text -> Text -> DescribeLoa
+ Amazonka.DirectConnect: DescribeLoaResponse' :: Maybe Base64 -> Maybe LoaContentType -> Int -> DescribeLoaResponse
+ Amazonka.DirectConnect: DescribeLocations' :: DescribeLocations
+ Amazonka.DirectConnect: DescribeLocationsResponse' :: Maybe [Location] -> Int -> DescribeLocationsResponse
+ Amazonka.DirectConnect: DescribeRouterConfiguration' :: Maybe Text -> Text -> DescribeRouterConfiguration
+ Amazonka.DirectConnect: DescribeRouterConfigurationResponse' :: Maybe Text -> Maybe RouterType -> Maybe Text -> Maybe Text -> Int -> DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect: DescribeTags' :: [Text] -> DescribeTags
+ Amazonka.DirectConnect: DescribeTagsResponse' :: Maybe [ResourceTag] -> Int -> DescribeTagsResponse
+ Amazonka.DirectConnect: DescribeVirtualGateways' :: DescribeVirtualGateways
+ Amazonka.DirectConnect: DescribeVirtualGatewaysResponse' :: Maybe [VirtualGateway] -> Int -> DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect: DescribeVirtualInterfaces' :: Maybe Text -> Maybe Text -> DescribeVirtualInterfaces
+ Amazonka.DirectConnect: DescribeVirtualInterfacesResponse' :: Maybe [VirtualInterface] -> Int -> DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect: DirectConnectGateway' :: Maybe Integer -> Maybe Text -> Maybe Text -> Maybe DirectConnectGatewayState -> Maybe Text -> Maybe Text -> DirectConnectGateway
+ Amazonka.DirectConnect: DirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe AssociatedGateway -> Maybe Text -> Maybe DirectConnectGatewayAssociationState -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAssociation
+ Amazonka.DirectConnect: DirectConnectGatewayAssociationProposal' :: Maybe AssociatedGateway -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe DirectConnectGatewayAssociationProposalState -> Maybe [RouteFilterPrefix] -> DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: DirectConnectGatewayAssociationProposalState' :: Text -> DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect: DirectConnectGatewayAssociationState' :: Text -> DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: DirectConnectGatewayAttachment' :: Maybe DirectConnectGatewayAttachmentState -> Maybe DirectConnectGatewayAttachmentType -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAttachment
+ Amazonka.DirectConnect: DirectConnectGatewayAttachmentState' :: Text -> DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: DirectConnectGatewayAttachmentType' :: Text -> DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect: DirectConnectGatewayState' :: Text -> DirectConnectGatewayState
+ Amazonka.DirectConnect: DisassociateConnectionFromLag' :: Text -> Text -> DisassociateConnectionFromLag
+ Amazonka.DirectConnect: DisassociateMacSecKey' :: Text -> Text -> DisassociateMacSecKey
+ Amazonka.DirectConnect: DisassociateMacSecKeyResponse' :: Maybe Text -> Maybe [MacSecKey] -> Int -> DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect: GatewayType' :: Text -> GatewayType
+ Amazonka.DirectConnect: HasLogicalRedundancy' :: Text -> HasLogicalRedundancy
+ Amazonka.DirectConnect: Interconnect' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Text -> Maybe Text -> Maybe InterconnectState -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Interconnect
+ Amazonka.DirectConnect: InterconnectState' :: Text -> InterconnectState
+ Amazonka.DirectConnect: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect: LagState' :: Text -> LagState
+ Amazonka.DirectConnect: ListVirtualInterfaceTestHistory' :: Maybe [Text] -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect: ListVirtualInterfaceTestHistoryResponse' :: Maybe Text -> Maybe [VirtualInterfaceTestHistory] -> Int -> ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect: LoaContentType' :: Text -> LoaContentType
+ Amazonka.DirectConnect: Location' :: Maybe [Text] -> Maybe [Text] -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Location
+ Amazonka.DirectConnect: MacSecKey' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> MacSecKey
+ Amazonka.DirectConnect: NewBGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> NewBGPPeer
+ Amazonka.DirectConnect: NewPrivateVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect: NewPrivateVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect: NewPublicVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect: NewPublicVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect: NewTransitVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterface
+ Amazonka.DirectConnect: NewTransitVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect: NniPartnerType' :: Text -> NniPartnerType
+ Amazonka.DirectConnect: ResourceTag' :: Maybe Text -> Maybe (NonEmpty Tag) -> ResourceTag
+ Amazonka.DirectConnect: RouteFilterPrefix' :: Maybe Text -> RouteFilterPrefix
+ Amazonka.DirectConnect: RouterType' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> RouterType
+ Amazonka.DirectConnect: StartBgpFailoverTest' :: Maybe [Text] -> Maybe Int -> Text -> StartBgpFailoverTest
+ Amazonka.DirectConnect: StartBgpFailoverTestResponse' :: Maybe VirtualInterfaceTestHistory -> Int -> StartBgpFailoverTestResponse
+ Amazonka.DirectConnect: StopBgpFailoverTest' :: Text -> StopBgpFailoverTest
+ Amazonka.DirectConnect: StopBgpFailoverTestResponse' :: Maybe VirtualInterfaceTestHistory -> Int -> StopBgpFailoverTestResponse
+ Amazonka.DirectConnect: Tag' :: Maybe Text -> Text -> Tag
+ Amazonka.DirectConnect: TagResource' :: Text -> NonEmpty Tag -> TagResource
+ Amazonka.DirectConnect: TagResourceResponse' :: Int -> TagResourceResponse
+ Amazonka.DirectConnect: UntagResource' :: Text -> [Text] -> UntagResource
+ Amazonka.DirectConnect: UntagResourceResponse' :: Int -> UntagResourceResponse
+ Amazonka.DirectConnect: UpdateConnection' :: Maybe Text -> Maybe Text -> Text -> UpdateConnection
+ Amazonka.DirectConnect: UpdateDirectConnectGateway' :: Text -> Text -> UpdateDirectConnectGateway
+ Amazonka.DirectConnect: UpdateDirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe [RouteFilterPrefix] -> UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: UpdateDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: UpdateDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: UpdateLag' :: Maybe Text -> Maybe Text -> Maybe Int -> Text -> UpdateLag
+ Amazonka.DirectConnect: UpdateVirtualInterfaceAttributes' :: Maybe Bool -> Maybe Int -> Maybe Text -> Text -> UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect: VirtualGateway' :: Maybe Text -> Maybe Text -> VirtualGateway
+ Amazonka.DirectConnect: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect: VirtualInterfaceState' :: Text -> VirtualInterfaceState
+ Amazonka.DirectConnect: VirtualInterfaceTestHistory' :: Maybe [Text] -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> VirtualInterfaceTestHistory
+ Amazonka.DirectConnect: [fromAddressFamily] :: AddressFamily -> Text
+ Amazonka.DirectConnect: [fromBGPPeerState] :: BGPPeerState -> Text
+ Amazonka.DirectConnect: [fromBGPStatus] :: BGPStatus -> Text
+ Amazonka.DirectConnect: [fromConnectionState] :: ConnectionState -> Text
+ Amazonka.DirectConnect: [fromDirectConnectGatewayAssociationProposalState] :: DirectConnectGatewayAssociationProposalState -> Text
+ Amazonka.DirectConnect: [fromDirectConnectGatewayAssociationState] :: DirectConnectGatewayAssociationState -> Text
+ Amazonka.DirectConnect: [fromDirectConnectGatewayAttachmentState] :: DirectConnectGatewayAttachmentState -> Text
+ Amazonka.DirectConnect: [fromDirectConnectGatewayAttachmentType] :: DirectConnectGatewayAttachmentType -> Text
+ Amazonka.DirectConnect: [fromDirectConnectGatewayState] :: DirectConnectGatewayState -> Text
+ Amazonka.DirectConnect: [fromGatewayType] :: GatewayType -> Text
+ Amazonka.DirectConnect: [fromHasLogicalRedundancy] :: HasLogicalRedundancy -> Text
+ Amazonka.DirectConnect: [fromInterconnectState] :: InterconnectState -> Text
+ Amazonka.DirectConnect: [fromLagState] :: LagState -> Text
+ Amazonka.DirectConnect: [fromLoaContentType] :: LoaContentType -> Text
+ Amazonka.DirectConnect: [fromNniPartnerType] :: NniPartnerType -> Text
+ Amazonka.DirectConnect: [fromVirtualInterfaceState] :: VirtualInterfaceState -> Text
+ Amazonka.DirectConnect: _DirectConnectClientException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect: _DirectConnectServerException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect: _DuplicateTagKeysException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect: _TooManyTagsException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect: data AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: data AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: data AllocateHostedConnection
+ Amazonka.DirectConnect: data AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect: data AllocatePublicVirtualInterface
+ Amazonka.DirectConnect: data AllocateTransitVirtualInterface
+ Amazonka.DirectConnect: data AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: data AssociateConnectionWithLag
+ Amazonka.DirectConnect: data AssociateHostedConnection
+ Amazonka.DirectConnect: data AssociateMacSecKey
+ Amazonka.DirectConnect: data AssociateMacSecKeyResponse
+ Amazonka.DirectConnect: data AssociateVirtualInterface
+ Amazonka.DirectConnect: data AssociatedGateway
+ Amazonka.DirectConnect: data BGPPeer
+ Amazonka.DirectConnect: data ConfirmConnection
+ Amazonka.DirectConnect: data ConfirmConnectionResponse
+ Amazonka.DirectConnect: data ConfirmCustomerAgreement
+ Amazonka.DirectConnect: data ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect: data ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect: data ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect: data ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect: data ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect: data ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect: data ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: data Connection
+ Amazonka.DirectConnect: data Connections
+ Amazonka.DirectConnect: data CreateBGPPeer
+ Amazonka.DirectConnect: data CreateBGPPeerResponse
+ Amazonka.DirectConnect: data CreateConnection
+ Amazonka.DirectConnect: data CreateDirectConnectGateway
+ Amazonka.DirectConnect: data CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: data CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: data CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: data CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: data CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: data CreateInterconnect
+ Amazonka.DirectConnect: data CreateLag
+ Amazonka.DirectConnect: data CreatePrivateVirtualInterface
+ Amazonka.DirectConnect: data CreatePublicVirtualInterface
+ Amazonka.DirectConnect: data CreateTransitVirtualInterface
+ Amazonka.DirectConnect: data CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: data CustomerAgreement
+ Amazonka.DirectConnect: data DeleteBGPPeer
+ Amazonka.DirectConnect: data DeleteBGPPeerResponse
+ Amazonka.DirectConnect: data DeleteConnection
+ Amazonka.DirectConnect: data DeleteDirectConnectGateway
+ Amazonka.DirectConnect: data DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: data DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: data DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: data DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: data DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect: data DeleteInterconnect
+ Amazonka.DirectConnect: data DeleteInterconnectResponse
+ Amazonka.DirectConnect: data DeleteLag
+ Amazonka.DirectConnect: data DeleteVirtualInterface
+ Amazonka.DirectConnect: data DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect: data DescribeConnections
+ Amazonka.DirectConnect: data DescribeCustomerMetadata
+ Amazonka.DirectConnect: data DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect: data DescribeDirectConnectGateways
+ Amazonka.DirectConnect: data DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect: data DescribeHostedConnections
+ Amazonka.DirectConnect: data DescribeInterconnects
+ Amazonka.DirectConnect: data DescribeInterconnectsResponse
+ Amazonka.DirectConnect: data DescribeLags
+ Amazonka.DirectConnect: data DescribeLagsResponse
+ Amazonka.DirectConnect: data DescribeLoa
+ Amazonka.DirectConnect: data DescribeLoaResponse
+ Amazonka.DirectConnect: data DescribeLocations
+ Amazonka.DirectConnect: data DescribeLocationsResponse
+ Amazonka.DirectConnect: data DescribeRouterConfiguration
+ Amazonka.DirectConnect: data DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect: data DescribeTags
+ Amazonka.DirectConnect: data DescribeTagsResponse
+ Amazonka.DirectConnect: data DescribeVirtualGateways
+ Amazonka.DirectConnect: data DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect: data DescribeVirtualInterfaces
+ Amazonka.DirectConnect: data DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect: data DirectConnectGateway
+ Amazonka.DirectConnect: data DirectConnectGatewayAssociation
+ Amazonka.DirectConnect: data DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: data DirectConnectGatewayAttachment
+ Amazonka.DirectConnect: data DisassociateConnectionFromLag
+ Amazonka.DirectConnect: data DisassociateMacSecKey
+ Amazonka.DirectConnect: data DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect: data Interconnect
+ Amazonka.DirectConnect: data Lag
+ Amazonka.DirectConnect: data ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect: data ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect: data Location
+ Amazonka.DirectConnect: data MacSecKey
+ Amazonka.DirectConnect: data NewBGPPeer
+ Amazonka.DirectConnect: data NewPrivateVirtualInterface
+ Amazonka.DirectConnect: data NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect: data NewPublicVirtualInterface
+ Amazonka.DirectConnect: data NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect: data NewTransitVirtualInterface
+ Amazonka.DirectConnect: data NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect: data ResourceTag
+ Amazonka.DirectConnect: data RouteFilterPrefix
+ Amazonka.DirectConnect: data RouterType
+ Amazonka.DirectConnect: data StartBgpFailoverTest
+ Amazonka.DirectConnect: data StartBgpFailoverTestResponse
+ Amazonka.DirectConnect: data StopBgpFailoverTest
+ Amazonka.DirectConnect: data StopBgpFailoverTestResponse
+ Amazonka.DirectConnect: data Tag
+ Amazonka.DirectConnect: data TagResource
+ Amazonka.DirectConnect: data TagResourceResponse
+ Amazonka.DirectConnect: data UntagResource
+ Amazonka.DirectConnect: data UntagResourceResponse
+ Amazonka.DirectConnect: data UpdateConnection
+ Amazonka.DirectConnect: data UpdateDirectConnectGateway
+ Amazonka.DirectConnect: data UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: data UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: data UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: data UpdateLag
+ Amazonka.DirectConnect: data UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect: data VirtualGateway
+ Amazonka.DirectConnect: data VirtualInterface
+ Amazonka.DirectConnect: data VirtualInterfaceTestHistory
+ Amazonka.DirectConnect: defaultService :: Service
+ Amazonka.DirectConnect: newAcceptDirectConnectGatewayAssociationProposal :: Text -> Text -> Text -> AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: newAcceptDirectConnectGatewayAssociationProposalResponse :: Int -> AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: newAllocateHostedConnection :: Text -> Text -> Text -> Text -> Int -> AllocateHostedConnection
+ Amazonka.DirectConnect: newAllocatePrivateVirtualInterface :: Text -> Text -> NewPrivateVirtualInterfaceAllocation -> AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect: newAllocatePublicVirtualInterface :: Text -> Text -> NewPublicVirtualInterfaceAllocation -> AllocatePublicVirtualInterface
+ Amazonka.DirectConnect: newAllocateTransitVirtualInterface :: Text -> Text -> NewTransitVirtualInterfaceAllocation -> AllocateTransitVirtualInterface
+ Amazonka.DirectConnect: newAllocateTransitVirtualInterfaceResponse :: Int -> AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: newAssociateConnectionWithLag :: Text -> Text -> AssociateConnectionWithLag
+ Amazonka.DirectConnect: newAssociateHostedConnection :: Text -> Text -> AssociateHostedConnection
+ Amazonka.DirectConnect: newAssociateMacSecKey :: Text -> AssociateMacSecKey
+ Amazonka.DirectConnect: newAssociateMacSecKeyResponse :: Int -> AssociateMacSecKeyResponse
+ Amazonka.DirectConnect: newAssociateVirtualInterface :: Text -> Text -> AssociateVirtualInterface
+ Amazonka.DirectConnect: newAssociatedGateway :: AssociatedGateway
+ Amazonka.DirectConnect: newBGPPeer :: BGPPeer
+ Amazonka.DirectConnect: newConfirmConnection :: Text -> ConfirmConnection
+ Amazonka.DirectConnect: newConfirmConnectionResponse :: Int -> ConfirmConnectionResponse
+ Amazonka.DirectConnect: newConfirmCustomerAgreement :: ConfirmCustomerAgreement
+ Amazonka.DirectConnect: newConfirmCustomerAgreementResponse :: Int -> ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect: newConfirmPrivateVirtualInterface :: Text -> ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect: newConfirmPrivateVirtualInterfaceResponse :: Int -> ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect: newConfirmPublicVirtualInterface :: Text -> ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect: newConfirmPublicVirtualInterfaceResponse :: Int -> ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect: newConfirmTransitVirtualInterface :: Text -> Text -> ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect: newConfirmTransitVirtualInterfaceResponse :: Int -> ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: newConnection :: Connection
+ Amazonka.DirectConnect: newConnections :: Connections
+ Amazonka.DirectConnect: newCreateBGPPeer :: CreateBGPPeer
+ Amazonka.DirectConnect: newCreateBGPPeerResponse :: Int -> CreateBGPPeerResponse
+ Amazonka.DirectConnect: newCreateConnection :: Text -> Text -> Text -> CreateConnection
+ Amazonka.DirectConnect: newCreateDirectConnectGateway :: Text -> CreateDirectConnectGateway
+ Amazonka.DirectConnect: newCreateDirectConnectGatewayAssociation :: Text -> CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: newCreateDirectConnectGatewayAssociationProposal :: Text -> Text -> Text -> CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: newCreateDirectConnectGatewayAssociationProposalResponse :: Int -> CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: newCreateDirectConnectGatewayAssociationResponse :: Int -> CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: newCreateDirectConnectGatewayResponse :: Int -> CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: newCreateInterconnect :: Text -> Text -> Text -> CreateInterconnect
+ Amazonka.DirectConnect: newCreateLag :: Int -> Text -> Text -> Text -> CreateLag
+ Amazonka.DirectConnect: newCreatePrivateVirtualInterface :: Text -> NewPrivateVirtualInterface -> CreatePrivateVirtualInterface
+ Amazonka.DirectConnect: newCreatePublicVirtualInterface :: Text -> NewPublicVirtualInterface -> CreatePublicVirtualInterface
+ Amazonka.DirectConnect: newCreateTransitVirtualInterface :: Text -> NewTransitVirtualInterface -> CreateTransitVirtualInterface
+ Amazonka.DirectConnect: newCreateTransitVirtualInterfaceResponse :: Int -> CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect: newCustomerAgreement :: CustomerAgreement
+ Amazonka.DirectConnect: newDeleteBGPPeer :: DeleteBGPPeer
+ Amazonka.DirectConnect: newDeleteBGPPeerResponse :: Int -> DeleteBGPPeerResponse
+ Amazonka.DirectConnect: newDeleteConnection :: Text -> DeleteConnection
+ Amazonka.DirectConnect: newDeleteDirectConnectGateway :: Text -> DeleteDirectConnectGateway
+ Amazonka.DirectConnect: newDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: newDeleteDirectConnectGatewayAssociationProposal :: Text -> DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: newDeleteDirectConnectGatewayAssociationProposalResponse :: Int -> DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect: newDeleteDirectConnectGatewayAssociationResponse :: Int -> DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: newDeleteDirectConnectGatewayResponse :: Int -> DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect: newDeleteInterconnect :: Text -> DeleteInterconnect
+ Amazonka.DirectConnect: newDeleteInterconnectResponse :: Int -> DeleteInterconnectResponse
+ Amazonka.DirectConnect: newDeleteLag :: Text -> DeleteLag
+ Amazonka.DirectConnect: newDeleteVirtualInterface :: Text -> DeleteVirtualInterface
+ Amazonka.DirectConnect: newDeleteVirtualInterfaceResponse :: Int -> DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect: newDescribeConnections :: DescribeConnections
+ Amazonka.DirectConnect: newDescribeCustomerMetadata :: DescribeCustomerMetadata
+ Amazonka.DirectConnect: newDescribeCustomerMetadataResponse :: Int -> DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAssociationProposals :: DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAssociationProposalsResponse :: Int -> DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAssociationsResponse :: Int -> DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewayAttachmentsResponse :: Int -> DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect: newDescribeDirectConnectGateways :: DescribeDirectConnectGateways
+ Amazonka.DirectConnect: newDescribeDirectConnectGatewaysResponse :: Int -> DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect: newDescribeHostedConnections :: Text -> DescribeHostedConnections
+ Amazonka.DirectConnect: newDescribeInterconnects :: DescribeInterconnects
+ Amazonka.DirectConnect: newDescribeInterconnectsResponse :: Int -> DescribeInterconnectsResponse
+ Amazonka.DirectConnect: newDescribeLags :: DescribeLags
+ Amazonka.DirectConnect: newDescribeLagsResponse :: Int -> DescribeLagsResponse
+ Amazonka.DirectConnect: newDescribeLoa :: Text -> DescribeLoa
+ Amazonka.DirectConnect: newDescribeLoaResponse :: Int -> DescribeLoaResponse
+ Amazonka.DirectConnect: newDescribeLocations :: DescribeLocations
+ Amazonka.DirectConnect: newDescribeLocationsResponse :: Int -> DescribeLocationsResponse
+ Amazonka.DirectConnect: newDescribeRouterConfiguration :: Text -> DescribeRouterConfiguration
+ Amazonka.DirectConnect: newDescribeRouterConfigurationResponse :: Int -> DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect: newDescribeTags :: DescribeTags
+ Amazonka.DirectConnect: newDescribeTagsResponse :: Int -> DescribeTagsResponse
+ Amazonka.DirectConnect: newDescribeVirtualGateways :: DescribeVirtualGateways
+ Amazonka.DirectConnect: newDescribeVirtualGatewaysResponse :: Int -> DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect: newDescribeVirtualInterfaces :: DescribeVirtualInterfaces
+ Amazonka.DirectConnect: newDescribeVirtualInterfacesResponse :: Int -> DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect: newDirectConnectGateway :: DirectConnectGateway
+ Amazonka.DirectConnect: newDirectConnectGatewayAssociation :: DirectConnectGatewayAssociation
+ Amazonka.DirectConnect: newDirectConnectGatewayAssociationProposal :: DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect: newDirectConnectGatewayAttachment :: DirectConnectGatewayAttachment
+ Amazonka.DirectConnect: newDisassociateConnectionFromLag :: Text -> Text -> DisassociateConnectionFromLag
+ Amazonka.DirectConnect: newDisassociateMacSecKey :: Text -> Text -> DisassociateMacSecKey
+ Amazonka.DirectConnect: newDisassociateMacSecKeyResponse :: Int -> DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect: newInterconnect :: Interconnect
+ Amazonka.DirectConnect: newLag :: Lag
+ Amazonka.DirectConnect: newListVirtualInterfaceTestHistory :: ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect: newListVirtualInterfaceTestHistoryResponse :: Int -> ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect: newLocation :: Location
+ Amazonka.DirectConnect: newMacSecKey :: MacSecKey
+ Amazonka.DirectConnect: newNewBGPPeer :: NewBGPPeer
+ Amazonka.DirectConnect: newNewPrivateVirtualInterface :: Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect: newNewPrivateVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect: newNewPublicVirtualInterface :: Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect: newNewPublicVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect: newNewTransitVirtualInterface :: NewTransitVirtualInterface
+ Amazonka.DirectConnect: newNewTransitVirtualInterfaceAllocation :: NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect: newResourceTag :: ResourceTag
+ Amazonka.DirectConnect: newRouteFilterPrefix :: RouteFilterPrefix
+ Amazonka.DirectConnect: newRouterType :: RouterType
+ Amazonka.DirectConnect: newStartBgpFailoverTest :: Text -> StartBgpFailoverTest
+ Amazonka.DirectConnect: newStartBgpFailoverTestResponse :: Int -> StartBgpFailoverTestResponse
+ Amazonka.DirectConnect: newStopBgpFailoverTest :: Text -> StopBgpFailoverTest
+ Amazonka.DirectConnect: newStopBgpFailoverTestResponse :: Int -> StopBgpFailoverTestResponse
+ Amazonka.DirectConnect: newTag :: Text -> Tag
+ Amazonka.DirectConnect: newTagResource :: Text -> NonEmpty Tag -> TagResource
+ Amazonka.DirectConnect: newTagResourceResponse :: Int -> TagResourceResponse
+ Amazonka.DirectConnect: newUntagResource :: Text -> UntagResource
+ Amazonka.DirectConnect: newUntagResourceResponse :: Int -> UntagResourceResponse
+ Amazonka.DirectConnect: newUpdateConnection :: Text -> UpdateConnection
+ Amazonka.DirectConnect: newUpdateDirectConnectGateway :: Text -> Text -> UpdateDirectConnectGateway
+ Amazonka.DirectConnect: newUpdateDirectConnectGatewayAssociation :: UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect: newUpdateDirectConnectGatewayAssociationResponse :: Int -> UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect: newUpdateDirectConnectGatewayResponse :: Int -> UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect: newUpdateLag :: Text -> UpdateLag
+ Amazonka.DirectConnect: newUpdateVirtualInterfaceAttributes :: Text -> UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect: newVirtualGateway :: VirtualGateway
+ Amazonka.DirectConnect: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect: newVirtualInterfaceTestHistory :: VirtualInterfaceTestHistory
+ Amazonka.DirectConnect: newtype AddressFamily
+ Amazonka.DirectConnect: newtype BGPPeerState
+ Amazonka.DirectConnect: newtype BGPStatus
+ Amazonka.DirectConnect: newtype ConnectionState
+ Amazonka.DirectConnect: newtype DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect: newtype DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: newtype DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: newtype DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect: newtype DirectConnectGatewayState
+ Amazonka.DirectConnect: newtype GatewayType
+ Amazonka.DirectConnect: newtype HasLogicalRedundancy
+ Amazonka.DirectConnect: newtype InterconnectState
+ Amazonka.DirectConnect: newtype LagState
+ Amazonka.DirectConnect: newtype LoaContentType
+ Amazonka.DirectConnect: newtype NniPartnerType
+ Amazonka.DirectConnect: newtype VirtualInterfaceState
+ Amazonka.DirectConnect: pattern AddressFamily_Ipv4 :: AddressFamily
+ Amazonka.DirectConnect: pattern AddressFamily_Ipv6 :: AddressFamily
+ Amazonka.DirectConnect: pattern BGPPeerState_Available :: BGPPeerState
+ Amazonka.DirectConnect: pattern BGPPeerState_Deleted :: BGPPeerState
+ Amazonka.DirectConnect: pattern BGPPeerState_Deleting :: BGPPeerState
+ Amazonka.DirectConnect: pattern BGPPeerState_Pending :: BGPPeerState
+ Amazonka.DirectConnect: pattern BGPPeerState_Verifying :: BGPPeerState
+ Amazonka.DirectConnect: pattern BGPStatus_Down :: BGPStatus
+ Amazonka.DirectConnect: pattern BGPStatus_Unknown :: BGPStatus
+ Amazonka.DirectConnect: pattern BGPStatus_Up :: BGPStatus
+ Amazonka.DirectConnect: pattern ConnectionState_Available :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Deleted :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Deleting :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Down :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Ordering :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Pending :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Rejected :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Requested :: ConnectionState
+ Amazonka.DirectConnect: pattern ConnectionState_Unknown :: ConnectionState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationProposalState_Accepted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationProposalState_Deleted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationProposalState_Requested :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationState_Associated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationState_Associating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationState_Disassociated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationState_Disassociating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAssociationState_Updating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentState_Attached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentState_Attaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentState_Detached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentState_Detaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentType_PrivateVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect: pattern DirectConnectGatewayAttachmentType_TransitVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect: pattern DirectConnectGatewayState_Available :: DirectConnectGatewayState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayState_Deleted :: DirectConnectGatewayState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayState_Deleting :: DirectConnectGatewayState
+ Amazonka.DirectConnect: pattern DirectConnectGatewayState_Pending :: DirectConnectGatewayState
+ Amazonka.DirectConnect: pattern GatewayType_TransitGateway :: GatewayType
+ Amazonka.DirectConnect: pattern GatewayType_VirtualPrivateGateway :: GatewayType
+ Amazonka.DirectConnect: pattern HasLogicalRedundancy_No :: HasLogicalRedundancy
+ Amazonka.DirectConnect: pattern HasLogicalRedundancy_Unknown :: HasLogicalRedundancy
+ Amazonka.DirectConnect: pattern HasLogicalRedundancy_Yes :: HasLogicalRedundancy
+ Amazonka.DirectConnect: pattern InterconnectState_Available :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Deleted :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Deleting :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Down :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Pending :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Requested :: InterconnectState
+ Amazonka.DirectConnect: pattern InterconnectState_Unknown :: InterconnectState
+ Amazonka.DirectConnect: pattern LagState_Available :: LagState
+ Amazonka.DirectConnect: pattern LagState_Deleted :: LagState
+ Amazonka.DirectConnect: pattern LagState_Deleting :: LagState
+ Amazonka.DirectConnect: pattern LagState_Down :: LagState
+ Amazonka.DirectConnect: pattern LagState_Pending :: LagState
+ Amazonka.DirectConnect: pattern LagState_Requested :: LagState
+ Amazonka.DirectConnect: pattern LagState_Unknown :: LagState
+ Amazonka.DirectConnect: pattern LoaContentType_Application_pdf :: LoaContentType
+ Amazonka.DirectConnect: pattern NniPartnerType_NonPartner :: NniPartnerType
+ Amazonka.DirectConnect: pattern NniPartnerType_V1 :: NniPartnerType
+ Amazonka.DirectConnect: pattern NniPartnerType_V2 :: NniPartnerType
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Available :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Confirming :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Deleted :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Deleting :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Down :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Pending :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Rejected :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Unknown :: VirtualInterfaceState
+ Amazonka.DirectConnect: pattern VirtualInterfaceState_Verifying :: VirtualInterfaceState
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: AcceptDirectConnectGatewayAssociationProposal' :: Maybe [RouteFilterPrefix] -> Text -> Text -> Text -> AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: AcceptDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:associatedGatewayOwnerAccount:AcceptDirectConnectGatewayAssociationProposal'] :: AcceptDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayAssociation:AcceptDirectConnectGatewayAssociationProposalResponse'] :: AcceptDirectConnectGatewayAssociationProposalResponse -> Maybe DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayId:AcceptDirectConnectGatewayAssociationProposal'] :: AcceptDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:httpStatus:AcceptDirectConnectGatewayAssociationProposalResponse'] :: AcceptDirectConnectGatewayAssociationProposalResponse -> Int
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:overrideAllowedPrefixesToDirectConnectGateway:AcceptDirectConnectGatewayAssociationProposal'] :: AcceptDirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: [$sel:proposalId:AcceptDirectConnectGatewayAssociationProposal'] :: AcceptDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation :: Lens' AcceptDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' AcceptDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway :: Lens' AcceptDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: acceptDirectConnectGatewayAssociationProposal_proposalId :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: data AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: data AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal.AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: newAcceptDirectConnectGatewayAssociationProposal :: Text -> Text -> Text -> AcceptDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal: newAcceptDirectConnectGatewayAssociationProposalResponse :: Int -> AcceptDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.AllocateHostedConnection: AllocateHostedConnection' :: Maybe (NonEmpty Tag) -> Text -> Text -> Text -> Text -> Int -> AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:bandwidth:AllocateHostedConnection'] :: AllocateHostedConnection -> Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:connectionId:AllocateHostedConnection'] :: AllocateHostedConnection -> Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:connectionName:AllocateHostedConnection'] :: AllocateHostedConnection -> Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:ownerAccount:AllocateHostedConnection'] :: AllocateHostedConnection -> Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:tags:AllocateHostedConnection'] :: AllocateHostedConnection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:vlan:AllocateHostedConnection'] :: AllocateHostedConnection -> Int
+ Amazonka.DirectConnect.AllocateHostedConnection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_bandwidth :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_connectionId :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_connectionName :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_ownerAccount :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_tags :: Lens' AllocateHostedConnection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AllocateHostedConnection: allocateHostedConnection_vlan :: Lens' AllocateHostedConnection Int
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AllocateHostedConnection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.AllocateHostedConnection: data AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: data Connection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance GHC.Read.Read Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: instance GHC.Show.Show Amazonka.DirectConnect.AllocateHostedConnection.AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: newAllocateHostedConnection :: Text -> Text -> Text -> Text -> Int -> AllocateHostedConnection
+ Amazonka.DirectConnect.AllocateHostedConnection: newConnection :: Connection
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: AllocatePrivateVirtualInterface' :: Text -> Text -> NewPrivateVirtualInterfaceAllocation -> AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:connectionId:AllocatePrivateVirtualInterface'] :: AllocatePrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:newPrivateVirtualInterfaceAllocation':AllocatePrivateVirtualInterface'] :: AllocatePrivateVirtualInterface -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:ownerAccount:AllocatePrivateVirtualInterface'] :: AllocatePrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: allocatePrivateVirtualInterface_connectionId :: Lens' AllocatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation :: Lens' AllocatePrivateVirtualInterface NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: allocatePrivateVirtualInterface_ownerAccount :: Lens' AllocatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: data AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.AllocatePrivateVirtualInterface.AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: newAllocatePrivateVirtualInterface :: Text -> Text -> NewPrivateVirtualInterfaceAllocation -> AllocatePrivateVirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePrivateVirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: AllocatePublicVirtualInterface' :: Text -> Text -> NewPublicVirtualInterfaceAllocation -> AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:connectionId:AllocatePublicVirtualInterface'] :: AllocatePublicVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:newPublicVirtualInterfaceAllocation':AllocatePublicVirtualInterface'] :: AllocatePublicVirtualInterface -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:ownerAccount:AllocatePublicVirtualInterface'] :: AllocatePublicVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: allocatePublicVirtualInterface_connectionId :: Lens' AllocatePublicVirtualInterface Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation :: Lens' AllocatePublicVirtualInterface NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: allocatePublicVirtualInterface_ownerAccount :: Lens' AllocatePublicVirtualInterface Text
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: data AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.AllocatePublicVirtualInterface.AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: newAllocatePublicVirtualInterface :: Text -> Text -> NewPublicVirtualInterfaceAllocation -> AllocatePublicVirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AllocatePublicVirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: AllocateTransitVirtualInterface' :: Text -> Text -> NewTransitVirtualInterfaceAllocation -> AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: AllocateTransitVirtualInterfaceResponse' :: Maybe VirtualInterface -> Int -> AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: [$sel:connectionId:AllocateTransitVirtualInterface'] :: AllocateTransitVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: [$sel:httpStatus:AllocateTransitVirtualInterfaceResponse'] :: AllocateTransitVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: [$sel:newTransitVirtualInterfaceAllocation':AllocateTransitVirtualInterface'] :: AllocateTransitVirtualInterface -> NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: [$sel:ownerAccount:AllocateTransitVirtualInterface'] :: AllocateTransitVirtualInterface -> Text
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: [$sel:virtualInterface:AllocateTransitVirtualInterfaceResponse'] :: AllocateTransitVirtualInterfaceResponse -> Maybe VirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: allocateTransitVirtualInterfaceResponse_httpStatus :: Lens' AllocateTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: allocateTransitVirtualInterfaceResponse_virtualInterface :: Lens' AllocateTransitVirtualInterfaceResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: allocateTransitVirtualInterface_connectionId :: Lens' AllocateTransitVirtualInterface Text
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation :: Lens' AllocateTransitVirtualInterface NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: allocateTransitVirtualInterface_ownerAccount :: Lens' AllocateTransitVirtualInterface Text
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: data AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: data AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.AllocateTransitVirtualInterface.AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: newAllocateTransitVirtualInterface :: Text -> Text -> NewTransitVirtualInterfaceAllocation -> AllocateTransitVirtualInterface
+ Amazonka.DirectConnect.AllocateTransitVirtualInterface: newAllocateTransitVirtualInterfaceResponse :: Int -> AllocateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.AssociateConnectionWithLag: AssociateConnectionWithLag' :: Text -> Text -> AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:connectionId:AssociateConnectionWithLag'] :: AssociateConnectionWithLag -> Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:lagId:AssociateConnectionWithLag'] :: AssociateConnectionWithLag -> Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.AssociateConnectionWithLag: associateConnectionWithLag_connectionId :: Lens' AssociateConnectionWithLag Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: associateConnectionWithLag_lagId :: Lens' AssociateConnectionWithLag Text
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AssociateConnectionWithLag: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.AssociateConnectionWithLag: data AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: data Connection
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance GHC.Classes.Eq Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance GHC.Generics.Generic Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance GHC.Read.Read Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: instance GHC.Show.Show Amazonka.DirectConnect.AssociateConnectionWithLag.AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: newAssociateConnectionWithLag :: Text -> Text -> AssociateConnectionWithLag
+ Amazonka.DirectConnect.AssociateConnectionWithLag: newConnection :: Connection
+ Amazonka.DirectConnect.AssociateHostedConnection: AssociateHostedConnection' :: Text -> Text -> AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:connectionId:AssociateHostedConnection'] :: AssociateHostedConnection -> Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:parentConnectionId:AssociateHostedConnection'] :: AssociateHostedConnection -> Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AssociateHostedConnection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.AssociateHostedConnection: associateHostedConnection_connectionId :: Lens' AssociateHostedConnection Text
+ Amazonka.DirectConnect.AssociateHostedConnection: associateHostedConnection_parentConnectionId :: Lens' AssociateHostedConnection Text
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AssociateHostedConnection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.AssociateHostedConnection: data AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: data Connection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance GHC.Read.Read Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: instance GHC.Show.Show Amazonka.DirectConnect.AssociateHostedConnection.AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: newAssociateHostedConnection :: Text -> Text -> AssociateHostedConnection
+ Amazonka.DirectConnect.AssociateHostedConnection: newConnection :: Connection
+ Amazonka.DirectConnect.AssociateMacSecKey: AssociateMacSecKey' :: Maybe Text -> Maybe Text -> Maybe Text -> Text -> AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: AssociateMacSecKeyResponse' :: Maybe Text -> Maybe [MacSecKey] -> Int -> AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:cak:AssociateMacSecKey'] :: AssociateMacSecKey -> Maybe Text
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:ckn:AssociateMacSecKey'] :: AssociateMacSecKey -> Maybe Text
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:connectionId:AssociateMacSecKey'] :: AssociateMacSecKey -> Text
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:connectionId:AssociateMacSecKeyResponse'] :: AssociateMacSecKeyResponse -> Maybe Text
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:httpStatus:AssociateMacSecKeyResponse'] :: AssociateMacSecKeyResponse -> Int
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:macSecKeys:AssociateMacSecKeyResponse'] :: AssociateMacSecKeyResponse -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.AssociateMacSecKey: [$sel:secretARN:AssociateMacSecKey'] :: AssociateMacSecKey -> Maybe Text
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKeyResponse_connectionId :: Lens' AssociateMacSecKeyResponse (Maybe Text)
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKeyResponse_httpStatus :: Lens' AssociateMacSecKeyResponse Int
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKeyResponse_macSecKeys :: Lens' AssociateMacSecKeyResponse (Maybe [MacSecKey])
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKey_cak :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKey_ckn :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKey_connectionId :: Lens' AssociateMacSecKey Text
+ Amazonka.DirectConnect.AssociateMacSecKey: associateMacSecKey_secretARN :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.AssociateMacSecKey: data AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: data AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Classes.Eq Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Classes.Eq Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Generics.Generic Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Generics.Generic Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Read.Read Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Read.Read Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Show.Show Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: instance GHC.Show.Show Amazonka.DirectConnect.AssociateMacSecKey.AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateMacSecKey: newAssociateMacSecKey :: Text -> AssociateMacSecKey
+ Amazonka.DirectConnect.AssociateMacSecKey: newAssociateMacSecKeyResponse :: Int -> AssociateMacSecKeyResponse
+ Amazonka.DirectConnect.AssociateVirtualInterface: AssociateVirtualInterface' :: Text -> Text -> AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:connectionId:AssociateVirtualInterface'] :: AssociateVirtualInterface -> Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualInterfaceId:AssociateVirtualInterface'] :: AssociateVirtualInterface -> Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.AssociateVirtualInterface: associateVirtualInterface_connectionId :: Lens' AssociateVirtualInterface Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: associateVirtualInterface_virtualInterfaceId :: Lens' AssociateVirtualInterface Text
+ Amazonka.DirectConnect.AssociateVirtualInterface: data AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.AssociateVirtualInterface.AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: newAssociateVirtualInterface :: Text -> Text -> AssociateVirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.AssociateVirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.ConfirmConnection: ConfirmConnection' :: Text -> ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: ConfirmConnectionResponse' :: Maybe ConnectionState -> Int -> ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: [$sel:connectionId:ConfirmConnection'] :: ConfirmConnection -> Text
+ Amazonka.DirectConnect.ConfirmConnection: [$sel:connectionState:ConfirmConnectionResponse'] :: ConfirmConnectionResponse -> Maybe ConnectionState
+ Amazonka.DirectConnect.ConfirmConnection: [$sel:httpStatus:ConfirmConnectionResponse'] :: ConfirmConnectionResponse -> Int
+ Amazonka.DirectConnect.ConfirmConnection: confirmConnectionResponse_connectionState :: Lens' ConfirmConnectionResponse (Maybe ConnectionState)
+ Amazonka.DirectConnect.ConfirmConnection: confirmConnectionResponse_httpStatus :: Lens' ConfirmConnectionResponse Int
+ Amazonka.DirectConnect.ConfirmConnection: confirmConnection_connectionId :: Lens' ConfirmConnection Text
+ Amazonka.DirectConnect.ConfirmConnection: data ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: data ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmConnection.ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmConnection.ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmConnection: newConfirmConnection :: Text -> ConfirmConnection
+ Amazonka.DirectConnect.ConfirmConnection: newConfirmConnectionResponse :: Int -> ConfirmConnectionResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: ConfirmCustomerAgreement' :: Maybe Text -> ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: ConfirmCustomerAgreementResponse' :: Maybe Text -> Int -> ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: [$sel:agreementName:ConfirmCustomerAgreement'] :: ConfirmCustomerAgreement -> Maybe Text
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: [$sel:httpStatus:ConfirmCustomerAgreementResponse'] :: ConfirmCustomerAgreementResponse -> Int
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: [$sel:status:ConfirmCustomerAgreementResponse'] :: ConfirmCustomerAgreementResponse -> Maybe Text
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: confirmCustomerAgreementResponse_httpStatus :: Lens' ConfirmCustomerAgreementResponse Int
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: confirmCustomerAgreementResponse_status :: Lens' ConfirmCustomerAgreementResponse (Maybe Text)
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: confirmCustomerAgreement_agreementName :: Lens' ConfirmCustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: data ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: data ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmCustomerAgreement.ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: newConfirmCustomerAgreement :: ConfirmCustomerAgreement
+ Amazonka.DirectConnect.ConfirmCustomerAgreement: newConfirmCustomerAgreementResponse :: Int -> ConfirmCustomerAgreementResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: ConfirmPrivateVirtualInterface' :: Maybe Text -> Maybe Text -> Text -> ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: ConfirmPrivateVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: [$sel:directConnectGatewayId:ConfirmPrivateVirtualInterface'] :: ConfirmPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: [$sel:httpStatus:ConfirmPrivateVirtualInterfaceResponse'] :: ConfirmPrivateVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: [$sel:virtualGatewayId:ConfirmPrivateVirtualInterface'] :: ConfirmPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: [$sel:virtualInterfaceId:ConfirmPrivateVirtualInterface'] :: ConfirmPrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: [$sel:virtualInterfaceState:ConfirmPrivateVirtualInterfaceResponse'] :: ConfirmPrivateVirtualInterfaceResponse -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterfaceResponse_httpStatus :: Lens' ConfirmPrivateVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmPrivateVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterface_directConnectGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterface_virtualGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: confirmPrivateVirtualInterface_virtualInterfaceId :: Lens' ConfirmPrivateVirtualInterface Text
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: data ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: data ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmPrivateVirtualInterface.ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: newConfirmPrivateVirtualInterface :: Text -> ConfirmPrivateVirtualInterface
+ Amazonka.DirectConnect.ConfirmPrivateVirtualInterface: newConfirmPrivateVirtualInterfaceResponse :: Int -> ConfirmPrivateVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: ConfirmPublicVirtualInterface' :: Text -> ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: ConfirmPublicVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: [$sel:httpStatus:ConfirmPublicVirtualInterfaceResponse'] :: ConfirmPublicVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: [$sel:virtualInterfaceId:ConfirmPublicVirtualInterface'] :: ConfirmPublicVirtualInterface -> Text
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: [$sel:virtualInterfaceState:ConfirmPublicVirtualInterfaceResponse'] :: ConfirmPublicVirtualInterfaceResponse -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: confirmPublicVirtualInterfaceResponse_httpStatus :: Lens' ConfirmPublicVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: confirmPublicVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmPublicVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: confirmPublicVirtualInterface_virtualInterfaceId :: Lens' ConfirmPublicVirtualInterface Text
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: data ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: data ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmPublicVirtualInterface.ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: newConfirmPublicVirtualInterface :: Text -> ConfirmPublicVirtualInterface
+ Amazonka.DirectConnect.ConfirmPublicVirtualInterface: newConfirmPublicVirtualInterfaceResponse :: Int -> ConfirmPublicVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: ConfirmTransitVirtualInterface' :: Text -> Text -> ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: ConfirmTransitVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: [$sel:directConnectGatewayId:ConfirmTransitVirtualInterface'] :: ConfirmTransitVirtualInterface -> Text
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: [$sel:httpStatus:ConfirmTransitVirtualInterfaceResponse'] :: ConfirmTransitVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: [$sel:virtualInterfaceId:ConfirmTransitVirtualInterface'] :: ConfirmTransitVirtualInterface -> Text
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: [$sel:virtualInterfaceState:ConfirmTransitVirtualInterfaceResponse'] :: ConfirmTransitVirtualInterfaceResponse -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: confirmTransitVirtualInterfaceResponse_httpStatus :: Lens' ConfirmTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: confirmTransitVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmTransitVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: confirmTransitVirtualInterface_directConnectGatewayId :: Lens' ConfirmTransitVirtualInterface Text
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: confirmTransitVirtualInterface_virtualInterfaceId :: Lens' ConfirmTransitVirtualInterface Text
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: data ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: data ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.ConfirmTransitVirtualInterface.ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: newConfirmTransitVirtualInterface :: Text -> Text -> ConfirmTransitVirtualInterface
+ Amazonka.DirectConnect.ConfirmTransitVirtualInterface: newConfirmTransitVirtualInterfaceResponse :: Int -> ConfirmTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateBGPPeer: CreateBGPPeer' :: Maybe NewBGPPeer -> Maybe Text -> CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: CreateBGPPeerResponse' :: Maybe VirtualInterface -> Int -> CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: [$sel:httpStatus:CreateBGPPeerResponse'] :: CreateBGPPeerResponse -> Int
+ Amazonka.DirectConnect.CreateBGPPeer: [$sel:newBGPPeer':CreateBGPPeer'] :: CreateBGPPeer -> Maybe NewBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: [$sel:virtualInterface:CreateBGPPeerResponse'] :: CreateBGPPeerResponse -> Maybe VirtualInterface
+ Amazonka.DirectConnect.CreateBGPPeer: [$sel:virtualInterfaceId:CreateBGPPeer'] :: CreateBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.CreateBGPPeer: createBGPPeerResponse_httpStatus :: Lens' CreateBGPPeerResponse Int
+ Amazonka.DirectConnect.CreateBGPPeer: createBGPPeerResponse_virtualInterface :: Lens' CreateBGPPeerResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.CreateBGPPeer: createBGPPeer_newBGPPeer :: Lens' CreateBGPPeer (Maybe NewBGPPeer)
+ Amazonka.DirectConnect.CreateBGPPeer: createBGPPeer_virtualInterfaceId :: Lens' CreateBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.CreateBGPPeer: data CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: data CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.CreateBGPPeer.CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateBGPPeer: newCreateBGPPeer :: CreateBGPPeer
+ Amazonka.DirectConnect.CreateBGPPeer: newCreateBGPPeerResponse :: Int -> CreateBGPPeerResponse
+ Amazonka.DirectConnect.CreateConnection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.CreateConnection: CreateConnection' :: Maybe Text -> Maybe Text -> Maybe Bool -> Maybe (NonEmpty Tag) -> Text -> Text -> Text -> CreateConnection
+ Amazonka.DirectConnect.CreateConnection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:bandwidth:CreateConnection'] :: CreateConnection -> Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:connectionName:CreateConnection'] :: CreateConnection -> Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.CreateConnection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.CreateConnection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.CreateConnection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:lagId:CreateConnection'] :: CreateConnection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.CreateConnection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:location:CreateConnection'] :: CreateConnection -> Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.CreateConnection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.CreateConnection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:providerName:CreateConnection'] :: CreateConnection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.CreateConnection: [$sel:requestMACSec:CreateConnection'] :: CreateConnection -> Maybe Bool
+ Amazonka.DirectConnect.CreateConnection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateConnection: [$sel:tags:CreateConnection'] :: CreateConnection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateConnection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.CreateConnection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.CreateConnection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.CreateConnection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.CreateConnection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.CreateConnection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.CreateConnection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.CreateConnection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateConnection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.CreateConnection: createConnection_bandwidth :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.CreateConnection: createConnection_connectionName :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.CreateConnection: createConnection_lagId :: Lens' CreateConnection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: createConnection_location :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.CreateConnection: createConnection_providerName :: Lens' CreateConnection (Maybe Text)
+ Amazonka.DirectConnect.CreateConnection: createConnection_requestMACSec :: Lens' CreateConnection (Maybe Bool)
+ Amazonka.DirectConnect.CreateConnection: createConnection_tags :: Lens' CreateConnection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateConnection: data Connection
+ Amazonka.DirectConnect.CreateConnection: data CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance GHC.Read.Read Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: instance GHC.Show.Show Amazonka.DirectConnect.CreateConnection.CreateConnection
+ Amazonka.DirectConnect.CreateConnection: newConnection :: Connection
+ Amazonka.DirectConnect.CreateConnection: newCreateConnection :: Text -> Text -> Text -> CreateConnection
+ Amazonka.DirectConnect.CreateDirectConnectGateway: CreateDirectConnectGateway' :: Maybe Integer -> Text -> CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: CreateDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: [$sel:amazonSideAsn:CreateDirectConnectGateway'] :: CreateDirectConnectGateway -> Maybe Integer
+ Amazonka.DirectConnect.CreateDirectConnectGateway: [$sel:directConnectGateway:CreateDirectConnectGatewayResponse'] :: CreateDirectConnectGatewayResponse -> Maybe DirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: [$sel:directConnectGatewayName:CreateDirectConnectGateway'] :: CreateDirectConnectGateway -> Text
+ Amazonka.DirectConnect.CreateDirectConnectGateway: [$sel:httpStatus:CreateDirectConnectGatewayResponse'] :: CreateDirectConnectGatewayResponse -> Int
+ Amazonka.DirectConnect.CreateDirectConnectGateway: createDirectConnectGatewayResponse_directConnectGateway :: Lens' CreateDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.CreateDirectConnectGateway: createDirectConnectGatewayResponse_httpStatus :: Lens' CreateDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.CreateDirectConnectGateway: createDirectConnectGateway_amazonSideAsn :: Lens' CreateDirectConnectGateway (Maybe Integer)
+ Amazonka.DirectConnect.CreateDirectConnectGateway: createDirectConnectGateway_directConnectGatewayName :: Lens' CreateDirectConnectGateway Text
+ Amazonka.DirectConnect.CreateDirectConnectGateway: data CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: data CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGateway.CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGateway: newCreateDirectConnectGateway :: Text -> CreateDirectConnectGateway
+ Amazonka.DirectConnect.CreateDirectConnectGateway: newCreateDirectConnectGatewayResponse :: Int -> CreateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: CreateDirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe Text -> Text -> CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: CreateDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:addAllowedPrefixesToDirectConnectGateway:CreateDirectConnectGatewayAssociation'] :: CreateDirectConnectGatewayAssociation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:directConnectGatewayAssociation:CreateDirectConnectGatewayAssociationResponse'] :: CreateDirectConnectGatewayAssociationResponse -> Maybe DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:directConnectGatewayId:CreateDirectConnectGatewayAssociation'] :: CreateDirectConnectGatewayAssociation -> Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:gatewayId:CreateDirectConnectGatewayAssociation'] :: CreateDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:httpStatus:CreateDirectConnectGatewayAssociationResponse'] :: CreateDirectConnectGatewayAssociationResponse -> Int
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: [$sel:virtualGatewayId:CreateDirectConnectGatewayAssociation'] :: CreateDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' CreateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociationResponse_httpStatus :: Lens' CreateDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociation_directConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociation_gatewayId :: Lens' CreateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: createDirectConnectGatewayAssociation_virtualGatewayId :: Lens' CreateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: data CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: data CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation.CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: newCreateDirectConnectGatewayAssociation :: Text -> CreateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation: newCreateDirectConnectGatewayAssociationResponse :: Int -> CreateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: CreateDirectConnectGatewayAssociationProposal' :: Maybe [RouteFilterPrefix] -> Maybe [RouteFilterPrefix] -> Text -> Text -> Text -> CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: CreateDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociationProposal -> Int -> CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:addAllowedPrefixesToDirectConnectGateway:CreateDirectConnectGatewayAssociationProposal'] :: CreateDirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayAssociationProposal:CreateDirectConnectGatewayAssociationProposalResponse'] :: CreateDirectConnectGatewayAssociationProposalResponse -> Maybe DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayId:CreateDirectConnectGatewayAssociationProposal'] :: CreateDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayOwnerAccount:CreateDirectConnectGatewayAssociationProposal'] :: CreateDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:gatewayId:CreateDirectConnectGatewayAssociationProposal'] :: CreateDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:httpStatus:CreateDirectConnectGatewayAssociationProposalResponse'] :: CreateDirectConnectGatewayAssociationProposalResponse -> Int
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: [$sel:removeAllowedPrefixesToDirectConnectGateway:CreateDirectConnectGatewayAssociationProposal'] :: CreateDirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens' CreateDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociationProposal)
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' CreateDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposal_gatewayId :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: data CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: data CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal.CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: newCreateDirectConnectGatewayAssociationProposal :: Text -> Text -> Text -> CreateDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal: newCreateDirectConnectGatewayAssociationProposalResponse :: Int -> CreateDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.CreateInterconnect: CreateInterconnect' :: Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Text -> Text -> Text -> CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: Interconnect' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Text -> Maybe Text -> Maybe InterconnectState -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Interconnect
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:awsDevice:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:awsDeviceV2:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:awsLogicalDeviceId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:bandwidth:CreateInterconnect'] :: CreateInterconnect -> Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:bandwidth:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:hasLogicalRedundancy:Interconnect'] :: Interconnect -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:interconnectId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:interconnectName:CreateInterconnect'] :: CreateInterconnect -> Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:interconnectName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:interconnectState:Interconnect'] :: Interconnect -> Maybe InterconnectState
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:jumboFrameCapable:Interconnect'] :: Interconnect -> Maybe Bool
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:lagId:CreateInterconnect'] :: CreateInterconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:lagId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:loaIssueTime:Interconnect'] :: Interconnect -> Maybe POSIX
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:location:CreateInterconnect'] :: CreateInterconnect -> Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:location:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:providerName:CreateInterconnect'] :: CreateInterconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:providerName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:region:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:tags:CreateInterconnect'] :: CreateInterconnect -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateInterconnect: [$sel:tags:Interconnect'] :: Interconnect -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_bandwidth :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_interconnectName :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_lagId :: Lens' CreateInterconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_location :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_providerName :: Lens' CreateInterconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: createInterconnect_tags :: Lens' CreateInterconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateInterconnect: data CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: data Interconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance GHC.Read.Read Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: instance GHC.Show.Show Amazonka.DirectConnect.CreateInterconnect.CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_awsDevice :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_awsDeviceV2 :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_awsLogicalDeviceId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_bandwidth :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_hasLogicalRedundancy :: Lens' Interconnect (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_interconnectId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_interconnectName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_interconnectState :: Lens' Interconnect (Maybe InterconnectState)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_jumboFrameCapable :: Lens' Interconnect (Maybe Bool)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_lagId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_loaIssueTime :: Lens' Interconnect (Maybe UTCTime)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_location :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_providerName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_region :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.CreateInterconnect: interconnect_tags :: Lens' Interconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateInterconnect: newCreateInterconnect :: Text -> Text -> Text -> CreateInterconnect
+ Amazonka.DirectConnect.CreateInterconnect: newInterconnect :: Interconnect
+ Amazonka.DirectConnect.CreateLag: CreateLag' :: Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe (NonEmpty Tag) -> Int -> Text -> Text -> Text -> CreateLag
+ Amazonka.DirectConnect.CreateLag: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect.CreateLag: [$sel:allowsHostedConnections:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.CreateLag: [$sel:awsDevice:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:awsDeviceV2:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:awsLogicalDeviceId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:childConnectionTags:CreateLag'] :: CreateLag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateLag: [$sel:connectionId:CreateLag'] :: CreateLag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:connections:Lag'] :: Lag -> Maybe [Connection]
+ Amazonka.DirectConnect.CreateLag: [$sel:connectionsBandwidth:CreateLag'] :: CreateLag -> Text
+ Amazonka.DirectConnect.CreateLag: [$sel:connectionsBandwidth:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:encryptionMode:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:hasLogicalRedundancy:Lag'] :: Lag -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.CreateLag: [$sel:jumboFrameCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.CreateLag: [$sel:lagId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:lagName:CreateLag'] :: CreateLag -> Text
+ Amazonka.DirectConnect.CreateLag: [$sel:lagName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:lagState:Lag'] :: Lag -> Maybe LagState
+ Amazonka.DirectConnect.CreateLag: [$sel:location:CreateLag'] :: CreateLag -> Text
+ Amazonka.DirectConnect.CreateLag: [$sel:location:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:macSecCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.CreateLag: [$sel:macSecKeys:Lag'] :: Lag -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.CreateLag: [$sel:minimumLinks:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.CreateLag: [$sel:numberOfConnections:CreateLag'] :: CreateLag -> Int
+ Amazonka.DirectConnect.CreateLag: [$sel:numberOfConnections:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.CreateLag: [$sel:ownerAccount:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:providerName:CreateLag'] :: CreateLag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:providerName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:region:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.CreateLag: [$sel:requestMACSec:CreateLag'] :: CreateLag -> Maybe Bool
+ Amazonka.DirectConnect.CreateLag: [$sel:tags:CreateLag'] :: CreateLag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateLag: [$sel:tags:Lag'] :: Lag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreateLag: createLag_childConnectionTags :: Lens' CreateLag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateLag: createLag_connectionId :: Lens' CreateLag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: createLag_connectionsBandwidth :: Lens' CreateLag Text
+ Amazonka.DirectConnect.CreateLag: createLag_lagName :: Lens' CreateLag Text
+ Amazonka.DirectConnect.CreateLag: createLag_location :: Lens' CreateLag Text
+ Amazonka.DirectConnect.CreateLag: createLag_numberOfConnections :: Lens' CreateLag Int
+ Amazonka.DirectConnect.CreateLag: createLag_providerName :: Lens' CreateLag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: createLag_requestMACSec :: Lens' CreateLag (Maybe Bool)
+ Amazonka.DirectConnect.CreateLag: createLag_tags :: Lens' CreateLag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateLag: data CreateLag
+ Amazonka.DirectConnect.CreateLag: data Lag
+ Amazonka.DirectConnect.CreateLag: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance GHC.Read.Read Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: instance GHC.Show.Show Amazonka.DirectConnect.CreateLag.CreateLag
+ Amazonka.DirectConnect.CreateLag: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.CreateLag: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.CreateLag: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.CreateLag: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.CreateLag: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.CreateLag: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.CreateLag: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.CreateLag: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.CreateLag: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.CreateLag: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.CreateLag: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreateLag: newCreateLag :: Int -> Text -> Text -> Text -> CreateLag
+ Amazonka.DirectConnect.CreateLag: newLag :: Lag
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: CreatePrivateVirtualInterface' :: Text -> NewPrivateVirtualInterface -> CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:connectionId:CreatePrivateVirtualInterface'] :: CreatePrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:newPrivateVirtualInterface':CreatePrivateVirtualInterface'] :: CreatePrivateVirtualInterface -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: createPrivateVirtualInterface_connectionId :: Lens' CreatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: createPrivateVirtualInterface_newPrivateVirtualInterface :: Lens' CreatePrivateVirtualInterface NewPrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: data CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.CreatePrivateVirtualInterface.CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: newCreatePrivateVirtualInterface :: Text -> NewPrivateVirtualInterface -> CreatePrivateVirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePrivateVirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: CreatePublicVirtualInterface' :: Text -> NewPublicVirtualInterface -> CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:connectionId:CreatePublicVirtualInterface'] :: CreatePublicVirtualInterface -> Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:newPublicVirtualInterface':CreatePublicVirtualInterface'] :: CreatePublicVirtualInterface -> NewPublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: createPublicVirtualInterface_connectionId :: Lens' CreatePublicVirtualInterface Text
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: createPublicVirtualInterface_newPublicVirtualInterface :: Lens' CreatePublicVirtualInterface NewPublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: data CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.CreatePublicVirtualInterface.CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: newCreatePublicVirtualInterface :: Text -> NewPublicVirtualInterface -> CreatePublicVirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.CreatePublicVirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: CreateTransitVirtualInterface' :: Text -> NewTransitVirtualInterface -> CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: CreateTransitVirtualInterfaceResponse' :: Maybe VirtualInterface -> Int -> CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: [$sel:connectionId:CreateTransitVirtualInterface'] :: CreateTransitVirtualInterface -> Text
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: [$sel:httpStatus:CreateTransitVirtualInterfaceResponse'] :: CreateTransitVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: [$sel:newTransitVirtualInterface':CreateTransitVirtualInterface'] :: CreateTransitVirtualInterface -> NewTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: [$sel:virtualInterface:CreateTransitVirtualInterfaceResponse'] :: CreateTransitVirtualInterfaceResponse -> Maybe VirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: createTransitVirtualInterfaceResponse_httpStatus :: Lens' CreateTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: createTransitVirtualInterfaceResponse_virtualInterface :: Lens' CreateTransitVirtualInterfaceResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: createTransitVirtualInterface_connectionId :: Lens' CreateTransitVirtualInterface Text
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: createTransitVirtualInterface_newTransitVirtualInterface :: Lens' CreateTransitVirtualInterface NewTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: data CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: data CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.CreateTransitVirtualInterface.CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: newCreateTransitVirtualInterface :: Text -> NewTransitVirtualInterface -> CreateTransitVirtualInterface
+ Amazonka.DirectConnect.CreateTransitVirtualInterface: newCreateTransitVirtualInterfaceResponse :: Int -> CreateTransitVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: DeleteBGPPeer' :: Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: DeleteBGPPeerResponse' :: Maybe VirtualInterface -> Int -> DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:asn:DeleteBGPPeer'] :: DeleteBGPPeer -> Maybe Int
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:bgpPeerId:DeleteBGPPeer'] :: DeleteBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:customerAddress:DeleteBGPPeer'] :: DeleteBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:httpStatus:DeleteBGPPeerResponse'] :: DeleteBGPPeerResponse -> Int
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:virtualInterface:DeleteBGPPeerResponse'] :: DeleteBGPPeerResponse -> Maybe VirtualInterface
+ Amazonka.DirectConnect.DeleteBGPPeer: [$sel:virtualInterfaceId:DeleteBGPPeer'] :: DeleteBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.DeleteBGPPeer: data DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: data DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeerResponse_httpStatus :: Lens' DeleteBGPPeerResponse Int
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeerResponse_virtualInterface :: Lens' DeleteBGPPeerResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeer_asn :: Lens' DeleteBGPPeer (Maybe Int)
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeer_bgpPeerId :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeer_customerAddress :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.DeleteBGPPeer: deleteBGPPeer_virtualInterfaceId :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.DeleteBGPPeer.DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteBGPPeer: newDeleteBGPPeer :: DeleteBGPPeer
+ Amazonka.DirectConnect.DeleteBGPPeer: newDeleteBGPPeerResponse :: Int -> DeleteBGPPeerResponse
+ Amazonka.DirectConnect.DeleteConnection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.DeleteConnection: DeleteConnection' :: Text -> DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:connectionId:DeleteConnection'] :: DeleteConnection -> Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.DeleteConnection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.DeleteConnection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.DeleteConnection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.DeleteConnection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.DeleteConnection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.DeleteConnection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DeleteConnection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.DeleteConnection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.DeleteConnection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.DeleteConnection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.DeleteConnection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.DeleteConnection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.DeleteConnection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.DeleteConnection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.DeleteConnection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DeleteConnection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.DeleteConnection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.DeleteConnection: data Connection
+ Amazonka.DirectConnect.DeleteConnection: data DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: deleteConnection_connectionId :: Lens' DeleteConnection Text
+ Amazonka.DirectConnect.DeleteConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance GHC.Read.Read Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: instance GHC.Show.Show Amazonka.DirectConnect.DeleteConnection.DeleteConnection
+ Amazonka.DirectConnect.DeleteConnection: newConnection :: Connection
+ Amazonka.DirectConnect.DeleteConnection: newDeleteConnection :: Text -> DeleteConnection
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: DeleteDirectConnectGateway' :: Text -> DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: DeleteDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: [$sel:directConnectGateway:DeleteDirectConnectGatewayResponse'] :: DeleteDirectConnectGatewayResponse -> Maybe DirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: [$sel:directConnectGatewayId:DeleteDirectConnectGateway'] :: DeleteDirectConnectGateway -> Text
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: [$sel:httpStatus:DeleteDirectConnectGatewayResponse'] :: DeleteDirectConnectGatewayResponse -> Int
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: data DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: data DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: deleteDirectConnectGatewayResponse_directConnectGateway :: Lens' DeleteDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: deleteDirectConnectGatewayResponse_httpStatus :: Lens' DeleteDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: deleteDirectConnectGateway_directConnectGatewayId :: Lens' DeleteDirectConnectGateway Text
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGateway.DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: newDeleteDirectConnectGateway :: Text -> DeleteDirectConnectGateway
+ Amazonka.DirectConnect.DeleteDirectConnectGateway: newDeleteDirectConnectGatewayResponse :: Int -> DeleteDirectConnectGatewayResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: DeleteDirectConnectGatewayAssociation' :: Maybe Text -> Maybe Text -> Maybe Text -> DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: DeleteDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: [$sel:associationId:DeleteDirectConnectGatewayAssociation'] :: DeleteDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: [$sel:directConnectGatewayAssociation:DeleteDirectConnectGatewayAssociationResponse'] :: DeleteDirectConnectGatewayAssociationResponse -> Maybe DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: [$sel:directConnectGatewayId:DeleteDirectConnectGatewayAssociation'] :: DeleteDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: [$sel:httpStatus:DeleteDirectConnectGatewayAssociationResponse'] :: DeleteDirectConnectGatewayAssociationResponse -> Int
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: [$sel:virtualGatewayId:DeleteDirectConnectGatewayAssociation'] :: DeleteDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: data DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: data DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' DeleteDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociationResponse_httpStatus :: Lens' DeleteDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociation_associationId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociation_directConnectGatewayId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: deleteDirectConnectGatewayAssociation_virtualGatewayId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation.DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: newDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation: newDeleteDirectConnectGatewayAssociationResponse :: Int -> DeleteDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: DeleteDirectConnectGatewayAssociationProposal' :: Text -> DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: DeleteDirectConnectGatewayAssociationProposalResponse' :: Maybe DirectConnectGatewayAssociationProposal -> Int -> DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayAssociationProposal:DeleteDirectConnectGatewayAssociationProposalResponse'] :: DeleteDirectConnectGatewayAssociationProposalResponse -> Maybe DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: [$sel:httpStatus:DeleteDirectConnectGatewayAssociationProposalResponse'] :: DeleteDirectConnectGatewayAssociationProposalResponse -> Int
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: [$sel:proposalId:DeleteDirectConnectGatewayAssociationProposal'] :: DeleteDirectConnectGatewayAssociationProposal -> Text
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: data DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: data DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens' DeleteDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociationProposal)
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: deleteDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' DeleteDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: deleteDirectConnectGatewayAssociationProposal_proposalId :: Lens' DeleteDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal.DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: newDeleteDirectConnectGatewayAssociationProposal :: Text -> DeleteDirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal: newDeleteDirectConnectGatewayAssociationProposalResponse :: Int -> DeleteDirectConnectGatewayAssociationProposalResponse
+ Amazonka.DirectConnect.DeleteInterconnect: DeleteInterconnect' :: Text -> DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: DeleteInterconnectResponse' :: Maybe InterconnectState -> Int -> DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: [$sel:httpStatus:DeleteInterconnectResponse'] :: DeleteInterconnectResponse -> Int
+ Amazonka.DirectConnect.DeleteInterconnect: [$sel:interconnectId:DeleteInterconnect'] :: DeleteInterconnect -> Text
+ Amazonka.DirectConnect.DeleteInterconnect: [$sel:interconnectState:DeleteInterconnectResponse'] :: DeleteInterconnectResponse -> Maybe InterconnectState
+ Amazonka.DirectConnect.DeleteInterconnect: data DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: data DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: deleteInterconnectResponse_httpStatus :: Lens' DeleteInterconnectResponse Int
+ Amazonka.DirectConnect.DeleteInterconnect: deleteInterconnectResponse_interconnectState :: Lens' DeleteInterconnectResponse (Maybe InterconnectState)
+ Amazonka.DirectConnect.DeleteInterconnect: deleteInterconnect_interconnectId :: Lens' DeleteInterconnect Text
+ Amazonka.DirectConnect.DeleteInterconnect: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Read.Read Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Read.Read Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Show.Show Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: instance GHC.Show.Show Amazonka.DirectConnect.DeleteInterconnect.DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteInterconnect: newDeleteInterconnect :: Text -> DeleteInterconnect
+ Amazonka.DirectConnect.DeleteInterconnect: newDeleteInterconnectResponse :: Int -> DeleteInterconnectResponse
+ Amazonka.DirectConnect.DeleteLag: DeleteLag' :: Text -> DeleteLag
+ Amazonka.DirectConnect.DeleteLag: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect.DeleteLag: [$sel:allowsHostedConnections:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.DeleteLag: [$sel:awsDevice:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:awsDeviceV2:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:awsLogicalDeviceId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:connections:Lag'] :: Lag -> Maybe [Connection]
+ Amazonka.DirectConnect.DeleteLag: [$sel:connectionsBandwidth:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:encryptionMode:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:hasLogicalRedundancy:Lag'] :: Lag -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.DeleteLag: [$sel:jumboFrameCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.DeleteLag: [$sel:lagId:DeleteLag'] :: DeleteLag -> Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:lagId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:lagName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:lagState:Lag'] :: Lag -> Maybe LagState
+ Amazonka.DirectConnect.DeleteLag: [$sel:location:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:macSecCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.DeleteLag: [$sel:macSecKeys:Lag'] :: Lag -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.DeleteLag: [$sel:minimumLinks:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.DeleteLag: [$sel:numberOfConnections:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.DeleteLag: [$sel:ownerAccount:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:providerName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:region:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.DeleteLag: [$sel:tags:Lag'] :: Lag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.DeleteLag: data DeleteLag
+ Amazonka.DirectConnect.DeleteLag: data Lag
+ Amazonka.DirectConnect.DeleteLag: deleteLag_lagId :: Lens' DeleteLag Text
+ Amazonka.DirectConnect.DeleteLag: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance GHC.Read.Read Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: instance GHC.Show.Show Amazonka.DirectConnect.DeleteLag.DeleteLag
+ Amazonka.DirectConnect.DeleteLag: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.DeleteLag: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.DeleteLag: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.DeleteLag: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.DeleteLag: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.DeleteLag: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.DeleteLag: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.DeleteLag: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.DeleteLag: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.DeleteLag: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.DeleteLag: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.DeleteLag: newDeleteLag :: Text -> DeleteLag
+ Amazonka.DirectConnect.DeleteLag: newLag :: Lag
+ Amazonka.DirectConnect.DeleteVirtualInterface: DeleteVirtualInterface' :: Text -> DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: DeleteVirtualInterfaceResponse' :: Maybe VirtualInterfaceState -> Int -> DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: [$sel:httpStatus:DeleteVirtualInterfaceResponse'] :: DeleteVirtualInterfaceResponse -> Int
+ Amazonka.DirectConnect.DeleteVirtualInterface: [$sel:virtualInterfaceId:DeleteVirtualInterface'] :: DeleteVirtualInterface -> Text
+ Amazonka.DirectConnect.DeleteVirtualInterface: [$sel:virtualInterfaceState:DeleteVirtualInterfaceResponse'] :: DeleteVirtualInterfaceResponse -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.DeleteVirtualInterface: data DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: data DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: deleteVirtualInterfaceResponse_httpStatus :: Lens' DeleteVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.DeleteVirtualInterface: deleteVirtualInterfaceResponse_virtualInterfaceState :: Lens' DeleteVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.DeleteVirtualInterface: deleteVirtualInterface_virtualInterfaceId :: Lens' DeleteVirtualInterface Text
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.DeleteVirtualInterface.DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DeleteVirtualInterface: newDeleteVirtualInterface :: Text -> DeleteVirtualInterface
+ Amazonka.DirectConnect.DeleteVirtualInterface: newDeleteVirtualInterfaceResponse :: Int -> DeleteVirtualInterfaceResponse
+ Amazonka.DirectConnect.DescribeConnections: Connections' :: Maybe [Connection] -> Connections
+ Amazonka.DirectConnect.DescribeConnections: DescribeConnections' :: Maybe Text -> DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: [$sel:connectionId:DescribeConnections'] :: DescribeConnections -> Maybe Text
+ Amazonka.DirectConnect.DescribeConnections: [$sel:connections:Connections'] :: Connections -> Maybe [Connection]
+ Amazonka.DirectConnect.DescribeConnections: connections_connections :: Lens' Connections (Maybe [Connection])
+ Amazonka.DirectConnect.DescribeConnections: data Connections
+ Amazonka.DirectConnect.DescribeConnections: data DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: describeConnections_connectionId :: Lens' DescribeConnections (Maybe Text)
+ Amazonka.DirectConnect.DescribeConnections: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance GHC.Read.Read Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: instance GHC.Show.Show Amazonka.DirectConnect.DescribeConnections.DescribeConnections
+ Amazonka.DirectConnect.DescribeConnections: newConnections :: Connections
+ Amazonka.DirectConnect.DescribeConnections: newDescribeConnections :: DescribeConnections
+ Amazonka.DirectConnect.DescribeCustomerMetadata: DescribeCustomerMetadata' :: DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: DescribeCustomerMetadataResponse' :: Maybe [CustomerAgreement] -> Maybe NniPartnerType -> Int -> DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: [$sel:agreements:DescribeCustomerMetadataResponse'] :: DescribeCustomerMetadataResponse -> Maybe [CustomerAgreement]
+ Amazonka.DirectConnect.DescribeCustomerMetadata: [$sel:httpStatus:DescribeCustomerMetadataResponse'] :: DescribeCustomerMetadataResponse -> Int
+ Amazonka.DirectConnect.DescribeCustomerMetadata: [$sel:nniPartnerType:DescribeCustomerMetadataResponse'] :: DescribeCustomerMetadataResponse -> Maybe NniPartnerType
+ Amazonka.DirectConnect.DescribeCustomerMetadata: data DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: data DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: describeCustomerMetadataResponse_agreements :: Lens' DescribeCustomerMetadataResponse (Maybe [CustomerAgreement])
+ Amazonka.DirectConnect.DescribeCustomerMetadata: describeCustomerMetadataResponse_httpStatus :: Lens' DescribeCustomerMetadataResponse Int
+ Amazonka.DirectConnect.DescribeCustomerMetadata: describeCustomerMetadataResponse_nniPartnerType :: Lens' DescribeCustomerMetadataResponse (Maybe NniPartnerType)
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Read.Read Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Read.Read Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Show.Show Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: instance GHC.Show.Show Amazonka.DirectConnect.DescribeCustomerMetadata.DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeCustomerMetadata: newDescribeCustomerMetadata :: DescribeCustomerMetadata
+ Amazonka.DirectConnect.DescribeCustomerMetadata: newDescribeCustomerMetadataResponse :: Int -> DescribeCustomerMetadataResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: DescribeDirectConnectGatewayAssociationProposals' :: Maybe Text -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: DescribeDirectConnectGatewayAssociationProposalsResponse' :: Maybe [DirectConnectGatewayAssociationProposal] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:associatedGatewayId:DescribeDirectConnectGatewayAssociationProposals'] :: DescribeDirectConnectGatewayAssociationProposals -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:directConnectGatewayAssociationProposals:DescribeDirectConnectGatewayAssociationProposalsResponse'] :: DescribeDirectConnectGatewayAssociationProposalsResponse -> Maybe [DirectConnectGatewayAssociationProposal]
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:directConnectGatewayId:DescribeDirectConnectGatewayAssociationProposals'] :: DescribeDirectConnectGatewayAssociationProposals -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:httpStatus:DescribeDirectConnectGatewayAssociationProposalsResponse'] :: DescribeDirectConnectGatewayAssociationProposalsResponse -> Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:maxResults:DescribeDirectConnectGatewayAssociationProposals'] :: DescribeDirectConnectGatewayAssociationProposals -> Maybe Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:nextToken:DescribeDirectConnectGatewayAssociationProposals'] :: DescribeDirectConnectGatewayAssociationProposals -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:nextToken:DescribeDirectConnectGatewayAssociationProposalsResponse'] :: DescribeDirectConnectGatewayAssociationProposalsResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: [$sel:proposalId:DescribeDirectConnectGatewayAssociationProposals'] :: DescribeDirectConnectGatewayAssociationProposals -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: data DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: data DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Maybe [DirectConnectGatewayAssociationProposal])
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposalsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposalsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposals_associatedGatewayId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposals_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposals_maxResults :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Int)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposals_nextToken :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: describeDirectConnectGatewayAssociationProposals_proposalId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals.DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: newDescribeDirectConnectGatewayAssociationProposals :: DescribeDirectConnectGatewayAssociationProposals
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals: newDescribeDirectConnectGatewayAssociationProposalsResponse :: Int -> DescribeDirectConnectGatewayAssociationProposalsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: DescribeDirectConnectGatewayAssociations' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: DescribeDirectConnectGatewayAssociationsResponse' :: Maybe [DirectConnectGatewayAssociation] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:associatedGatewayId:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:associationId:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:directConnectGatewayAssociations:DescribeDirectConnectGatewayAssociationsResponse'] :: DescribeDirectConnectGatewayAssociationsResponse -> Maybe [DirectConnectGatewayAssociation]
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:directConnectGatewayId:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:httpStatus:DescribeDirectConnectGatewayAssociationsResponse'] :: DescribeDirectConnectGatewayAssociationsResponse -> Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:maxResults:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:nextToken:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:nextToken:DescribeDirectConnectGatewayAssociationsResponse'] :: DescribeDirectConnectGatewayAssociationsResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: [$sel:virtualGatewayId:DescribeDirectConnectGatewayAssociations'] :: DescribeDirectConnectGatewayAssociations -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: data DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: data DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe [DirectConnectGatewayAssociation])
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociationsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAssociationsResponse Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociationsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_associatedGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_associationId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_maxResults :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Int)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_nextToken :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: describeDirectConnectGatewayAssociations_virtualGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Amazonka.Pager.AWSPager Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations.DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: newDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociations
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations: newDescribeDirectConnectGatewayAssociationsResponse :: Int -> DescribeDirectConnectGatewayAssociationsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: DescribeDirectConnectGatewayAttachments' :: Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: DescribeDirectConnectGatewayAttachmentsResponse' :: Maybe [DirectConnectGatewayAttachment] -> Maybe Text -> Int -> DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:directConnectGatewayAttachments:DescribeDirectConnectGatewayAttachmentsResponse'] :: DescribeDirectConnectGatewayAttachmentsResponse -> Maybe [DirectConnectGatewayAttachment]
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:directConnectGatewayId:DescribeDirectConnectGatewayAttachments'] :: DescribeDirectConnectGatewayAttachments -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:httpStatus:DescribeDirectConnectGatewayAttachmentsResponse'] :: DescribeDirectConnectGatewayAttachmentsResponse -> Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:maxResults:DescribeDirectConnectGatewayAttachments'] :: DescribeDirectConnectGatewayAttachments -> Maybe Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:nextToken:DescribeDirectConnectGatewayAttachments'] :: DescribeDirectConnectGatewayAttachments -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:nextToken:DescribeDirectConnectGatewayAttachmentsResponse'] :: DescribeDirectConnectGatewayAttachmentsResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: [$sel:virtualInterfaceId:DescribeDirectConnectGatewayAttachments'] :: DescribeDirectConnectGatewayAttachments -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: data DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: data DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe [DirectConnectGatewayAttachment])
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachmentsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAttachmentsResponse Int
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachmentsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachments_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachments_maxResults :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Int)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachments_nextToken :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: describeDirectConnectGatewayAttachments_virtualInterfaceId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Amazonka.Pager.AWSPager Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments.DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: newDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachments
+ Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments: newDescribeDirectConnectGatewayAttachmentsResponse :: Int -> DescribeDirectConnectGatewayAttachmentsResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: DescribeDirectConnectGateways' :: Maybe Text -> Maybe Int -> Maybe Text -> DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: DescribeDirectConnectGatewaysResponse' :: Maybe [DirectConnectGateway] -> Maybe Text -> Int -> DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:directConnectGatewayId:DescribeDirectConnectGateways'] :: DescribeDirectConnectGateways -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:directConnectGateways:DescribeDirectConnectGatewaysResponse'] :: DescribeDirectConnectGatewaysResponse -> Maybe [DirectConnectGateway]
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:httpStatus:DescribeDirectConnectGatewaysResponse'] :: DescribeDirectConnectGatewaysResponse -> Int
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:maxResults:DescribeDirectConnectGateways'] :: DescribeDirectConnectGateways -> Maybe Int
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:nextToken:DescribeDirectConnectGateways'] :: DescribeDirectConnectGateways -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: [$sel:nextToken:DescribeDirectConnectGatewaysResponse'] :: DescribeDirectConnectGatewaysResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: data DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: data DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGatewaysResponse_directConnectGateways :: Lens' DescribeDirectConnectGatewaysResponse (Maybe [DirectConnectGateway])
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGatewaysResponse_httpStatus :: Lens' DescribeDirectConnectGatewaysResponse Int
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGatewaysResponse_nextToken :: Lens' DescribeDirectConnectGatewaysResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGateways_directConnectGatewayId :: Lens' DescribeDirectConnectGateways (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGateways_maxResults :: Lens' DescribeDirectConnectGateways (Maybe Int)
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: describeDirectConnectGateways_nextToken :: Lens' DescribeDirectConnectGateways (Maybe Text)
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Amazonka.Pager.AWSPager Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Read.Read Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: instance GHC.Show.Show Amazonka.DirectConnect.DescribeDirectConnectGateways.DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: newDescribeDirectConnectGateways :: DescribeDirectConnectGateways
+ Amazonka.DirectConnect.DescribeDirectConnectGateways: newDescribeDirectConnectGatewaysResponse :: Int -> DescribeDirectConnectGatewaysResponse
+ Amazonka.DirectConnect.DescribeHostedConnections: Connections' :: Maybe [Connection] -> Connections
+ Amazonka.DirectConnect.DescribeHostedConnections: DescribeHostedConnections' :: Text -> DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: [$sel:connectionId:DescribeHostedConnections'] :: DescribeHostedConnections -> Text
+ Amazonka.DirectConnect.DescribeHostedConnections: [$sel:connections:Connections'] :: Connections -> Maybe [Connection]
+ Amazonka.DirectConnect.DescribeHostedConnections: connections_connections :: Lens' Connections (Maybe [Connection])
+ Amazonka.DirectConnect.DescribeHostedConnections: data Connections
+ Amazonka.DirectConnect.DescribeHostedConnections: data DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: describeHostedConnections_connectionId :: Lens' DescribeHostedConnections Text
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance GHC.Read.Read Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: instance GHC.Show.Show Amazonka.DirectConnect.DescribeHostedConnections.DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeHostedConnections: newConnections :: Connections
+ Amazonka.DirectConnect.DescribeHostedConnections: newDescribeHostedConnections :: Text -> DescribeHostedConnections
+ Amazonka.DirectConnect.DescribeInterconnects: DescribeInterconnects' :: Maybe Text -> DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: DescribeInterconnectsResponse' :: Maybe [Interconnect] -> Int -> DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: [$sel:httpStatus:DescribeInterconnectsResponse'] :: DescribeInterconnectsResponse -> Int
+ Amazonka.DirectConnect.DescribeInterconnects: [$sel:interconnectId:DescribeInterconnects'] :: DescribeInterconnects -> Maybe Text
+ Amazonka.DirectConnect.DescribeInterconnects: [$sel:interconnects:DescribeInterconnectsResponse'] :: DescribeInterconnectsResponse -> Maybe [Interconnect]
+ Amazonka.DirectConnect.DescribeInterconnects: data DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: data DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: describeInterconnectsResponse_httpStatus :: Lens' DescribeInterconnectsResponse Int
+ Amazonka.DirectConnect.DescribeInterconnects: describeInterconnectsResponse_interconnects :: Lens' DescribeInterconnectsResponse (Maybe [Interconnect])
+ Amazonka.DirectConnect.DescribeInterconnects: describeInterconnects_interconnectId :: Lens' DescribeInterconnects (Maybe Text)
+ Amazonka.DirectConnect.DescribeInterconnects: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Read.Read Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Read.Read Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Show.Show Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: instance GHC.Show.Show Amazonka.DirectConnect.DescribeInterconnects.DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeInterconnects: newDescribeInterconnects :: DescribeInterconnects
+ Amazonka.DirectConnect.DescribeInterconnects: newDescribeInterconnectsResponse :: Int -> DescribeInterconnectsResponse
+ Amazonka.DirectConnect.DescribeLags: DescribeLags' :: Maybe Text -> DescribeLags
+ Amazonka.DirectConnect.DescribeLags: DescribeLagsResponse' :: Maybe [Lag] -> Int -> DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: [$sel:httpStatus:DescribeLagsResponse'] :: DescribeLagsResponse -> Int
+ Amazonka.DirectConnect.DescribeLags: [$sel:lagId:DescribeLags'] :: DescribeLags -> Maybe Text
+ Amazonka.DirectConnect.DescribeLags: [$sel:lags:DescribeLagsResponse'] :: DescribeLagsResponse -> Maybe [Lag]
+ Amazonka.DirectConnect.DescribeLags: data DescribeLags
+ Amazonka.DirectConnect.DescribeLags: data DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: describeLagsResponse_httpStatus :: Lens' DescribeLagsResponse Int
+ Amazonka.DirectConnect.DescribeLags: describeLagsResponse_lags :: Lens' DescribeLagsResponse (Maybe [Lag])
+ Amazonka.DirectConnect.DescribeLags: describeLags_lagId :: Lens' DescribeLags (Maybe Text)
+ Amazonka.DirectConnect.DescribeLags: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLags.DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLags.DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLags.DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLags.DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLags.DescribeLags
+ Amazonka.DirectConnect.DescribeLags: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLags.DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLags: newDescribeLags :: DescribeLags
+ Amazonka.DirectConnect.DescribeLags: newDescribeLagsResponse :: Int -> DescribeLagsResponse
+ Amazonka.DirectConnect.DescribeLoa: DescribeLoa' :: Maybe LoaContentType -> Maybe Text -> Text -> DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: DescribeLoaResponse' :: Maybe Base64 -> Maybe LoaContentType -> Int -> DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: [$sel:connectionId:DescribeLoa'] :: DescribeLoa -> Text
+ Amazonka.DirectConnect.DescribeLoa: [$sel:httpStatus:DescribeLoaResponse'] :: DescribeLoaResponse -> Int
+ Amazonka.DirectConnect.DescribeLoa: [$sel:loaContent:DescribeLoaResponse'] :: DescribeLoaResponse -> Maybe Base64
+ Amazonka.DirectConnect.DescribeLoa: [$sel:loaContentType:DescribeLoa'] :: DescribeLoa -> Maybe LoaContentType
+ Amazonka.DirectConnect.DescribeLoa: [$sel:loaContentType:DescribeLoaResponse'] :: DescribeLoaResponse -> Maybe LoaContentType
+ Amazonka.DirectConnect.DescribeLoa: [$sel:providerName:DescribeLoa'] :: DescribeLoa -> Maybe Text
+ Amazonka.DirectConnect.DescribeLoa: data DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: data DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: describeLoaResponse_httpStatus :: Lens' DescribeLoaResponse Int
+ Amazonka.DirectConnect.DescribeLoa: describeLoaResponse_loaContent :: Lens' DescribeLoaResponse (Maybe ByteString)
+ Amazonka.DirectConnect.DescribeLoa: describeLoaResponse_loaContentType :: Lens' DescribeLoaResponse (Maybe LoaContentType)
+ Amazonka.DirectConnect.DescribeLoa: describeLoa_connectionId :: Lens' DescribeLoa Text
+ Amazonka.DirectConnect.DescribeLoa: describeLoa_loaContentType :: Lens' DescribeLoa (Maybe LoaContentType)
+ Amazonka.DirectConnect.DescribeLoa: describeLoa_providerName :: Lens' DescribeLoa (Maybe Text)
+ Amazonka.DirectConnect.DescribeLoa: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLoa.DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLoa.DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLoa.DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLoa.DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLoa.DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLoa.DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLoa: newDescribeLoa :: Text -> DescribeLoa
+ Amazonka.DirectConnect.DescribeLoa: newDescribeLoaResponse :: Int -> DescribeLoaResponse
+ Amazonka.DirectConnect.DescribeLocations: DescribeLocations' :: DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: DescribeLocationsResponse' :: Maybe [Location] -> Int -> DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: [$sel:httpStatus:DescribeLocationsResponse'] :: DescribeLocationsResponse -> Int
+ Amazonka.DirectConnect.DescribeLocations: [$sel:locations:DescribeLocationsResponse'] :: DescribeLocationsResponse -> Maybe [Location]
+ Amazonka.DirectConnect.DescribeLocations: data DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: data DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: describeLocationsResponse_httpStatus :: Lens' DescribeLocationsResponse Int
+ Amazonka.DirectConnect.DescribeLocations: describeLocationsResponse_locations :: Lens' DescribeLocationsResponse (Maybe [Location])
+ Amazonka.DirectConnect.DescribeLocations: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeLocations.DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeLocations.DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeLocations.DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Read.Read Amazonka.DirectConnect.DescribeLocations.DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLocations.DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: instance GHC.Show.Show Amazonka.DirectConnect.DescribeLocations.DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeLocations: newDescribeLocations :: DescribeLocations
+ Amazonka.DirectConnect.DescribeLocations: newDescribeLocationsResponse :: Int -> DescribeLocationsResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: DescribeRouterConfiguration' :: Maybe Text -> Text -> DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: DescribeRouterConfigurationResponse' :: Maybe Text -> Maybe RouterType -> Maybe Text -> Maybe Text -> Int -> DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:customerRouterConfig:DescribeRouterConfigurationResponse'] :: DescribeRouterConfigurationResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:httpStatus:DescribeRouterConfigurationResponse'] :: DescribeRouterConfigurationResponse -> Int
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:router:DescribeRouterConfigurationResponse'] :: DescribeRouterConfigurationResponse -> Maybe RouterType
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:routerTypeIdentifier:DescribeRouterConfiguration'] :: DescribeRouterConfiguration -> Maybe Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:virtualInterfaceId:DescribeRouterConfiguration'] :: DescribeRouterConfiguration -> Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:virtualInterfaceId:DescribeRouterConfigurationResponse'] :: DescribeRouterConfigurationResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: [$sel:virtualInterfaceName:DescribeRouterConfigurationResponse'] :: DescribeRouterConfigurationResponse -> Maybe Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: data DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: data DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfigurationResponse_customerRouterConfig :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfigurationResponse_httpStatus :: Lens' DescribeRouterConfigurationResponse Int
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfigurationResponse_router :: Lens' DescribeRouterConfigurationResponse (Maybe RouterType)
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfigurationResponse_virtualInterfaceId :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfigurationResponse_virtualInterfaceName :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfiguration_routerTypeIdentifier :: Lens' DescribeRouterConfiguration (Maybe Text)
+ Amazonka.DirectConnect.DescribeRouterConfiguration: describeRouterConfiguration_virtualInterfaceId :: Lens' DescribeRouterConfiguration Text
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Read.Read Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Read.Read Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Show.Show Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: instance GHC.Show.Show Amazonka.DirectConnect.DescribeRouterConfiguration.DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeRouterConfiguration: newDescribeRouterConfiguration :: Text -> DescribeRouterConfiguration
+ Amazonka.DirectConnect.DescribeRouterConfiguration: newDescribeRouterConfigurationResponse :: Int -> DescribeRouterConfigurationResponse
+ Amazonka.DirectConnect.DescribeTags: DescribeTags' :: [Text] -> DescribeTags
+ Amazonka.DirectConnect.DescribeTags: DescribeTagsResponse' :: Maybe [ResourceTag] -> Int -> DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: [$sel:httpStatus:DescribeTagsResponse'] :: DescribeTagsResponse -> Int
+ Amazonka.DirectConnect.DescribeTags: [$sel:resourceArns:DescribeTags'] :: DescribeTags -> [Text]
+ Amazonka.DirectConnect.DescribeTags: [$sel:resourceTags:DescribeTagsResponse'] :: DescribeTagsResponse -> Maybe [ResourceTag]
+ Amazonka.DirectConnect.DescribeTags: data DescribeTags
+ Amazonka.DirectConnect.DescribeTags: data DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: describeTagsResponse_httpStatus :: Lens' DescribeTagsResponse Int
+ Amazonka.DirectConnect.DescribeTags: describeTagsResponse_resourceTags :: Lens' DescribeTagsResponse (Maybe [ResourceTag])
+ Amazonka.DirectConnect.DescribeTags: describeTags_resourceArns :: Lens' DescribeTags [Text]
+ Amazonka.DirectConnect.DescribeTags: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeTags.DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeTags.DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeTags.DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Read.Read Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Read.Read Amazonka.DirectConnect.DescribeTags.DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Show.Show Amazonka.DirectConnect.DescribeTags.DescribeTags
+ Amazonka.DirectConnect.DescribeTags: instance GHC.Show.Show Amazonka.DirectConnect.DescribeTags.DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeTags: newDescribeTags :: DescribeTags
+ Amazonka.DirectConnect.DescribeTags: newDescribeTagsResponse :: Int -> DescribeTagsResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: DescribeVirtualGateways' :: DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: DescribeVirtualGatewaysResponse' :: Maybe [VirtualGateway] -> Int -> DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: [$sel:httpStatus:DescribeVirtualGatewaysResponse'] :: DescribeVirtualGatewaysResponse -> Int
+ Amazonka.DirectConnect.DescribeVirtualGateways: [$sel:virtualGateways:DescribeVirtualGatewaysResponse'] :: DescribeVirtualGatewaysResponse -> Maybe [VirtualGateway]
+ Amazonka.DirectConnect.DescribeVirtualGateways: data DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: data DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: describeVirtualGatewaysResponse_httpStatus :: Lens' DescribeVirtualGatewaysResponse Int
+ Amazonka.DirectConnect.DescribeVirtualGateways: describeVirtualGatewaysResponse_virtualGateways :: Lens' DescribeVirtualGatewaysResponse (Maybe [VirtualGateway])
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Read.Read Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Read.Read Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Show.Show Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: instance GHC.Show.Show Amazonka.DirectConnect.DescribeVirtualGateways.DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualGateways: newDescribeVirtualGateways :: DescribeVirtualGateways
+ Amazonka.DirectConnect.DescribeVirtualGateways: newDescribeVirtualGatewaysResponse :: Int -> DescribeVirtualGatewaysResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: DescribeVirtualInterfaces' :: Maybe Text -> Maybe Text -> DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: DescribeVirtualInterfacesResponse' :: Maybe [VirtualInterface] -> Int -> DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: [$sel:connectionId:DescribeVirtualInterfaces'] :: DescribeVirtualInterfaces -> Maybe Text
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: [$sel:httpStatus:DescribeVirtualInterfacesResponse'] :: DescribeVirtualInterfacesResponse -> Int
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: [$sel:virtualInterfaceId:DescribeVirtualInterfaces'] :: DescribeVirtualInterfaces -> Maybe Text
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: [$sel:virtualInterfaces:DescribeVirtualInterfacesResponse'] :: DescribeVirtualInterfacesResponse -> Maybe [VirtualInterface]
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: data DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: data DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfacesResponse_httpStatus :: Lens' DescribeVirtualInterfacesResponse Int
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfacesResponse_virtualInterfaces :: Lens' DescribeVirtualInterfacesResponse (Maybe [VirtualInterface])
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfaces_connectionId :: Lens' DescribeVirtualInterfaces (Maybe Text)
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: describeVirtualInterfaces_virtualInterfaceId :: Lens' DescribeVirtualInterfaces (Maybe Text)
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Classes.Eq Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Generics.Generic Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Read.Read Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Read.Read Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Show.Show Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: instance GHC.Show.Show Amazonka.DirectConnect.DescribeVirtualInterfaces.DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: newDescribeVirtualInterfaces :: DescribeVirtualInterfaces
+ Amazonka.DirectConnect.DescribeVirtualInterfaces: newDescribeVirtualInterfacesResponse :: Int -> DescribeVirtualInterfacesResponse
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: DisassociateConnectionFromLag' :: Text -> Text -> DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:connectionId:DisassociateConnectionFromLag'] :: DisassociateConnectionFromLag -> Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:lagId:DisassociateConnectionFromLag'] :: DisassociateConnectionFromLag -> Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: data Connection
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: data DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: disassociateConnectionFromLag_connectionId :: Lens' DisassociateConnectionFromLag Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: disassociateConnectionFromLag_lagId :: Lens' DisassociateConnectionFromLag Text
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance GHC.Classes.Eq Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance GHC.Generics.Generic Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance GHC.Read.Read Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: instance GHC.Show.Show Amazonka.DirectConnect.DisassociateConnectionFromLag.DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: newConnection :: Connection
+ Amazonka.DirectConnect.DisassociateConnectionFromLag: newDisassociateConnectionFromLag :: Text -> Text -> DisassociateConnectionFromLag
+ Amazonka.DirectConnect.DisassociateMacSecKey: DisassociateMacSecKey' :: Text -> Text -> DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: DisassociateMacSecKeyResponse' :: Maybe Text -> Maybe [MacSecKey] -> Int -> DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: [$sel:connectionId:DisassociateMacSecKey'] :: DisassociateMacSecKey -> Text
+ Amazonka.DirectConnect.DisassociateMacSecKey: [$sel:connectionId:DisassociateMacSecKeyResponse'] :: DisassociateMacSecKeyResponse -> Maybe Text
+ Amazonka.DirectConnect.DisassociateMacSecKey: [$sel:httpStatus:DisassociateMacSecKeyResponse'] :: DisassociateMacSecKeyResponse -> Int
+ Amazonka.DirectConnect.DisassociateMacSecKey: [$sel:macSecKeys:DisassociateMacSecKeyResponse'] :: DisassociateMacSecKeyResponse -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.DisassociateMacSecKey: [$sel:secretARN:DisassociateMacSecKey'] :: DisassociateMacSecKey -> Text
+ Amazonka.DirectConnect.DisassociateMacSecKey: data DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: data DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: disassociateMacSecKeyResponse_connectionId :: Lens' DisassociateMacSecKeyResponse (Maybe Text)
+ Amazonka.DirectConnect.DisassociateMacSecKey: disassociateMacSecKeyResponse_httpStatus :: Lens' DisassociateMacSecKeyResponse Int
+ Amazonka.DirectConnect.DisassociateMacSecKey: disassociateMacSecKeyResponse_macSecKeys :: Lens' DisassociateMacSecKeyResponse (Maybe [MacSecKey])
+ Amazonka.DirectConnect.DisassociateMacSecKey: disassociateMacSecKey_connectionId :: Lens' DisassociateMacSecKey Text
+ Amazonka.DirectConnect.DisassociateMacSecKey: disassociateMacSecKey_secretARN :: Lens' DisassociateMacSecKey Text
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Control.DeepSeq.NFData Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Classes.Eq Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Classes.Eq Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Generics.Generic Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Generics.Generic Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Read.Read Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Read.Read Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Show.Show Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: instance GHC.Show.Show Amazonka.DirectConnect.DisassociateMacSecKey.DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.DisassociateMacSecKey: newDisassociateMacSecKey :: Text -> Text -> DisassociateMacSecKey
+ Amazonka.DirectConnect.DisassociateMacSecKey: newDisassociateMacSecKeyResponse :: Int -> DisassociateMacSecKeyResponse
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation :: Lens' AcceptDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' AcceptDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway :: Lens' AcceptDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: acceptDirectConnectGatewayAssociationProposal_proposalId :: Lens' AcceptDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_bandwidth :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_connectionId :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_connectionName :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_ownerAccount :: Lens' AllocateHostedConnection Text
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_tags :: Lens' AllocateHostedConnection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: allocateHostedConnection_vlan :: Lens' AllocateHostedConnection Int
+ Amazonka.DirectConnect.Lens: allocatePrivateVirtualInterface_connectionId :: Lens' AllocatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation :: Lens' AllocatePrivateVirtualInterface NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Lens: allocatePrivateVirtualInterface_ownerAccount :: Lens' AllocatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: allocatePublicVirtualInterface_connectionId :: Lens' AllocatePublicVirtualInterface Text
+ Amazonka.DirectConnect.Lens: allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation :: Lens' AllocatePublicVirtualInterface NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Lens: allocatePublicVirtualInterface_ownerAccount :: Lens' AllocatePublicVirtualInterface Text
+ Amazonka.DirectConnect.Lens: allocateTransitVirtualInterfaceResponse_httpStatus :: Lens' AllocateTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: allocateTransitVirtualInterfaceResponse_virtualInterface :: Lens' AllocateTransitVirtualInterfaceResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.Lens: allocateTransitVirtualInterface_connectionId :: Lens' AllocateTransitVirtualInterface Text
+ Amazonka.DirectConnect.Lens: allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation :: Lens' AllocateTransitVirtualInterface NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Lens: allocateTransitVirtualInterface_ownerAccount :: Lens' AllocateTransitVirtualInterface Text
+ Amazonka.DirectConnect.Lens: associateConnectionWithLag_connectionId :: Lens' AssociateConnectionWithLag Text
+ Amazonka.DirectConnect.Lens: associateConnectionWithLag_lagId :: Lens' AssociateConnectionWithLag Text
+ Amazonka.DirectConnect.Lens: associateHostedConnection_connectionId :: Lens' AssociateHostedConnection Text
+ Amazonka.DirectConnect.Lens: associateHostedConnection_parentConnectionId :: Lens' AssociateHostedConnection Text
+ Amazonka.DirectConnect.Lens: associateMacSecKeyResponse_connectionId :: Lens' AssociateMacSecKeyResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: associateMacSecKeyResponse_httpStatus :: Lens' AssociateMacSecKeyResponse Int
+ Amazonka.DirectConnect.Lens: associateMacSecKeyResponse_macSecKeys :: Lens' AssociateMacSecKeyResponse (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Lens: associateMacSecKey_cak :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: associateMacSecKey_ckn :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: associateMacSecKey_connectionId :: Lens' AssociateMacSecKey Text
+ Amazonka.DirectConnect.Lens: associateMacSecKey_secretARN :: Lens' AssociateMacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: associateVirtualInterface_connectionId :: Lens' AssociateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: associateVirtualInterface_virtualInterfaceId :: Lens' AssociateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: associatedGateway_id :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: associatedGateway_ownerAccount :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: associatedGateway_region :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: associatedGateway_type :: Lens' AssociatedGateway (Maybe GatewayType)
+ Amazonka.DirectConnect.Lens: bGPPeer_addressFamily :: Lens' BGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: bGPPeer_amazonAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: bGPPeer_asn :: Lens' BGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Lens: bGPPeer_authKey :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: bGPPeer_awsDeviceV2 :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: bGPPeer_awsLogicalDeviceId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: bGPPeer_bgpPeerId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: bGPPeer_bgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)
+ Amazonka.DirectConnect.Lens: bGPPeer_bgpStatus :: Lens' BGPPeer (Maybe BGPStatus)
+ Amazonka.DirectConnect.Lens: bGPPeer_customerAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: confirmConnectionResponse_connectionState :: Lens' ConfirmConnectionResponse (Maybe ConnectionState)
+ Amazonka.DirectConnect.Lens: confirmConnectionResponse_httpStatus :: Lens' ConfirmConnectionResponse Int
+ Amazonka.DirectConnect.Lens: confirmConnection_connectionId :: Lens' ConfirmConnection Text
+ Amazonka.DirectConnect.Lens: confirmCustomerAgreementResponse_httpStatus :: Lens' ConfirmCustomerAgreementResponse Int
+ Amazonka.DirectConnect.Lens: confirmCustomerAgreementResponse_status :: Lens' ConfirmCustomerAgreementResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: confirmCustomerAgreement_agreementName :: Lens' ConfirmCustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Lens: confirmPrivateVirtualInterfaceResponse_httpStatus :: Lens' ConfirmPrivateVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: confirmPrivateVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmPrivateVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Lens: confirmPrivateVirtualInterface_directConnectGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: confirmPrivateVirtualInterface_virtualGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: confirmPrivateVirtualInterface_virtualInterfaceId :: Lens' ConfirmPrivateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: confirmPublicVirtualInterfaceResponse_httpStatus :: Lens' ConfirmPublicVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: confirmPublicVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmPublicVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Lens: confirmPublicVirtualInterface_virtualInterfaceId :: Lens' ConfirmPublicVirtualInterface Text
+ Amazonka.DirectConnect.Lens: confirmTransitVirtualInterfaceResponse_httpStatus :: Lens' ConfirmTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: confirmTransitVirtualInterfaceResponse_virtualInterfaceState :: Lens' ConfirmTransitVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Lens: confirmTransitVirtualInterface_directConnectGatewayId :: Lens' ConfirmTransitVirtualInterface Text
+ Amazonka.DirectConnect.Lens: confirmTransitVirtualInterface_virtualInterfaceId :: Lens' ConfirmTransitVirtualInterface Text
+ Amazonka.DirectConnect.Lens: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.Lens: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Lens: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Lens: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.Lens: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Lens: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Lens: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Lens: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.Lens: connections_connections :: Lens' Connections (Maybe [Connection])
+ Amazonka.DirectConnect.Lens: createBGPPeerResponse_httpStatus :: Lens' CreateBGPPeerResponse Int
+ Amazonka.DirectConnect.Lens: createBGPPeerResponse_virtualInterface :: Lens' CreateBGPPeerResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.Lens: createBGPPeer_newBGPPeer :: Lens' CreateBGPPeer (Maybe NewBGPPeer)
+ Amazonka.DirectConnect.Lens: createBGPPeer_virtualInterfaceId :: Lens' CreateBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: createConnection_bandwidth :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.Lens: createConnection_connectionName :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.Lens: createConnection_lagId :: Lens' CreateConnection (Maybe Text)
+ Amazonka.DirectConnect.Lens: createConnection_location :: Lens' CreateConnection Text
+ Amazonka.DirectConnect.Lens: createConnection_providerName :: Lens' CreateConnection (Maybe Text)
+ Amazonka.DirectConnect.Lens: createConnection_requestMACSec :: Lens' CreateConnection (Maybe Bool)
+ Amazonka.DirectConnect.Lens: createConnection_tags :: Lens' CreateConnection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens' CreateDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociationProposal)
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' CreateDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposal_gatewayId :: Lens' CreateDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' CreateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociationResponse_httpStatus :: Lens' CreateDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens' CreateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociation_directConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociation_gatewayId :: Lens' CreateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayAssociation_virtualGatewayId :: Lens' CreateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayResponse_directConnectGateway :: Lens' CreateDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.Lens: createDirectConnectGatewayResponse_httpStatus :: Lens' CreateDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.Lens: createDirectConnectGateway_amazonSideAsn :: Lens' CreateDirectConnectGateway (Maybe Integer)
+ Amazonka.DirectConnect.Lens: createDirectConnectGateway_directConnectGatewayName :: Lens' CreateDirectConnectGateway Text
+ Amazonka.DirectConnect.Lens: createInterconnect_bandwidth :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.Lens: createInterconnect_interconnectName :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.Lens: createInterconnect_lagId :: Lens' CreateInterconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: createInterconnect_location :: Lens' CreateInterconnect Text
+ Amazonka.DirectConnect.Lens: createInterconnect_providerName :: Lens' CreateInterconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: createInterconnect_tags :: Lens' CreateInterconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: createLag_childConnectionTags :: Lens' CreateLag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: createLag_connectionId :: Lens' CreateLag (Maybe Text)
+ Amazonka.DirectConnect.Lens: createLag_connectionsBandwidth :: Lens' CreateLag Text
+ Amazonka.DirectConnect.Lens: createLag_lagName :: Lens' CreateLag Text
+ Amazonka.DirectConnect.Lens: createLag_location :: Lens' CreateLag Text
+ Amazonka.DirectConnect.Lens: createLag_numberOfConnections :: Lens' CreateLag Int
+ Amazonka.DirectConnect.Lens: createLag_providerName :: Lens' CreateLag (Maybe Text)
+ Amazonka.DirectConnect.Lens: createLag_requestMACSec :: Lens' CreateLag (Maybe Bool)
+ Amazonka.DirectConnect.Lens: createLag_tags :: Lens' CreateLag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: createPrivateVirtualInterface_connectionId :: Lens' CreatePrivateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: createPrivateVirtualInterface_newPrivateVirtualInterface :: Lens' CreatePrivateVirtualInterface NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Lens: createPublicVirtualInterface_connectionId :: Lens' CreatePublicVirtualInterface Text
+ Amazonka.DirectConnect.Lens: createPublicVirtualInterface_newPublicVirtualInterface :: Lens' CreatePublicVirtualInterface NewPublicVirtualInterface
+ Amazonka.DirectConnect.Lens: createTransitVirtualInterfaceResponse_httpStatus :: Lens' CreateTransitVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: createTransitVirtualInterfaceResponse_virtualInterface :: Lens' CreateTransitVirtualInterfaceResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.Lens: createTransitVirtualInterface_connectionId :: Lens' CreateTransitVirtualInterface Text
+ Amazonka.DirectConnect.Lens: createTransitVirtualInterface_newTransitVirtualInterface :: Lens' CreateTransitVirtualInterface NewTransitVirtualInterface
+ Amazonka.DirectConnect.Lens: customerAgreement_agreementName :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Lens: customerAgreement_status :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteBGPPeerResponse_httpStatus :: Lens' DeleteBGPPeerResponse Int
+ Amazonka.DirectConnect.Lens: deleteBGPPeerResponse_virtualInterface :: Lens' DeleteBGPPeerResponse (Maybe VirtualInterface)
+ Amazonka.DirectConnect.Lens: deleteBGPPeer_asn :: Lens' DeleteBGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Lens: deleteBGPPeer_bgpPeerId :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteBGPPeer_customerAddress :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteBGPPeer_virtualInterfaceId :: Lens' DeleteBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteConnection_connectionId :: Lens' DeleteConnection Text
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens' DeleteDirectConnectGatewayAssociationProposalResponse (Maybe DirectConnectGatewayAssociationProposal)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens' DeleteDirectConnectGatewayAssociationProposalResponse Int
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociationProposal_proposalId :: Lens' DeleteDirectConnectGatewayAssociationProposal Text
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' DeleteDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociationResponse_httpStatus :: Lens' DeleteDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociation_associationId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociation_directConnectGatewayId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayAssociation_virtualGatewayId :: Lens' DeleteDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayResponse_directConnectGateway :: Lens' DeleteDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGatewayResponse_httpStatus :: Lens' DeleteDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.Lens: deleteDirectConnectGateway_directConnectGatewayId :: Lens' DeleteDirectConnectGateway Text
+ Amazonka.DirectConnect.Lens: deleteInterconnectResponse_httpStatus :: Lens' DeleteInterconnectResponse Int
+ Amazonka.DirectConnect.Lens: deleteInterconnectResponse_interconnectState :: Lens' DeleteInterconnectResponse (Maybe InterconnectState)
+ Amazonka.DirectConnect.Lens: deleteInterconnect_interconnectId :: Lens' DeleteInterconnect Text
+ Amazonka.DirectConnect.Lens: deleteLag_lagId :: Lens' DeleteLag Text
+ Amazonka.DirectConnect.Lens: deleteVirtualInterfaceResponse_httpStatus :: Lens' DeleteVirtualInterfaceResponse Int
+ Amazonka.DirectConnect.Lens: deleteVirtualInterfaceResponse_virtualInterfaceState :: Lens' DeleteVirtualInterfaceResponse (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Lens: deleteVirtualInterface_virtualInterfaceId :: Lens' DeleteVirtualInterface Text
+ Amazonka.DirectConnect.Lens: describeConnections_connectionId :: Lens' DescribeConnections (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeCustomerMetadataResponse_agreements :: Lens' DescribeCustomerMetadataResponse (Maybe [CustomerAgreement])
+ Amazonka.DirectConnect.Lens: describeCustomerMetadataResponse_httpStatus :: Lens' DescribeCustomerMetadataResponse Int
+ Amazonka.DirectConnect.Lens: describeCustomerMetadataResponse_nniPartnerType :: Lens' DescribeCustomerMetadataResponse (Maybe NniPartnerType)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Maybe [DirectConnectGatewayAssociationProposal])
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposalsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse Int
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposalsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposals_associatedGatewayId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposals_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposals_maxResults :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Int)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposals_nextToken :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationProposals_proposalId :: Lens' DescribeDirectConnectGatewayAssociationProposals (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe [DirectConnectGatewayAssociation])
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAssociationsResponse Int
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociationsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_associatedGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_associationId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_maxResults :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Int)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_nextToken :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAssociations_virtualGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe [DirectConnectGatewayAttachment])
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachmentsResponse_httpStatus :: Lens' DescribeDirectConnectGatewayAttachmentsResponse Int
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachmentsResponse_nextToken :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachments_directConnectGatewayId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachments_maxResults :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Int)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachments_nextToken :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewayAttachments_virtualInterfaceId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewaysResponse_directConnectGateways :: Lens' DescribeDirectConnectGatewaysResponse (Maybe [DirectConnectGateway])
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewaysResponse_httpStatus :: Lens' DescribeDirectConnectGatewaysResponse Int
+ Amazonka.DirectConnect.Lens: describeDirectConnectGatewaysResponse_nextToken :: Lens' DescribeDirectConnectGatewaysResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGateways_directConnectGatewayId :: Lens' DescribeDirectConnectGateways (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGateways_maxResults :: Lens' DescribeDirectConnectGateways (Maybe Int)
+ Amazonka.DirectConnect.Lens: describeDirectConnectGateways_nextToken :: Lens' DescribeDirectConnectGateways (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeHostedConnections_connectionId :: Lens' DescribeHostedConnections Text
+ Amazonka.DirectConnect.Lens: describeInterconnectsResponse_httpStatus :: Lens' DescribeInterconnectsResponse Int
+ Amazonka.DirectConnect.Lens: describeInterconnectsResponse_interconnects :: Lens' DescribeInterconnectsResponse (Maybe [Interconnect])
+ Amazonka.DirectConnect.Lens: describeInterconnects_interconnectId :: Lens' DescribeInterconnects (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeLagsResponse_httpStatus :: Lens' DescribeLagsResponse Int
+ Amazonka.DirectConnect.Lens: describeLagsResponse_lags :: Lens' DescribeLagsResponse (Maybe [Lag])
+ Amazonka.DirectConnect.Lens: describeLags_lagId :: Lens' DescribeLags (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeLoaResponse_httpStatus :: Lens' DescribeLoaResponse Int
+ Amazonka.DirectConnect.Lens: describeLoaResponse_loaContent :: Lens' DescribeLoaResponse (Maybe ByteString)
+ Amazonka.DirectConnect.Lens: describeLoaResponse_loaContentType :: Lens' DescribeLoaResponse (Maybe LoaContentType)
+ Amazonka.DirectConnect.Lens: describeLoa_connectionId :: Lens' DescribeLoa Text
+ Amazonka.DirectConnect.Lens: describeLoa_loaContentType :: Lens' DescribeLoa (Maybe LoaContentType)
+ Amazonka.DirectConnect.Lens: describeLoa_providerName :: Lens' DescribeLoa (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeLocationsResponse_httpStatus :: Lens' DescribeLocationsResponse Int
+ Amazonka.DirectConnect.Lens: describeLocationsResponse_locations :: Lens' DescribeLocationsResponse (Maybe [Location])
+ Amazonka.DirectConnect.Lens: describeRouterConfigurationResponse_customerRouterConfig :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeRouterConfigurationResponse_httpStatus :: Lens' DescribeRouterConfigurationResponse Int
+ Amazonka.DirectConnect.Lens: describeRouterConfigurationResponse_router :: Lens' DescribeRouterConfigurationResponse (Maybe RouterType)
+ Amazonka.DirectConnect.Lens: describeRouterConfigurationResponse_virtualInterfaceId :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeRouterConfigurationResponse_virtualInterfaceName :: Lens' DescribeRouterConfigurationResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeRouterConfiguration_routerTypeIdentifier :: Lens' DescribeRouterConfiguration (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeRouterConfiguration_virtualInterfaceId :: Lens' DescribeRouterConfiguration Text
+ Amazonka.DirectConnect.Lens: describeTagsResponse_httpStatus :: Lens' DescribeTagsResponse Int
+ Amazonka.DirectConnect.Lens: describeTagsResponse_resourceTags :: Lens' DescribeTagsResponse (Maybe [ResourceTag])
+ Amazonka.DirectConnect.Lens: describeTags_resourceArns :: Lens' DescribeTags [Text]
+ Amazonka.DirectConnect.Lens: describeVirtualGatewaysResponse_httpStatus :: Lens' DescribeVirtualGatewaysResponse Int
+ Amazonka.DirectConnect.Lens: describeVirtualGatewaysResponse_virtualGateways :: Lens' DescribeVirtualGatewaysResponse (Maybe [VirtualGateway])
+ Amazonka.DirectConnect.Lens: describeVirtualInterfacesResponse_httpStatus :: Lens' DescribeVirtualInterfacesResponse Int
+ Amazonka.DirectConnect.Lens: describeVirtualInterfacesResponse_virtualInterfaces :: Lens' DescribeVirtualInterfacesResponse (Maybe [VirtualInterface])
+ Amazonka.DirectConnect.Lens: describeVirtualInterfaces_connectionId :: Lens' DescribeVirtualInterfaces (Maybe Text)
+ Amazonka.DirectConnect.Lens: describeVirtualInterfaces_virtualInterfaceId :: Lens' DescribeVirtualInterfaces (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_associatedGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_proposalId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_proposalState :: Lens' DirectConnectGatewayAssociationProposal (Maybe DirectConnectGatewayAssociationProposalState)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_associatedGateway :: Lens' DirectConnectGatewayAssociation (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_associationId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_associationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_directConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_stateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_virtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_virtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAssociation_virtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_attachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_attachmentType :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentType)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_directConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_stateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_virtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_virtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGatewayAttachment_virtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGateway_amazonSideAsn :: Lens' DirectConnectGateway (Maybe Integer)
+ Amazonka.DirectConnect.Lens: directConnectGateway_directConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGateway_directConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGateway_directConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)
+ Amazonka.DirectConnect.Lens: directConnectGateway_ownerAccount :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: directConnectGateway_stateChangeError :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: disassociateConnectionFromLag_connectionId :: Lens' DisassociateConnectionFromLag Text
+ Amazonka.DirectConnect.Lens: disassociateConnectionFromLag_lagId :: Lens' DisassociateConnectionFromLag Text
+ Amazonka.DirectConnect.Lens: disassociateMacSecKeyResponse_connectionId :: Lens' DisassociateMacSecKeyResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: disassociateMacSecKeyResponse_httpStatus :: Lens' DisassociateMacSecKeyResponse Int
+ Amazonka.DirectConnect.Lens: disassociateMacSecKeyResponse_macSecKeys :: Lens' DisassociateMacSecKeyResponse (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Lens: disassociateMacSecKey_connectionId :: Lens' DisassociateMacSecKey Text
+ Amazonka.DirectConnect.Lens: disassociateMacSecKey_secretARN :: Lens' DisassociateMacSecKey Text
+ Amazonka.DirectConnect.Lens: interconnect_awsDevice :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_awsDeviceV2 :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_awsLogicalDeviceId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_bandwidth :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_hasLogicalRedundancy :: Lens' Interconnect (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Lens: interconnect_interconnectId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_interconnectName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_interconnectState :: Lens' Interconnect (Maybe InterconnectState)
+ Amazonka.DirectConnect.Lens: interconnect_jumboFrameCapable :: Lens' Interconnect (Maybe Bool)
+ Amazonka.DirectConnect.Lens: interconnect_lagId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_loaIssueTime :: Lens' Interconnect (Maybe UTCTime)
+ Amazonka.DirectConnect.Lens: interconnect_location :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_providerName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_region :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Lens: interconnect_tags :: Lens' Interconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Lens: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.Lens: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Lens: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Lens: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.Lens: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Lens: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Lens: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Lens: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Lens: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Lens: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistoryResponse_httpStatus :: Lens' ListVirtualInterfaceTestHistoryResponse Int
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistoryResponse_nextToken :: Lens' ListVirtualInterfaceTestHistoryResponse (Maybe Text)
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory :: Lens' ListVirtualInterfaceTestHistoryResponse (Maybe [VirtualInterfaceTestHistory])
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_bgpPeers :: Lens' ListVirtualInterfaceTestHistory (Maybe [Text])
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_maxResults :: Lens' ListVirtualInterfaceTestHistory (Maybe Int)
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_nextToken :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_status :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_testId :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: listVirtualInterfaceTestHistory_virtualInterfaceId :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: location_availableMacSecPortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Lens: location_availablePortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Lens: location_availableProviders :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Lens: location_locationCode :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Lens: location_locationName :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Lens: location_region :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Lens: macSecKey_ckn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: macSecKey_secretARN :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: macSecKey_startOn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: macSecKey_state :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Lens: newBGPPeer_addressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newBGPPeer_amazonAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: newBGPPeer_asn :: Lens' NewBGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Lens: newBGPPeer_authKey :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: newBGPPeer_customerAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_addressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_amazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_asn :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_authKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_customerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_mtu :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_tags :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterfaceAllocation_vlan :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_addressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_amazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_asn :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_authKey :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_customerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_directConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_enableSiteLink :: Lens' NewPrivateVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_mtu :: Lens' NewPrivateVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_tags :: Lens' NewPrivateVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_virtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_virtualInterfaceName :: Lens' NewPrivateVirtualInterface Text
+ Amazonka.DirectConnect.Lens: newPrivateVirtualInterface_vlan :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_addressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_amazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_asn :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_authKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_customerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_routeFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_tags :: Lens' NewPublicVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterfaceAllocation_vlan :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_addressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_amazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_asn :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_authKey :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_customerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_routeFilterPrefixes :: Lens' NewPublicVirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_tags :: Lens' NewPublicVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_virtualInterfaceName :: Lens' NewPublicVirtualInterface Text
+ Amazonka.DirectConnect.Lens: newPublicVirtualInterface_vlan :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_addressFamily :: Lens' NewTransitVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_amazonAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_asn :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_authKey :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_customerAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_mtu :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_tags :: Lens' NewTransitVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterfaceAllocation_vlan :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_addressFamily :: Lens' NewTransitVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_amazonAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_asn :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_authKey :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_customerAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_directConnectGatewayId :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_enableSiteLink :: Lens' NewTransitVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_mtu :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_tags :: Lens' NewTransitVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_virtualInterfaceName :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: newTransitVirtualInterface_vlan :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: resourceTag_resourceArn :: Lens' ResourceTag (Maybe Text)
+ Amazonka.DirectConnect.Lens: resourceTag_tags :: Lens' ResourceTag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: routeFilterPrefix_cidr :: Lens' RouteFilterPrefix (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_platform :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_routerTypeIdentifier :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_software :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_vendor :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_xsltTemplateName :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: routerType_xsltTemplateNameForMacSec :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Lens: startBgpFailoverTestResponse_httpStatus :: Lens' StartBgpFailoverTestResponse Int
+ Amazonka.DirectConnect.Lens: startBgpFailoverTestResponse_virtualInterfaceTest :: Lens' StartBgpFailoverTestResponse (Maybe VirtualInterfaceTestHistory)
+ Amazonka.DirectConnect.Lens: startBgpFailoverTest_bgpPeers :: Lens' StartBgpFailoverTest (Maybe [Text])
+ Amazonka.DirectConnect.Lens: startBgpFailoverTest_testDurationInMinutes :: Lens' StartBgpFailoverTest (Maybe Int)
+ Amazonka.DirectConnect.Lens: startBgpFailoverTest_virtualInterfaceId :: Lens' StartBgpFailoverTest Text
+ Amazonka.DirectConnect.Lens: stopBgpFailoverTestResponse_httpStatus :: Lens' StopBgpFailoverTestResponse Int
+ Amazonka.DirectConnect.Lens: stopBgpFailoverTestResponse_virtualInterfaceTest :: Lens' StopBgpFailoverTestResponse (Maybe VirtualInterfaceTestHistory)
+ Amazonka.DirectConnect.Lens: stopBgpFailoverTest_virtualInterfaceId :: Lens' StopBgpFailoverTest Text
+ Amazonka.DirectConnect.Lens: tagResourceResponse_httpStatus :: Lens' TagResourceResponse Int
+ Amazonka.DirectConnect.Lens: tagResource_resourceArn :: Lens' TagResource Text
+ Amazonka.DirectConnect.Lens: tagResource_tags :: Lens' TagResource (NonEmpty Tag)
+ Amazonka.DirectConnect.Lens: tag_key :: Lens' Tag Text
+ Amazonka.DirectConnect.Lens: tag_value :: Lens' Tag (Maybe Text)
+ Amazonka.DirectConnect.Lens: untagResourceResponse_httpStatus :: Lens' UntagResourceResponse Int
+ Amazonka.DirectConnect.Lens: untagResource_resourceArn :: Lens' UntagResource Text
+ Amazonka.DirectConnect.Lens: untagResource_tagKeys :: Lens' UntagResource [Text]
+ Amazonka.DirectConnect.Lens: updateConnection_connectionId :: Lens' UpdateConnection Text
+ Amazonka.DirectConnect.Lens: updateConnection_connectionName :: Lens' UpdateConnection (Maybe Text)
+ Amazonka.DirectConnect.Lens: updateConnection_encryptionMode :: Lens' UpdateConnection (Maybe Text)
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' UpdateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayAssociationResponse_httpStatus :: Lens' UpdateDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens' UpdateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayAssociation_associationId :: Lens' UpdateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway :: Lens' UpdateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayResponse_directConnectGateway :: Lens' UpdateDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.Lens: updateDirectConnectGatewayResponse_httpStatus :: Lens' UpdateDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.Lens: updateDirectConnectGateway_directConnectGatewayId :: Lens' UpdateDirectConnectGateway Text
+ Amazonka.DirectConnect.Lens: updateDirectConnectGateway_newDirectConnectGatewayName :: Lens' UpdateDirectConnectGateway Text
+ Amazonka.DirectConnect.Lens: updateLag_encryptionMode :: Lens' UpdateLag (Maybe Text)
+ Amazonka.DirectConnect.Lens: updateLag_lagId :: Lens' UpdateLag Text
+ Amazonka.DirectConnect.Lens: updateLag_lagName :: Lens' UpdateLag (Maybe Text)
+ Amazonka.DirectConnect.Lens: updateLag_minimumLinks :: Lens' UpdateLag (Maybe Int)
+ Amazonka.DirectConnect.Lens: updateVirtualInterfaceAttributes_enableSiteLink :: Lens' UpdateVirtualInterfaceAttributes (Maybe Bool)
+ Amazonka.DirectConnect.Lens: updateVirtualInterfaceAttributes_mtu :: Lens' UpdateVirtualInterfaceAttributes (Maybe Int)
+ Amazonka.DirectConnect.Lens: updateVirtualInterfaceAttributes_virtualInterfaceId :: Lens' UpdateVirtualInterfaceAttributes Text
+ Amazonka.DirectConnect.Lens: updateVirtualInterfaceAttributes_virtualInterfaceName :: Lens' UpdateVirtualInterfaceAttributes (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualGateway_virtualGatewayId :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualGateway_virtualGatewayState :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_bgpPeers :: Lens' VirtualInterfaceTestHistory (Maybe [Text])
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_endTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_ownerAccount :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_startTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_status :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_testDurationInMinutes :: Lens' VirtualInterfaceTestHistory (Maybe Int)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_testId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterfaceTestHistory_virtualInterfaceId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Lens: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.Lens: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.Lens: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Lens: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Lens: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Lens: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Lens: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Lens: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Lens: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Lens: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: ListVirtualInterfaceTestHistory' :: Maybe [Text] -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: ListVirtualInterfaceTestHistoryResponse' :: Maybe Text -> Maybe [VirtualInterfaceTestHistory] -> Int -> ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:bgpPeers:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe [Text]
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:httpStatus:ListVirtualInterfaceTestHistoryResponse'] :: ListVirtualInterfaceTestHistoryResponse -> Int
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:maxResults:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe Int
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:nextToken:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:nextToken:ListVirtualInterfaceTestHistoryResponse'] :: ListVirtualInterfaceTestHistoryResponse -> Maybe Text
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:status:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:testId:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:virtualInterfaceId:ListVirtualInterfaceTestHistory'] :: ListVirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: [$sel:virtualInterfaceTestHistory:ListVirtualInterfaceTestHistoryResponse'] :: ListVirtualInterfaceTestHistoryResponse -> Maybe [VirtualInterfaceTestHistory]
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: data ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: data ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Control.DeepSeq.NFData Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Classes.Eq Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Classes.Eq Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Generics.Generic Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Generics.Generic Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Read.Read Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Read.Read Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Show.Show Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: instance GHC.Show.Show Amazonka.DirectConnect.ListVirtualInterfaceTestHistory.ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistoryResponse_httpStatus :: Lens' ListVirtualInterfaceTestHistoryResponse Int
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistoryResponse_nextToken :: Lens' ListVirtualInterfaceTestHistoryResponse (Maybe Text)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory :: Lens' ListVirtualInterfaceTestHistoryResponse (Maybe [VirtualInterfaceTestHistory])
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_bgpPeers :: Lens' ListVirtualInterfaceTestHistory (Maybe [Text])
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_maxResults :: Lens' ListVirtualInterfaceTestHistory (Maybe Int)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_nextToken :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_status :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_testId :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: listVirtualInterfaceTestHistory_virtualInterfaceId :: Lens' ListVirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: newListVirtualInterfaceTestHistory :: ListVirtualInterfaceTestHistory
+ Amazonka.DirectConnect.ListVirtualInterfaceTestHistory: newListVirtualInterfaceTestHistoryResponse :: Int -> ListVirtualInterfaceTestHistoryResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: StartBgpFailoverTest' :: Maybe [Text] -> Maybe Int -> Text -> StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: StartBgpFailoverTestResponse' :: Maybe VirtualInterfaceTestHistory -> Int -> StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: [$sel:bgpPeers:StartBgpFailoverTest'] :: StartBgpFailoverTest -> Maybe [Text]
+ Amazonka.DirectConnect.StartBgpFailoverTest: [$sel:httpStatus:StartBgpFailoverTestResponse'] :: StartBgpFailoverTestResponse -> Int
+ Amazonka.DirectConnect.StartBgpFailoverTest: [$sel:testDurationInMinutes:StartBgpFailoverTest'] :: StartBgpFailoverTest -> Maybe Int
+ Amazonka.DirectConnect.StartBgpFailoverTest: [$sel:virtualInterfaceId:StartBgpFailoverTest'] :: StartBgpFailoverTest -> Text
+ Amazonka.DirectConnect.StartBgpFailoverTest: [$sel:virtualInterfaceTest:StartBgpFailoverTestResponse'] :: StartBgpFailoverTestResponse -> Maybe VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.StartBgpFailoverTest: data StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: data StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Control.DeepSeq.NFData Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Control.DeepSeq.NFData Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Classes.Eq Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Classes.Eq Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Generics.Generic Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Generics.Generic Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Read.Read Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Read.Read Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Show.Show Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: instance GHC.Show.Show Amazonka.DirectConnect.StartBgpFailoverTest.StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: newStartBgpFailoverTest :: Text -> StartBgpFailoverTest
+ Amazonka.DirectConnect.StartBgpFailoverTest: newStartBgpFailoverTestResponse :: Int -> StartBgpFailoverTestResponse
+ Amazonka.DirectConnect.StartBgpFailoverTest: startBgpFailoverTestResponse_httpStatus :: Lens' StartBgpFailoverTestResponse Int
+ Amazonka.DirectConnect.StartBgpFailoverTest: startBgpFailoverTestResponse_virtualInterfaceTest :: Lens' StartBgpFailoverTestResponse (Maybe VirtualInterfaceTestHistory)
+ Amazonka.DirectConnect.StartBgpFailoverTest: startBgpFailoverTest_bgpPeers :: Lens' StartBgpFailoverTest (Maybe [Text])
+ Amazonka.DirectConnect.StartBgpFailoverTest: startBgpFailoverTest_testDurationInMinutes :: Lens' StartBgpFailoverTest (Maybe Int)
+ Amazonka.DirectConnect.StartBgpFailoverTest: startBgpFailoverTest_virtualInterfaceId :: Lens' StartBgpFailoverTest Text
+ Amazonka.DirectConnect.StopBgpFailoverTest: StopBgpFailoverTest' :: Text -> StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: StopBgpFailoverTestResponse' :: Maybe VirtualInterfaceTestHistory -> Int -> StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: [$sel:httpStatus:StopBgpFailoverTestResponse'] :: StopBgpFailoverTestResponse -> Int
+ Amazonka.DirectConnect.StopBgpFailoverTest: [$sel:virtualInterfaceId:StopBgpFailoverTest'] :: StopBgpFailoverTest -> Text
+ Amazonka.DirectConnect.StopBgpFailoverTest: [$sel:virtualInterfaceTest:StopBgpFailoverTestResponse'] :: StopBgpFailoverTestResponse -> Maybe VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.StopBgpFailoverTest: data StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: data StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Control.DeepSeq.NFData Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Control.DeepSeq.NFData Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Classes.Eq Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Classes.Eq Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Generics.Generic Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Generics.Generic Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Read.Read Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Read.Read Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Show.Show Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: instance GHC.Show.Show Amazonka.DirectConnect.StopBgpFailoverTest.StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: newStopBgpFailoverTest :: Text -> StopBgpFailoverTest
+ Amazonka.DirectConnect.StopBgpFailoverTest: newStopBgpFailoverTestResponse :: Int -> StopBgpFailoverTestResponse
+ Amazonka.DirectConnect.StopBgpFailoverTest: stopBgpFailoverTestResponse_httpStatus :: Lens' StopBgpFailoverTestResponse Int
+ Amazonka.DirectConnect.StopBgpFailoverTest: stopBgpFailoverTestResponse_virtualInterfaceTest :: Lens' StopBgpFailoverTestResponse (Maybe VirtualInterfaceTestHistory)
+ Amazonka.DirectConnect.StopBgpFailoverTest: stopBgpFailoverTest_virtualInterfaceId :: Lens' StopBgpFailoverTest Text
+ Amazonka.DirectConnect.TagResource: TagResource' :: Text -> NonEmpty Tag -> TagResource
+ Amazonka.DirectConnect.TagResource: TagResourceResponse' :: Int -> TagResourceResponse
+ Amazonka.DirectConnect.TagResource: [$sel:httpStatus:TagResourceResponse'] :: TagResourceResponse -> Int
+ Amazonka.DirectConnect.TagResource: [$sel:resourceArn:TagResource'] :: TagResource -> Text
+ Amazonka.DirectConnect.TagResource: [$sel:tags:TagResource'] :: TagResource -> NonEmpty Tag
+ Amazonka.DirectConnect.TagResource: data TagResource
+ Amazonka.DirectConnect.TagResource: data TagResourceResponse
+ Amazonka.DirectConnect.TagResource: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Control.DeepSeq.NFData Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Control.DeepSeq.NFData Amazonka.DirectConnect.TagResource.TagResourceResponse
+ Amazonka.DirectConnect.TagResource: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance GHC.Classes.Eq Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance GHC.Classes.Eq Amazonka.DirectConnect.TagResource.TagResourceResponse
+ Amazonka.DirectConnect.TagResource: instance GHC.Generics.Generic Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance GHC.Generics.Generic Amazonka.DirectConnect.TagResource.TagResourceResponse
+ Amazonka.DirectConnect.TagResource: instance GHC.Read.Read Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance GHC.Read.Read Amazonka.DirectConnect.TagResource.TagResourceResponse
+ Amazonka.DirectConnect.TagResource: instance GHC.Show.Show Amazonka.DirectConnect.TagResource.TagResource
+ Amazonka.DirectConnect.TagResource: instance GHC.Show.Show Amazonka.DirectConnect.TagResource.TagResourceResponse
+ Amazonka.DirectConnect.TagResource: newTagResource :: Text -> NonEmpty Tag -> TagResource
+ Amazonka.DirectConnect.TagResource: newTagResourceResponse :: Int -> TagResourceResponse
+ Amazonka.DirectConnect.TagResource: tagResourceResponse_httpStatus :: Lens' TagResourceResponse Int
+ Amazonka.DirectConnect.TagResource: tagResource_resourceArn :: Lens' TagResource Text
+ Amazonka.DirectConnect.TagResource: tagResource_tags :: Lens' TagResource (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: AddressFamily' :: Text -> AddressFamily
+ Amazonka.DirectConnect.Types: AssociatedGateway' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe GatewayType -> AssociatedGateway
+ Amazonka.DirectConnect.Types: BGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe BGPPeerState -> Maybe BGPStatus -> Maybe Text -> BGPPeer
+ Amazonka.DirectConnect.Types: BGPPeerState' :: Text -> BGPPeerState
+ Amazonka.DirectConnect.Types: BGPStatus' :: Text -> BGPStatus
+ Amazonka.DirectConnect.Types: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.Types: ConnectionState' :: Text -> ConnectionState
+ Amazonka.DirectConnect.Types: Connections' :: Maybe [Connection] -> Connections
+ Amazonka.DirectConnect.Types: CustomerAgreement' :: Maybe Text -> Maybe Text -> CustomerAgreement
+ Amazonka.DirectConnect.Types: DirectConnectGateway' :: Maybe Integer -> Maybe Text -> Maybe Text -> Maybe DirectConnectGatewayState -> Maybe Text -> Maybe Text -> DirectConnectGateway
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe AssociatedGateway -> Maybe Text -> Maybe DirectConnectGatewayAssociationState -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAssociationProposal' :: Maybe AssociatedGateway -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe DirectConnectGatewayAssociationProposalState -> Maybe [RouteFilterPrefix] -> DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAssociationProposalState' :: Text -> DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAssociationState' :: Text -> DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAttachment' :: Maybe DirectConnectGatewayAttachmentState -> Maybe DirectConnectGatewayAttachmentType -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAttachmentState' :: Text -> DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: DirectConnectGatewayAttachmentType' :: Text -> DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types: DirectConnectGatewayState' :: Text -> DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: GatewayType' :: Text -> GatewayType
+ Amazonka.DirectConnect.Types: HasLogicalRedundancy' :: Text -> HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: Interconnect' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Text -> Maybe Text -> Maybe InterconnectState -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Interconnect
+ Amazonka.DirectConnect.Types: InterconnectState' :: Text -> InterconnectState
+ Amazonka.DirectConnect.Types: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect.Types: LagState' :: Text -> LagState
+ Amazonka.DirectConnect.Types: LoaContentType' :: Text -> LoaContentType
+ Amazonka.DirectConnect.Types: Location' :: Maybe [Text] -> Maybe [Text] -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Location
+ Amazonka.DirectConnect.Types: MacSecKey' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> MacSecKey
+ Amazonka.DirectConnect.Types: NewBGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> NewBGPPeer
+ Amazonka.DirectConnect.Types: NewPrivateVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types: NewPrivateVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: NewPublicVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types: NewPublicVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: NewTransitVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types: NewTransitVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: NniPartnerType' :: Text -> NniPartnerType
+ Amazonka.DirectConnect.Types: ResourceTag' :: Maybe Text -> Maybe (NonEmpty Tag) -> ResourceTag
+ Amazonka.DirectConnect.Types: RouteFilterPrefix' :: Maybe Text -> RouteFilterPrefix
+ Amazonka.DirectConnect.Types: RouterType' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> RouterType
+ Amazonka.DirectConnect.Types: Tag' :: Maybe Text -> Text -> Tag
+ Amazonka.DirectConnect.Types: VirtualGateway' :: Maybe Text -> Maybe Text -> VirtualGateway
+ Amazonka.DirectConnect.Types: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.Types: VirtualInterfaceState' :: Text -> VirtualInterfaceState
+ Amazonka.DirectConnect.Types: VirtualInterfaceTestHistory' :: Maybe [Text] -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:BGPPeer'] :: BGPPeer -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewBGPPeer'] :: NewBGPPeer -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types: [$sel:agreementName:CustomerAgreement'] :: CustomerAgreement -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:allowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:allowsHostedConnections:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:amazonSideAsn:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Integer
+ Amazonka.DirectConnect.Types: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.Types: [$sel:asn:BGPPeer'] :: BGPPeer -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewBGPPeer'] :: NewBGPPeer -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:asn:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:associatedGateway:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe AssociatedGateway
+ Amazonka.DirectConnect.Types: [$sel:associatedGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe AssociatedGateway
+ Amazonka.DirectConnect.Types: [$sel:associationId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:associationState:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: [$sel:attachmentState:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: [$sel:attachmentType:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types: [$sel:authKey:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:availableMacSecPortSpeeds:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types: [$sel:availablePortSpeeds:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types: [$sel:availableProviders:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDevice:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDevice:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDeviceV2:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDeviceV2:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDeviceV2:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsLogicalDeviceId:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsLogicalDeviceId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsLogicalDeviceId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:bandwidth:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:bgpPeerId:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:bgpPeerState:BGPPeer'] :: BGPPeer -> Maybe BGPPeerState
+ Amazonka.DirectConnect.Types: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.Types: [$sel:bgpPeers:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe [Text]
+ Amazonka.DirectConnect.Types: [$sel:bgpStatus:BGPPeer'] :: BGPPeer -> Maybe BGPStatus
+ Amazonka.DirectConnect.Types: [$sel:cidr:RouteFilterPrefix'] :: RouteFilterPrefix -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ckn:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.Types: [$sel:connections:Connections'] :: Connections -> Maybe [Connection]
+ Amazonka.DirectConnect.Types: [$sel:connections:Lag'] :: Lag -> Maybe [Connection]
+ Amazonka.DirectConnect.Types: [$sel:connectionsBandwidth:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayName:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayOwnerAccount:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayOwnerAccount:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:directConnectGatewayState:DirectConnectGateway'] :: DirectConnectGateway -> Maybe DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: [$sel:enableSiteLink:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:enableSiteLink:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:encryptionMode:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:endTime:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe POSIX
+ Amazonka.DirectConnect.Types: [$sel:existingAllowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: [$sel:hasLogicalRedundancy:Interconnect'] :: Interconnect -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: [$sel:hasLogicalRedundancy:Lag'] :: Lag -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: [$sel:id:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:interconnectId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:interconnectName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:interconnectState:Interconnect'] :: Interconnect -> Maybe InterconnectState
+ Amazonka.DirectConnect.Types: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:jumboFrameCapable:Interconnect'] :: Interconnect -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:jumboFrameCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:key:Tag'] :: Tag -> Text
+ Amazonka.DirectConnect.Types: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:lagId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:lagId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:lagName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:lagState:Lag'] :: Lag -> Maybe LagState
+ Amazonka.DirectConnect.Types: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.Types: [$sel:loaIssueTime:Interconnect'] :: Interconnect -> Maybe POSIX
+ Amazonka.DirectConnect.Types: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:location:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:location:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:locationCode:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:locationName:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:macSecCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.Types: [$sel:macSecKeys:Lag'] :: Lag -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.Types: [$sel:minimumLinks:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:mtu:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:mtu:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:mtu:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:mtu:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:numberOfConnections:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:ownerAccount:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:platform:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:proposalId:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:proposalState:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:providerName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:providerName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:requestedAllowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:resourceArn:ResourceTag'] :: ResourceTag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:routeFilterPrefixes:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:routeFilterPrefixes:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types: [$sel:routerTypeIdentifier:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:secretARN:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types: [$sel:software:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:startOn:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:startTime:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe POSIX
+ Amazonka.DirectConnect.Types: [$sel:state:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:stateChangeError:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:stateChangeError:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:stateChangeError:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:status:CustomerAgreement'] :: CustomerAgreement -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:status:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:Interconnect'] :: Interconnect -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:Lag'] :: Lag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:ResourceTag'] :: ResourceTag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types: [$sel:testDurationInMinutes:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:testId:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:type':AssociatedGateway'] :: AssociatedGateway -> Maybe GatewayType
+ Amazonka.DirectConnect.Types: [$sel:value:Tag'] :: Tag -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:vendor:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayId:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayId:VirtualGateway'] :: VirtualGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayOwnerAccount:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayRegion:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualGatewayState:VirtualGateway'] :: VirtualGateway -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceId:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceId:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceOwnerAccount:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceRegion:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.Types: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types: [$sel:xsltTemplateName:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [$sel:xsltTemplateNameForMacSec:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types: [fromAddressFamily] :: AddressFamily -> Text
+ Amazonka.DirectConnect.Types: [fromBGPPeerState] :: BGPPeerState -> Text
+ Amazonka.DirectConnect.Types: [fromBGPStatus] :: BGPStatus -> Text
+ Amazonka.DirectConnect.Types: [fromConnectionState] :: ConnectionState -> Text
+ Amazonka.DirectConnect.Types: [fromDirectConnectGatewayAssociationProposalState] :: DirectConnectGatewayAssociationProposalState -> Text
+ Amazonka.DirectConnect.Types: [fromDirectConnectGatewayAssociationState] :: DirectConnectGatewayAssociationState -> Text
+ Amazonka.DirectConnect.Types: [fromDirectConnectGatewayAttachmentState] :: DirectConnectGatewayAttachmentState -> Text
+ Amazonka.DirectConnect.Types: [fromDirectConnectGatewayAttachmentType] :: DirectConnectGatewayAttachmentType -> Text
+ Amazonka.DirectConnect.Types: [fromDirectConnectGatewayState] :: DirectConnectGatewayState -> Text
+ Amazonka.DirectConnect.Types: [fromGatewayType] :: GatewayType -> Text
+ Amazonka.DirectConnect.Types: [fromHasLogicalRedundancy] :: HasLogicalRedundancy -> Text
+ Amazonka.DirectConnect.Types: [fromInterconnectState] :: InterconnectState -> Text
+ Amazonka.DirectConnect.Types: [fromLagState] :: LagState -> Text
+ Amazonka.DirectConnect.Types: [fromLoaContentType] :: LoaContentType -> Text
+ Amazonka.DirectConnect.Types: [fromNniPartnerType] :: NniPartnerType -> Text
+ Amazonka.DirectConnect.Types: [fromVirtualInterfaceState] :: VirtualInterfaceState -> Text
+ Amazonka.DirectConnect.Types: _DirectConnectClientException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect.Types: _DirectConnectServerException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect.Types: _DuplicateTagKeysException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect.Types: _TooManyTagsException :: AsError a => Fold a ServiceError
+ Amazonka.DirectConnect.Types: associatedGateway_id :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: associatedGateway_ownerAccount :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: associatedGateway_region :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: associatedGateway_type :: Lens' AssociatedGateway (Maybe GatewayType)
+ Amazonka.DirectConnect.Types: bGPPeer_addressFamily :: Lens' BGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: bGPPeer_amazonAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: bGPPeer_asn :: Lens' BGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Types: bGPPeer_authKey :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: bGPPeer_awsDeviceV2 :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: bGPPeer_awsLogicalDeviceId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: bGPPeer_bgpPeerId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: bGPPeer_bgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)
+ Amazonka.DirectConnect.Types: bGPPeer_bgpStatus :: Lens' BGPPeer (Maybe BGPStatus)
+ Amazonka.DirectConnect.Types: bGPPeer_customerAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.Types: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Types: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.Types: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Types: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Types: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.Types: connections_connections :: Lens' Connections (Maybe [Connection])
+ Amazonka.DirectConnect.Types: customerAgreement_agreementName :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Types: customerAgreement_status :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Types: data AssociatedGateway
+ Amazonka.DirectConnect.Types: data BGPPeer
+ Amazonka.DirectConnect.Types: data Connection
+ Amazonka.DirectConnect.Types: data Connections
+ Amazonka.DirectConnect.Types: data CustomerAgreement
+ Amazonka.DirectConnect.Types: data DirectConnectGateway
+ Amazonka.DirectConnect.Types: data DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types: data DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types: data DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types: data Interconnect
+ Amazonka.DirectConnect.Types: data Lag
+ Amazonka.DirectConnect.Types: data Location
+ Amazonka.DirectConnect.Types: data MacSecKey
+ Amazonka.DirectConnect.Types: data NewBGPPeer
+ Amazonka.DirectConnect.Types: data NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types: data NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: data NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types: data NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: data NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types: data NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: data ResourceTag
+ Amazonka.DirectConnect.Types: data RouteFilterPrefix
+ Amazonka.DirectConnect.Types: data RouterType
+ Amazonka.DirectConnect.Types: data Tag
+ Amazonka.DirectConnect.Types: data VirtualGateway
+ Amazonka.DirectConnect.Types: data VirtualInterface
+ Amazonka.DirectConnect.Types: data VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types: defaultService :: Service
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_associatedGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_proposalId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_proposalState :: Lens' DirectConnectGatewayAssociationProposal (Maybe DirectConnectGatewayAssociationProposalState)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_associatedGateway :: Lens' DirectConnectGatewayAssociation (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_associationId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_associationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_directConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_stateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_virtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_virtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAssociation_virtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_attachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_attachmentType :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentType)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_directConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_stateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_virtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_virtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGatewayAttachment_virtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGateway_amazonSideAsn :: Lens' DirectConnectGateway (Maybe Integer)
+ Amazonka.DirectConnect.Types: directConnectGateway_directConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGateway_directConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGateway_directConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)
+ Amazonka.DirectConnect.Types: directConnectGateway_ownerAccount :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: directConnectGateway_stateChangeError :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_awsDevice :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_awsDeviceV2 :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_awsLogicalDeviceId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_bandwidth :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_hasLogicalRedundancy :: Lens' Interconnect (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types: interconnect_interconnectId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_interconnectName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_interconnectState :: Lens' Interconnect (Maybe InterconnectState)
+ Amazonka.DirectConnect.Types: interconnect_jumboFrameCapable :: Lens' Interconnect (Maybe Bool)
+ Amazonka.DirectConnect.Types: interconnect_lagId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_loaIssueTime :: Lens' Interconnect (Maybe UTCTime)
+ Amazonka.DirectConnect.Types: interconnect_location :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_providerName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_region :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types: interconnect_tags :: Lens' Interconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.Types: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.Types: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Types: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Types: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Types: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: location_availableMacSecPortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types: location_availablePortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types: location_availableProviders :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types: location_locationCode :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types: location_locationName :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types: location_region :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types: macSecKey_ckn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types: macSecKey_secretARN :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types: macSecKey_startOn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types: macSecKey_state :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types: newAssociatedGateway :: AssociatedGateway
+ Amazonka.DirectConnect.Types: newBGPPeer :: BGPPeer
+ Amazonka.DirectConnect.Types: newBGPPeer_addressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newBGPPeer_amazonAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: newBGPPeer_asn :: Lens' NewBGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Types: newBGPPeer_authKey :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: newBGPPeer_customerAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types: newConnection :: Connection
+ Amazonka.DirectConnect.Types: newConnections :: Connections
+ Amazonka.DirectConnect.Types: newCustomerAgreement :: CustomerAgreement
+ Amazonka.DirectConnect.Types: newDirectConnectGateway :: DirectConnectGateway
+ Amazonka.DirectConnect.Types: newDirectConnectGatewayAssociation :: DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types: newDirectConnectGatewayAssociationProposal :: DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types: newDirectConnectGatewayAttachment :: DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types: newInterconnect :: Interconnect
+ Amazonka.DirectConnect.Types: newLag :: Lag
+ Amazonka.DirectConnect.Types: newLocation :: Location
+ Amazonka.DirectConnect.Types: newMacSecKey :: MacSecKey
+ Amazonka.DirectConnect.Types: newNewBGPPeer :: NewBGPPeer
+ Amazonka.DirectConnect.Types: newNewPrivateVirtualInterface :: Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types: newNewPrivateVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: newNewPublicVirtualInterface :: Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types: newNewPublicVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: newNewTransitVirtualInterface :: NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types: newNewTransitVirtualInterfaceAllocation :: NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_addressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_amazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_asn :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_authKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_customerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_mtu :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_tags :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterfaceAllocation_vlan :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_addressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_amazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_asn :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_authKey :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_customerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_directConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_enableSiteLink :: Lens' NewPrivateVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_mtu :: Lens' NewPrivateVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_tags :: Lens' NewPrivateVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_virtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_virtualInterfaceName :: Lens' NewPrivateVirtualInterface Text
+ Amazonka.DirectConnect.Types: newPrivateVirtualInterface_vlan :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_addressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_amazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_asn :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_authKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_customerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_routeFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_tags :: Lens' NewPublicVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Types: newPublicVirtualInterfaceAllocation_vlan :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_addressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_amazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_asn :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_authKey :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_customerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_routeFilterPrefixes :: Lens' NewPublicVirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_tags :: Lens' NewPublicVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_virtualInterfaceName :: Lens' NewPublicVirtualInterface Text
+ Amazonka.DirectConnect.Types: newPublicVirtualInterface_vlan :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Types: newResourceTag :: ResourceTag
+ Amazonka.DirectConnect.Types: newRouteFilterPrefix :: RouteFilterPrefix
+ Amazonka.DirectConnect.Types: newRouterType :: RouterType
+ Amazonka.DirectConnect.Types: newTag :: Text -> Tag
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_addressFamily :: Lens' NewTransitVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_amazonAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_asn :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_authKey :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_customerAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_mtu :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_tags :: Lens' NewTransitVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterfaceAllocation_vlan :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_addressFamily :: Lens' NewTransitVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_amazonAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_asn :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_authKey :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_customerAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_directConnectGatewayId :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_enableSiteLink :: Lens' NewTransitVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_mtu :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_tags :: Lens' NewTransitVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_virtualInterfaceName :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: newTransitVirtualInterface_vlan :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: newVirtualGateway :: VirtualGateway
+ Amazonka.DirectConnect.Types: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.Types: newVirtualInterfaceTestHistory :: VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types: newtype AddressFamily
+ Amazonka.DirectConnect.Types: newtype BGPPeerState
+ Amazonka.DirectConnect.Types: newtype BGPStatus
+ Amazonka.DirectConnect.Types: newtype ConnectionState
+ Amazonka.DirectConnect.Types: newtype DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: newtype DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: newtype DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: newtype DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types: newtype DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: newtype GatewayType
+ Amazonka.DirectConnect.Types: newtype HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: newtype InterconnectState
+ Amazonka.DirectConnect.Types: newtype LagState
+ Amazonka.DirectConnect.Types: newtype LoaContentType
+ Amazonka.DirectConnect.Types: newtype NniPartnerType
+ Amazonka.DirectConnect.Types: newtype VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern AddressFamily_Ipv4 :: AddressFamily
+ Amazonka.DirectConnect.Types: pattern AddressFamily_Ipv6 :: AddressFamily
+ Amazonka.DirectConnect.Types: pattern BGPPeerState_Available :: BGPPeerState
+ Amazonka.DirectConnect.Types: pattern BGPPeerState_Deleted :: BGPPeerState
+ Amazonka.DirectConnect.Types: pattern BGPPeerState_Deleting :: BGPPeerState
+ Amazonka.DirectConnect.Types: pattern BGPPeerState_Pending :: BGPPeerState
+ Amazonka.DirectConnect.Types: pattern BGPPeerState_Verifying :: BGPPeerState
+ Amazonka.DirectConnect.Types: pattern BGPStatus_Down :: BGPStatus
+ Amazonka.DirectConnect.Types: pattern BGPStatus_Unknown :: BGPStatus
+ Amazonka.DirectConnect.Types: pattern BGPStatus_Up :: BGPStatus
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Available :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Deleted :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Deleting :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Down :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Ordering :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Pending :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Rejected :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Requested :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern ConnectionState_Unknown :: ConnectionState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationProposalState_Accepted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationProposalState_Deleted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationProposalState_Requested :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationState_Associated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationState_Associating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationState_Disassociated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationState_Disassociating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAssociationState_Updating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentState_Attached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentState_Attaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentState_Detached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentState_Detaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentType_PrivateVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayAttachmentType_TransitVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayState_Available :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayState_Deleted :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayState_Deleting :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: pattern DirectConnectGatewayState_Pending :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types: pattern GatewayType_TransitGateway :: GatewayType
+ Amazonka.DirectConnect.Types: pattern GatewayType_VirtualPrivateGateway :: GatewayType
+ Amazonka.DirectConnect.Types: pattern HasLogicalRedundancy_No :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: pattern HasLogicalRedundancy_Unknown :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: pattern HasLogicalRedundancy_Yes :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Available :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Deleted :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Deleting :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Down :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Pending :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Requested :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern InterconnectState_Unknown :: InterconnectState
+ Amazonka.DirectConnect.Types: pattern LagState_Available :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Deleted :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Deleting :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Down :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Pending :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Requested :: LagState
+ Amazonka.DirectConnect.Types: pattern LagState_Unknown :: LagState
+ Amazonka.DirectConnect.Types: pattern LoaContentType_Application_pdf :: LoaContentType
+ Amazonka.DirectConnect.Types: pattern NniPartnerType_NonPartner :: NniPartnerType
+ Amazonka.DirectConnect.Types: pattern NniPartnerType_V1 :: NniPartnerType
+ Amazonka.DirectConnect.Types: pattern NniPartnerType_V2 :: NniPartnerType
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Available :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Confirming :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Deleted :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Deleting :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Down :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Pending :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Rejected :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Unknown :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: pattern VirtualInterfaceState_Verifying :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types: resourceTag_resourceArn :: Lens' ResourceTag (Maybe Text)
+ Amazonka.DirectConnect.Types: resourceTag_tags :: Lens' ResourceTag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: routeFilterPrefix_cidr :: Lens' RouteFilterPrefix (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_platform :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_routerTypeIdentifier :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_software :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_vendor :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_xsltTemplateName :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: routerType_xsltTemplateNameForMacSec :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types: tag_key :: Lens' Tag Text
+ Amazonka.DirectConnect.Types: tag_value :: Lens' Tag (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualGateway_virtualGatewayId :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualGateway_virtualGatewayState :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_bgpPeers :: Lens' VirtualInterfaceTestHistory (Maybe [Text])
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_endTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_ownerAccount :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_startTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_status :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_testDurationInMinutes :: Lens' VirtualInterfaceTestHistory (Maybe Int)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_testId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterfaceTestHistory_virtualInterfaceId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.Types: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.Types: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Types: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.AddressFamily: AddressFamily' :: Text -> AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: [fromAddressFamily] :: AddressFamily -> Text
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance GHC.Read.Read Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: instance GHC.Show.Show Amazonka.DirectConnect.Types.AddressFamily.AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: newtype AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: pattern AddressFamily_Ipv4 :: AddressFamily
+ Amazonka.DirectConnect.Types.AddressFamily: pattern AddressFamily_Ipv6 :: AddressFamily
+ Amazonka.DirectConnect.Types.AssociatedGateway: AssociatedGateway' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe GatewayType -> AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: [$sel:id:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.AssociatedGateway: [$sel:ownerAccount:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.AssociatedGateway: [$sel:region:AssociatedGateway'] :: AssociatedGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.AssociatedGateway: [$sel:type':AssociatedGateway'] :: AssociatedGateway -> Maybe GatewayType
+ Amazonka.DirectConnect.Types.AssociatedGateway: associatedGateway_id :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.AssociatedGateway: associatedGateway_ownerAccount :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.AssociatedGateway: associatedGateway_region :: Lens' AssociatedGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.AssociatedGateway: associatedGateway_type :: Lens' AssociatedGateway (Maybe GatewayType)
+ Amazonka.DirectConnect.Types.AssociatedGateway: data AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance GHC.Read.Read Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: instance GHC.Show.Show Amazonka.DirectConnect.Types.AssociatedGateway.AssociatedGateway
+ Amazonka.DirectConnect.Types.AssociatedGateway: newAssociatedGateway :: AssociatedGateway
+ Amazonka.DirectConnect.Types.BGPPeer: BGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe BGPPeerState -> Maybe BGPStatus -> Maybe Text -> BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:addressFamily:BGPPeer'] :: BGPPeer -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:amazonAddress:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:asn:BGPPeer'] :: BGPPeer -> Maybe Int
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:authKey:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:awsDeviceV2:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:awsLogicalDeviceId:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:bgpPeerId:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:bgpPeerState:BGPPeer'] :: BGPPeer -> Maybe BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:bgpStatus:BGPPeer'] :: BGPPeer -> Maybe BGPStatus
+ Amazonka.DirectConnect.Types.BGPPeer: [$sel:customerAddress:BGPPeer'] :: BGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_addressFamily :: Lens' BGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_amazonAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_asn :: Lens' BGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_authKey :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_awsDeviceV2 :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_awsLogicalDeviceId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_bgpPeerId :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_bgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_bgpStatus :: Lens' BGPPeer (Maybe BGPStatus)
+ Amazonka.DirectConnect.Types.BGPPeer: bGPPeer_customerAddress :: Lens' BGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.BGPPeer: data BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.Types.BGPPeer.BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeer: newBGPPeer :: BGPPeer
+ Amazonka.DirectConnect.Types.BGPPeerState: BGPPeerState' :: Text -> BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: [fromBGPPeerState] :: BGPPeerState -> Text
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance GHC.Read.Read Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: instance GHC.Show.Show Amazonka.DirectConnect.Types.BGPPeerState.BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: newtype BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: pattern BGPPeerState_Available :: BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: pattern BGPPeerState_Deleted :: BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: pattern BGPPeerState_Deleting :: BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: pattern BGPPeerState_Pending :: BGPPeerState
+ Amazonka.DirectConnect.Types.BGPPeerState: pattern BGPPeerState_Verifying :: BGPPeerState
+ Amazonka.DirectConnect.Types.BGPStatus: BGPStatus' :: Text -> BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: [fromBGPStatus] :: BGPStatus -> Text
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance GHC.Read.Read Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: instance GHC.Show.Show Amazonka.DirectConnect.Types.BGPStatus.BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: newtype BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: pattern BGPStatus_Down :: BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: pattern BGPStatus_Unknown :: BGPStatus
+ Amazonka.DirectConnect.Types.BGPStatus: pattern BGPStatus_Up :: BGPStatus
+ Amazonka.DirectConnect.Types.Connection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.Types.Connection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.Types.Connection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.Connection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.Types.Connection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.Types.Connection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.Types.Connection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.Types.Connection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.Types.Connection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.Connection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.Types.Connection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.Types.Connection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types.Connection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Types.Connection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.Types.Connection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.Types.Connection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Types.Connection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.Types.Connection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.Connection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.Types.Connection: data Connection
+ Amazonka.DirectConnect.Types.Connection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance GHC.Read.Read Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: instance GHC.Show.Show Amazonka.DirectConnect.Types.Connection.Connection
+ Amazonka.DirectConnect.Types.Connection: newConnection :: Connection
+ Amazonka.DirectConnect.Types.ConnectionState: ConnectionState' :: Text -> ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: [fromConnectionState] :: ConnectionState -> Text
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance GHC.Read.Read Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: instance GHC.Show.Show Amazonka.DirectConnect.Types.ConnectionState.ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: newtype ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Available :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Deleted :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Deleting :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Down :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Ordering :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Pending :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Rejected :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Requested :: ConnectionState
+ Amazonka.DirectConnect.Types.ConnectionState: pattern ConnectionState_Unknown :: ConnectionState
+ Amazonka.DirectConnect.Types.Connections: Connections' :: Maybe [Connection] -> Connections
+ Amazonka.DirectConnect.Types.Connections: [$sel:connections:Connections'] :: Connections -> Maybe [Connection]
+ Amazonka.DirectConnect.Types.Connections: connections_connections :: Lens' Connections (Maybe [Connection])
+ Amazonka.DirectConnect.Types.Connections: data Connections
+ Amazonka.DirectConnect.Types.Connections: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance GHC.Read.Read Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: instance GHC.Show.Show Amazonka.DirectConnect.Types.Connections.Connections
+ Amazonka.DirectConnect.Types.Connections: newConnections :: Connections
+ Amazonka.DirectConnect.Types.CustomerAgreement: CustomerAgreement' :: Maybe Text -> Maybe Text -> CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: [$sel:agreementName:CustomerAgreement'] :: CustomerAgreement -> Maybe Text
+ Amazonka.DirectConnect.Types.CustomerAgreement: [$sel:status:CustomerAgreement'] :: CustomerAgreement -> Maybe Text
+ Amazonka.DirectConnect.Types.CustomerAgreement: customerAgreement_agreementName :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Types.CustomerAgreement: customerAgreement_status :: Lens' CustomerAgreement (Maybe Text)
+ Amazonka.DirectConnect.Types.CustomerAgreement: data CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance GHC.Read.Read Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: instance GHC.Show.Show Amazonka.DirectConnect.Types.CustomerAgreement.CustomerAgreement
+ Amazonka.DirectConnect.Types.CustomerAgreement: newCustomerAgreement :: CustomerAgreement
+ Amazonka.DirectConnect.Types.DirectConnectGateway: DirectConnectGateway' :: Maybe Integer -> Maybe Text -> Maybe Text -> Maybe DirectConnectGatewayState -> Maybe Text -> Maybe Text -> DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:amazonSideAsn:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Integer
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:directConnectGatewayId:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:directConnectGatewayName:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:directConnectGatewayState:DirectConnectGateway'] :: DirectConnectGateway -> Maybe DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:ownerAccount:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGateway: [$sel:stateChangeError:DirectConnectGateway'] :: DirectConnectGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGateway: data DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_amazonSideAsn :: Lens' DirectConnectGateway (Maybe Integer)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_directConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_directConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_directConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_ownerAccount :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: directConnectGateway_stateChangeError :: Lens' DirectConnectGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGateway.DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGateway: newDirectConnectGateway :: DirectConnectGateway
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: DirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe AssociatedGateway -> Maybe Text -> Maybe DirectConnectGatewayAssociationState -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:allowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:associatedGateway:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe AssociatedGateway
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:associationId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:associationState:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:directConnectGatewayId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:directConnectGatewayOwnerAccount:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:stateChangeError:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:virtualGatewayId:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:virtualGatewayOwnerAccount:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: [$sel:virtualGatewayRegion:DirectConnectGatewayAssociation'] :: DirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: data DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_associatedGateway :: Lens' DirectConnectGatewayAssociation (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_associationId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_associationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_directConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_stateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_virtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_virtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: directConnectGatewayAssociation_virtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation.DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation: newDirectConnectGatewayAssociation :: DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: DirectConnectGatewayAssociationProposal' :: Maybe AssociatedGateway -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe DirectConnectGatewayAssociationProposalState -> Maybe [RouteFilterPrefix] -> DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:associatedGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe AssociatedGateway
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayId:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:directConnectGatewayOwnerAccount:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:existingAllowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:proposalId:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:proposalState:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: [$sel:requestedAllowedPrefixesToDirectConnectGateway:DirectConnectGatewayAssociationProposal'] :: DirectConnectGatewayAssociationProposal -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: data DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_associatedGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe AssociatedGateway)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_directConnectGatewayId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_proposalId :: Lens' DirectConnectGatewayAssociationProposal (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_proposalState :: Lens' DirectConnectGatewayAssociationProposal (Maybe DirectConnectGatewayAssociationProposalState)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway :: Lens' DirectConnectGatewayAssociationProposal (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal.DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal: newDirectConnectGatewayAssociationProposal :: DirectConnectGatewayAssociationProposal
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: DirectConnectGatewayAssociationProposalState' :: Text -> DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: [fromDirectConnectGatewayAssociationProposalState] :: DirectConnectGatewayAssociationProposalState -> Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState.DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: newtype DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: pattern DirectConnectGatewayAssociationProposalState_Accepted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: pattern DirectConnectGatewayAssociationProposalState_Deleted :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState: pattern DirectConnectGatewayAssociationProposalState_Requested :: DirectConnectGatewayAssociationProposalState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: DirectConnectGatewayAssociationState' :: Text -> DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: [fromDirectConnectGatewayAssociationState] :: DirectConnectGatewayAssociationState -> Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState.DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: newtype DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: pattern DirectConnectGatewayAssociationState_Associated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: pattern DirectConnectGatewayAssociationState_Associating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: pattern DirectConnectGatewayAssociationState_Disassociated :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: pattern DirectConnectGatewayAssociationState_Disassociating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState: pattern DirectConnectGatewayAssociationState_Updating :: DirectConnectGatewayAssociationState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: DirectConnectGatewayAttachment' :: Maybe DirectConnectGatewayAttachmentState -> Maybe DirectConnectGatewayAttachmentType -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:attachmentState:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:attachmentType:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:directConnectGatewayId:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:stateChangeError:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:virtualInterfaceId:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:virtualInterfaceOwnerAccount:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: [$sel:virtualInterfaceRegion:DirectConnectGatewayAttachment'] :: DirectConnectGatewayAttachment -> Maybe Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: data DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_attachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_attachmentType :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentType)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_directConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_stateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_virtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_virtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: directConnectGatewayAttachment_virtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment.DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment: newDirectConnectGatewayAttachment :: DirectConnectGatewayAttachment
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: DirectConnectGatewayAttachmentState' :: Text -> DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: [fromDirectConnectGatewayAttachmentState] :: DirectConnectGatewayAttachmentState -> Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState.DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: newtype DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: pattern DirectConnectGatewayAttachmentState_Attached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: pattern DirectConnectGatewayAttachmentState_Attaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: pattern DirectConnectGatewayAttachmentState_Detached :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState: pattern DirectConnectGatewayAttachmentState_Detaching :: DirectConnectGatewayAttachmentState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: DirectConnectGatewayAttachmentType' :: Text -> DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: [fromDirectConnectGatewayAttachmentType] :: DirectConnectGatewayAttachmentType -> Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType.DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: newtype DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: pattern DirectConnectGatewayAttachmentType_PrivateVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType: pattern DirectConnectGatewayAttachmentType_TransitVirtualInterface :: DirectConnectGatewayAttachmentType
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: DirectConnectGatewayState' :: Text -> DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: [fromDirectConnectGatewayState] :: DirectConnectGatewayState -> Text
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance GHC.Read.Read Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: instance GHC.Show.Show Amazonka.DirectConnect.Types.DirectConnectGatewayState.DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: newtype DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: pattern DirectConnectGatewayState_Available :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: pattern DirectConnectGatewayState_Deleted :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: pattern DirectConnectGatewayState_Deleting :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.DirectConnectGatewayState: pattern DirectConnectGatewayState_Pending :: DirectConnectGatewayState
+ Amazonka.DirectConnect.Types.GatewayType: GatewayType' :: Text -> GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: [fromGatewayType] :: GatewayType -> Text
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance GHC.Read.Read Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: instance GHC.Show.Show Amazonka.DirectConnect.Types.GatewayType.GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: newtype GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: pattern GatewayType_TransitGateway :: GatewayType
+ Amazonka.DirectConnect.Types.GatewayType: pattern GatewayType_VirtualPrivateGateway :: GatewayType
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: HasLogicalRedundancy' :: Text -> HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: [fromHasLogicalRedundancy] :: HasLogicalRedundancy -> Text
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance GHC.Read.Read Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: instance GHC.Show.Show Amazonka.DirectConnect.Types.HasLogicalRedundancy.HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: newtype HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: pattern HasLogicalRedundancy_No :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: pattern HasLogicalRedundancy_Unknown :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.HasLogicalRedundancy: pattern HasLogicalRedundancy_Yes :: HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.Interconnect: Interconnect' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Text -> Maybe Text -> Maybe InterconnectState -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:awsDevice:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:awsDeviceV2:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:awsLogicalDeviceId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:bandwidth:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:hasLogicalRedundancy:Interconnect'] :: Interconnect -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:interconnectId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:interconnectName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:interconnectState:Interconnect'] :: Interconnect -> Maybe InterconnectState
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:jumboFrameCapable:Interconnect'] :: Interconnect -> Maybe Bool
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:lagId:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:loaIssueTime:Interconnect'] :: Interconnect -> Maybe POSIX
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:location:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:providerName:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:region:Interconnect'] :: Interconnect -> Maybe Text
+ Amazonka.DirectConnect.Types.Interconnect: [$sel:tags:Interconnect'] :: Interconnect -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.Interconnect: data Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance GHC.Read.Read Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: instance GHC.Show.Show Amazonka.DirectConnect.Types.Interconnect.Interconnect
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_awsDevice :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_awsDeviceV2 :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_awsLogicalDeviceId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_bandwidth :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_hasLogicalRedundancy :: Lens' Interconnect (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_interconnectId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_interconnectName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_interconnectState :: Lens' Interconnect (Maybe InterconnectState)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_jumboFrameCapable :: Lens' Interconnect (Maybe Bool)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_lagId :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_loaIssueTime :: Lens' Interconnect (Maybe UTCTime)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_location :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_providerName :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_region :: Lens' Interconnect (Maybe Text)
+ Amazonka.DirectConnect.Types.Interconnect: interconnect_tags :: Lens' Interconnect (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.Interconnect: newInterconnect :: Interconnect
+ Amazonka.DirectConnect.Types.InterconnectState: InterconnectState' :: Text -> InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: [fromInterconnectState] :: InterconnectState -> Text
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance GHC.Read.Read Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: instance GHC.Show.Show Amazonka.DirectConnect.Types.InterconnectState.InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: newtype InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Available :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Deleted :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Deleting :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Down :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Pending :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Requested :: InterconnectState
+ Amazonka.DirectConnect.Types.InterconnectState: pattern InterconnectState_Unknown :: InterconnectState
+ Amazonka.DirectConnect.Types.Lag: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect.Types.Lag: [$sel:allowsHostedConnections:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types.Lag: [$sel:awsDevice:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:awsDeviceV2:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:awsLogicalDeviceId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:connections:Lag'] :: Lag -> Maybe [Connection]
+ Amazonka.DirectConnect.Types.Lag: [$sel:connectionsBandwidth:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:encryptionMode:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:hasLogicalRedundancy:Lag'] :: Lag -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.Types.Lag: [$sel:jumboFrameCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types.Lag: [$sel:lagId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:lagName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:lagState:Lag'] :: Lag -> Maybe LagState
+ Amazonka.DirectConnect.Types.Lag: [$sel:location:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:macSecCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.Types.Lag: [$sel:macSecKeys:Lag'] :: Lag -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.Types.Lag: [$sel:minimumLinks:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.Types.Lag: [$sel:numberOfConnections:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.Types.Lag: [$sel:ownerAccount:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:providerName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:region:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.Types.Lag: [$sel:tags:Lag'] :: Lag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.Lag: data Lag
+ Amazonka.DirectConnect.Types.Lag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance GHC.Read.Read Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: instance GHC.Show.Show Amazonka.DirectConnect.Types.Lag.Lag
+ Amazonka.DirectConnect.Types.Lag: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types.Lag: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.Types.Lag: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.Types.Lag: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types.Lag: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.Types.Lag: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.Types.Lag: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.Types.Lag: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Types.Lag: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.Types.Lag: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.Types.Lag: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.Lag: newLag :: Lag
+ Amazonka.DirectConnect.Types.LagState: LagState' :: Text -> LagState
+ Amazonka.DirectConnect.Types.LagState: [fromLagState] :: LagState -> Text
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance GHC.Read.Read Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: instance GHC.Show.Show Amazonka.DirectConnect.Types.LagState.LagState
+ Amazonka.DirectConnect.Types.LagState: newtype LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Available :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Deleted :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Deleting :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Down :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Pending :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Requested :: LagState
+ Amazonka.DirectConnect.Types.LagState: pattern LagState_Unknown :: LagState
+ Amazonka.DirectConnect.Types.LoaContentType: LoaContentType' :: Text -> LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: [fromLoaContentType] :: LoaContentType -> Text
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance GHC.Read.Read Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: instance GHC.Show.Show Amazonka.DirectConnect.Types.LoaContentType.LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: newtype LoaContentType
+ Amazonka.DirectConnect.Types.LoaContentType: pattern LoaContentType_Application_pdf :: LoaContentType
+ Amazonka.DirectConnect.Types.Location: Location' :: Maybe [Text] -> Maybe [Text] -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Location
+ Amazonka.DirectConnect.Types.Location: [$sel:availableMacSecPortSpeeds:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types.Location: [$sel:availablePortSpeeds:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types.Location: [$sel:availableProviders:Location'] :: Location -> Maybe [Text]
+ Amazonka.DirectConnect.Types.Location: [$sel:locationCode:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types.Location: [$sel:locationName:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types.Location: [$sel:region:Location'] :: Location -> Maybe Text
+ Amazonka.DirectConnect.Types.Location: data Location
+ Amazonka.DirectConnect.Types.Location: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance GHC.Read.Read Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: instance GHC.Show.Show Amazonka.DirectConnect.Types.Location.Location
+ Amazonka.DirectConnect.Types.Location: location_availableMacSecPortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types.Location: location_availablePortSpeeds :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types.Location: location_availableProviders :: Lens' Location (Maybe [Text])
+ Amazonka.DirectConnect.Types.Location: location_locationCode :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types.Location: location_locationName :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types.Location: location_region :: Lens' Location (Maybe Text)
+ Amazonka.DirectConnect.Types.Location: newLocation :: Location
+ Amazonka.DirectConnect.Types.MacSecKey: MacSecKey' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: [$sel:ckn:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types.MacSecKey: [$sel:secretARN:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types.MacSecKey: [$sel:startOn:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types.MacSecKey: [$sel:state:MacSecKey'] :: MacSecKey -> Maybe Text
+ Amazonka.DirectConnect.Types.MacSecKey: data MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance GHC.Read.Read Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: instance GHC.Show.Show Amazonka.DirectConnect.Types.MacSecKey.MacSecKey
+ Amazonka.DirectConnect.Types.MacSecKey: macSecKey_ckn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types.MacSecKey: macSecKey_secretARN :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types.MacSecKey: macSecKey_startOn :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types.MacSecKey: macSecKey_state :: Lens' MacSecKey (Maybe Text)
+ Amazonka.DirectConnect.Types.MacSecKey: newMacSecKey :: MacSecKey
+ Amazonka.DirectConnect.Types.NewBGPPeer: NewBGPPeer' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: [$sel:addressFamily:NewBGPPeer'] :: NewBGPPeer -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewBGPPeer: [$sel:amazonAddress:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.NewBGPPeer: [$sel:asn:NewBGPPeer'] :: NewBGPPeer -> Maybe Int
+ Amazonka.DirectConnect.Types.NewBGPPeer: [$sel:authKey:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.NewBGPPeer: [$sel:customerAddress:NewBGPPeer'] :: NewBGPPeer -> Maybe Text
+ Amazonka.DirectConnect.Types.NewBGPPeer: data NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewBGPPeer.NewBGPPeer
+ Amazonka.DirectConnect.Types.NewBGPPeer: newBGPPeer_addressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewBGPPeer: newBGPPeer_amazonAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.NewBGPPeer: newBGPPeer_asn :: Lens' NewBGPPeer (Maybe Int)
+ Amazonka.DirectConnect.Types.NewBGPPeer: newBGPPeer_authKey :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.NewBGPPeer: newBGPPeer_customerAddress :: Lens' NewBGPPeer (Maybe Text)
+ Amazonka.DirectConnect.Types.NewBGPPeer: newNewBGPPeer :: NewBGPPeer
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: NewPrivateVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:addressFamily:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:amazonAddress:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:asn:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:authKey:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:customerAddress:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:directConnectGatewayId:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:enableSiteLink:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:mtu:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:tags:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:virtualGatewayId:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:virtualInterfaceName:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: [$sel:vlan:NewPrivateVirtualInterface'] :: NewPrivateVirtualInterface -> Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: data NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewPrivateVirtualInterface.NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newNewPrivateVirtualInterface :: Text -> Int -> Int -> NewPrivateVirtualInterface
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_addressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_amazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_asn :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_authKey :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_customerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_directConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_enableSiteLink :: Lens' NewPrivateVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_mtu :: Lens' NewPrivateVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_tags :: Lens' NewPrivateVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_virtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_virtualInterfaceName :: Lens' NewPrivateVirtualInterface Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterface: newPrivateVirtualInterface_vlan :: Lens' NewPrivateVirtualInterface Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: NewPrivateVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:addressFamily:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:amazonAddress:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:asn:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:authKey:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:customerAddress:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:mtu:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:tags:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:virtualInterfaceName:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: [$sel:vlan:NewPrivateVirtualInterfaceAllocation'] :: NewPrivateVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: data NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation.NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newNewPrivateVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPrivateVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_addressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_amazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_asn :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_authKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_customerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_mtu :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_tags :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation: newPrivateVirtualInterfaceAllocation_vlan :: Lens' NewPrivateVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: NewPublicVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:addressFamily:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:amazonAddress:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:asn:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:authKey:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:customerAddress:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:routeFilterPrefixes:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:tags:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:virtualInterfaceName:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: [$sel:vlan:NewPublicVirtualInterface'] :: NewPublicVirtualInterface -> Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: data NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewPublicVirtualInterface.NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newNewPublicVirtualInterface :: Text -> Int -> Int -> NewPublicVirtualInterface
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_addressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_amazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_asn :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_authKey :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_customerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_routeFilterPrefixes :: Lens' NewPublicVirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_tags :: Lens' NewPublicVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_virtualInterfaceName :: Lens' NewPublicVirtualInterface Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterface: newPublicVirtualInterface_vlan :: Lens' NewPublicVirtualInterface Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: NewPublicVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe (NonEmpty Tag) -> Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:addressFamily:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:amazonAddress:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:asn:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:authKey:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:customerAddress:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:routeFilterPrefixes:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:tags:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:virtualInterfaceName:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: [$sel:vlan:NewPublicVirtualInterfaceAllocation'] :: NewPublicVirtualInterfaceAllocation -> Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: data NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation.NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newNewPublicVirtualInterfaceAllocation :: Text -> Int -> Int -> NewPublicVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_addressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_amazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_asn :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_authKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_customerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_routeFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_tags :: Lens' NewPublicVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text
+ Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation: newPublicVirtualInterfaceAllocation_vlan :: Lens' NewPublicVirtualInterfaceAllocation Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: NewTransitVirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:addressFamily:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:amazonAddress:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:asn:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:authKey:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:customerAddress:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:directConnectGatewayId:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:enableSiteLink:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:mtu:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:tags:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:virtualInterfaceName:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: [$sel:vlan:NewTransitVirtualInterface'] :: NewTransitVirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: data NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewTransitVirtualInterface.NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newNewTransitVirtualInterface :: NewTransitVirtualInterface
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_addressFamily :: Lens' NewTransitVirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_amazonAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_asn :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_authKey :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_customerAddress :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_directConnectGatewayId :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_enableSiteLink :: Lens' NewTransitVirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_mtu :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_tags :: Lens' NewTransitVirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_virtualInterfaceName :: Lens' NewTransitVirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterface: newTransitVirtualInterface_vlan :: Lens' NewTransitVirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: NewTransitVirtualInterfaceAllocation' :: Maybe AddressFamily -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Int -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Int -> NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:addressFamily:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:amazonAddress:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:asn:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:authKey:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:customerAddress:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:mtu:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:tags:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:virtualInterfaceName:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Text
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: [$sel:vlan:NewTransitVirtualInterfaceAllocation'] :: NewTransitVirtualInterfaceAllocation -> Maybe Int
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: data NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance GHC.Read.Read Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: instance GHC.Show.Show Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation.NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newNewTransitVirtualInterfaceAllocation :: NewTransitVirtualInterfaceAllocation
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_addressFamily :: Lens' NewTransitVirtualInterfaceAllocation (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_amazonAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_asn :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_authKey :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_customerAddress :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_mtu :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_tags :: Lens' NewTransitVirtualInterfaceAllocation (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_virtualInterfaceName :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Text)
+ Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation: newTransitVirtualInterfaceAllocation_vlan :: Lens' NewTransitVirtualInterfaceAllocation (Maybe Int)
+ Amazonka.DirectConnect.Types.NniPartnerType: NniPartnerType' :: Text -> NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: [fromNniPartnerType] :: NniPartnerType -> Text
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance GHC.Read.Read Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: instance GHC.Show.Show Amazonka.DirectConnect.Types.NniPartnerType.NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: newtype NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: pattern NniPartnerType_NonPartner :: NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: pattern NniPartnerType_V1 :: NniPartnerType
+ Amazonka.DirectConnect.Types.NniPartnerType: pattern NniPartnerType_V2 :: NniPartnerType
+ Amazonka.DirectConnect.Types.ResourceTag: ResourceTag' :: Maybe Text -> Maybe (NonEmpty Tag) -> ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: [$sel:resourceArn:ResourceTag'] :: ResourceTag -> Maybe Text
+ Amazonka.DirectConnect.Types.ResourceTag: [$sel:tags:ResourceTag'] :: ResourceTag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.ResourceTag: data ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance GHC.Read.Read Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: instance GHC.Show.Show Amazonka.DirectConnect.Types.ResourceTag.ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: newResourceTag :: ResourceTag
+ Amazonka.DirectConnect.Types.ResourceTag: resourceTag_resourceArn :: Lens' ResourceTag (Maybe Text)
+ Amazonka.DirectConnect.Types.ResourceTag: resourceTag_tags :: Lens' ResourceTag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: RouteFilterPrefix' :: Maybe Text -> RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: [$sel:cidr:RouteFilterPrefix'] :: RouteFilterPrefix -> Maybe Text
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: data RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance GHC.Read.Read Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: instance GHC.Show.Show Amazonka.DirectConnect.Types.RouteFilterPrefix.RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: newRouteFilterPrefix :: RouteFilterPrefix
+ Amazonka.DirectConnect.Types.RouteFilterPrefix: routeFilterPrefix_cidr :: Lens' RouteFilterPrefix (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: RouterType' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> RouterType
+ Amazonka.DirectConnect.Types.RouterType: [$sel:platform:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: [$sel:routerTypeIdentifier:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: [$sel:software:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: [$sel:vendor:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: [$sel:xsltTemplateName:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: [$sel:xsltTemplateNameForMacSec:RouterType'] :: RouterType -> Maybe Text
+ Amazonka.DirectConnect.Types.RouterType: data RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance GHC.Read.Read Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: instance GHC.Show.Show Amazonka.DirectConnect.Types.RouterType.RouterType
+ Amazonka.DirectConnect.Types.RouterType: newRouterType :: RouterType
+ Amazonka.DirectConnect.Types.RouterType: routerType_platform :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: routerType_routerTypeIdentifier :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: routerType_software :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: routerType_vendor :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: routerType_xsltTemplateName :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.RouterType: routerType_xsltTemplateNameForMacSec :: Lens' RouterType (Maybe Text)
+ Amazonka.DirectConnect.Types.Tag: Tag' :: Maybe Text -> Text -> Tag
+ Amazonka.DirectConnect.Types.Tag: [$sel:key:Tag'] :: Tag -> Text
+ Amazonka.DirectConnect.Types.Tag: [$sel:value:Tag'] :: Tag -> Maybe Text
+ Amazonka.DirectConnect.Types.Tag: data Tag
+ Amazonka.DirectConnect.Types.Tag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance GHC.Read.Read Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: instance GHC.Show.Show Amazonka.DirectConnect.Types.Tag.Tag
+ Amazonka.DirectConnect.Types.Tag: newTag :: Text -> Tag
+ Amazonka.DirectConnect.Types.Tag: tag_key :: Lens' Tag Text
+ Amazonka.DirectConnect.Types.Tag: tag_value :: Lens' Tag (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualGateway: VirtualGateway' :: Maybe Text -> Maybe Text -> VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: [$sel:virtualGatewayId:VirtualGateway'] :: VirtualGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualGateway: [$sel:virtualGatewayState:VirtualGateway'] :: VirtualGateway -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualGateway: data VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance GHC.Read.Read Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: instance GHC.Show.Show Amazonka.DirectConnect.Types.VirtualGateway.VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: newVirtualGateway :: VirtualGateway
+ Amazonka.DirectConnect.Types.VirtualGateway: virtualGateway_virtualGatewayId :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualGateway: virtualGateway_virtualGatewayState :: Lens' VirtualGateway (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterface: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.Types.VirtualInterface: data VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance GHC.Read.Read Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: instance GHC.Show.Show Amazonka.DirectConnect.Types.VirtualInterface.VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterface: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: VirtualInterfaceState' :: Text -> VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: [fromVirtualInterfaceState] :: VirtualInterfaceState -> Text
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.ByteString.ToByteString Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.Headers.ToHeader Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.Log.ToLog Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.Text.FromText Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.Text.ToText Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.XML.FromXML Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Amazonka.Data.XML.ToXML Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance GHC.Classes.Ord Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance GHC.Read.Read Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: instance GHC.Show.Show Amazonka.DirectConnect.Types.VirtualInterfaceState.VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: newtype VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Available :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Confirming :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Deleted :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Deleting :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Down :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Pending :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Rejected :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Unknown :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceState: pattern VirtualInterfaceState_Verifying :: VirtualInterfaceState
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: VirtualInterfaceTestHistory' :: Maybe [Text] -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:bgpPeers:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe [Text]
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:endTime:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe POSIX
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:ownerAccount:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:startTime:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe POSIX
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:status:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:testDurationInMinutes:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Int
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:testId:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: [$sel:virtualInterfaceId:VirtualInterfaceTestHistory'] :: VirtualInterfaceTestHistory -> Maybe Text
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: data VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance Control.DeepSeq.NFData Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance GHC.Classes.Eq Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance GHC.Generics.Generic Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance GHC.Read.Read Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: instance GHC.Show.Show Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory.VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: newVirtualInterfaceTestHistory :: VirtualInterfaceTestHistory
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_bgpPeers :: Lens' VirtualInterfaceTestHistory (Maybe [Text])
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_endTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_ownerAccount :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_startTime :: Lens' VirtualInterfaceTestHistory (Maybe UTCTime)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_status :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_testDurationInMinutes :: Lens' VirtualInterfaceTestHistory (Maybe Int)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_testId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory: virtualInterfaceTestHistory_virtualInterfaceId :: Lens' VirtualInterfaceTestHistory (Maybe Text)
+ Amazonka.DirectConnect.UntagResource: UntagResource' :: Text -> [Text] -> UntagResource
+ Amazonka.DirectConnect.UntagResource: UntagResourceResponse' :: Int -> UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: [$sel:httpStatus:UntagResourceResponse'] :: UntagResourceResponse -> Int
+ Amazonka.DirectConnect.UntagResource: [$sel:resourceArn:UntagResource'] :: UntagResource -> Text
+ Amazonka.DirectConnect.UntagResource: [$sel:tagKeys:UntagResource'] :: UntagResource -> [Text]
+ Amazonka.DirectConnect.UntagResource: data UntagResource
+ Amazonka.DirectConnect.UntagResource: data UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UntagResource.UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance GHC.Classes.Eq Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance GHC.Classes.Eq Amazonka.DirectConnect.UntagResource.UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: instance GHC.Generics.Generic Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance GHC.Generics.Generic Amazonka.DirectConnect.UntagResource.UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: instance GHC.Read.Read Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance GHC.Read.Read Amazonka.DirectConnect.UntagResource.UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: instance GHC.Show.Show Amazonka.DirectConnect.UntagResource.UntagResource
+ Amazonka.DirectConnect.UntagResource: instance GHC.Show.Show Amazonka.DirectConnect.UntagResource.UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: newUntagResource :: Text -> UntagResource
+ Amazonka.DirectConnect.UntagResource: newUntagResourceResponse :: Int -> UntagResourceResponse
+ Amazonka.DirectConnect.UntagResource: untagResourceResponse_httpStatus :: Lens' UntagResourceResponse Int
+ Amazonka.DirectConnect.UntagResource: untagResource_resourceArn :: Lens' UntagResource Text
+ Amazonka.DirectConnect.UntagResource: untagResource_tagKeys :: Lens' UntagResource [Text]
+ Amazonka.DirectConnect.UpdateConnection: Connection' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ConnectionState -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Maybe Int -> Connection
+ Amazonka.DirectConnect.UpdateConnection: UpdateConnection' :: Maybe Text -> Maybe Text -> Text -> UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: [$sel:awsDevice:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:awsDeviceV2:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:awsLogicalDeviceId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:bandwidth:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:connectionId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:connectionId:UpdateConnection'] :: UpdateConnection -> Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:connectionName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:connectionName:UpdateConnection'] :: UpdateConnection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:connectionState:Connection'] :: Connection -> Maybe ConnectionState
+ Amazonka.DirectConnect.UpdateConnection: [$sel:encryptionMode:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:encryptionMode:UpdateConnection'] :: UpdateConnection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:hasLogicalRedundancy:Connection'] :: Connection -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.UpdateConnection: [$sel:jumboFrameCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.UpdateConnection: [$sel:lagId:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:loaIssueTime:Connection'] :: Connection -> Maybe POSIX
+ Amazonka.DirectConnect.UpdateConnection: [$sel:location:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:macSecCapable:Connection'] :: Connection -> Maybe Bool
+ Amazonka.DirectConnect.UpdateConnection: [$sel:macSecKeys:Connection'] :: Connection -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.UpdateConnection: [$sel:ownerAccount:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:partnerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:portEncryptionStatus:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:providerName:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:region:Connection'] :: Connection -> Maybe Text
+ Amazonka.DirectConnect.UpdateConnection: [$sel:tags:Connection'] :: Connection -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.UpdateConnection: [$sel:vlan:Connection'] :: Connection -> Maybe Int
+ Amazonka.DirectConnect.UpdateConnection: connection_awsDevice :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_awsDeviceV2 :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_awsLogicalDeviceId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_bandwidth :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_connectionId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_connectionName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_connectionState :: Lens' Connection (Maybe ConnectionState)
+ Amazonka.DirectConnect.UpdateConnection: connection_encryptionMode :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_hasLogicalRedundancy :: Lens' Connection (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.UpdateConnection: connection_jumboFrameCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.UpdateConnection: connection_lagId :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_loaIssueTime :: Lens' Connection (Maybe UTCTime)
+ Amazonka.DirectConnect.UpdateConnection: connection_location :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_macSecCapable :: Lens' Connection (Maybe Bool)
+ Amazonka.DirectConnect.UpdateConnection: connection_macSecKeys :: Lens' Connection (Maybe [MacSecKey])
+ Amazonka.DirectConnect.UpdateConnection: connection_ownerAccount :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_partnerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_portEncryptionStatus :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_providerName :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_region :: Lens' Connection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: connection_tags :: Lens' Connection (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.UpdateConnection: connection_vlan :: Lens' Connection (Maybe Int)
+ Amazonka.DirectConnect.UpdateConnection: data Connection
+ Amazonka.DirectConnect.UpdateConnection: data UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance GHC.Read.Read Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: instance GHC.Show.Show Amazonka.DirectConnect.UpdateConnection.UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: newConnection :: Connection
+ Amazonka.DirectConnect.UpdateConnection: newUpdateConnection :: Text -> UpdateConnection
+ Amazonka.DirectConnect.UpdateConnection: updateConnection_connectionId :: Lens' UpdateConnection Text
+ Amazonka.DirectConnect.UpdateConnection: updateConnection_connectionName :: Lens' UpdateConnection (Maybe Text)
+ Amazonka.DirectConnect.UpdateConnection: updateConnection_encryptionMode :: Lens' UpdateConnection (Maybe Text)
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: UpdateDirectConnectGateway' :: Text -> Text -> UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: UpdateDirectConnectGatewayResponse' :: Maybe DirectConnectGateway -> Int -> UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: [$sel:directConnectGateway:UpdateDirectConnectGatewayResponse'] :: UpdateDirectConnectGatewayResponse -> Maybe DirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: [$sel:directConnectGatewayId:UpdateDirectConnectGateway'] :: UpdateDirectConnectGateway -> Text
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: [$sel:httpStatus:UpdateDirectConnectGatewayResponse'] :: UpdateDirectConnectGatewayResponse -> Int
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: [$sel:newDirectConnectGatewayName':UpdateDirectConnectGateway'] :: UpdateDirectConnectGateway -> Text
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: data UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: data UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Read.Read Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: instance GHC.Show.Show Amazonka.DirectConnect.UpdateDirectConnectGateway.UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: newUpdateDirectConnectGateway :: Text -> Text -> UpdateDirectConnectGateway
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: newUpdateDirectConnectGatewayResponse :: Int -> UpdateDirectConnectGatewayResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: updateDirectConnectGatewayResponse_directConnectGateway :: Lens' UpdateDirectConnectGatewayResponse (Maybe DirectConnectGateway)
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: updateDirectConnectGatewayResponse_httpStatus :: Lens' UpdateDirectConnectGatewayResponse Int
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: updateDirectConnectGateway_directConnectGatewayId :: Lens' UpdateDirectConnectGateway Text
+ Amazonka.DirectConnect.UpdateDirectConnectGateway: updateDirectConnectGateway_newDirectConnectGatewayName :: Lens' UpdateDirectConnectGateway Text
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: UpdateDirectConnectGatewayAssociation' :: Maybe [RouteFilterPrefix] -> Maybe Text -> Maybe [RouteFilterPrefix] -> UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: UpdateDirectConnectGatewayAssociationResponse' :: Maybe DirectConnectGatewayAssociation -> Int -> UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: [$sel:addAllowedPrefixesToDirectConnectGateway:UpdateDirectConnectGatewayAssociation'] :: UpdateDirectConnectGatewayAssociation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: [$sel:associationId:UpdateDirectConnectGatewayAssociation'] :: UpdateDirectConnectGatewayAssociation -> Maybe Text
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: [$sel:directConnectGatewayAssociation:UpdateDirectConnectGatewayAssociationResponse'] :: UpdateDirectConnectGatewayAssociationResponse -> Maybe DirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: [$sel:httpStatus:UpdateDirectConnectGatewayAssociationResponse'] :: UpdateDirectConnectGatewayAssociationResponse -> Int
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: [$sel:removeAllowedPrefixesToDirectConnectGateway:UpdateDirectConnectGatewayAssociation'] :: UpdateDirectConnectGatewayAssociation -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: data UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: data UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Read.Read Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: instance GHC.Show.Show Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation.UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: newUpdateDirectConnectGatewayAssociation :: UpdateDirectConnectGatewayAssociation
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: newUpdateDirectConnectGatewayAssociationResponse :: Int -> UpdateDirectConnectGatewayAssociationResponse
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens' UpdateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: updateDirectConnectGatewayAssociationResponse_httpStatus :: Lens' UpdateDirectConnectGatewayAssociationResponse Int
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens' UpdateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: updateDirectConnectGatewayAssociation_associationId :: Lens' UpdateDirectConnectGatewayAssociation (Maybe Text)
+ Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation: updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway :: Lens' UpdateDirectConnectGatewayAssociation (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.UpdateLag: Lag' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Connection] -> Maybe Text -> Maybe Text -> Maybe HasLogicalRedundancy -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe LagState -> Maybe Text -> Maybe Bool -> Maybe [MacSecKey] -> Maybe Int -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe (NonEmpty Tag) -> Lag
+ Amazonka.DirectConnect.UpdateLag: UpdateLag' :: Maybe Text -> Maybe Text -> Maybe Int -> Text -> UpdateLag
+ Amazonka.DirectConnect.UpdateLag: [$sel:allowsHostedConnections:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.UpdateLag: [$sel:awsDevice:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:awsDeviceV2:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:awsLogicalDeviceId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:connections:Lag'] :: Lag -> Maybe [Connection]
+ Amazonka.DirectConnect.UpdateLag: [$sel:connectionsBandwidth:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:encryptionMode:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:encryptionMode:UpdateLag'] :: UpdateLag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:hasLogicalRedundancy:Lag'] :: Lag -> Maybe HasLogicalRedundancy
+ Amazonka.DirectConnect.UpdateLag: [$sel:jumboFrameCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.UpdateLag: [$sel:lagId:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:lagId:UpdateLag'] :: UpdateLag -> Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:lagName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:lagName:UpdateLag'] :: UpdateLag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:lagState:Lag'] :: Lag -> Maybe LagState
+ Amazonka.DirectConnect.UpdateLag: [$sel:location:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:macSecCapable:Lag'] :: Lag -> Maybe Bool
+ Amazonka.DirectConnect.UpdateLag: [$sel:macSecKeys:Lag'] :: Lag -> Maybe [MacSecKey]
+ Amazonka.DirectConnect.UpdateLag: [$sel:minimumLinks:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.UpdateLag: [$sel:minimumLinks:UpdateLag'] :: UpdateLag -> Maybe Int
+ Amazonka.DirectConnect.UpdateLag: [$sel:numberOfConnections:Lag'] :: Lag -> Maybe Int
+ Amazonka.DirectConnect.UpdateLag: [$sel:ownerAccount:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:providerName:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:region:Lag'] :: Lag -> Maybe Text
+ Amazonka.DirectConnect.UpdateLag: [$sel:tags:Lag'] :: Lag -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.UpdateLag: data Lag
+ Amazonka.DirectConnect.UpdateLag: data UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance GHC.Read.Read Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: instance GHC.Show.Show Amazonka.DirectConnect.UpdateLag.UpdateLag
+ Amazonka.DirectConnect.UpdateLag: lag_allowsHostedConnections :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.UpdateLag: lag_awsDevice :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_awsDeviceV2 :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_awsLogicalDeviceId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_connections :: Lens' Lag (Maybe [Connection])
+ Amazonka.DirectConnect.UpdateLag: lag_connectionsBandwidth :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_encryptionMode :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_hasLogicalRedundancy :: Lens' Lag (Maybe HasLogicalRedundancy)
+ Amazonka.DirectConnect.UpdateLag: lag_jumboFrameCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.UpdateLag: lag_lagId :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_lagName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_lagState :: Lens' Lag (Maybe LagState)
+ Amazonka.DirectConnect.UpdateLag: lag_location :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_macSecCapable :: Lens' Lag (Maybe Bool)
+ Amazonka.DirectConnect.UpdateLag: lag_macSecKeys :: Lens' Lag (Maybe [MacSecKey])
+ Amazonka.DirectConnect.UpdateLag: lag_minimumLinks :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.UpdateLag: lag_numberOfConnections :: Lens' Lag (Maybe Int)
+ Amazonka.DirectConnect.UpdateLag: lag_ownerAccount :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_providerName :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_region :: Lens' Lag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: lag_tags :: Lens' Lag (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.UpdateLag: newLag :: Lag
+ Amazonka.DirectConnect.UpdateLag: newUpdateLag :: Text -> UpdateLag
+ Amazonka.DirectConnect.UpdateLag: updateLag_encryptionMode :: Lens' UpdateLag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: updateLag_lagId :: Lens' UpdateLag Text
+ Amazonka.DirectConnect.UpdateLag: updateLag_lagName :: Lens' UpdateLag (Maybe Text)
+ Amazonka.DirectConnect.UpdateLag: updateLag_minimumLinks :: Lens' UpdateLag (Maybe Int)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: UpdateVirtualInterfaceAttributes' :: Maybe Bool -> Maybe Int -> Maybe Text -> Text -> UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: VirtualInterface' :: Maybe AddressFamily -> Maybe Text -> Maybe Integer -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [BGPPeer] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> Maybe Text -> Maybe [RouteFilterPrefix] -> Maybe Bool -> Maybe (NonEmpty Tag) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe VirtualInterfaceState -> Maybe Text -> Maybe Int -> VirtualInterface
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:addressFamily:VirtualInterface'] :: VirtualInterface -> Maybe AddressFamily
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:amazonAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:amazonSideAsn:VirtualInterface'] :: VirtualInterface -> Maybe Integer
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:asn:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:authKey:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:awsDeviceV2:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:awsLogicalDeviceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:bgpPeers:VirtualInterface'] :: VirtualInterface -> Maybe [BGPPeer]
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:connectionId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:customerAddress:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:customerRouterConfig:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:directConnectGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:enableSiteLink:UpdateVirtualInterfaceAttributes'] :: UpdateVirtualInterfaceAttributes -> Maybe Bool
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:jumboFrameCapable:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:location:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:mtu:UpdateVirtualInterfaceAttributes'] :: UpdateVirtualInterfaceAttributes -> Maybe Int
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:mtu:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:ownerAccount:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:region:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:routeFilterPrefixes:VirtualInterface'] :: VirtualInterface -> Maybe [RouteFilterPrefix]
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:siteLinkEnabled:VirtualInterface'] :: VirtualInterface -> Maybe Bool
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:tags:VirtualInterface'] :: VirtualInterface -> Maybe (NonEmpty Tag)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualGatewayId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceId:UpdateVirtualInterfaceAttributes'] :: UpdateVirtualInterfaceAttributes -> Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceId:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceName:UpdateVirtualInterfaceAttributes'] :: UpdateVirtualInterfaceAttributes -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceName:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceState:VirtualInterface'] :: VirtualInterface -> Maybe VirtualInterfaceState
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:virtualInterfaceType:VirtualInterface'] :: VirtualInterface -> Maybe Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: [$sel:vlan:VirtualInterface'] :: VirtualInterface -> Maybe Int
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: data UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: data VirtualInterface
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Amazonka.Data.Headers.ToHeaders Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Amazonka.Data.Path.ToPath Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Amazonka.Data.Query.ToQuery Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Amazonka.Types.AWSRequest Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Control.DeepSeq.NFData Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance Data.Hashable.Class.Hashable Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance GHC.Classes.Eq Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance GHC.Generics.Generic Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance GHC.Read.Read Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: instance GHC.Show.Show Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes.UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: newUpdateVirtualInterfaceAttributes :: Text -> UpdateVirtualInterfaceAttributes
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: newVirtualInterface :: VirtualInterface
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: updateVirtualInterfaceAttributes_enableSiteLink :: Lens' UpdateVirtualInterfaceAttributes (Maybe Bool)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: updateVirtualInterfaceAttributes_mtu :: Lens' UpdateVirtualInterfaceAttributes (Maybe Int)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: updateVirtualInterfaceAttributes_virtualInterfaceId :: Lens' UpdateVirtualInterfaceAttributes Text
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: updateVirtualInterfaceAttributes_virtualInterfaceName :: Lens' UpdateVirtualInterfaceAttributes (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_addressFamily :: Lens' VirtualInterface (Maybe AddressFamily)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_amazonAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_amazonSideAsn :: Lens' VirtualInterface (Maybe Integer)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_asn :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_authKey :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_awsDeviceV2 :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_awsLogicalDeviceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_bgpPeers :: Lens' VirtualInterface (Maybe [BGPPeer])
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_connectionId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_customerAddress :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_customerRouterConfig :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_directConnectGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_jumboFrameCapable :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_location :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_mtu :: Lens' VirtualInterface (Maybe Int)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_ownerAccount :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_region :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_routeFilterPrefixes :: Lens' VirtualInterface (Maybe [RouteFilterPrefix])
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_siteLinkEnabled :: Lens' VirtualInterface (Maybe Bool)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_tags :: Lens' VirtualInterface (Maybe (NonEmpty Tag))
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_virtualGatewayId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_virtualInterfaceId :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_virtualInterfaceName :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_virtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_virtualInterfaceType :: Lens' VirtualInterface (Maybe Text)
+ Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes: virtualInterface_vlan :: Lens' VirtualInterface (Maybe Int)

Files

README.md view
@@ -7,9 +7,8 @@   ## Version--`1.6.1`-+ +`2.0` - Derived from API version @2012-10-25@ of the AWS service descriptions, licensed under Apache 2.0.  ## Description @@ -26,7 +25,7 @@ The provided lenses should be compatible with any of the major lens libraries [lens](http://hackage.haskell.org/package/lens) or [lens-family-core](http://hackage.haskell.org/package/lens-family-core). -See [Network.AWS.DirectConnect](http://hackage.haskell.org/package/amazonka-directconnect/docs/Network-AWS-DirectConnect.html)+See [Amazonka.DirectConnect](http://hackage.haskell.org/package/amazonka-directconnect/docs/Amazonka-DirectConnect.html) or [the AWS documentation](https://aws.amazon.com/documentation/) to get started.  
− Setup.hs
@@ -1,2 +0,0 @@-import           Distribution.Simple-main = defaultMain
amazonka-directconnect.cabal view
@@ -1,125 +1,185 @@-name:                  amazonka-directconnect-version:               1.6.1-synopsis:              Amazon Direct Connect SDK.-homepage:              https://github.com/brendanhay/amazonka-bug-reports:           https://github.com/brendanhay/amazonka/issues-license:               MPL-2.0-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright:             Copyright (c) 2013-2018 Brendan Hay-category:              Network, AWS, Cloud, Distributed Computing-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md fixture/*.yaml fixture/*.proto src/.gitkeep+cabal-version:      2.2+name:               amazonka-directconnect+version:            2.0+synopsis:           Amazon Direct Connect SDK.+homepage:           https://github.com/brendanhay/amazonka+bug-reports:        https://github.com/brendanhay/amazonka/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+amazonka@gmail.com>, Jack Kelly <jack@jackkelly.name>++copyright:          Copyright (c) 2013-2023 Brendan Hay+category:           AWS+build-type:         Simple+extra-source-files:+  fixture/*.proto+  fixture/*.yaml+  README.md+  src/.gitkeep+ description:-    The types from this library are intended to be used with-    <http://hackage.haskell.org/package/amazonka amazonka>, which provides-    mechanisms for specifying AuthN/AuthZ information, sending requests,-    and receiving responses.-    .-    Lenses are used for constructing and manipulating types,-    due to the depth of nesting of AWS types and transparency regarding-    de/serialisation into more palatable Haskell values.-    The provided lenses should be compatible with any of the major lens libraries-    such as <http://hackage.haskell.org/package/lens lens> or-    <http://hackage.haskell.org/package/lens-family-core lens-family-core>.-    .-    See "Network.AWS.DirectConnect" or <https://aws.amazon.com/documentation/ the AWS documentation>-    to get started.+  Derived from API version @2012-10-25@ of the AWS service descriptions, licensed under Apache 2.0.+  .+  The types from this library are intended to be used with <http://hackage.haskell.org/package/amazonka amazonka>,+  which provides mechanisms for specifying AuthN/AuthZ information, sending requests, and receiving responses.+  .+  It is recommended to use generic lenses or optics from packages such as <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify optional fields and deconstruct responses.+  .+  Generated lenses can be found in "Amazonka.DirectConnect.Lens" and are+  suitable for use with a lens package such as <http://hackage.haskell.org/package/lens lens> or <http://hackage.haskell.org/package/lens-family-core lens-family-core>.+  .+  See "Amazonka.DirectConnect" and the <https://aws.amazon.com/documentation/ AWS documentation> to get started.  source-repository head-    type:              git-    location:          git://github.com/brendanhay/amazonka.git-    subdir:            amazonka-directconnect+  type:     git+  location: git://github.com/brendanhay/amazonka.git+  subdir:   amazonka-directconnect  library-    default-language:  Haskell2010-    hs-source-dirs:    src gen--    ghc-options:-        -Wall-        -fwarn-incomplete-uni-patterns-        -fwarn-incomplete-record-updates-        -funbox-strict-fields--    exposed-modules:-          Network.AWS.DirectConnect-        , Network.AWS.DirectConnect.AllocateHostedConnection-        , Network.AWS.DirectConnect.AllocatePrivateVirtualInterface-        , Network.AWS.DirectConnect.AllocatePublicVirtualInterface-        , Network.AWS.DirectConnect.AssociateConnectionWithLag-        , Network.AWS.DirectConnect.AssociateHostedConnection-        , Network.AWS.DirectConnect.AssociateVirtualInterface-        , Network.AWS.DirectConnect.ConfirmConnection-        , Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface-        , Network.AWS.DirectConnect.ConfirmPublicVirtualInterface-        , Network.AWS.DirectConnect.CreateBGPPeer-        , Network.AWS.DirectConnect.CreateConnection-        , Network.AWS.DirectConnect.CreateDirectConnectGateway-        , Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation-        , Network.AWS.DirectConnect.CreateInterconnect-        , Network.AWS.DirectConnect.CreateLag-        , Network.AWS.DirectConnect.CreatePrivateVirtualInterface-        , Network.AWS.DirectConnect.CreatePublicVirtualInterface-        , Network.AWS.DirectConnect.DeleteBGPPeer-        , Network.AWS.DirectConnect.DeleteConnection-        , Network.AWS.DirectConnect.DeleteDirectConnectGateway-        , Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation-        , Network.AWS.DirectConnect.DeleteInterconnect-        , Network.AWS.DirectConnect.DeleteLag-        , Network.AWS.DirectConnect.DeleteVirtualInterface-        , Network.AWS.DirectConnect.DescribeConnections-        , Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations-        , Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments-        , Network.AWS.DirectConnect.DescribeDirectConnectGateways-        , Network.AWS.DirectConnect.DescribeHostedConnections-        , Network.AWS.DirectConnect.DescribeInterconnects-        , Network.AWS.DirectConnect.DescribeLags-        , Network.AWS.DirectConnect.DescribeLoa-        , Network.AWS.DirectConnect.DescribeLocations-        , Network.AWS.DirectConnect.DescribeTags-        , Network.AWS.DirectConnect.DescribeVirtualGateways-        , Network.AWS.DirectConnect.DescribeVirtualInterfaces-        , Network.AWS.DirectConnect.DisassociateConnectionFromLag-        , Network.AWS.DirectConnect.TagResource-        , Network.AWS.DirectConnect.Types-        , Network.AWS.DirectConnect.UntagResource-        , Network.AWS.DirectConnect.UpdateLag-        , Network.AWS.DirectConnect.Waiters+  default-language: Haskell2010+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields -    other-modules:-          Network.AWS.DirectConnect.Types.Product-        , Network.AWS.DirectConnect.Types.Sum+  exposed-modules:+    Amazonka.DirectConnect+    Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal+    Amazonka.DirectConnect.AllocateHostedConnection+    Amazonka.DirectConnect.AllocatePrivateVirtualInterface+    Amazonka.DirectConnect.AllocatePublicVirtualInterface+    Amazonka.DirectConnect.AllocateTransitVirtualInterface+    Amazonka.DirectConnect.AssociateConnectionWithLag+    Amazonka.DirectConnect.AssociateHostedConnection+    Amazonka.DirectConnect.AssociateMacSecKey+    Amazonka.DirectConnect.AssociateVirtualInterface+    Amazonka.DirectConnect.ConfirmConnection+    Amazonka.DirectConnect.ConfirmCustomerAgreement+    Amazonka.DirectConnect.ConfirmPrivateVirtualInterface+    Amazonka.DirectConnect.ConfirmPublicVirtualInterface+    Amazonka.DirectConnect.ConfirmTransitVirtualInterface+    Amazonka.DirectConnect.CreateBGPPeer+    Amazonka.DirectConnect.CreateConnection+    Amazonka.DirectConnect.CreateDirectConnectGateway+    Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation+    Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal+    Amazonka.DirectConnect.CreateInterconnect+    Amazonka.DirectConnect.CreateLag+    Amazonka.DirectConnect.CreatePrivateVirtualInterface+    Amazonka.DirectConnect.CreatePublicVirtualInterface+    Amazonka.DirectConnect.CreateTransitVirtualInterface+    Amazonka.DirectConnect.DeleteBGPPeer+    Amazonka.DirectConnect.DeleteConnection+    Amazonka.DirectConnect.DeleteDirectConnectGateway+    Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation+    Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal+    Amazonka.DirectConnect.DeleteInterconnect+    Amazonka.DirectConnect.DeleteLag+    Amazonka.DirectConnect.DeleteVirtualInterface+    Amazonka.DirectConnect.DescribeConnections+    Amazonka.DirectConnect.DescribeCustomerMetadata+    Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals+    Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations+    Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments+    Amazonka.DirectConnect.DescribeDirectConnectGateways+    Amazonka.DirectConnect.DescribeHostedConnections+    Amazonka.DirectConnect.DescribeInterconnects+    Amazonka.DirectConnect.DescribeLags+    Amazonka.DirectConnect.DescribeLoa+    Amazonka.DirectConnect.DescribeLocations+    Amazonka.DirectConnect.DescribeRouterConfiguration+    Amazonka.DirectConnect.DescribeTags+    Amazonka.DirectConnect.DescribeVirtualGateways+    Amazonka.DirectConnect.DescribeVirtualInterfaces+    Amazonka.DirectConnect.DisassociateConnectionFromLag+    Amazonka.DirectConnect.DisassociateMacSecKey+    Amazonka.DirectConnect.Lens+    Amazonka.DirectConnect.ListVirtualInterfaceTestHistory+    Amazonka.DirectConnect.StartBgpFailoverTest+    Amazonka.DirectConnect.StopBgpFailoverTest+    Amazonka.DirectConnect.TagResource+    Amazonka.DirectConnect.Types+    Amazonka.DirectConnect.Types.AddressFamily+    Amazonka.DirectConnect.Types.AssociatedGateway+    Amazonka.DirectConnect.Types.BGPPeer+    Amazonka.DirectConnect.Types.BGPPeerState+    Amazonka.DirectConnect.Types.BGPStatus+    Amazonka.DirectConnect.Types.Connection+    Amazonka.DirectConnect.Types.Connections+    Amazonka.DirectConnect.Types.ConnectionState+    Amazonka.DirectConnect.Types.CustomerAgreement+    Amazonka.DirectConnect.Types.DirectConnectGateway+    Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation+    Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal+    Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState+    Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState+    Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment+    Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState+    Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType+    Amazonka.DirectConnect.Types.DirectConnectGatewayState+    Amazonka.DirectConnect.Types.GatewayType+    Amazonka.DirectConnect.Types.HasLogicalRedundancy+    Amazonka.DirectConnect.Types.Interconnect+    Amazonka.DirectConnect.Types.InterconnectState+    Amazonka.DirectConnect.Types.Lag+    Amazonka.DirectConnect.Types.LagState+    Amazonka.DirectConnect.Types.LoaContentType+    Amazonka.DirectConnect.Types.Location+    Amazonka.DirectConnect.Types.MacSecKey+    Amazonka.DirectConnect.Types.NewBGPPeer+    Amazonka.DirectConnect.Types.NewPrivateVirtualInterface+    Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation+    Amazonka.DirectConnect.Types.NewPublicVirtualInterface+    Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation+    Amazonka.DirectConnect.Types.NewTransitVirtualInterface+    Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation+    Amazonka.DirectConnect.Types.NniPartnerType+    Amazonka.DirectConnect.Types.ResourceTag+    Amazonka.DirectConnect.Types.RouteFilterPrefix+    Amazonka.DirectConnect.Types.RouterType+    Amazonka.DirectConnect.Types.Tag+    Amazonka.DirectConnect.Types.VirtualGateway+    Amazonka.DirectConnect.Types.VirtualInterface+    Amazonka.DirectConnect.Types.VirtualInterfaceState+    Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory+    Amazonka.DirectConnect.UntagResource+    Amazonka.DirectConnect.UpdateConnection+    Amazonka.DirectConnect.UpdateDirectConnectGateway+    Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation+    Amazonka.DirectConnect.UpdateLag+    Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes+    Amazonka.DirectConnect.Waiters -    build-depends:-          amazonka-core == 1.6.1.*-        , base          >= 4.7     && < 5+  build-depends:+    , amazonka-core  >=2.0  && <2.1+    , base           >=4.12 && <5  test-suite amazonka-directconnect-test-    type:              exitcode-stdio-1.0-    default-language:  Haskell2010-    hs-source-dirs:    test-    main-is:           Main.hs--    ghc-options:       -Wall -threaded+  type:             exitcode-stdio-1.0+  default-language: Haskell2010+  hs-source-dirs:   test+  main-is:          Main.hs+  ghc-options:      -Wall -threaded -    -- This section is encoded by the template and any modules added by-    -- hand outside these namespaces will not correctly be added to the-    -- distribution package.-    other-modules:-          Test.AWS.DirectConnect-        , Test.AWS.Gen.DirectConnect-        , Test.AWS.DirectConnect.Internal+  -- This section is encoded by the template and any modules added by+  -- hand outside these namespaces will not correctly be added to the+  -- distribution package.+  other-modules:+    Test.Amazonka.DirectConnect+    Test.Amazonka.DirectConnect.Internal+    Test.Amazonka.Gen.DirectConnect -    build-depends:-          amazonka-core == 1.6.1.*-        , amazonka-test == 1.6.1.*-        , amazonka-directconnect-        , base-        , bytestring-        , tasty-        , tasty-hunit-        , text-        , time-        , unordered-containers+  build-depends:+    , amazonka-core           >=2.0 && <2.1+    , amazonka-directconnect+    , amazonka-test           >=2.0 && <2.1+    , base+    , bytestring+    , case-insensitive+    , tasty+    , tasty-hunit+    , text+    , time+    , unordered-containers
+ fixture/AcceptDirectConnectGatewayAssociationProposal.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/AcceptDirectConnectGatewayAssociationProposalResponse.proto view
fixture/AllocatePrivateVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/AllocatePublicVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/AllocateTransitVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/AllocateTransitVirtualInterfaceResponse.proto view
+ fixture/AssociateMacSecKey.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/AssociateMacSecKeyResponse.proto view
fixture/ConfirmConnection.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/ConfirmCustomerAgreement.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/ConfirmCustomerAgreementResponse.proto view
fixture/ConfirmPrivateVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/ConfirmPublicVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/ConfirmTransitVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/ConfirmTransitVirtualInterfaceResponse.proto view
fixture/CreateBGPPeer.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/CreateConnection.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/CreateDirectConnectGatewayAssociationProposal.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/CreateDirectConnectGatewayAssociationProposalResponse.proto view
fixture/CreateInterconnect.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/CreatePrivateVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/CreatePublicVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/CreateTransitVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/CreateTransitVirtualInterfaceResponse.proto view
fixture/DeleteBGPPeer.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DeleteConnection.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DeleteDirectConnectGatewayAssociationProposal.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DeleteDirectConnectGatewayAssociationProposalResponse.proto view
fixture/DeleteInterconnect.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DeleteVirtualInterface.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DescribeConnections.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DescribeCustomerMetadata.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DescribeCustomerMetadataResponse.proto view
+ fixture/DescribeDirectConnectGatewayAssociationProposals.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DescribeDirectConnectGatewayAssociationProposalsResponse.proto view
fixture/DescribeInterconnects.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DescribeLocations.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DescribeRouterConfiguration.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DescribeRouterConfigurationResponse.proto view
fixture/DescribeTags.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DescribeVirtualGateways.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/DescribeVirtualInterfaces.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DisassociateMacSecKey.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/DisassociateMacSecKeyResponse.proto view
+ fixture/ListVirtualInterfaceTestHistory.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/ListVirtualInterfaceTestHistoryResponse.proto view
+ fixture/StartBgpFailoverTest.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/StartBgpFailoverTestResponse.proto view
+ fixture/StopBgpFailoverTest.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/StopBgpFailoverTestResponse.proto view
fixture/TagResource.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
fixture/UntagResource.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/UpdateConnection.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/UpdateConnectionResponse.proto view
+ fixture/UpdateDirectConnectGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/UpdateDirectConnectGatewayAssociation.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/UpdateDirectConnectGatewayAssociationResponse.proto view
+ fixture/UpdateDirectConnectGatewayResponse.proto view
+ fixture/UpdateVirtualInterfaceAttributes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/directconnect/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  directconnect.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''
+ fixture/UpdateVirtualInterfaceAttributesResponse.proto view
+ gen/Amazonka/DirectConnect.hs view
@@ -0,0 +1,651 @@+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Amazonka.DirectConnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Derived from API version @2012-10-25@ of the AWS service descriptions, licensed under Apache 2.0.+--+-- Direct Connect links your internal network to an Direct Connect location+-- over a standard Ethernet fiber-optic cable. One end of the cable is+-- connected to your router, the other to an Direct Connect router. With+-- this connection in place, you can create virtual interfaces directly to+-- the Amazon Web Services Cloud (for example, to Amazon EC2 and Amazon S3)+-- and to Amazon VPC, bypassing Internet service providers in your network+-- path. A connection provides access to all Amazon Web Services Regions+-- except the China (Beijing) and (China) Ningxia Regions. Amazon Web+-- Services resources in the China Regions can only be accessed through+-- locations associated with those Regions.+module Amazonka.DirectConnect+  ( -- * Service Configuration+    defaultService,++    -- * Errors+    -- $errors++    -- ** DirectConnectClientException+    _DirectConnectClientException,++    -- ** DirectConnectServerException+    _DirectConnectServerException,++    -- ** DuplicateTagKeysException+    _DuplicateTagKeysException,++    -- ** TooManyTagsException+    _TooManyTagsException,++    -- * Waiters+    -- $waiters++    -- * Operations+    -- $operations++    -- ** AcceptDirectConnectGatewayAssociationProposal+    AcceptDirectConnectGatewayAssociationProposal (AcceptDirectConnectGatewayAssociationProposal'),+    newAcceptDirectConnectGatewayAssociationProposal,+    AcceptDirectConnectGatewayAssociationProposalResponse (AcceptDirectConnectGatewayAssociationProposalResponse'),+    newAcceptDirectConnectGatewayAssociationProposalResponse,++    -- ** AllocateHostedConnection+    AllocateHostedConnection (AllocateHostedConnection'),+    newAllocateHostedConnection,+    Connection (Connection'),+    newConnection,++    -- ** AllocatePrivateVirtualInterface+    AllocatePrivateVirtualInterface (AllocatePrivateVirtualInterface'),+    newAllocatePrivateVirtualInterface,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** AllocatePublicVirtualInterface+    AllocatePublicVirtualInterface (AllocatePublicVirtualInterface'),+    newAllocatePublicVirtualInterface,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** AllocateTransitVirtualInterface+    AllocateTransitVirtualInterface (AllocateTransitVirtualInterface'),+    newAllocateTransitVirtualInterface,+    AllocateTransitVirtualInterfaceResponse (AllocateTransitVirtualInterfaceResponse'),+    newAllocateTransitVirtualInterfaceResponse,++    -- ** AssociateConnectionWithLag+    AssociateConnectionWithLag (AssociateConnectionWithLag'),+    newAssociateConnectionWithLag,+    Connection (Connection'),+    newConnection,++    -- ** AssociateHostedConnection+    AssociateHostedConnection (AssociateHostedConnection'),+    newAssociateHostedConnection,+    Connection (Connection'),+    newConnection,++    -- ** AssociateMacSecKey+    AssociateMacSecKey (AssociateMacSecKey'),+    newAssociateMacSecKey,+    AssociateMacSecKeyResponse (AssociateMacSecKeyResponse'),+    newAssociateMacSecKeyResponse,++    -- ** AssociateVirtualInterface+    AssociateVirtualInterface (AssociateVirtualInterface'),+    newAssociateVirtualInterface,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** ConfirmConnection+    ConfirmConnection (ConfirmConnection'),+    newConfirmConnection,+    ConfirmConnectionResponse (ConfirmConnectionResponse'),+    newConfirmConnectionResponse,++    -- ** ConfirmCustomerAgreement+    ConfirmCustomerAgreement (ConfirmCustomerAgreement'),+    newConfirmCustomerAgreement,+    ConfirmCustomerAgreementResponse (ConfirmCustomerAgreementResponse'),+    newConfirmCustomerAgreementResponse,++    -- ** ConfirmPrivateVirtualInterface+    ConfirmPrivateVirtualInterface (ConfirmPrivateVirtualInterface'),+    newConfirmPrivateVirtualInterface,+    ConfirmPrivateVirtualInterfaceResponse (ConfirmPrivateVirtualInterfaceResponse'),+    newConfirmPrivateVirtualInterfaceResponse,++    -- ** ConfirmPublicVirtualInterface+    ConfirmPublicVirtualInterface (ConfirmPublicVirtualInterface'),+    newConfirmPublicVirtualInterface,+    ConfirmPublicVirtualInterfaceResponse (ConfirmPublicVirtualInterfaceResponse'),+    newConfirmPublicVirtualInterfaceResponse,++    -- ** ConfirmTransitVirtualInterface+    ConfirmTransitVirtualInterface (ConfirmTransitVirtualInterface'),+    newConfirmTransitVirtualInterface,+    ConfirmTransitVirtualInterfaceResponse (ConfirmTransitVirtualInterfaceResponse'),+    newConfirmTransitVirtualInterfaceResponse,++    -- ** CreateBGPPeer+    CreateBGPPeer (CreateBGPPeer'),+    newCreateBGPPeer,+    CreateBGPPeerResponse (CreateBGPPeerResponse'),+    newCreateBGPPeerResponse,++    -- ** CreateConnection+    CreateConnection (CreateConnection'),+    newCreateConnection,+    Connection (Connection'),+    newConnection,++    -- ** CreateDirectConnectGateway+    CreateDirectConnectGateway (CreateDirectConnectGateway'),+    newCreateDirectConnectGateway,+    CreateDirectConnectGatewayResponse (CreateDirectConnectGatewayResponse'),+    newCreateDirectConnectGatewayResponse,++    -- ** CreateDirectConnectGatewayAssociation+    CreateDirectConnectGatewayAssociation (CreateDirectConnectGatewayAssociation'),+    newCreateDirectConnectGatewayAssociation,+    CreateDirectConnectGatewayAssociationResponse (CreateDirectConnectGatewayAssociationResponse'),+    newCreateDirectConnectGatewayAssociationResponse,++    -- ** CreateDirectConnectGatewayAssociationProposal+    CreateDirectConnectGatewayAssociationProposal (CreateDirectConnectGatewayAssociationProposal'),+    newCreateDirectConnectGatewayAssociationProposal,+    CreateDirectConnectGatewayAssociationProposalResponse (CreateDirectConnectGatewayAssociationProposalResponse'),+    newCreateDirectConnectGatewayAssociationProposalResponse,++    -- ** CreateInterconnect+    CreateInterconnect (CreateInterconnect'),+    newCreateInterconnect,+    Interconnect (Interconnect'),+    newInterconnect,++    -- ** CreateLag+    CreateLag (CreateLag'),+    newCreateLag,+    Lag (Lag'),+    newLag,++    -- ** CreatePrivateVirtualInterface+    CreatePrivateVirtualInterface (CreatePrivateVirtualInterface'),+    newCreatePrivateVirtualInterface,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** CreatePublicVirtualInterface+    CreatePublicVirtualInterface (CreatePublicVirtualInterface'),+    newCreatePublicVirtualInterface,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** CreateTransitVirtualInterface+    CreateTransitVirtualInterface (CreateTransitVirtualInterface'),+    newCreateTransitVirtualInterface,+    CreateTransitVirtualInterfaceResponse (CreateTransitVirtualInterfaceResponse'),+    newCreateTransitVirtualInterfaceResponse,++    -- ** DeleteBGPPeer+    DeleteBGPPeer (DeleteBGPPeer'),+    newDeleteBGPPeer,+    DeleteBGPPeerResponse (DeleteBGPPeerResponse'),+    newDeleteBGPPeerResponse,++    -- ** DeleteConnection+    DeleteConnection (DeleteConnection'),+    newDeleteConnection,+    Connection (Connection'),+    newConnection,++    -- ** DeleteDirectConnectGateway+    DeleteDirectConnectGateway (DeleteDirectConnectGateway'),+    newDeleteDirectConnectGateway,+    DeleteDirectConnectGatewayResponse (DeleteDirectConnectGatewayResponse'),+    newDeleteDirectConnectGatewayResponse,++    -- ** DeleteDirectConnectGatewayAssociation+    DeleteDirectConnectGatewayAssociation (DeleteDirectConnectGatewayAssociation'),+    newDeleteDirectConnectGatewayAssociation,+    DeleteDirectConnectGatewayAssociationResponse (DeleteDirectConnectGatewayAssociationResponse'),+    newDeleteDirectConnectGatewayAssociationResponse,++    -- ** DeleteDirectConnectGatewayAssociationProposal+    DeleteDirectConnectGatewayAssociationProposal (DeleteDirectConnectGatewayAssociationProposal'),+    newDeleteDirectConnectGatewayAssociationProposal,+    DeleteDirectConnectGatewayAssociationProposalResponse (DeleteDirectConnectGatewayAssociationProposalResponse'),+    newDeleteDirectConnectGatewayAssociationProposalResponse,++    -- ** DeleteInterconnect+    DeleteInterconnect (DeleteInterconnect'),+    newDeleteInterconnect,+    DeleteInterconnectResponse (DeleteInterconnectResponse'),+    newDeleteInterconnectResponse,++    -- ** DeleteLag+    DeleteLag (DeleteLag'),+    newDeleteLag,+    Lag (Lag'),+    newLag,++    -- ** DeleteVirtualInterface+    DeleteVirtualInterface (DeleteVirtualInterface'),+    newDeleteVirtualInterface,+    DeleteVirtualInterfaceResponse (DeleteVirtualInterfaceResponse'),+    newDeleteVirtualInterfaceResponse,++    -- ** DescribeConnections+    DescribeConnections (DescribeConnections'),+    newDescribeConnections,+    Connections (Connections'),+    newConnections,++    -- ** DescribeCustomerMetadata+    DescribeCustomerMetadata (DescribeCustomerMetadata'),+    newDescribeCustomerMetadata,+    DescribeCustomerMetadataResponse (DescribeCustomerMetadataResponse'),+    newDescribeCustomerMetadataResponse,++    -- ** DescribeDirectConnectGatewayAssociationProposals+    DescribeDirectConnectGatewayAssociationProposals (DescribeDirectConnectGatewayAssociationProposals'),+    newDescribeDirectConnectGatewayAssociationProposals,+    DescribeDirectConnectGatewayAssociationProposalsResponse (DescribeDirectConnectGatewayAssociationProposalsResponse'),+    newDescribeDirectConnectGatewayAssociationProposalsResponse,++    -- ** DescribeDirectConnectGatewayAssociations (Paginated)+    DescribeDirectConnectGatewayAssociations (DescribeDirectConnectGatewayAssociations'),+    newDescribeDirectConnectGatewayAssociations,+    DescribeDirectConnectGatewayAssociationsResponse (DescribeDirectConnectGatewayAssociationsResponse'),+    newDescribeDirectConnectGatewayAssociationsResponse,++    -- ** DescribeDirectConnectGatewayAttachments (Paginated)+    DescribeDirectConnectGatewayAttachments (DescribeDirectConnectGatewayAttachments'),+    newDescribeDirectConnectGatewayAttachments,+    DescribeDirectConnectGatewayAttachmentsResponse (DescribeDirectConnectGatewayAttachmentsResponse'),+    newDescribeDirectConnectGatewayAttachmentsResponse,++    -- ** DescribeDirectConnectGateways (Paginated)+    DescribeDirectConnectGateways (DescribeDirectConnectGateways'),+    newDescribeDirectConnectGateways,+    DescribeDirectConnectGatewaysResponse (DescribeDirectConnectGatewaysResponse'),+    newDescribeDirectConnectGatewaysResponse,++    -- ** DescribeHostedConnections+    DescribeHostedConnections (DescribeHostedConnections'),+    newDescribeHostedConnections,+    Connections (Connections'),+    newConnections,++    -- ** DescribeInterconnects+    DescribeInterconnects (DescribeInterconnects'),+    newDescribeInterconnects,+    DescribeInterconnectsResponse (DescribeInterconnectsResponse'),+    newDescribeInterconnectsResponse,++    -- ** DescribeLags+    DescribeLags (DescribeLags'),+    newDescribeLags,+    DescribeLagsResponse (DescribeLagsResponse'),+    newDescribeLagsResponse,++    -- ** DescribeLoa+    DescribeLoa (DescribeLoa'),+    newDescribeLoa,+    DescribeLoaResponse (DescribeLoaResponse'),+    newDescribeLoaResponse,++    -- ** DescribeLocations+    DescribeLocations (DescribeLocations'),+    newDescribeLocations,+    DescribeLocationsResponse (DescribeLocationsResponse'),+    newDescribeLocationsResponse,++    -- ** DescribeRouterConfiguration+    DescribeRouterConfiguration (DescribeRouterConfiguration'),+    newDescribeRouterConfiguration,+    DescribeRouterConfigurationResponse (DescribeRouterConfigurationResponse'),+    newDescribeRouterConfigurationResponse,++    -- ** DescribeTags+    DescribeTags (DescribeTags'),+    newDescribeTags,+    DescribeTagsResponse (DescribeTagsResponse'),+    newDescribeTagsResponse,++    -- ** DescribeVirtualGateways+    DescribeVirtualGateways (DescribeVirtualGateways'),+    newDescribeVirtualGateways,+    DescribeVirtualGatewaysResponse (DescribeVirtualGatewaysResponse'),+    newDescribeVirtualGatewaysResponse,++    -- ** DescribeVirtualInterfaces+    DescribeVirtualInterfaces (DescribeVirtualInterfaces'),+    newDescribeVirtualInterfaces,+    DescribeVirtualInterfacesResponse (DescribeVirtualInterfacesResponse'),+    newDescribeVirtualInterfacesResponse,++    -- ** DisassociateConnectionFromLag+    DisassociateConnectionFromLag (DisassociateConnectionFromLag'),+    newDisassociateConnectionFromLag,+    Connection (Connection'),+    newConnection,++    -- ** DisassociateMacSecKey+    DisassociateMacSecKey (DisassociateMacSecKey'),+    newDisassociateMacSecKey,+    DisassociateMacSecKeyResponse (DisassociateMacSecKeyResponse'),+    newDisassociateMacSecKeyResponse,++    -- ** ListVirtualInterfaceTestHistory+    ListVirtualInterfaceTestHistory (ListVirtualInterfaceTestHistory'),+    newListVirtualInterfaceTestHistory,+    ListVirtualInterfaceTestHistoryResponse (ListVirtualInterfaceTestHistoryResponse'),+    newListVirtualInterfaceTestHistoryResponse,++    -- ** StartBgpFailoverTest+    StartBgpFailoverTest (StartBgpFailoverTest'),+    newStartBgpFailoverTest,+    StartBgpFailoverTestResponse (StartBgpFailoverTestResponse'),+    newStartBgpFailoverTestResponse,++    -- ** StopBgpFailoverTest+    StopBgpFailoverTest (StopBgpFailoverTest'),+    newStopBgpFailoverTest,+    StopBgpFailoverTestResponse (StopBgpFailoverTestResponse'),+    newStopBgpFailoverTestResponse,++    -- ** TagResource+    TagResource (TagResource'),+    newTagResource,+    TagResourceResponse (TagResourceResponse'),+    newTagResourceResponse,++    -- ** UntagResource+    UntagResource (UntagResource'),+    newUntagResource,+    UntagResourceResponse (UntagResourceResponse'),+    newUntagResourceResponse,++    -- ** UpdateConnection+    UpdateConnection (UpdateConnection'),+    newUpdateConnection,+    Connection (Connection'),+    newConnection,++    -- ** UpdateDirectConnectGateway+    UpdateDirectConnectGateway (UpdateDirectConnectGateway'),+    newUpdateDirectConnectGateway,+    UpdateDirectConnectGatewayResponse (UpdateDirectConnectGatewayResponse'),+    newUpdateDirectConnectGatewayResponse,++    -- ** UpdateDirectConnectGatewayAssociation+    UpdateDirectConnectGatewayAssociation (UpdateDirectConnectGatewayAssociation'),+    newUpdateDirectConnectGatewayAssociation,+    UpdateDirectConnectGatewayAssociationResponse (UpdateDirectConnectGatewayAssociationResponse'),+    newUpdateDirectConnectGatewayAssociationResponse,++    -- ** UpdateLag+    UpdateLag (UpdateLag'),+    newUpdateLag,+    Lag (Lag'),+    newLag,++    -- ** UpdateVirtualInterfaceAttributes+    UpdateVirtualInterfaceAttributes (UpdateVirtualInterfaceAttributes'),+    newUpdateVirtualInterfaceAttributes,+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- * Types++    -- ** AddressFamily+    AddressFamily (..),++    -- ** BGPPeerState+    BGPPeerState (..),++    -- ** BGPStatus+    BGPStatus (..),++    -- ** ConnectionState+    ConnectionState (..),++    -- ** DirectConnectGatewayAssociationProposalState+    DirectConnectGatewayAssociationProposalState (..),++    -- ** DirectConnectGatewayAssociationState+    DirectConnectGatewayAssociationState (..),++    -- ** DirectConnectGatewayAttachmentState+    DirectConnectGatewayAttachmentState (..),++    -- ** DirectConnectGatewayAttachmentType+    DirectConnectGatewayAttachmentType (..),++    -- ** DirectConnectGatewayState+    DirectConnectGatewayState (..),++    -- ** GatewayType+    GatewayType (..),++    -- ** HasLogicalRedundancy+    HasLogicalRedundancy (..),++    -- ** InterconnectState+    InterconnectState (..),++    -- ** LagState+    LagState (..),++    -- ** LoaContentType+    LoaContentType (..),++    -- ** NniPartnerType+    NniPartnerType (..),++    -- ** VirtualInterfaceState+    VirtualInterfaceState (..),++    -- ** AssociatedGateway+    AssociatedGateway (AssociatedGateway'),+    newAssociatedGateway,++    -- ** BGPPeer+    BGPPeer (BGPPeer'),+    newBGPPeer,++    -- ** Connection+    Connection (Connection'),+    newConnection,++    -- ** Connections+    Connections (Connections'),+    newConnections,++    -- ** CustomerAgreement+    CustomerAgreement (CustomerAgreement'),+    newCustomerAgreement,++    -- ** DirectConnectGateway+    DirectConnectGateway (DirectConnectGateway'),+    newDirectConnectGateway,++    -- ** DirectConnectGatewayAssociation+    DirectConnectGatewayAssociation (DirectConnectGatewayAssociation'),+    newDirectConnectGatewayAssociation,++    -- ** DirectConnectGatewayAssociationProposal+    DirectConnectGatewayAssociationProposal (DirectConnectGatewayAssociationProposal'),+    newDirectConnectGatewayAssociationProposal,++    -- ** DirectConnectGatewayAttachment+    DirectConnectGatewayAttachment (DirectConnectGatewayAttachment'),+    newDirectConnectGatewayAttachment,++    -- ** Interconnect+    Interconnect (Interconnect'),+    newInterconnect,++    -- ** Lag+    Lag (Lag'),+    newLag,++    -- ** Location+    Location (Location'),+    newLocation,++    -- ** MacSecKey+    MacSecKey (MacSecKey'),+    newMacSecKey,++    -- ** NewBGPPeer+    NewBGPPeer (NewBGPPeer'),+    newNewBGPPeer,++    -- ** NewPrivateVirtualInterface+    NewPrivateVirtualInterface (NewPrivateVirtualInterface'),+    newNewPrivateVirtualInterface,++    -- ** NewPrivateVirtualInterfaceAllocation+    NewPrivateVirtualInterfaceAllocation (NewPrivateVirtualInterfaceAllocation'),+    newNewPrivateVirtualInterfaceAllocation,++    -- ** NewPublicVirtualInterface+    NewPublicVirtualInterface (NewPublicVirtualInterface'),+    newNewPublicVirtualInterface,++    -- ** NewPublicVirtualInterfaceAllocation+    NewPublicVirtualInterfaceAllocation (NewPublicVirtualInterfaceAllocation'),+    newNewPublicVirtualInterfaceAllocation,++    -- ** NewTransitVirtualInterface+    NewTransitVirtualInterface (NewTransitVirtualInterface'),+    newNewTransitVirtualInterface,++    -- ** NewTransitVirtualInterfaceAllocation+    NewTransitVirtualInterfaceAllocation (NewTransitVirtualInterfaceAllocation'),+    newNewTransitVirtualInterfaceAllocation,++    -- ** ResourceTag+    ResourceTag (ResourceTag'),+    newResourceTag,++    -- ** RouteFilterPrefix+    RouteFilterPrefix (RouteFilterPrefix'),+    newRouteFilterPrefix,++    -- ** RouterType+    RouterType (RouterType'),+    newRouterType,++    -- ** Tag+    Tag (Tag'),+    newTag,++    -- ** VirtualGateway+    VirtualGateway (VirtualGateway'),+    newVirtualGateway,++    -- ** VirtualInterface+    VirtualInterface (VirtualInterface'),+    newVirtualInterface,++    -- ** VirtualInterfaceTestHistory+    VirtualInterfaceTestHistory (VirtualInterfaceTestHistory'),+    newVirtualInterfaceTestHistory,+  )+where++import Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.AllocateHostedConnection+import Amazonka.DirectConnect.AllocatePrivateVirtualInterface+import Amazonka.DirectConnect.AllocatePublicVirtualInterface+import Amazonka.DirectConnect.AllocateTransitVirtualInterface+import Amazonka.DirectConnect.AssociateConnectionWithLag+import Amazonka.DirectConnect.AssociateHostedConnection+import Amazonka.DirectConnect.AssociateMacSecKey+import Amazonka.DirectConnect.AssociateVirtualInterface+import Amazonka.DirectConnect.ConfirmConnection+import Amazonka.DirectConnect.ConfirmCustomerAgreement+import Amazonka.DirectConnect.ConfirmPrivateVirtualInterface+import Amazonka.DirectConnect.ConfirmPublicVirtualInterface+import Amazonka.DirectConnect.ConfirmTransitVirtualInterface+import Amazonka.DirectConnect.CreateBGPPeer+import Amazonka.DirectConnect.CreateConnection+import Amazonka.DirectConnect.CreateDirectConnectGateway+import Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation+import Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.CreateInterconnect+import Amazonka.DirectConnect.CreateLag+import Amazonka.DirectConnect.CreatePrivateVirtualInterface+import Amazonka.DirectConnect.CreatePublicVirtualInterface+import Amazonka.DirectConnect.CreateTransitVirtualInterface+import Amazonka.DirectConnect.DeleteBGPPeer+import Amazonka.DirectConnect.DeleteConnection+import Amazonka.DirectConnect.DeleteDirectConnectGateway+import Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation+import Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.DeleteInterconnect+import Amazonka.DirectConnect.DeleteLag+import Amazonka.DirectConnect.DeleteVirtualInterface+import Amazonka.DirectConnect.DescribeConnections+import Amazonka.DirectConnect.DescribeCustomerMetadata+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments+import Amazonka.DirectConnect.DescribeDirectConnectGateways+import Amazonka.DirectConnect.DescribeHostedConnections+import Amazonka.DirectConnect.DescribeInterconnects+import Amazonka.DirectConnect.DescribeLags+import Amazonka.DirectConnect.DescribeLoa+import Amazonka.DirectConnect.DescribeLocations+import Amazonka.DirectConnect.DescribeRouterConfiguration+import Amazonka.DirectConnect.DescribeTags+import Amazonka.DirectConnect.DescribeVirtualGateways+import Amazonka.DirectConnect.DescribeVirtualInterfaces+import Amazonka.DirectConnect.DisassociateConnectionFromLag+import Amazonka.DirectConnect.DisassociateMacSecKey+import Amazonka.DirectConnect.Lens+import Amazonka.DirectConnect.ListVirtualInterfaceTestHistory+import Amazonka.DirectConnect.StartBgpFailoverTest+import Amazonka.DirectConnect.StopBgpFailoverTest+import Amazonka.DirectConnect.TagResource+import Amazonka.DirectConnect.Types+import Amazonka.DirectConnect.UntagResource+import Amazonka.DirectConnect.UpdateConnection+import Amazonka.DirectConnect.UpdateDirectConnectGateway+import Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation+import Amazonka.DirectConnect.UpdateLag+import Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes+import Amazonka.DirectConnect.Waiters++-- $errors+-- Error matchers are designed for use with the functions provided by+-- <http://hackage.haskell.org/package/lens/docs/Control-Exception-Lens.html Control.Exception.Lens>.+-- This allows catching (and rethrowing) service specific errors returned+-- by 'DirectConnect'.++-- $operations+-- Some AWS operations return results that are incomplete and require subsequent+-- requests in order to obtain the entire result set. The process of sending+-- subsequent requests to continue where a previous request left off is called+-- pagination. For example, the 'ListObjects' operation of Amazon S3 returns up to+-- 1000 objects at a time, and you must send subsequent requests with the+-- appropriate Marker in order to retrieve the next page of results.+--+-- Operations that have an 'AWSPager' instance can transparently perform subsequent+-- requests, correctly setting Markers and other request facets to iterate through+-- the entire result set of a truncated API operation. Operations which support+-- this have an additional note in the documentation.+--+-- Many operations have the ability to filter results on the server side. See the+-- individual operation parameters for details.++-- $waiters+-- Waiters poll by repeatedly sending a request until some remote success condition+-- configured by the 'Wait' specification is fulfilled. The 'Wait' specification+-- determines how many attempts should be made, in addition to delay and retry strategies.
+ gen/Amazonka/DirectConnect/AcceptDirectConnectGatewayAssociationProposal.hs view
@@ -0,0 +1,282 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accepts a proposal request to attach a virtual private gateway or+-- transit gateway to a Direct Connect gateway.+module Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal+  ( -- * Creating a Request+    AcceptDirectConnectGatewayAssociationProposal (..),+    newAcceptDirectConnectGatewayAssociationProposal,++    -- * Request Lenses+    acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway,+    acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId,+    acceptDirectConnectGatewayAssociationProposal_proposalId,+    acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount,++    -- * Destructuring the Response+    AcceptDirectConnectGatewayAssociationProposalResponse (..),+    newAcceptDirectConnectGatewayAssociationProposalResponse,++    -- * Response Lenses+    acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation,+    acceptDirectConnectGatewayAssociationProposalResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAcceptDirectConnectGatewayAssociationProposal' smart constructor.+data AcceptDirectConnectGatewayAssociationProposal = AcceptDirectConnectGatewayAssociationProposal'+  { -- | Overrides the Amazon VPC prefixes advertised to the Direct Connect+    -- gateway.+    --+    -- For information about how to set the prefixes, see+    -- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+    -- in the /Direct Connect User Guide/.+    overrideAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Text,+    -- | The ID of the request proposal.+    proposalId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the virtual private+    -- gateway or transit gateway.+    associatedGatewayOwnerAccount :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AcceptDirectConnectGatewayAssociationProposal' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'overrideAllowedPrefixesToDirectConnectGateway', 'acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway' - Overrides the Amazon VPC prefixes advertised to the Direct Connect+-- gateway.+--+-- For information about how to set the prefixes, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+-- in the /Direct Connect User Guide/.+--+-- 'directConnectGatewayId', 'acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'proposalId', 'acceptDirectConnectGatewayAssociationProposal_proposalId' - The ID of the request proposal.+--+-- 'associatedGatewayOwnerAccount', 'acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount' - The ID of the Amazon Web Services account that owns the virtual private+-- gateway or transit gateway.+newAcceptDirectConnectGatewayAssociationProposal ::+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  -- | 'proposalId'+  Prelude.Text ->+  -- | 'associatedGatewayOwnerAccount'+  Prelude.Text ->+  AcceptDirectConnectGatewayAssociationProposal+newAcceptDirectConnectGatewayAssociationProposal+  pDirectConnectGatewayId_+  pProposalId_+  pAssociatedGatewayOwnerAccount_ =+    AcceptDirectConnectGatewayAssociationProposal'+      { overrideAllowedPrefixesToDirectConnectGateway =+          Prelude.Nothing,+        directConnectGatewayId =+          pDirectConnectGatewayId_,+        proposalId = pProposalId_,+        associatedGatewayOwnerAccount =+          pAssociatedGatewayOwnerAccount_+      }++-- | Overrides the Amazon VPC prefixes advertised to the Direct Connect+-- gateway.+--+-- For information about how to set the prefixes, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+-- in the /Direct Connect User Guide/.+acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposal (Prelude.Maybe [RouteFilterPrefix])+acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway = Lens.lens (\AcceptDirectConnectGatewayAssociationProposal' {overrideAllowedPrefixesToDirectConnectGateway} -> overrideAllowedPrefixesToDirectConnectGateway) (\s@AcceptDirectConnectGatewayAssociationProposal' {} a -> s {overrideAllowedPrefixesToDirectConnectGateway = a} :: AcceptDirectConnectGatewayAssociationProposal) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the Direct Connect gateway.+acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposal Prelude.Text+acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId = Lens.lens (\AcceptDirectConnectGatewayAssociationProposal' {directConnectGatewayId} -> directConnectGatewayId) (\s@AcceptDirectConnectGatewayAssociationProposal' {} a -> s {directConnectGatewayId = a} :: AcceptDirectConnectGatewayAssociationProposal)++-- | The ID of the request proposal.+acceptDirectConnectGatewayAssociationProposal_proposalId :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposal Prelude.Text+acceptDirectConnectGatewayAssociationProposal_proposalId = Lens.lens (\AcceptDirectConnectGatewayAssociationProposal' {proposalId} -> proposalId) (\s@AcceptDirectConnectGatewayAssociationProposal' {} a -> s {proposalId = a} :: AcceptDirectConnectGatewayAssociationProposal)++-- | The ID of the Amazon Web Services account that owns the virtual private+-- gateway or transit gateway.+acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposal Prelude.Text+acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount = Lens.lens (\AcceptDirectConnectGatewayAssociationProposal' {associatedGatewayOwnerAccount} -> associatedGatewayOwnerAccount) (\s@AcceptDirectConnectGatewayAssociationProposal' {} a -> s {associatedGatewayOwnerAccount = a} :: AcceptDirectConnectGatewayAssociationProposal)++instance+  Core.AWSRequest+    AcceptDirectConnectGatewayAssociationProposal+  where+  type+    AWSResponse+      AcceptDirectConnectGatewayAssociationProposal =+      AcceptDirectConnectGatewayAssociationProposalResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          AcceptDirectConnectGatewayAssociationProposalResponse'+            Prelude.<$> (x Data..?> "directConnectGatewayAssociation")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    AcceptDirectConnectGatewayAssociationProposal+  where+  hashWithSalt+    _salt+    AcceptDirectConnectGatewayAssociationProposal' {..} =+      _salt+        `Prelude.hashWithSalt` overrideAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` proposalId+        `Prelude.hashWithSalt` associatedGatewayOwnerAccount++instance+  Prelude.NFData+    AcceptDirectConnectGatewayAssociationProposal+  where+  rnf+    AcceptDirectConnectGatewayAssociationProposal' {..} =+      Prelude.rnf+        overrideAllowedPrefixesToDirectConnectGateway+        `Prelude.seq` Prelude.rnf directConnectGatewayId+        `Prelude.seq` Prelude.rnf proposalId+        `Prelude.seq` Prelude.rnf associatedGatewayOwnerAccount++instance+  Data.ToHeaders+    AcceptDirectConnectGatewayAssociationProposal+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AcceptDirectConnectGatewayAssociationProposal" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    AcceptDirectConnectGatewayAssociationProposal+  where+  toJSON+    AcceptDirectConnectGatewayAssociationProposal' {..} =+      Data.object+        ( Prelude.catMaybes+            [ ( "overrideAllowedPrefixesToDirectConnectGateway"+                  Data..=+              )+                Prelude.<$> overrideAllowedPrefixesToDirectConnectGateway,+              Prelude.Just+                ( "directConnectGatewayId"+                    Data..= directConnectGatewayId+                ),+              Prelude.Just ("proposalId" Data..= proposalId),+              Prelude.Just+                ( "associatedGatewayOwnerAccount"+                    Data..= associatedGatewayOwnerAccount+                )+            ]+        )++instance+  Data.ToPath+    AcceptDirectConnectGatewayAssociationProposal+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    AcceptDirectConnectGatewayAssociationProposal+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAcceptDirectConnectGatewayAssociationProposalResponse' smart constructor.+data AcceptDirectConnectGatewayAssociationProposalResponse = AcceptDirectConnectGatewayAssociationProposalResponse'+  { directConnectGatewayAssociation :: Prelude.Maybe DirectConnectGatewayAssociation,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AcceptDirectConnectGatewayAssociationProposalResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociation', 'acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation' - Undocumented member.+--+-- 'httpStatus', 'acceptDirectConnectGatewayAssociationProposalResponse_httpStatus' - The response's http status code.+newAcceptDirectConnectGatewayAssociationProposalResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  AcceptDirectConnectGatewayAssociationProposalResponse+newAcceptDirectConnectGatewayAssociationProposalResponse+  pHttpStatus_ =+    AcceptDirectConnectGatewayAssociationProposalResponse'+      { directConnectGatewayAssociation =+          Prelude.Nothing,+        httpStatus =+          pHttpStatus_+      }++-- | Undocumented member.+acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposalResponse (Prelude.Maybe DirectConnectGatewayAssociation)+acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation = Lens.lens (\AcceptDirectConnectGatewayAssociationProposalResponse' {directConnectGatewayAssociation} -> directConnectGatewayAssociation) (\s@AcceptDirectConnectGatewayAssociationProposalResponse' {} a -> s {directConnectGatewayAssociation = a} :: AcceptDirectConnectGatewayAssociationProposalResponse)++-- | The response's http status code.+acceptDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens.Lens' AcceptDirectConnectGatewayAssociationProposalResponse Prelude.Int+acceptDirectConnectGatewayAssociationProposalResponse_httpStatus = Lens.lens (\AcceptDirectConnectGatewayAssociationProposalResponse' {httpStatus} -> httpStatus) (\s@AcceptDirectConnectGatewayAssociationProposalResponse' {} a -> s {httpStatus = a} :: AcceptDirectConnectGatewayAssociationProposalResponse)++instance+  Prelude.NFData+    AcceptDirectConnectGatewayAssociationProposalResponse+  where+  rnf+    AcceptDirectConnectGatewayAssociationProposalResponse' {..} =+      Prelude.rnf directConnectGatewayAssociation+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/AllocateHostedConnection.hs view
@@ -0,0 +1,248 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AllocateHostedConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a hosted connection on the specified interconnect or a link+-- aggregation group (LAG) of interconnects.+--+-- Allocates a VLAN number and a specified amount of capacity (bandwidth)+-- for use by a hosted connection on the specified interconnect or LAG of+-- interconnects. Amazon Web Services polices the hosted connection for the+-- specified capacity and the Direct Connect Partner must also police the+-- hosted connection for the specified capacity.+--+-- Intended for use by Direct Connect Partners only.+module Amazonka.DirectConnect.AllocateHostedConnection+  ( -- * Creating a Request+    AllocateHostedConnection (..),+    newAllocateHostedConnection,++    -- * Request Lenses+    allocateHostedConnection_tags,+    allocateHostedConnection_connectionId,+    allocateHostedConnection_ownerAccount,+    allocateHostedConnection_bandwidth,+    allocateHostedConnection_connectionName,+    allocateHostedConnection_vlan,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAllocateHostedConnection' smart constructor.+data AllocateHostedConnection = AllocateHostedConnection'+  { -- | The tags associated with the connection.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The ID of the interconnect or LAG.+    connectionId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account ID of the customer for the+    -- connection.+    ownerAccount :: Prelude.Text,+    -- | The bandwidth of the connection. The possible values are 50Mbps,+    -- 100Mbps, 200Mbps, 300Mbps, 400Mbps, 500Mbps, 1Gbps, 2Gbps, 5Gbps, and+    -- 10Gbps. Note that only those Direct Connect Partners who have met+    -- specific requirements are allowed to create a 1Gbps, 2Gbps, 5Gbps or+    -- 10Gbps hosted connection.+    bandwidth :: Prelude.Text,+    -- | The name of the hosted connection.+    connectionName :: Prelude.Text,+    -- | The dedicated VLAN provisioned to the hosted connection.+    vlan :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AllocateHostedConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tags', 'allocateHostedConnection_tags' - The tags associated with the connection.+--+-- 'connectionId', 'allocateHostedConnection_connectionId' - The ID of the interconnect or LAG.+--+-- 'ownerAccount', 'allocateHostedConnection_ownerAccount' - The ID of the Amazon Web Services account ID of the customer for the+-- connection.+--+-- 'bandwidth', 'allocateHostedConnection_bandwidth' - The bandwidth of the connection. The possible values are 50Mbps,+-- 100Mbps, 200Mbps, 300Mbps, 400Mbps, 500Mbps, 1Gbps, 2Gbps, 5Gbps, and+-- 10Gbps. Note that only those Direct Connect Partners who have met+-- specific requirements are allowed to create a 1Gbps, 2Gbps, 5Gbps or+-- 10Gbps hosted connection.+--+-- 'connectionName', 'allocateHostedConnection_connectionName' - The name of the hosted connection.+--+-- 'vlan', 'allocateHostedConnection_vlan' - The dedicated VLAN provisioned to the hosted connection.+newAllocateHostedConnection ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'ownerAccount'+  Prelude.Text ->+  -- | 'bandwidth'+  Prelude.Text ->+  -- | 'connectionName'+  Prelude.Text ->+  -- | 'vlan'+  Prelude.Int ->+  AllocateHostedConnection+newAllocateHostedConnection+  pConnectionId_+  pOwnerAccount_+  pBandwidth_+  pConnectionName_+  pVlan_ =+    AllocateHostedConnection'+      { tags = Prelude.Nothing,+        connectionId = pConnectionId_,+        ownerAccount = pOwnerAccount_,+        bandwidth = pBandwidth_,+        connectionName = pConnectionName_,+        vlan = pVlan_+      }++-- | The tags associated with the connection.+allocateHostedConnection_tags :: Lens.Lens' AllocateHostedConnection (Prelude.Maybe (Prelude.NonEmpty Tag))+allocateHostedConnection_tags = Lens.lens (\AllocateHostedConnection' {tags} -> tags) (\s@AllocateHostedConnection' {} a -> s {tags = a} :: AllocateHostedConnection) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the interconnect or LAG.+allocateHostedConnection_connectionId :: Lens.Lens' AllocateHostedConnection Prelude.Text+allocateHostedConnection_connectionId = Lens.lens (\AllocateHostedConnection' {connectionId} -> connectionId) (\s@AllocateHostedConnection' {} a -> s {connectionId = a} :: AllocateHostedConnection)++-- | The ID of the Amazon Web Services account ID of the customer for the+-- connection.+allocateHostedConnection_ownerAccount :: Lens.Lens' AllocateHostedConnection Prelude.Text+allocateHostedConnection_ownerAccount = Lens.lens (\AllocateHostedConnection' {ownerAccount} -> ownerAccount) (\s@AllocateHostedConnection' {} a -> s {ownerAccount = a} :: AllocateHostedConnection)++-- | The bandwidth of the connection. The possible values are 50Mbps,+-- 100Mbps, 200Mbps, 300Mbps, 400Mbps, 500Mbps, 1Gbps, 2Gbps, 5Gbps, and+-- 10Gbps. Note that only those Direct Connect Partners who have met+-- specific requirements are allowed to create a 1Gbps, 2Gbps, 5Gbps or+-- 10Gbps hosted connection.+allocateHostedConnection_bandwidth :: Lens.Lens' AllocateHostedConnection Prelude.Text+allocateHostedConnection_bandwidth = Lens.lens (\AllocateHostedConnection' {bandwidth} -> bandwidth) (\s@AllocateHostedConnection' {} a -> s {bandwidth = a} :: AllocateHostedConnection)++-- | The name of the hosted connection.+allocateHostedConnection_connectionName :: Lens.Lens' AllocateHostedConnection Prelude.Text+allocateHostedConnection_connectionName = Lens.lens (\AllocateHostedConnection' {connectionName} -> connectionName) (\s@AllocateHostedConnection' {} a -> s {connectionName = a} :: AllocateHostedConnection)++-- | The dedicated VLAN provisioned to the hosted connection.+allocateHostedConnection_vlan :: Lens.Lens' AllocateHostedConnection Prelude.Int+allocateHostedConnection_vlan = Lens.lens (\AllocateHostedConnection' {vlan} -> vlan) (\s@AllocateHostedConnection' {} a -> s {vlan = a} :: AllocateHostedConnection)++instance Core.AWSRequest AllocateHostedConnection where+  type+    AWSResponse AllocateHostedConnection =+      Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable AllocateHostedConnection where+  hashWithSalt _salt AllocateHostedConnection' {..} =+    _salt+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` bandwidth+      `Prelude.hashWithSalt` connectionName+      `Prelude.hashWithSalt` vlan++instance Prelude.NFData AllocateHostedConnection where+  rnf AllocateHostedConnection' {..} =+    Prelude.rnf tags+      `Prelude.seq` Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf bandwidth+      `Prelude.seq` Prelude.rnf connectionName+      `Prelude.seq` Prelude.rnf vlan++instance Data.ToHeaders AllocateHostedConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AllocateHostedConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AllocateHostedConnection where+  toJSON AllocateHostedConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("ownerAccount" Data..= ownerAccount),+            Prelude.Just ("bandwidth" Data..= bandwidth),+            Prelude.Just+              ("connectionName" Data..= connectionName),+            Prelude.Just ("vlan" Data..= vlan)+          ]+      )++instance Data.ToPath AllocateHostedConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery AllocateHostedConnection where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/AllocatePrivateVirtualInterface.hs view
@@ -0,0 +1,213 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AllocatePrivateVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Provisions a private virtual interface to be owned by the specified+-- Amazon Web Services account.+--+-- Virtual interfaces created using this action must be confirmed by the+-- owner using ConfirmPrivateVirtualInterface. Until then, the virtual+-- interface is in the @Confirming@ state and is not available to handle+-- traffic.+module Amazonka.DirectConnect.AllocatePrivateVirtualInterface+  ( -- * Creating a Request+    AllocatePrivateVirtualInterface (..),+    newAllocatePrivateVirtualInterface,++    -- * Request Lenses+    allocatePrivateVirtualInterface_connectionId,+    allocatePrivateVirtualInterface_ownerAccount,+    allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAllocatePrivateVirtualInterface' smart constructor.+data AllocatePrivateVirtualInterface = AllocatePrivateVirtualInterface'+  { -- | The ID of the connection on which the private virtual interface is+    -- provisioned.+    connectionId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the virtual private+    -- interface.+    ownerAccount :: Prelude.Text,+    -- | Information about the private virtual interface.+    newPrivateVirtualInterfaceAllocation' :: NewPrivateVirtualInterfaceAllocation+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AllocatePrivateVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'allocatePrivateVirtualInterface_connectionId' - The ID of the connection on which the private virtual interface is+-- provisioned.+--+-- 'ownerAccount', 'allocatePrivateVirtualInterface_ownerAccount' - The ID of the Amazon Web Services account that owns the virtual private+-- interface.+--+-- 'newPrivateVirtualInterfaceAllocation'', 'allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation' - Information about the private virtual interface.+newAllocatePrivateVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'ownerAccount'+  Prelude.Text ->+  -- | 'newPrivateVirtualInterfaceAllocation''+  NewPrivateVirtualInterfaceAllocation ->+  AllocatePrivateVirtualInterface+newAllocatePrivateVirtualInterface+  pConnectionId_+  pOwnerAccount_+  pNewPrivateVirtualInterfaceAllocation_ =+    AllocatePrivateVirtualInterface'+      { connectionId =+          pConnectionId_,+        ownerAccount = pOwnerAccount_,+        newPrivateVirtualInterfaceAllocation' =+          pNewPrivateVirtualInterfaceAllocation_+      }++-- | The ID of the connection on which the private virtual interface is+-- provisioned.+allocatePrivateVirtualInterface_connectionId :: Lens.Lens' AllocatePrivateVirtualInterface Prelude.Text+allocatePrivateVirtualInterface_connectionId = Lens.lens (\AllocatePrivateVirtualInterface' {connectionId} -> connectionId) (\s@AllocatePrivateVirtualInterface' {} a -> s {connectionId = a} :: AllocatePrivateVirtualInterface)++-- | The ID of the Amazon Web Services account that owns the virtual private+-- interface.+allocatePrivateVirtualInterface_ownerAccount :: Lens.Lens' AllocatePrivateVirtualInterface Prelude.Text+allocatePrivateVirtualInterface_ownerAccount = Lens.lens (\AllocatePrivateVirtualInterface' {ownerAccount} -> ownerAccount) (\s@AllocatePrivateVirtualInterface' {} a -> s {ownerAccount = a} :: AllocatePrivateVirtualInterface)++-- | Information about the private virtual interface.+allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation :: Lens.Lens' AllocatePrivateVirtualInterface NewPrivateVirtualInterfaceAllocation+allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation = Lens.lens (\AllocatePrivateVirtualInterface' {newPrivateVirtualInterfaceAllocation'} -> newPrivateVirtualInterfaceAllocation') (\s@AllocatePrivateVirtualInterface' {} a -> s {newPrivateVirtualInterfaceAllocation' = a} :: AllocatePrivateVirtualInterface)++instance+  Core.AWSRequest+    AllocatePrivateVirtualInterface+  where+  type+    AWSResponse AllocatePrivateVirtualInterface =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    AllocatePrivateVirtualInterface+  where+  hashWithSalt+    _salt+    AllocatePrivateVirtualInterface' {..} =+      _salt+        `Prelude.hashWithSalt` connectionId+        `Prelude.hashWithSalt` ownerAccount+        `Prelude.hashWithSalt` newPrivateVirtualInterfaceAllocation'++instance+  Prelude.NFData+    AllocatePrivateVirtualInterface+  where+  rnf AllocatePrivateVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf newPrivateVirtualInterfaceAllocation'++instance+  Data.ToHeaders+    AllocatePrivateVirtualInterface+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AllocatePrivateVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AllocatePrivateVirtualInterface where+  toJSON AllocatePrivateVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("ownerAccount" Data..= ownerAccount),+            Prelude.Just+              ( "newPrivateVirtualInterfaceAllocation"+                  Data..= newPrivateVirtualInterfaceAllocation'+              )+          ]+      )++instance Data.ToPath AllocatePrivateVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery AllocatePrivateVirtualInterface where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/AllocatePublicVirtualInterface.hs view
@@ -0,0 +1,221 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AllocatePublicVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Provisions a public virtual interface to be owned by the specified+-- Amazon Web Services account.+--+-- The owner of a connection calls this function to provision a public+-- virtual interface to be owned by the specified Amazon Web Services+-- account.+--+-- Virtual interfaces created using this function must be confirmed by the+-- owner using ConfirmPublicVirtualInterface. Until this step has been+-- completed, the virtual interface is in the @confirming@ state and is not+-- available to handle traffic.+--+-- When creating an IPv6 public virtual interface, omit the Amazon address+-- and customer address. IPv6 addresses are automatically assigned from the+-- Amazon pool of IPv6 addresses; you cannot specify custom IPv6 addresses.+module Amazonka.DirectConnect.AllocatePublicVirtualInterface+  ( -- * Creating a Request+    AllocatePublicVirtualInterface (..),+    newAllocatePublicVirtualInterface,++    -- * Request Lenses+    allocatePublicVirtualInterface_connectionId,+    allocatePublicVirtualInterface_ownerAccount,+    allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAllocatePublicVirtualInterface' smart constructor.+data AllocatePublicVirtualInterface = AllocatePublicVirtualInterface'+  { -- | The ID of the connection on which the public virtual interface is+    -- provisioned.+    connectionId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the public virtual+    -- interface.+    ownerAccount :: Prelude.Text,+    -- | Information about the public virtual interface.+    newPublicVirtualInterfaceAllocation' :: NewPublicVirtualInterfaceAllocation+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AllocatePublicVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'allocatePublicVirtualInterface_connectionId' - The ID of the connection on which the public virtual interface is+-- provisioned.+--+-- 'ownerAccount', 'allocatePublicVirtualInterface_ownerAccount' - The ID of the Amazon Web Services account that owns the public virtual+-- interface.+--+-- 'newPublicVirtualInterfaceAllocation'', 'allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation' - Information about the public virtual interface.+newAllocatePublicVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'ownerAccount'+  Prelude.Text ->+  -- | 'newPublicVirtualInterfaceAllocation''+  NewPublicVirtualInterfaceAllocation ->+  AllocatePublicVirtualInterface+newAllocatePublicVirtualInterface+  pConnectionId_+  pOwnerAccount_+  pNewPublicVirtualInterfaceAllocation_ =+    AllocatePublicVirtualInterface'+      { connectionId =+          pConnectionId_,+        ownerAccount = pOwnerAccount_,+        newPublicVirtualInterfaceAllocation' =+          pNewPublicVirtualInterfaceAllocation_+      }++-- | The ID of the connection on which the public virtual interface is+-- provisioned.+allocatePublicVirtualInterface_connectionId :: Lens.Lens' AllocatePublicVirtualInterface Prelude.Text+allocatePublicVirtualInterface_connectionId = Lens.lens (\AllocatePublicVirtualInterface' {connectionId} -> connectionId) (\s@AllocatePublicVirtualInterface' {} a -> s {connectionId = a} :: AllocatePublicVirtualInterface)++-- | The ID of the Amazon Web Services account that owns the public virtual+-- interface.+allocatePublicVirtualInterface_ownerAccount :: Lens.Lens' AllocatePublicVirtualInterface Prelude.Text+allocatePublicVirtualInterface_ownerAccount = Lens.lens (\AllocatePublicVirtualInterface' {ownerAccount} -> ownerAccount) (\s@AllocatePublicVirtualInterface' {} a -> s {ownerAccount = a} :: AllocatePublicVirtualInterface)++-- | Information about the public virtual interface.+allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation :: Lens.Lens' AllocatePublicVirtualInterface NewPublicVirtualInterfaceAllocation+allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation = Lens.lens (\AllocatePublicVirtualInterface' {newPublicVirtualInterfaceAllocation'} -> newPublicVirtualInterfaceAllocation') (\s@AllocatePublicVirtualInterface' {} a -> s {newPublicVirtualInterfaceAllocation' = a} :: AllocatePublicVirtualInterface)++instance+  Core.AWSRequest+    AllocatePublicVirtualInterface+  where+  type+    AWSResponse AllocatePublicVirtualInterface =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    AllocatePublicVirtualInterface+  where+  hashWithSalt+    _salt+    AllocatePublicVirtualInterface' {..} =+      _salt+        `Prelude.hashWithSalt` connectionId+        `Prelude.hashWithSalt` ownerAccount+        `Prelude.hashWithSalt` newPublicVirtualInterfaceAllocation'++instance+  Prelude.NFData+    AllocatePublicVirtualInterface+  where+  rnf AllocatePublicVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf newPublicVirtualInterfaceAllocation'++instance+  Data.ToHeaders+    AllocatePublicVirtualInterface+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AllocatePublicVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AllocatePublicVirtualInterface where+  toJSON AllocatePublicVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("ownerAccount" Data..= ownerAccount),+            Prelude.Just+              ( "newPublicVirtualInterfaceAllocation"+                  Data..= newPublicVirtualInterfaceAllocation'+              )+          ]+      )++instance Data.ToPath AllocatePublicVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery AllocatePublicVirtualInterface where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/AllocateTransitVirtualInterface.hs view
@@ -0,0 +1,244 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AllocateTransitVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Provisions a transit virtual interface to be owned by the specified+-- Amazon Web Services account. Use this type of interface to connect a+-- transit gateway to your Direct Connect gateway.+--+-- The owner of a connection provisions a transit virtual interface to be+-- owned by the specified Amazon Web Services account.+--+-- After you create a transit virtual interface, it must be confirmed by+-- the owner using ConfirmTransitVirtualInterface. Until this step has been+-- completed, the transit virtual interface is in the @requested@ state and+-- is not available to handle traffic.+module Amazonka.DirectConnect.AllocateTransitVirtualInterface+  ( -- * Creating a Request+    AllocateTransitVirtualInterface (..),+    newAllocateTransitVirtualInterface,++    -- * Request Lenses+    allocateTransitVirtualInterface_connectionId,+    allocateTransitVirtualInterface_ownerAccount,+    allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation,++    -- * Destructuring the Response+    AllocateTransitVirtualInterfaceResponse (..),+    newAllocateTransitVirtualInterfaceResponse,++    -- * Response Lenses+    allocateTransitVirtualInterfaceResponse_virtualInterface,+    allocateTransitVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAllocateTransitVirtualInterface' smart constructor.+data AllocateTransitVirtualInterface = AllocateTransitVirtualInterface'+  { -- | The ID of the connection on which the transit virtual interface is+    -- provisioned.+    connectionId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the transit virtual+    -- interface.+    ownerAccount :: Prelude.Text,+    -- | Information about the transit virtual interface.+    newTransitVirtualInterfaceAllocation' :: NewTransitVirtualInterfaceAllocation+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AllocateTransitVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'allocateTransitVirtualInterface_connectionId' - The ID of the connection on which the transit virtual interface is+-- provisioned.+--+-- 'ownerAccount', 'allocateTransitVirtualInterface_ownerAccount' - The ID of the Amazon Web Services account that owns the transit virtual+-- interface.+--+-- 'newTransitVirtualInterfaceAllocation'', 'allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation' - Information about the transit virtual interface.+newAllocateTransitVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'ownerAccount'+  Prelude.Text ->+  -- | 'newTransitVirtualInterfaceAllocation''+  NewTransitVirtualInterfaceAllocation ->+  AllocateTransitVirtualInterface+newAllocateTransitVirtualInterface+  pConnectionId_+  pOwnerAccount_+  pNewTransitVirtualInterfaceAllocation_ =+    AllocateTransitVirtualInterface'+      { connectionId =+          pConnectionId_,+        ownerAccount = pOwnerAccount_,+        newTransitVirtualInterfaceAllocation' =+          pNewTransitVirtualInterfaceAllocation_+      }++-- | The ID of the connection on which the transit virtual interface is+-- provisioned.+allocateTransitVirtualInterface_connectionId :: Lens.Lens' AllocateTransitVirtualInterface Prelude.Text+allocateTransitVirtualInterface_connectionId = Lens.lens (\AllocateTransitVirtualInterface' {connectionId} -> connectionId) (\s@AllocateTransitVirtualInterface' {} a -> s {connectionId = a} :: AllocateTransitVirtualInterface)++-- | The ID of the Amazon Web Services account that owns the transit virtual+-- interface.+allocateTransitVirtualInterface_ownerAccount :: Lens.Lens' AllocateTransitVirtualInterface Prelude.Text+allocateTransitVirtualInterface_ownerAccount = Lens.lens (\AllocateTransitVirtualInterface' {ownerAccount} -> ownerAccount) (\s@AllocateTransitVirtualInterface' {} a -> s {ownerAccount = a} :: AllocateTransitVirtualInterface)++-- | Information about the transit virtual interface.+allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation :: Lens.Lens' AllocateTransitVirtualInterface NewTransitVirtualInterfaceAllocation+allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation = Lens.lens (\AllocateTransitVirtualInterface' {newTransitVirtualInterfaceAllocation'} -> newTransitVirtualInterfaceAllocation') (\s@AllocateTransitVirtualInterface' {} a -> s {newTransitVirtualInterfaceAllocation' = a} :: AllocateTransitVirtualInterface)++instance+  Core.AWSRequest+    AllocateTransitVirtualInterface+  where+  type+    AWSResponse AllocateTransitVirtualInterface =+      AllocateTransitVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          AllocateTransitVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterface")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    AllocateTransitVirtualInterface+  where+  hashWithSalt+    _salt+    AllocateTransitVirtualInterface' {..} =+      _salt+        `Prelude.hashWithSalt` connectionId+        `Prelude.hashWithSalt` ownerAccount+        `Prelude.hashWithSalt` newTransitVirtualInterfaceAllocation'++instance+  Prelude.NFData+    AllocateTransitVirtualInterface+  where+  rnf AllocateTransitVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf newTransitVirtualInterfaceAllocation'++instance+  Data.ToHeaders+    AllocateTransitVirtualInterface+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AllocateTransitVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AllocateTransitVirtualInterface where+  toJSON AllocateTransitVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("ownerAccount" Data..= ownerAccount),+            Prelude.Just+              ( "newTransitVirtualInterfaceAllocation"+                  Data..= newTransitVirtualInterfaceAllocation'+              )+          ]+      )++instance Data.ToPath AllocateTransitVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery AllocateTransitVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAllocateTransitVirtualInterfaceResponse' smart constructor.+data AllocateTransitVirtualInterfaceResponse = AllocateTransitVirtualInterfaceResponse'+  { virtualInterface :: Prelude.Maybe VirtualInterface,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AllocateTransitVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterface', 'allocateTransitVirtualInterfaceResponse_virtualInterface' - Undocumented member.+--+-- 'httpStatus', 'allocateTransitVirtualInterfaceResponse_httpStatus' - The response's http status code.+newAllocateTransitVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  AllocateTransitVirtualInterfaceResponse+newAllocateTransitVirtualInterfaceResponse+  pHttpStatus_ =+    AllocateTransitVirtualInterfaceResponse'+      { virtualInterface =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | Undocumented member.+allocateTransitVirtualInterfaceResponse_virtualInterface :: Lens.Lens' AllocateTransitVirtualInterfaceResponse (Prelude.Maybe VirtualInterface)+allocateTransitVirtualInterfaceResponse_virtualInterface = Lens.lens (\AllocateTransitVirtualInterfaceResponse' {virtualInterface} -> virtualInterface) (\s@AllocateTransitVirtualInterfaceResponse' {} a -> s {virtualInterface = a} :: AllocateTransitVirtualInterfaceResponse)++-- | The response's http status code.+allocateTransitVirtualInterfaceResponse_httpStatus :: Lens.Lens' AllocateTransitVirtualInterfaceResponse Prelude.Int+allocateTransitVirtualInterfaceResponse_httpStatus = Lens.lens (\AllocateTransitVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@AllocateTransitVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: AllocateTransitVirtualInterfaceResponse)++instance+  Prelude.NFData+    AllocateTransitVirtualInterfaceResponse+  where+  rnf AllocateTransitVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterface+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/AssociateConnectionWithLag.hs view
@@ -0,0 +1,179 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AssociateConnectionWithLag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Associates an existing connection with a link aggregation group (LAG).+-- The connection is interrupted and re-established as a member of the LAG+-- (connectivity to Amazon Web Services is interrupted). The connection+-- must be hosted on the same Direct Connect endpoint as the LAG, and its+-- bandwidth must match the bandwidth for the LAG. You can re-associate a+-- connection that\'s currently associated with a different LAG; however,+-- if removing the connection would cause the original LAG to fall below+-- its setting for minimum number of operational connections, the request+-- fails.+--+-- Any virtual interfaces that are directly associated with the connection+-- are automatically re-associated with the LAG. If the connection was+-- originally associated with a different LAG, the virtual interfaces+-- remain associated with the original LAG.+--+-- For interconnects, any hosted connections are automatically+-- re-associated with the LAG. If the interconnect was originally+-- associated with a different LAG, the hosted connections remain+-- associated with the original LAG.+module Amazonka.DirectConnect.AssociateConnectionWithLag+  ( -- * Creating a Request+    AssociateConnectionWithLag (..),+    newAssociateConnectionWithLag,++    -- * Request Lenses+    associateConnectionWithLag_connectionId,+    associateConnectionWithLag_lagId,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAssociateConnectionWithLag' smart constructor.+data AssociateConnectionWithLag = AssociateConnectionWithLag'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text,+    -- | The ID of the LAG with which to associate the connection.+    lagId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateConnectionWithLag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'associateConnectionWithLag_connectionId' - The ID of the connection.+--+-- 'lagId', 'associateConnectionWithLag_lagId' - The ID of the LAG with which to associate the connection.+newAssociateConnectionWithLag ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'lagId'+  Prelude.Text ->+  AssociateConnectionWithLag+newAssociateConnectionWithLag pConnectionId_ pLagId_ =+  AssociateConnectionWithLag'+    { connectionId =+        pConnectionId_,+      lagId = pLagId_+    }++-- | The ID of the connection.+associateConnectionWithLag_connectionId :: Lens.Lens' AssociateConnectionWithLag Prelude.Text+associateConnectionWithLag_connectionId = Lens.lens (\AssociateConnectionWithLag' {connectionId} -> connectionId) (\s@AssociateConnectionWithLag' {} a -> s {connectionId = a} :: AssociateConnectionWithLag)++-- | The ID of the LAG with which to associate the connection.+associateConnectionWithLag_lagId :: Lens.Lens' AssociateConnectionWithLag Prelude.Text+associateConnectionWithLag_lagId = Lens.lens (\AssociateConnectionWithLag' {lagId} -> lagId) (\s@AssociateConnectionWithLag' {} a -> s {lagId = a} :: AssociateConnectionWithLag)++instance Core.AWSRequest AssociateConnectionWithLag where+  type+    AWSResponse AssociateConnectionWithLag =+      Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable AssociateConnectionWithLag where+  hashWithSalt _salt AssociateConnectionWithLag' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` lagId++instance Prelude.NFData AssociateConnectionWithLag where+  rnf AssociateConnectionWithLag' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf lagId++instance Data.ToHeaders AssociateConnectionWithLag where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AssociateConnectionWithLag" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AssociateConnectionWithLag where+  toJSON AssociateConnectionWithLag' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("lagId" Data..= lagId)+          ]+      )++instance Data.ToPath AssociateConnectionWithLag where+  toPath = Prelude.const "/"++instance Data.ToQuery AssociateConnectionWithLag where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/AssociateHostedConnection.hs view
@@ -0,0 +1,171 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AssociateHostedConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Associates a hosted connection and its virtual interfaces with a link+-- aggregation group (LAG) or interconnect. If the target interconnect or+-- LAG has an existing hosted connection with a conflicting VLAN number or+-- IP address, the operation fails. This action temporarily interrupts the+-- hosted connection\'s connectivity to Amazon Web Services as it is being+-- migrated.+--+-- Intended for use by Direct Connect Partners only.+module Amazonka.DirectConnect.AssociateHostedConnection+  ( -- * Creating a Request+    AssociateHostedConnection (..),+    newAssociateHostedConnection,++    -- * Request Lenses+    associateHostedConnection_connectionId,+    associateHostedConnection_parentConnectionId,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAssociateHostedConnection' smart constructor.+data AssociateHostedConnection = AssociateHostedConnection'+  { -- | The ID of the hosted connection.+    connectionId :: Prelude.Text,+    -- | The ID of the interconnect or the LAG.+    parentConnectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateHostedConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'associateHostedConnection_connectionId' - The ID of the hosted connection.+--+-- 'parentConnectionId', 'associateHostedConnection_parentConnectionId' - The ID of the interconnect or the LAG.+newAssociateHostedConnection ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'parentConnectionId'+  Prelude.Text ->+  AssociateHostedConnection+newAssociateHostedConnection+  pConnectionId_+  pParentConnectionId_ =+    AssociateHostedConnection'+      { connectionId =+          pConnectionId_,+        parentConnectionId = pParentConnectionId_+      }++-- | The ID of the hosted connection.+associateHostedConnection_connectionId :: Lens.Lens' AssociateHostedConnection Prelude.Text+associateHostedConnection_connectionId = Lens.lens (\AssociateHostedConnection' {connectionId} -> connectionId) (\s@AssociateHostedConnection' {} a -> s {connectionId = a} :: AssociateHostedConnection)++-- | The ID of the interconnect or the LAG.+associateHostedConnection_parentConnectionId :: Lens.Lens' AssociateHostedConnection Prelude.Text+associateHostedConnection_parentConnectionId = Lens.lens (\AssociateHostedConnection' {parentConnectionId} -> parentConnectionId) (\s@AssociateHostedConnection' {} a -> s {parentConnectionId = a} :: AssociateHostedConnection)++instance Core.AWSRequest AssociateHostedConnection where+  type+    AWSResponse AssociateHostedConnection =+      Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable AssociateHostedConnection where+  hashWithSalt _salt AssociateHostedConnection' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` parentConnectionId++instance Prelude.NFData AssociateHostedConnection where+  rnf AssociateHostedConnection' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf parentConnectionId++instance Data.ToHeaders AssociateHostedConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AssociateHostedConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AssociateHostedConnection where+  toJSON AssociateHostedConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just+              ("parentConnectionId" Data..= parentConnectionId)+          ]+      )++instance Data.ToPath AssociateHostedConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery AssociateHostedConnection where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/AssociateMacSecKey.hs view
@@ -0,0 +1,320 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AssociateMacSecKey+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Associates a MAC Security (MACsec) Connection Key Name (CKN)\/+-- Connectivity Association Key (CAK) pair with an Direct Connect dedicated+-- connection.+--+-- You must supply either the @secretARN,@ or the CKN\/CAK (@ckn@ and+-- @cak@) pair in the request.+--+-- For information about MAC Security (MACsec) key considerations, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-key-consideration MACsec pre-shared CKN\/CAK key considerations>+-- in the /Direct Connect User Guide/.+module Amazonka.DirectConnect.AssociateMacSecKey+  ( -- * Creating a Request+    AssociateMacSecKey (..),+    newAssociateMacSecKey,++    -- * Request Lenses+    associateMacSecKey_cak,+    associateMacSecKey_ckn,+    associateMacSecKey_secretARN,+    associateMacSecKey_connectionId,++    -- * Destructuring the Response+    AssociateMacSecKeyResponse (..),+    newAssociateMacSecKeyResponse,++    -- * Response Lenses+    associateMacSecKeyResponse_connectionId,+    associateMacSecKeyResponse_macSecKeys,+    associateMacSecKeyResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAssociateMacSecKey' smart constructor.+data AssociateMacSecKey = AssociateMacSecKey'+  { -- | The MAC Security (MACsec) CAK to associate with the dedicated+    -- connection.+    --+    -- You can create the CKN\/CAK pair using an industry standard tool.+    --+    -- The valid values are 64 hexadecimal characters (0-9, A-E).+    --+    -- If you use this request parameter, you must use the @ckn@ request+    -- parameter and not use the @secretARN@ request parameter.+    cak :: Prelude.Maybe Prelude.Text,+    -- | The MAC Security (MACsec) CKN to associate with the dedicated+    -- connection.+    --+    -- You can create the CKN\/CAK pair using an industry standard tool.+    --+    -- The valid values are 64 hexadecimal characters (0-9, A-E).+    --+    -- If you use this request parameter, you must use the @cak@ request+    -- parameter and not use the @secretARN@ request parameter.+    ckn :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key+    -- to associate with the dedicated connection.+    --+    -- You can use DescribeConnections or DescribeLags to retrieve the MAC+    -- Security (MACsec) secret key.+    --+    -- If you use this request parameter, you do not use the @ckn@ and @cak@+    -- request parameters.+    secretARN :: Prelude.Maybe Prelude.Text,+    -- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+    -- (dxlag-xxxx).+    --+    -- You can use DescribeConnections or DescribeLags to retrieve connection+    -- ID.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateMacSecKey' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cak', 'associateMacSecKey_cak' - The MAC Security (MACsec) CAK to associate with the dedicated+-- connection.+--+-- You can create the CKN\/CAK pair using an industry standard tool.+--+-- The valid values are 64 hexadecimal characters (0-9, A-E).+--+-- If you use this request parameter, you must use the @ckn@ request+-- parameter and not use the @secretARN@ request parameter.+--+-- 'ckn', 'associateMacSecKey_ckn' - The MAC Security (MACsec) CKN to associate with the dedicated+-- connection.+--+-- You can create the CKN\/CAK pair using an industry standard tool.+--+-- The valid values are 64 hexadecimal characters (0-9, A-E).+--+-- If you use this request parameter, you must use the @cak@ request+-- parameter and not use the @secretARN@ request parameter.+--+-- 'secretARN', 'associateMacSecKey_secretARN' - The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key+-- to associate with the dedicated connection.+--+-- You can use DescribeConnections or DescribeLags to retrieve the MAC+-- Security (MACsec) secret key.+--+-- If you use this request parameter, you do not use the @ckn@ and @cak@+-- request parameters.+--+-- 'connectionId', 'associateMacSecKey_connectionId' - The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- You can use DescribeConnections or DescribeLags to retrieve connection+-- ID.+newAssociateMacSecKey ::+  -- | 'connectionId'+  Prelude.Text ->+  AssociateMacSecKey+newAssociateMacSecKey pConnectionId_ =+  AssociateMacSecKey'+    { cak = Prelude.Nothing,+      ckn = Prelude.Nothing,+      secretARN = Prelude.Nothing,+      connectionId = pConnectionId_+    }++-- | The MAC Security (MACsec) CAK to associate with the dedicated+-- connection.+--+-- You can create the CKN\/CAK pair using an industry standard tool.+--+-- The valid values are 64 hexadecimal characters (0-9, A-E).+--+-- If you use this request parameter, you must use the @ckn@ request+-- parameter and not use the @secretARN@ request parameter.+associateMacSecKey_cak :: Lens.Lens' AssociateMacSecKey (Prelude.Maybe Prelude.Text)+associateMacSecKey_cak = Lens.lens (\AssociateMacSecKey' {cak} -> cak) (\s@AssociateMacSecKey' {} a -> s {cak = a} :: AssociateMacSecKey)++-- | The MAC Security (MACsec) CKN to associate with the dedicated+-- connection.+--+-- You can create the CKN\/CAK pair using an industry standard tool.+--+-- The valid values are 64 hexadecimal characters (0-9, A-E).+--+-- If you use this request parameter, you must use the @cak@ request+-- parameter and not use the @secretARN@ request parameter.+associateMacSecKey_ckn :: Lens.Lens' AssociateMacSecKey (Prelude.Maybe Prelude.Text)+associateMacSecKey_ckn = Lens.lens (\AssociateMacSecKey' {ckn} -> ckn) (\s@AssociateMacSecKey' {} a -> s {ckn = a} :: AssociateMacSecKey)++-- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key+-- to associate with the dedicated connection.+--+-- You can use DescribeConnections or DescribeLags to retrieve the MAC+-- Security (MACsec) secret key.+--+-- If you use this request parameter, you do not use the @ckn@ and @cak@+-- request parameters.+associateMacSecKey_secretARN :: Lens.Lens' AssociateMacSecKey (Prelude.Maybe Prelude.Text)+associateMacSecKey_secretARN = Lens.lens (\AssociateMacSecKey' {secretARN} -> secretARN) (\s@AssociateMacSecKey' {} a -> s {secretARN = a} :: AssociateMacSecKey)++-- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- You can use DescribeConnections or DescribeLags to retrieve connection+-- ID.+associateMacSecKey_connectionId :: Lens.Lens' AssociateMacSecKey Prelude.Text+associateMacSecKey_connectionId = Lens.lens (\AssociateMacSecKey' {connectionId} -> connectionId) (\s@AssociateMacSecKey' {} a -> s {connectionId = a} :: AssociateMacSecKey)++instance Core.AWSRequest AssociateMacSecKey where+  type+    AWSResponse AssociateMacSecKey =+      AssociateMacSecKeyResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          AssociateMacSecKeyResponse'+            Prelude.<$> (x Data..?> "connectionId")+            Prelude.<*> (x Data..?> "macSecKeys" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable AssociateMacSecKey where+  hashWithSalt _salt AssociateMacSecKey' {..} =+    _salt+      `Prelude.hashWithSalt` cak+      `Prelude.hashWithSalt` ckn+      `Prelude.hashWithSalt` secretARN+      `Prelude.hashWithSalt` connectionId++instance Prelude.NFData AssociateMacSecKey where+  rnf AssociateMacSecKey' {..} =+    Prelude.rnf cak+      `Prelude.seq` Prelude.rnf ckn+      `Prelude.seq` Prelude.rnf secretARN+      `Prelude.seq` Prelude.rnf connectionId++instance Data.ToHeaders AssociateMacSecKey where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AssociateMacSecKey" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AssociateMacSecKey where+  toJSON AssociateMacSecKey' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("cak" Data..=) Prelude.<$> cak,+            ("ckn" Data..=) Prelude.<$> ckn,+            ("secretARN" Data..=) Prelude.<$> secretARN,+            Prelude.Just ("connectionId" Data..= connectionId)+          ]+      )++instance Data.ToPath AssociateMacSecKey where+  toPath = Prelude.const "/"++instance Data.ToQuery AssociateMacSecKey where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAssociateMacSecKeyResponse' smart constructor.+data AssociateMacSecKeyResponse = AssociateMacSecKeyResponse'+  { -- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+    -- (dxlag-xxxx).+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The MAC Security (MACsec) security keys associated with the dedicated+    -- connection.+    macSecKeys :: Prelude.Maybe [MacSecKey],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateMacSecKeyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'associateMacSecKeyResponse_connectionId' - The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- 'macSecKeys', 'associateMacSecKeyResponse_macSecKeys' - The MAC Security (MACsec) security keys associated with the dedicated+-- connection.+--+-- 'httpStatus', 'associateMacSecKeyResponse_httpStatus' - The response's http status code.+newAssociateMacSecKeyResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  AssociateMacSecKeyResponse+newAssociateMacSecKeyResponse pHttpStatus_ =+  AssociateMacSecKeyResponse'+    { connectionId =+        Prelude.Nothing,+      macSecKeys = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+associateMacSecKeyResponse_connectionId :: Lens.Lens' AssociateMacSecKeyResponse (Prelude.Maybe Prelude.Text)+associateMacSecKeyResponse_connectionId = Lens.lens (\AssociateMacSecKeyResponse' {connectionId} -> connectionId) (\s@AssociateMacSecKeyResponse' {} a -> s {connectionId = a} :: AssociateMacSecKeyResponse)++-- | The MAC Security (MACsec) security keys associated with the dedicated+-- connection.+associateMacSecKeyResponse_macSecKeys :: Lens.Lens' AssociateMacSecKeyResponse (Prelude.Maybe [MacSecKey])+associateMacSecKeyResponse_macSecKeys = Lens.lens (\AssociateMacSecKeyResponse' {macSecKeys} -> macSecKeys) (\s@AssociateMacSecKeyResponse' {} a -> s {macSecKeys = a} :: AssociateMacSecKeyResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+associateMacSecKeyResponse_httpStatus :: Lens.Lens' AssociateMacSecKeyResponse Prelude.Int+associateMacSecKeyResponse_httpStatus = Lens.lens (\AssociateMacSecKeyResponse' {httpStatus} -> httpStatus) (\s@AssociateMacSecKeyResponse' {} a -> s {httpStatus = a} :: AssociateMacSecKeyResponse)++instance Prelude.NFData AssociateMacSecKeyResponse where+  rnf AssociateMacSecKeyResponse' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf macSecKeys+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/AssociateVirtualInterface.hs view
@@ -0,0 +1,181 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.AssociateVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Associates a virtual interface with a specified link aggregation group+-- (LAG) or connection. Connectivity to Amazon Web Services is temporarily+-- interrupted as the virtual interface is being migrated. If the target+-- connection or LAG has an associated virtual interface with a conflicting+-- VLAN number or a conflicting IP address, the operation fails.+--+-- Virtual interfaces associated with a hosted connection cannot be+-- associated with a LAG; hosted connections must be migrated along with+-- their virtual interfaces using AssociateHostedConnection.+--+-- To reassociate a virtual interface to a new connection or LAG, the+-- requester must own either the virtual interface itself or the connection+-- to which the virtual interface is currently associated. Additionally,+-- the requester must own the connection or LAG for the association.+module Amazonka.DirectConnect.AssociateVirtualInterface+  ( -- * Creating a Request+    AssociateVirtualInterface (..),+    newAssociateVirtualInterface,++    -- * Request Lenses+    associateVirtualInterface_virtualInterfaceId,+    associateVirtualInterface_connectionId,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newAssociateVirtualInterface' smart constructor.+data AssociateVirtualInterface = AssociateVirtualInterface'+  { -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text,+    -- | The ID of the LAG or connection.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceId', 'associateVirtualInterface_virtualInterfaceId' - The ID of the virtual interface.+--+-- 'connectionId', 'associateVirtualInterface_connectionId' - The ID of the LAG or connection.+newAssociateVirtualInterface ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  -- | 'connectionId'+  Prelude.Text ->+  AssociateVirtualInterface+newAssociateVirtualInterface+  pVirtualInterfaceId_+  pConnectionId_ =+    AssociateVirtualInterface'+      { virtualInterfaceId =+          pVirtualInterfaceId_,+        connectionId = pConnectionId_+      }++-- | The ID of the virtual interface.+associateVirtualInterface_virtualInterfaceId :: Lens.Lens' AssociateVirtualInterface Prelude.Text+associateVirtualInterface_virtualInterfaceId = Lens.lens (\AssociateVirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@AssociateVirtualInterface' {} a -> s {virtualInterfaceId = a} :: AssociateVirtualInterface)++-- | The ID of the LAG or connection.+associateVirtualInterface_connectionId :: Lens.Lens' AssociateVirtualInterface Prelude.Text+associateVirtualInterface_connectionId = Lens.lens (\AssociateVirtualInterface' {connectionId} -> connectionId) (\s@AssociateVirtualInterface' {} a -> s {connectionId = a} :: AssociateVirtualInterface)++instance Core.AWSRequest AssociateVirtualInterface where+  type+    AWSResponse AssociateVirtualInterface =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable AssociateVirtualInterface where+  hashWithSalt _salt AssociateVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` virtualInterfaceId+      `Prelude.hashWithSalt` connectionId++instance Prelude.NFData AssociateVirtualInterface where+  rnf AssociateVirtualInterface' {..} =+    Prelude.rnf virtualInterfaceId+      `Prelude.seq` Prelude.rnf connectionId++instance Data.ToHeaders AssociateVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.AssociateVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON AssociateVirtualInterface where+  toJSON AssociateVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId),+            Prelude.Just ("connectionId" Data..= connectionId)+          ]+      )++instance Data.ToPath AssociateVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery AssociateVirtualInterface where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/ConfirmConnection.hs view
@@ -0,0 +1,251 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ConfirmConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Confirms the creation of the specified hosted connection on an+-- interconnect.+--+-- Upon creation, the hosted connection is initially in the @Ordering@+-- state, and remains in this state until the owner confirms creation of+-- the hosted connection.+module Amazonka.DirectConnect.ConfirmConnection+  ( -- * Creating a Request+    ConfirmConnection (..),+    newConfirmConnection,++    -- * Request Lenses+    confirmConnection_connectionId,++    -- * Destructuring the Response+    ConfirmConnectionResponse (..),+    newConfirmConnectionResponse,++    -- * Response Lenses+    confirmConnectionResponse_connectionState,+    confirmConnectionResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newConfirmConnection' smart constructor.+data ConfirmConnection = ConfirmConnection'+  { -- | The ID of the hosted connection.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'confirmConnection_connectionId' - The ID of the hosted connection.+newConfirmConnection ::+  -- | 'connectionId'+  Prelude.Text ->+  ConfirmConnection+newConfirmConnection pConnectionId_ =+  ConfirmConnection' {connectionId = pConnectionId_}++-- | The ID of the hosted connection.+confirmConnection_connectionId :: Lens.Lens' ConfirmConnection Prelude.Text+confirmConnection_connectionId = Lens.lens (\ConfirmConnection' {connectionId} -> connectionId) (\s@ConfirmConnection' {} a -> s {connectionId = a} :: ConfirmConnection)++instance Core.AWSRequest ConfirmConnection where+  type+    AWSResponse ConfirmConnection =+      ConfirmConnectionResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ConfirmConnectionResponse'+            Prelude.<$> (x Data..?> "connectionState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable ConfirmConnection where+  hashWithSalt _salt ConfirmConnection' {..} =+    _salt `Prelude.hashWithSalt` connectionId++instance Prelude.NFData ConfirmConnection where+  rnf ConfirmConnection' {..} = Prelude.rnf connectionId++instance Data.ToHeaders ConfirmConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ConfirmConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ConfirmConnection where+  toJSON ConfirmConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("connectionId" Data..= connectionId)]+      )++instance Data.ToPath ConfirmConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery ConfirmConnection where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newConfirmConnectionResponse' smart constructor.+data ConfirmConnectionResponse = ConfirmConnectionResponse'+  { -- | The state of the connection. The following are the possible values:+    --+    -- -   @ordering@: The initial state of a hosted connection provisioned on+    --     an interconnect. The connection stays in the ordering state until+    --     the owner of the hosted connection confirms or declines the+    --     connection order.+    --+    -- -   @requested@: The initial state of a standard connection. The+    --     connection stays in the requested state until the Letter of+    --     Authorization (LOA) is sent to the customer.+    --+    -- -   @pending@: The connection has been approved and is being+    --     initialized.+    --+    -- -   @available@: The network link is up and the connection is ready for+    --     use.+    --+    -- -   @down@: The network link is down.+    --+    -- -   @deleting@: The connection is being deleted.+    --+    -- -   @deleted@: The connection has been deleted.+    --+    -- -   @rejected@: A hosted connection in the @ordering@ state enters the+    --     @rejected@ state if it is deleted by the customer.+    --+    -- -   @unknown@: The state of the connection is not available.+    connectionState :: Prelude.Maybe ConnectionState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmConnectionResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionState', 'confirmConnectionResponse_connectionState' - The state of the connection. The following are the possible values:+--+-- -   @ordering@: The initial state of a hosted connection provisioned on+--     an interconnect. The connection stays in the ordering state until+--     the owner of the hosted connection confirms or declines the+--     connection order.+--+-- -   @requested@: The initial state of a standard connection. The+--     connection stays in the requested state until the Letter of+--     Authorization (LOA) is sent to the customer.+--+-- -   @pending@: The connection has been approved and is being+--     initialized.+--+-- -   @available@: The network link is up and the connection is ready for+--     use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The connection is being deleted.+--+-- -   @deleted@: The connection has been deleted.+--+-- -   @rejected@: A hosted connection in the @ordering@ state enters the+--     @rejected@ state if it is deleted by the customer.+--+-- -   @unknown@: The state of the connection is not available.+--+-- 'httpStatus', 'confirmConnectionResponse_httpStatus' - The response's http status code.+newConfirmConnectionResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ConfirmConnectionResponse+newConfirmConnectionResponse pHttpStatus_ =+  ConfirmConnectionResponse'+    { connectionState =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The state of the connection. The following are the possible values:+--+-- -   @ordering@: The initial state of a hosted connection provisioned on+--     an interconnect. The connection stays in the ordering state until+--     the owner of the hosted connection confirms or declines the+--     connection order.+--+-- -   @requested@: The initial state of a standard connection. The+--     connection stays in the requested state until the Letter of+--     Authorization (LOA) is sent to the customer.+--+-- -   @pending@: The connection has been approved and is being+--     initialized.+--+-- -   @available@: The network link is up and the connection is ready for+--     use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The connection is being deleted.+--+-- -   @deleted@: The connection has been deleted.+--+-- -   @rejected@: A hosted connection in the @ordering@ state enters the+--     @rejected@ state if it is deleted by the customer.+--+-- -   @unknown@: The state of the connection is not available.+confirmConnectionResponse_connectionState :: Lens.Lens' ConfirmConnectionResponse (Prelude.Maybe ConnectionState)+confirmConnectionResponse_connectionState = Lens.lens (\ConfirmConnectionResponse' {connectionState} -> connectionState) (\s@ConfirmConnectionResponse' {} a -> s {connectionState = a} :: ConfirmConnectionResponse)++-- | The response's http status code.+confirmConnectionResponse_httpStatus :: Lens.Lens' ConfirmConnectionResponse Prelude.Int+confirmConnectionResponse_httpStatus = Lens.lens (\ConfirmConnectionResponse' {httpStatus} -> httpStatus) (\s@ConfirmConnectionResponse' {} a -> s {httpStatus = a} :: ConfirmConnectionResponse)++instance Prelude.NFData ConfirmConnectionResponse where+  rnf ConfirmConnectionResponse' {..} =+    Prelude.rnf connectionState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/ConfirmCustomerAgreement.hs view
@@ -0,0 +1,179 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ConfirmCustomerAgreement+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- The confirmation of the terms of agreement when creating the+-- connection\/link aggregation group (LAG).+module Amazonka.DirectConnect.ConfirmCustomerAgreement+  ( -- * Creating a Request+    ConfirmCustomerAgreement (..),+    newConfirmCustomerAgreement,++    -- * Request Lenses+    confirmCustomerAgreement_agreementName,++    -- * Destructuring the Response+    ConfirmCustomerAgreementResponse (..),+    newConfirmCustomerAgreementResponse,++    -- * Response Lenses+    confirmCustomerAgreementResponse_status,+    confirmCustomerAgreementResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newConfirmCustomerAgreement' smart constructor.+data ConfirmCustomerAgreement = ConfirmCustomerAgreement'+  { -- | The name of the customer agreement.+    agreementName :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmCustomerAgreement' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'agreementName', 'confirmCustomerAgreement_agreementName' - The name of the customer agreement.+newConfirmCustomerAgreement ::+  ConfirmCustomerAgreement+newConfirmCustomerAgreement =+  ConfirmCustomerAgreement'+    { agreementName =+        Prelude.Nothing+    }++-- | The name of the customer agreement.+confirmCustomerAgreement_agreementName :: Lens.Lens' ConfirmCustomerAgreement (Prelude.Maybe Prelude.Text)+confirmCustomerAgreement_agreementName = Lens.lens (\ConfirmCustomerAgreement' {agreementName} -> agreementName) (\s@ConfirmCustomerAgreement' {} a -> s {agreementName = a} :: ConfirmCustomerAgreement)++instance Core.AWSRequest ConfirmCustomerAgreement where+  type+    AWSResponse ConfirmCustomerAgreement =+      ConfirmCustomerAgreementResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ConfirmCustomerAgreementResponse'+            Prelude.<$> (x Data..?> "status")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable ConfirmCustomerAgreement where+  hashWithSalt _salt ConfirmCustomerAgreement' {..} =+    _salt `Prelude.hashWithSalt` agreementName++instance Prelude.NFData ConfirmCustomerAgreement where+  rnf ConfirmCustomerAgreement' {..} =+    Prelude.rnf agreementName++instance Data.ToHeaders ConfirmCustomerAgreement where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ConfirmCustomerAgreement" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ConfirmCustomerAgreement where+  toJSON ConfirmCustomerAgreement' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("agreementName" Data..=)+              Prelude.<$> agreementName+          ]+      )++instance Data.ToPath ConfirmCustomerAgreement where+  toPath = Prelude.const "/"++instance Data.ToQuery ConfirmCustomerAgreement where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newConfirmCustomerAgreementResponse' smart constructor.+data ConfirmCustomerAgreementResponse = ConfirmCustomerAgreementResponse'+  { -- | The status of the customer agreement when the connection was created.+    -- This will be either @signed@ or @unsigned@.+    status :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmCustomerAgreementResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'status', 'confirmCustomerAgreementResponse_status' - The status of the customer agreement when the connection was created.+-- This will be either @signed@ or @unsigned@.+--+-- 'httpStatus', 'confirmCustomerAgreementResponse_httpStatus' - The response's http status code.+newConfirmCustomerAgreementResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ConfirmCustomerAgreementResponse+newConfirmCustomerAgreementResponse pHttpStatus_ =+  ConfirmCustomerAgreementResponse'+    { status =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The status of the customer agreement when the connection was created.+-- This will be either @signed@ or @unsigned@.+confirmCustomerAgreementResponse_status :: Lens.Lens' ConfirmCustomerAgreementResponse (Prelude.Maybe Prelude.Text)+confirmCustomerAgreementResponse_status = Lens.lens (\ConfirmCustomerAgreementResponse' {status} -> status) (\s@ConfirmCustomerAgreementResponse' {} a -> s {status = a} :: ConfirmCustomerAgreementResponse)++-- | The response's http status code.+confirmCustomerAgreementResponse_httpStatus :: Lens.Lens' ConfirmCustomerAgreementResponse Prelude.Int+confirmCustomerAgreementResponse_httpStatus = Lens.lens (\ConfirmCustomerAgreementResponse' {httpStatus} -> httpStatus) (\s@ConfirmCustomerAgreementResponse' {} a -> s {httpStatus = a} :: ConfirmCustomerAgreementResponse)++instance+  Prelude.NFData+    ConfirmCustomerAgreementResponse+  where+  rnf ConfirmCustomerAgreementResponse' {..} =+    Prelude.rnf status+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/ConfirmPrivateVirtualInterface.hs view
@@ -0,0 +1,323 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ConfirmPrivateVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accepts ownership of a private virtual interface created by another+-- Amazon Web Services account.+--+-- After the virtual interface owner makes this call, the virtual interface+-- is created and attached to the specified virtual private gateway or+-- Direct Connect gateway, and is made available to handle traffic.+module Amazonka.DirectConnect.ConfirmPrivateVirtualInterface+  ( -- * Creating a Request+    ConfirmPrivateVirtualInterface (..),+    newConfirmPrivateVirtualInterface,++    -- * Request Lenses+    confirmPrivateVirtualInterface_directConnectGatewayId,+    confirmPrivateVirtualInterface_virtualGatewayId,+    confirmPrivateVirtualInterface_virtualInterfaceId,++    -- * Destructuring the Response+    ConfirmPrivateVirtualInterfaceResponse (..),+    newConfirmPrivateVirtualInterfaceResponse,++    -- * Response Lenses+    confirmPrivateVirtualInterfaceResponse_virtualInterfaceState,+    confirmPrivateVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newConfirmPrivateVirtualInterface' smart constructor.+data ConfirmPrivateVirtualInterface = ConfirmPrivateVirtualInterface'+  { -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmPrivateVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayId', 'confirmPrivateVirtualInterface_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'virtualGatewayId', 'confirmPrivateVirtualInterface_virtualGatewayId' - The ID of the virtual private gateway.+--+-- 'virtualInterfaceId', 'confirmPrivateVirtualInterface_virtualInterfaceId' - The ID of the virtual interface.+newConfirmPrivateVirtualInterface ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  ConfirmPrivateVirtualInterface+newConfirmPrivateVirtualInterface+  pVirtualInterfaceId_ =+    ConfirmPrivateVirtualInterface'+      { directConnectGatewayId =+          Prelude.Nothing,+        virtualGatewayId = Prelude.Nothing,+        virtualInterfaceId = pVirtualInterfaceId_+      }++-- | The ID of the Direct Connect gateway.+confirmPrivateVirtualInterface_directConnectGatewayId :: Lens.Lens' ConfirmPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+confirmPrivateVirtualInterface_directConnectGatewayId = Lens.lens (\ConfirmPrivateVirtualInterface' {directConnectGatewayId} -> directConnectGatewayId) (\s@ConfirmPrivateVirtualInterface' {} a -> s {directConnectGatewayId = a} :: ConfirmPrivateVirtualInterface)++-- | The ID of the virtual private gateway.+confirmPrivateVirtualInterface_virtualGatewayId :: Lens.Lens' ConfirmPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+confirmPrivateVirtualInterface_virtualGatewayId = Lens.lens (\ConfirmPrivateVirtualInterface' {virtualGatewayId} -> virtualGatewayId) (\s@ConfirmPrivateVirtualInterface' {} a -> s {virtualGatewayId = a} :: ConfirmPrivateVirtualInterface)++-- | The ID of the virtual interface.+confirmPrivateVirtualInterface_virtualInterfaceId :: Lens.Lens' ConfirmPrivateVirtualInterface Prelude.Text+confirmPrivateVirtualInterface_virtualInterfaceId = Lens.lens (\ConfirmPrivateVirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@ConfirmPrivateVirtualInterface' {} a -> s {virtualInterfaceId = a} :: ConfirmPrivateVirtualInterface)++instance+  Core.AWSRequest+    ConfirmPrivateVirtualInterface+  where+  type+    AWSResponse ConfirmPrivateVirtualInterface =+      ConfirmPrivateVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ConfirmPrivateVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    ConfirmPrivateVirtualInterface+  where+  hashWithSalt+    _salt+    ConfirmPrivateVirtualInterface' {..} =+      _salt+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` virtualGatewayId+        `Prelude.hashWithSalt` virtualInterfaceId++instance+  Prelude.NFData+    ConfirmPrivateVirtualInterface+  where+  rnf ConfirmPrivateVirtualInterface' {..} =+    Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance+  Data.ToHeaders+    ConfirmPrivateVirtualInterface+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ConfirmPrivateVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ConfirmPrivateVirtualInterface where+  toJSON ConfirmPrivateVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("virtualGatewayId" Data..=)+              Prelude.<$> virtualGatewayId,+            Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath ConfirmPrivateVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery ConfirmPrivateVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newConfirmPrivateVirtualInterfaceResponse' smart constructor.+data ConfirmPrivateVirtualInterfaceResponse = ConfirmPrivateVirtualInterfaceResponse'+  { -- | The state of the virtual interface. The following are the possible+    -- values:+    --+    -- -   @confirming@: The creation of the virtual interface is pending+    --     confirmation from the virtual interface owner. If the owner of the+    --     virtual interface is different from the owner of the connection on+    --     which it is provisioned, then the virtual interface will remain in+    --     this state until it is confirmed by the virtual interface owner.+    --+    -- -   @verifying@: This state only applies to public virtual interfaces.+    --     Each public virtual interface needs validation before the virtual+    --     interface can be created.+    --+    -- -   @pending@: A virtual interface is in this state from the time that+    --     it is created until the virtual interface is ready to forward+    --     traffic.+    --+    -- -   @available@: A virtual interface that is able to forward traffic.+    --+    -- -   @down@: A virtual interface that is BGP down.+    --+    -- -   @deleting@: A virtual interface is in this state immediately after+    --     calling DeleteVirtualInterface until it can no longer forward+    --     traffic.+    --+    -- -   @deleted@: A virtual interface that cannot forward traffic.+    --+    -- -   @rejected@: The virtual interface owner has declined creation of the+    --     virtual interface. If a virtual interface in the @Confirming@ state+    --     is deleted by the virtual interface owner, the virtual interface+    --     enters the @Rejected@ state.+    --+    -- -   @unknown@: The state of the virtual interface is not available.+    virtualInterfaceState :: Prelude.Maybe VirtualInterfaceState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmPrivateVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceState', 'confirmPrivateVirtualInterfaceResponse_virtualInterfaceState' - The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+--+-- 'httpStatus', 'confirmPrivateVirtualInterfaceResponse_httpStatus' - The response's http status code.+newConfirmPrivateVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ConfirmPrivateVirtualInterfaceResponse+newConfirmPrivateVirtualInterfaceResponse+  pHttpStatus_ =+    ConfirmPrivateVirtualInterfaceResponse'+      { virtualInterfaceState =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+confirmPrivateVirtualInterfaceResponse_virtualInterfaceState :: Lens.Lens' ConfirmPrivateVirtualInterfaceResponse (Prelude.Maybe VirtualInterfaceState)+confirmPrivateVirtualInterfaceResponse_virtualInterfaceState = Lens.lens (\ConfirmPrivateVirtualInterfaceResponse' {virtualInterfaceState} -> virtualInterfaceState) (\s@ConfirmPrivateVirtualInterfaceResponse' {} a -> s {virtualInterfaceState = a} :: ConfirmPrivateVirtualInterfaceResponse)++-- | The response's http status code.+confirmPrivateVirtualInterfaceResponse_httpStatus :: Lens.Lens' ConfirmPrivateVirtualInterfaceResponse Prelude.Int+confirmPrivateVirtualInterfaceResponse_httpStatus = Lens.lens (\ConfirmPrivateVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@ConfirmPrivateVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: ConfirmPrivateVirtualInterfaceResponse)++instance+  Prelude.NFData+    ConfirmPrivateVirtualInterfaceResponse+  where+  rnf ConfirmPrivateVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterfaceState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/ConfirmPublicVirtualInterface.hs view
@@ -0,0 +1,283 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ConfirmPublicVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accepts ownership of a public virtual interface created by another+-- Amazon Web Services account.+--+-- After the virtual interface owner makes this call, the specified virtual+-- interface is created and made available to handle traffic.+module Amazonka.DirectConnect.ConfirmPublicVirtualInterface+  ( -- * Creating a Request+    ConfirmPublicVirtualInterface (..),+    newConfirmPublicVirtualInterface,++    -- * Request Lenses+    confirmPublicVirtualInterface_virtualInterfaceId,++    -- * Destructuring the Response+    ConfirmPublicVirtualInterfaceResponse (..),+    newConfirmPublicVirtualInterfaceResponse,++    -- * Response Lenses+    confirmPublicVirtualInterfaceResponse_virtualInterfaceState,+    confirmPublicVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newConfirmPublicVirtualInterface' smart constructor.+data ConfirmPublicVirtualInterface = ConfirmPublicVirtualInterface'+  { -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmPublicVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceId', 'confirmPublicVirtualInterface_virtualInterfaceId' - The ID of the virtual interface.+newConfirmPublicVirtualInterface ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  ConfirmPublicVirtualInterface+newConfirmPublicVirtualInterface pVirtualInterfaceId_ =+  ConfirmPublicVirtualInterface'+    { virtualInterfaceId =+        pVirtualInterfaceId_+    }++-- | The ID of the virtual interface.+confirmPublicVirtualInterface_virtualInterfaceId :: Lens.Lens' ConfirmPublicVirtualInterface Prelude.Text+confirmPublicVirtualInterface_virtualInterfaceId = Lens.lens (\ConfirmPublicVirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@ConfirmPublicVirtualInterface' {} a -> s {virtualInterfaceId = a} :: ConfirmPublicVirtualInterface)++instance+  Core.AWSRequest+    ConfirmPublicVirtualInterface+  where+  type+    AWSResponse ConfirmPublicVirtualInterface =+      ConfirmPublicVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ConfirmPublicVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    ConfirmPublicVirtualInterface+  where+  hashWithSalt _salt ConfirmPublicVirtualInterface' {..} =+    _salt `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData ConfirmPublicVirtualInterface where+  rnf ConfirmPublicVirtualInterface' {..} =+    Prelude.rnf virtualInterfaceId++instance Data.ToHeaders ConfirmPublicVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ConfirmPublicVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ConfirmPublicVirtualInterface where+  toJSON ConfirmPublicVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath ConfirmPublicVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery ConfirmPublicVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newConfirmPublicVirtualInterfaceResponse' smart constructor.+data ConfirmPublicVirtualInterfaceResponse = ConfirmPublicVirtualInterfaceResponse'+  { -- | The state of the virtual interface. The following are the possible+    -- values:+    --+    -- -   @confirming@: The creation of the virtual interface is pending+    --     confirmation from the virtual interface owner. If the owner of the+    --     virtual interface is different from the owner of the connection on+    --     which it is provisioned, then the virtual interface will remain in+    --     this state until it is confirmed by the virtual interface owner.+    --+    -- -   @verifying@: This state only applies to public virtual interfaces.+    --     Each public virtual interface needs validation before the virtual+    --     interface can be created.+    --+    -- -   @pending@: A virtual interface is in this state from the time that+    --     it is created until the virtual interface is ready to forward+    --     traffic.+    --+    -- -   @available@: A virtual interface that is able to forward traffic.+    --+    -- -   @down@: A virtual interface that is BGP down.+    --+    -- -   @deleting@: A virtual interface is in this state immediately after+    --     calling DeleteVirtualInterface until it can no longer forward+    --     traffic.+    --+    -- -   @deleted@: A virtual interface that cannot forward traffic.+    --+    -- -   @rejected@: The virtual interface owner has declined creation of the+    --     virtual interface. If a virtual interface in the @Confirming@ state+    --     is deleted by the virtual interface owner, the virtual interface+    --     enters the @Rejected@ state.+    --+    -- -   @unknown@: The state of the virtual interface is not available.+    virtualInterfaceState :: Prelude.Maybe VirtualInterfaceState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmPublicVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceState', 'confirmPublicVirtualInterfaceResponse_virtualInterfaceState' - The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+--+-- 'httpStatus', 'confirmPublicVirtualInterfaceResponse_httpStatus' - The response's http status code.+newConfirmPublicVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ConfirmPublicVirtualInterfaceResponse+newConfirmPublicVirtualInterfaceResponse pHttpStatus_ =+  ConfirmPublicVirtualInterfaceResponse'+    { virtualInterfaceState =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+confirmPublicVirtualInterfaceResponse_virtualInterfaceState :: Lens.Lens' ConfirmPublicVirtualInterfaceResponse (Prelude.Maybe VirtualInterfaceState)+confirmPublicVirtualInterfaceResponse_virtualInterfaceState = Lens.lens (\ConfirmPublicVirtualInterfaceResponse' {virtualInterfaceState} -> virtualInterfaceState) (\s@ConfirmPublicVirtualInterfaceResponse' {} a -> s {virtualInterfaceState = a} :: ConfirmPublicVirtualInterfaceResponse)++-- | The response's http status code.+confirmPublicVirtualInterfaceResponse_httpStatus :: Lens.Lens' ConfirmPublicVirtualInterfaceResponse Prelude.Int+confirmPublicVirtualInterfaceResponse_httpStatus = Lens.lens (\ConfirmPublicVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@ConfirmPublicVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: ConfirmPublicVirtualInterfaceResponse)++instance+  Prelude.NFData+    ConfirmPublicVirtualInterfaceResponse+  where+  rnf ConfirmPublicVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterfaceState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/ConfirmTransitVirtualInterface.hs view
@@ -0,0 +1,315 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ConfirmTransitVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Accepts ownership of a transit virtual interface created by another+-- Amazon Web Services account.+--+-- After the owner of the transit virtual interface makes this call, the+-- specified transit virtual interface is created and made available to+-- handle traffic.+module Amazonka.DirectConnect.ConfirmTransitVirtualInterface+  ( -- * Creating a Request+    ConfirmTransitVirtualInterface (..),+    newConfirmTransitVirtualInterface,++    -- * Request Lenses+    confirmTransitVirtualInterface_virtualInterfaceId,+    confirmTransitVirtualInterface_directConnectGatewayId,++    -- * Destructuring the Response+    ConfirmTransitVirtualInterfaceResponse (..),+    newConfirmTransitVirtualInterfaceResponse,++    -- * Response Lenses+    confirmTransitVirtualInterfaceResponse_virtualInterfaceState,+    confirmTransitVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newConfirmTransitVirtualInterface' smart constructor.+data ConfirmTransitVirtualInterface = ConfirmTransitVirtualInterface'+  { -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmTransitVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceId', 'confirmTransitVirtualInterface_virtualInterfaceId' - The ID of the virtual interface.+--+-- 'directConnectGatewayId', 'confirmTransitVirtualInterface_directConnectGatewayId' - The ID of the Direct Connect gateway.+newConfirmTransitVirtualInterface ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  ConfirmTransitVirtualInterface+newConfirmTransitVirtualInterface+  pVirtualInterfaceId_+  pDirectConnectGatewayId_ =+    ConfirmTransitVirtualInterface'+      { virtualInterfaceId =+          pVirtualInterfaceId_,+        directConnectGatewayId =+          pDirectConnectGatewayId_+      }++-- | The ID of the virtual interface.+confirmTransitVirtualInterface_virtualInterfaceId :: Lens.Lens' ConfirmTransitVirtualInterface Prelude.Text+confirmTransitVirtualInterface_virtualInterfaceId = Lens.lens (\ConfirmTransitVirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@ConfirmTransitVirtualInterface' {} a -> s {virtualInterfaceId = a} :: ConfirmTransitVirtualInterface)++-- | The ID of the Direct Connect gateway.+confirmTransitVirtualInterface_directConnectGatewayId :: Lens.Lens' ConfirmTransitVirtualInterface Prelude.Text+confirmTransitVirtualInterface_directConnectGatewayId = Lens.lens (\ConfirmTransitVirtualInterface' {directConnectGatewayId} -> directConnectGatewayId) (\s@ConfirmTransitVirtualInterface' {} a -> s {directConnectGatewayId = a} :: ConfirmTransitVirtualInterface)++instance+  Core.AWSRequest+    ConfirmTransitVirtualInterface+  where+  type+    AWSResponse ConfirmTransitVirtualInterface =+      ConfirmTransitVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ConfirmTransitVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    ConfirmTransitVirtualInterface+  where+  hashWithSalt+    _salt+    ConfirmTransitVirtualInterface' {..} =+      _salt+        `Prelude.hashWithSalt` virtualInterfaceId+        `Prelude.hashWithSalt` directConnectGatewayId++instance+  Prelude.NFData+    ConfirmTransitVirtualInterface+  where+  rnf ConfirmTransitVirtualInterface' {..} =+    Prelude.rnf virtualInterfaceId+      `Prelude.seq` Prelude.rnf directConnectGatewayId++instance+  Data.ToHeaders+    ConfirmTransitVirtualInterface+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ConfirmTransitVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ConfirmTransitVirtualInterface where+  toJSON ConfirmTransitVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId),+            Prelude.Just+              ( "directConnectGatewayId"+                  Data..= directConnectGatewayId+              )+          ]+      )++instance Data.ToPath ConfirmTransitVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery ConfirmTransitVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newConfirmTransitVirtualInterfaceResponse' smart constructor.+data ConfirmTransitVirtualInterfaceResponse = ConfirmTransitVirtualInterfaceResponse'+  { -- | The state of the virtual interface. The following are the possible+    -- values:+    --+    -- -   @confirming@: The creation of the virtual interface is pending+    --     confirmation from the virtual interface owner. If the owner of the+    --     virtual interface is different from the owner of the connection on+    --     which it is provisioned, then the virtual interface will remain in+    --     this state until it is confirmed by the virtual interface owner.+    --+    -- -   @verifying@: This state only applies to public virtual interfaces.+    --     Each public virtual interface needs validation before the virtual+    --     interface can be created.+    --+    -- -   @pending@: A virtual interface is in this state from the time that+    --     it is created until the virtual interface is ready to forward+    --     traffic.+    --+    -- -   @available@: A virtual interface that is able to forward traffic.+    --+    -- -   @down@: A virtual interface that is BGP down.+    --+    -- -   @deleting@: A virtual interface is in this state immediately after+    --     calling DeleteVirtualInterface until it can no longer forward+    --     traffic.+    --+    -- -   @deleted@: A virtual interface that cannot forward traffic.+    --+    -- -   @rejected@: The virtual interface owner has declined creation of the+    --     virtual interface. If a virtual interface in the @Confirming@ state+    --     is deleted by the virtual interface owner, the virtual interface+    --     enters the @Rejected@ state.+    --+    -- -   @unknown@: The state of the virtual interface is not available.+    virtualInterfaceState :: Prelude.Maybe VirtualInterfaceState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ConfirmTransitVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceState', 'confirmTransitVirtualInterfaceResponse_virtualInterfaceState' - The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+--+-- 'httpStatus', 'confirmTransitVirtualInterfaceResponse_httpStatus' - The response's http status code.+newConfirmTransitVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ConfirmTransitVirtualInterfaceResponse+newConfirmTransitVirtualInterfaceResponse+  pHttpStatus_ =+    ConfirmTransitVirtualInterfaceResponse'+      { virtualInterfaceState =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+confirmTransitVirtualInterfaceResponse_virtualInterfaceState :: Lens.Lens' ConfirmTransitVirtualInterfaceResponse (Prelude.Maybe VirtualInterfaceState)+confirmTransitVirtualInterfaceResponse_virtualInterfaceState = Lens.lens (\ConfirmTransitVirtualInterfaceResponse' {virtualInterfaceState} -> virtualInterfaceState) (\s@ConfirmTransitVirtualInterfaceResponse' {} a -> s {virtualInterfaceState = a} :: ConfirmTransitVirtualInterfaceResponse)++-- | The response's http status code.+confirmTransitVirtualInterfaceResponse_httpStatus :: Lens.Lens' ConfirmTransitVirtualInterfaceResponse Prelude.Int+confirmTransitVirtualInterfaceResponse_httpStatus = Lens.lens (\ConfirmTransitVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@ConfirmTransitVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: ConfirmTransitVirtualInterfaceResponse)++instance+  Prelude.NFData+    ConfirmTransitVirtualInterfaceResponse+  where+  rnf ConfirmTransitVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterfaceState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/CreateBGPPeer.hs view
@@ -0,0 +1,200 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateBGPPeer+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a BGP peer on the specified virtual interface.+--+-- You must create a BGP peer for the corresponding address family+-- (IPv4\/IPv6) in order to access Amazon Web Services resources that also+-- use that address family.+--+-- If logical redundancy is not supported by the connection, interconnect,+-- or LAG, the BGP peer cannot be in the same address family as an existing+-- BGP peer on the virtual interface.+--+-- When creating a IPv6 BGP peer, omit the Amazon address and customer+-- address. IPv6 addresses are automatically assigned from the Amazon pool+-- of IPv6 addresses; you cannot specify custom IPv6 addresses.+--+-- For a public virtual interface, the Autonomous System Number (ASN) must+-- be private or already on the allow list for the virtual interface.+module Amazonka.DirectConnect.CreateBGPPeer+  ( -- * Creating a Request+    CreateBGPPeer (..),+    newCreateBGPPeer,++    -- * Request Lenses+    createBGPPeer_newBGPPeer,+    createBGPPeer_virtualInterfaceId,++    -- * Destructuring the Response+    CreateBGPPeerResponse (..),+    newCreateBGPPeerResponse,++    -- * Response Lenses+    createBGPPeerResponse_virtualInterface,+    createBGPPeerResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateBGPPeer' smart constructor.+data CreateBGPPeer = CreateBGPPeer'+  { -- | Information about the BGP peer.+    newBGPPeer' :: Prelude.Maybe NewBGPPeer,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateBGPPeer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'newBGPPeer'', 'createBGPPeer_newBGPPeer' - Information about the BGP peer.+--+-- 'virtualInterfaceId', 'createBGPPeer_virtualInterfaceId' - The ID of the virtual interface.+newCreateBGPPeer ::+  CreateBGPPeer+newCreateBGPPeer =+  CreateBGPPeer'+    { newBGPPeer' = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing+    }++-- | Information about the BGP peer.+createBGPPeer_newBGPPeer :: Lens.Lens' CreateBGPPeer (Prelude.Maybe NewBGPPeer)+createBGPPeer_newBGPPeer = Lens.lens (\CreateBGPPeer' {newBGPPeer'} -> newBGPPeer') (\s@CreateBGPPeer' {} a -> s {newBGPPeer' = a} :: CreateBGPPeer)++-- | The ID of the virtual interface.+createBGPPeer_virtualInterfaceId :: Lens.Lens' CreateBGPPeer (Prelude.Maybe Prelude.Text)+createBGPPeer_virtualInterfaceId = Lens.lens (\CreateBGPPeer' {virtualInterfaceId} -> virtualInterfaceId) (\s@CreateBGPPeer' {} a -> s {virtualInterfaceId = a} :: CreateBGPPeer)++instance Core.AWSRequest CreateBGPPeer where+  type+    AWSResponse CreateBGPPeer =+      CreateBGPPeerResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          CreateBGPPeerResponse'+            Prelude.<$> (x Data..?> "virtualInterface")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable CreateBGPPeer where+  hashWithSalt _salt CreateBGPPeer' {..} =+    _salt+      `Prelude.hashWithSalt` newBGPPeer'+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData CreateBGPPeer where+  rnf CreateBGPPeer' {..} =+    Prelude.rnf newBGPPeer'+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance Data.ToHeaders CreateBGPPeer where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateBGPPeer" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateBGPPeer where+  toJSON CreateBGPPeer' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("newBGPPeer" Data..=) Prelude.<$> newBGPPeer',+            ("virtualInterfaceId" Data..=)+              Prelude.<$> virtualInterfaceId+          ]+      )++instance Data.ToPath CreateBGPPeer where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateBGPPeer where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateBGPPeerResponse' smart constructor.+data CreateBGPPeerResponse = CreateBGPPeerResponse'+  { -- | The virtual interface.+    virtualInterface :: Prelude.Maybe VirtualInterface,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateBGPPeerResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterface', 'createBGPPeerResponse_virtualInterface' - The virtual interface.+--+-- 'httpStatus', 'createBGPPeerResponse_httpStatus' - The response's http status code.+newCreateBGPPeerResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  CreateBGPPeerResponse+newCreateBGPPeerResponse pHttpStatus_ =+  CreateBGPPeerResponse'+    { virtualInterface =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The virtual interface.+createBGPPeerResponse_virtualInterface :: Lens.Lens' CreateBGPPeerResponse (Prelude.Maybe VirtualInterface)+createBGPPeerResponse_virtualInterface = Lens.lens (\CreateBGPPeerResponse' {virtualInterface} -> virtualInterface) (\s@CreateBGPPeerResponse' {} a -> s {virtualInterface = a} :: CreateBGPPeerResponse)++-- | The response's http status code.+createBGPPeerResponse_httpStatus :: Lens.Lens' CreateBGPPeerResponse Prelude.Int+createBGPPeerResponse_httpStatus = Lens.lens (\CreateBGPPeerResponse' {httpStatus} -> httpStatus) (\s@CreateBGPPeerResponse' {} a -> s {httpStatus = a} :: CreateBGPPeerResponse)++instance Prelude.NFData CreateBGPPeerResponse where+  rnf CreateBGPPeerResponse' {..} =+    Prelude.rnf virtualInterface+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/CreateConnection.hs view
@@ -0,0 +1,263 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a connection between a customer network and a specific Direct+-- Connect location.+--+-- A connection links your internal network to an Direct Connect location+-- over a standard Ethernet fiber-optic cable. One end of the cable is+-- connected to your router, the other to an Direct Connect router.+--+-- To find the locations for your Region, use DescribeLocations.+--+-- You can automatically add the new connection to a link aggregation group+-- (LAG) by specifying a LAG ID in the request. This ensures that the new+-- connection is allocated on the same Direct Connect endpoint that hosts+-- the specified LAG. If there are no available ports on the endpoint, the+-- request fails and no connection is created.+module Amazonka.DirectConnect.CreateConnection+  ( -- * Creating a Request+    CreateConnection (..),+    newCreateConnection,++    -- * Request Lenses+    createConnection_lagId,+    createConnection_providerName,+    createConnection_requestMACSec,+    createConnection_tags,+    createConnection_location,+    createConnection_bandwidth,+    createConnection_connectionName,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateConnection' smart constructor.+data CreateConnection = CreateConnection'+  { -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the requested+    -- connection.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether you want the connection to support MAC Security+    -- (MACsec).+    --+    -- MAC Security (MACsec) is only available on dedicated connections. For+    -- information about MAC Security (MACsec) prerequisties, see+    -- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+    -- in the /Direct Connect User Guide/.+    requestMACSec :: Prelude.Maybe Prelude.Bool,+    -- | The tags to associate with the lag.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The location of the connection.+    location :: Prelude.Text,+    -- | The bandwidth of the connection.+    bandwidth :: Prelude.Text,+    -- | The name of the connection.+    connectionName :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'lagId', 'createConnection_lagId' - The ID of the LAG.+--+-- 'providerName', 'createConnection_providerName' - The name of the service provider associated with the requested+-- connection.+--+-- 'requestMACSec', 'createConnection_requestMACSec' - Indicates whether you want the connection to support MAC Security+-- (MACsec).+--+-- MAC Security (MACsec) is only available on dedicated connections. For+-- information about MAC Security (MACsec) prerequisties, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+-- in the /Direct Connect User Guide/.+--+-- 'tags', 'createConnection_tags' - The tags to associate with the lag.+--+-- 'location', 'createConnection_location' - The location of the connection.+--+-- 'bandwidth', 'createConnection_bandwidth' - The bandwidth of the connection.+--+-- 'connectionName', 'createConnection_connectionName' - The name of the connection.+newCreateConnection ::+  -- | 'location'+  Prelude.Text ->+  -- | 'bandwidth'+  Prelude.Text ->+  -- | 'connectionName'+  Prelude.Text ->+  CreateConnection+newCreateConnection+  pLocation_+  pBandwidth_+  pConnectionName_ =+    CreateConnection'+      { lagId = Prelude.Nothing,+        providerName = Prelude.Nothing,+        requestMACSec = Prelude.Nothing,+        tags = Prelude.Nothing,+        location = pLocation_,+        bandwidth = pBandwidth_,+        connectionName = pConnectionName_+      }++-- | The ID of the LAG.+createConnection_lagId :: Lens.Lens' CreateConnection (Prelude.Maybe Prelude.Text)+createConnection_lagId = Lens.lens (\CreateConnection' {lagId} -> lagId) (\s@CreateConnection' {} a -> s {lagId = a} :: CreateConnection)++-- | The name of the service provider associated with the requested+-- connection.+createConnection_providerName :: Lens.Lens' CreateConnection (Prelude.Maybe Prelude.Text)+createConnection_providerName = Lens.lens (\CreateConnection' {providerName} -> providerName) (\s@CreateConnection' {} a -> s {providerName = a} :: CreateConnection)++-- | Indicates whether you want the connection to support MAC Security+-- (MACsec).+--+-- MAC Security (MACsec) is only available on dedicated connections. For+-- information about MAC Security (MACsec) prerequisties, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+-- in the /Direct Connect User Guide/.+createConnection_requestMACSec :: Lens.Lens' CreateConnection (Prelude.Maybe Prelude.Bool)+createConnection_requestMACSec = Lens.lens (\CreateConnection' {requestMACSec} -> requestMACSec) (\s@CreateConnection' {} a -> s {requestMACSec = a} :: CreateConnection)++-- | The tags to associate with the lag.+createConnection_tags :: Lens.Lens' CreateConnection (Prelude.Maybe (Prelude.NonEmpty Tag))+createConnection_tags = Lens.lens (\CreateConnection' {tags} -> tags) (\s@CreateConnection' {} a -> s {tags = a} :: CreateConnection) Prelude.. Lens.mapping Lens.coerced++-- | The location of the connection.+createConnection_location :: Lens.Lens' CreateConnection Prelude.Text+createConnection_location = Lens.lens (\CreateConnection' {location} -> location) (\s@CreateConnection' {} a -> s {location = a} :: CreateConnection)++-- | The bandwidth of the connection.+createConnection_bandwidth :: Lens.Lens' CreateConnection Prelude.Text+createConnection_bandwidth = Lens.lens (\CreateConnection' {bandwidth} -> bandwidth) (\s@CreateConnection' {} a -> s {bandwidth = a} :: CreateConnection)++-- | The name of the connection.+createConnection_connectionName :: Lens.Lens' CreateConnection Prelude.Text+createConnection_connectionName = Lens.lens (\CreateConnection' {connectionName} -> connectionName) (\s@CreateConnection' {} a -> s {connectionName = a} :: CreateConnection)++instance Core.AWSRequest CreateConnection where+  type AWSResponse CreateConnection = Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateConnection where+  hashWithSalt _salt CreateConnection' {..} =+    _salt+      `Prelude.hashWithSalt` lagId+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` requestMACSec+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` bandwidth+      `Prelude.hashWithSalt` connectionName++instance Prelude.NFData CreateConnection where+  rnf CreateConnection' {..} =+    Prelude.rnf lagId+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf requestMACSec+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf bandwidth+      `Prelude.seq` Prelude.rnf connectionName++instance Data.ToHeaders CreateConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateConnection where+  toJSON CreateConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("lagId" Data..=) Prelude.<$> lagId,+            ("providerName" Data..=) Prelude.<$> providerName,+            ("requestMACSec" Data..=) Prelude.<$> requestMACSec,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just ("location" Data..= location),+            Prelude.Just ("bandwidth" Data..= bandwidth),+            Prelude.Just+              ("connectionName" Data..= connectionName)+          ]+      )++instance Data.ToPath CreateConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateConnection where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/CreateDirectConnectGateway.hs view
@@ -0,0 +1,211 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateDirectConnectGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a Direct Connect gateway, which is an intermediate object that+-- enables you to connect a set of virtual interfaces and virtual private+-- gateways. A Direct Connect gateway is global and visible in any Amazon+-- Web Services Region after it is created. The virtual interfaces and+-- virtual private gateways that are connected through a Direct Connect+-- gateway can be in different Amazon Web Services Regions. This enables+-- you to connect to a VPC in any Region, regardless of the Region in which+-- the virtual interfaces are located, and pass traffic between them.+module Amazonka.DirectConnect.CreateDirectConnectGateway+  ( -- * Creating a Request+    CreateDirectConnectGateway (..),+    newCreateDirectConnectGateway,++    -- * Request Lenses+    createDirectConnectGateway_amazonSideAsn,+    createDirectConnectGateway_directConnectGatewayName,++    -- * Destructuring the Response+    CreateDirectConnectGatewayResponse (..),+    newCreateDirectConnectGatewayResponse,++    -- * Response Lenses+    createDirectConnectGatewayResponse_directConnectGateway,+    createDirectConnectGatewayResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateDirectConnectGateway' smart constructor.+data CreateDirectConnectGateway = CreateDirectConnectGateway'+  { -- | The autonomous system number (ASN) for Border Gateway Protocol (BGP) to+    -- be configured on the Amazon side of the connection. The ASN must be in+    -- the private range of 64,512 to 65,534 or 4,200,000,000 to 4,294,967,294.+    -- The default is 64512.+    amazonSideAsn :: Prelude.Maybe Prelude.Integer,+    -- | The name of the Direct Connect gateway.+    directConnectGatewayName :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'amazonSideAsn', 'createDirectConnectGateway_amazonSideAsn' - The autonomous system number (ASN) for Border Gateway Protocol (BGP) to+-- be configured on the Amazon side of the connection. The ASN must be in+-- the private range of 64,512 to 65,534 or 4,200,000,000 to 4,294,967,294.+-- The default is 64512.+--+-- 'directConnectGatewayName', 'createDirectConnectGateway_directConnectGatewayName' - The name of the Direct Connect gateway.+newCreateDirectConnectGateway ::+  -- | 'directConnectGatewayName'+  Prelude.Text ->+  CreateDirectConnectGateway+newCreateDirectConnectGateway+  pDirectConnectGatewayName_ =+    CreateDirectConnectGateway'+      { amazonSideAsn =+          Prelude.Nothing,+        directConnectGatewayName =+          pDirectConnectGatewayName_+      }++-- | The autonomous system number (ASN) for Border Gateway Protocol (BGP) to+-- be configured on the Amazon side of the connection. The ASN must be in+-- the private range of 64,512 to 65,534 or 4,200,000,000 to 4,294,967,294.+-- The default is 64512.+createDirectConnectGateway_amazonSideAsn :: Lens.Lens' CreateDirectConnectGateway (Prelude.Maybe Prelude.Integer)+createDirectConnectGateway_amazonSideAsn = Lens.lens (\CreateDirectConnectGateway' {amazonSideAsn} -> amazonSideAsn) (\s@CreateDirectConnectGateway' {} a -> s {amazonSideAsn = a} :: CreateDirectConnectGateway)++-- | The name of the Direct Connect gateway.+createDirectConnectGateway_directConnectGatewayName :: Lens.Lens' CreateDirectConnectGateway Prelude.Text+createDirectConnectGateway_directConnectGatewayName = Lens.lens (\CreateDirectConnectGateway' {directConnectGatewayName} -> directConnectGatewayName) (\s@CreateDirectConnectGateway' {} a -> s {directConnectGatewayName = a} :: CreateDirectConnectGateway)++instance Core.AWSRequest CreateDirectConnectGateway where+  type+    AWSResponse CreateDirectConnectGateway =+      CreateDirectConnectGatewayResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          CreateDirectConnectGatewayResponse'+            Prelude.<$> (x Data..?> "directConnectGateway")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable CreateDirectConnectGateway where+  hashWithSalt _salt CreateDirectConnectGateway' {..} =+    _salt+      `Prelude.hashWithSalt` amazonSideAsn+      `Prelude.hashWithSalt` directConnectGatewayName++instance Prelude.NFData CreateDirectConnectGateway where+  rnf CreateDirectConnectGateway' {..} =+    Prelude.rnf amazonSideAsn+      `Prelude.seq` Prelude.rnf directConnectGatewayName++instance Data.ToHeaders CreateDirectConnectGateway where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateDirectConnectGateway" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateDirectConnectGateway where+  toJSON CreateDirectConnectGateway' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("amazonSideAsn" Data..=) Prelude.<$> amazonSideAsn,+            Prelude.Just+              ( "directConnectGatewayName"+                  Data..= directConnectGatewayName+              )+          ]+      )++instance Data.ToPath CreateDirectConnectGateway where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateDirectConnectGateway where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateDirectConnectGatewayResponse' smart constructor.+data CreateDirectConnectGatewayResponse = CreateDirectConnectGatewayResponse'+  { -- | The Direct Connect gateway.+    directConnectGateway :: Prelude.Maybe DirectConnectGateway,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGateway', 'createDirectConnectGatewayResponse_directConnectGateway' - The Direct Connect gateway.+--+-- 'httpStatus', 'createDirectConnectGatewayResponse_httpStatus' - The response's http status code.+newCreateDirectConnectGatewayResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  CreateDirectConnectGatewayResponse+newCreateDirectConnectGatewayResponse pHttpStatus_ =+  CreateDirectConnectGatewayResponse'+    { directConnectGateway =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The Direct Connect gateway.+createDirectConnectGatewayResponse_directConnectGateway :: Lens.Lens' CreateDirectConnectGatewayResponse (Prelude.Maybe DirectConnectGateway)+createDirectConnectGatewayResponse_directConnectGateway = Lens.lens (\CreateDirectConnectGatewayResponse' {directConnectGateway} -> directConnectGateway) (\s@CreateDirectConnectGatewayResponse' {} a -> s {directConnectGateway = a} :: CreateDirectConnectGatewayResponse)++-- | The response's http status code.+createDirectConnectGatewayResponse_httpStatus :: Lens.Lens' CreateDirectConnectGatewayResponse Prelude.Int+createDirectConnectGatewayResponse_httpStatus = Lens.lens (\CreateDirectConnectGatewayResponse' {httpStatus} -> httpStatus) (\s@CreateDirectConnectGatewayResponse' {} a -> s {httpStatus = a} :: CreateDirectConnectGatewayResponse)++instance+  Prelude.NFData+    CreateDirectConnectGatewayResponse+  where+  rnf CreateDirectConnectGatewayResponse' {..} =+    Prelude.rnf directConnectGateway+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/CreateDirectConnectGatewayAssociation.hs view
@@ -0,0 +1,273 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates an association between a Direct Connect gateway and a virtual+-- private gateway. The virtual private gateway must be attached to a VPC+-- and must not be associated with another Direct Connect gateway.+module Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation+  ( -- * Creating a Request+    CreateDirectConnectGatewayAssociation (..),+    newCreateDirectConnectGatewayAssociation,++    -- * Request Lenses+    createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociation_gatewayId,+    createDirectConnectGatewayAssociation_virtualGatewayId,+    createDirectConnectGatewayAssociation_directConnectGatewayId,++    -- * Destructuring the Response+    CreateDirectConnectGatewayAssociationResponse (..),+    newCreateDirectConnectGatewayAssociationResponse,++    -- * Response Lenses+    createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    createDirectConnectGatewayAssociationResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateDirectConnectGatewayAssociation' smart constructor.+data CreateDirectConnectGatewayAssociation = CreateDirectConnectGatewayAssociation'+  { -- | The Amazon VPC prefixes to advertise to the Direct Connect gateway+    --+    -- This parameter is required when you create an association to a transit+    -- gateway.+    --+    -- For information about how to set the prefixes, see+    -- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+    -- in the /Direct Connect User Guide/.+    addAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The ID of the virtual private gateway or transit gateway.+    gatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGatewayAssociation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addAllowedPrefixesToDirectConnectGateway', 'createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to advertise to the Direct Connect gateway+--+-- This parameter is required when you create an association to a transit+-- gateway.+--+-- For information about how to set the prefixes, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+-- in the /Direct Connect User Guide/.+--+-- 'gatewayId', 'createDirectConnectGatewayAssociation_gatewayId' - The ID of the virtual private gateway or transit gateway.+--+-- 'virtualGatewayId', 'createDirectConnectGatewayAssociation_virtualGatewayId' - The ID of the virtual private gateway.+--+-- 'directConnectGatewayId', 'createDirectConnectGatewayAssociation_directConnectGatewayId' - The ID of the Direct Connect gateway.+newCreateDirectConnectGatewayAssociation ::+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  CreateDirectConnectGatewayAssociation+newCreateDirectConnectGatewayAssociation+  pDirectConnectGatewayId_ =+    CreateDirectConnectGatewayAssociation'+      { addAllowedPrefixesToDirectConnectGateway =+          Prelude.Nothing,+        gatewayId = Prelude.Nothing,+        virtualGatewayId = Prelude.Nothing,+        directConnectGatewayId =+          pDirectConnectGatewayId_+      }++-- | The Amazon VPC prefixes to advertise to the Direct Connect gateway+--+-- This parameter is required when you create an association to a transit+-- gateway.+--+-- For information about how to set the prefixes, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/multi-account-associate-vgw.html#allowed-prefixes Allowed Prefixes>+-- in the /Direct Connect User Guide/.+createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens.Lens' CreateDirectConnectGatewayAssociation (Prelude.Maybe [RouteFilterPrefix])+createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway = Lens.lens (\CreateDirectConnectGatewayAssociation' {addAllowedPrefixesToDirectConnectGateway} -> addAllowedPrefixesToDirectConnectGateway) (\s@CreateDirectConnectGatewayAssociation' {} a -> s {addAllowedPrefixesToDirectConnectGateway = a} :: CreateDirectConnectGatewayAssociation) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the virtual private gateway or transit gateway.+createDirectConnectGatewayAssociation_gatewayId :: Lens.Lens' CreateDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+createDirectConnectGatewayAssociation_gatewayId = Lens.lens (\CreateDirectConnectGatewayAssociation' {gatewayId} -> gatewayId) (\s@CreateDirectConnectGatewayAssociation' {} a -> s {gatewayId = a} :: CreateDirectConnectGatewayAssociation)++-- | The ID of the virtual private gateway.+createDirectConnectGatewayAssociation_virtualGatewayId :: Lens.Lens' CreateDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+createDirectConnectGatewayAssociation_virtualGatewayId = Lens.lens (\CreateDirectConnectGatewayAssociation' {virtualGatewayId} -> virtualGatewayId) (\s@CreateDirectConnectGatewayAssociation' {} a -> s {virtualGatewayId = a} :: CreateDirectConnectGatewayAssociation)++-- | The ID of the Direct Connect gateway.+createDirectConnectGatewayAssociation_directConnectGatewayId :: Lens.Lens' CreateDirectConnectGatewayAssociation Prelude.Text+createDirectConnectGatewayAssociation_directConnectGatewayId = Lens.lens (\CreateDirectConnectGatewayAssociation' {directConnectGatewayId} -> directConnectGatewayId) (\s@CreateDirectConnectGatewayAssociation' {} a -> s {directConnectGatewayId = a} :: CreateDirectConnectGatewayAssociation)++instance+  Core.AWSRequest+    CreateDirectConnectGatewayAssociation+  where+  type+    AWSResponse+      CreateDirectConnectGatewayAssociation =+      CreateDirectConnectGatewayAssociationResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          CreateDirectConnectGatewayAssociationResponse'+            Prelude.<$> (x Data..?> "directConnectGatewayAssociation")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    CreateDirectConnectGatewayAssociation+  where+  hashWithSalt+    _salt+    CreateDirectConnectGatewayAssociation' {..} =+      _salt+        `Prelude.hashWithSalt` addAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` gatewayId+        `Prelude.hashWithSalt` virtualGatewayId+        `Prelude.hashWithSalt` directConnectGatewayId++instance+  Prelude.NFData+    CreateDirectConnectGatewayAssociation+  where+  rnf CreateDirectConnectGatewayAssociation' {..} =+    Prelude.rnf+      addAllowedPrefixesToDirectConnectGateway+      `Prelude.seq` Prelude.rnf gatewayId+      `Prelude.seq` Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf directConnectGatewayId++instance+  Data.ToHeaders+    CreateDirectConnectGatewayAssociation+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateDirectConnectGatewayAssociation" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    CreateDirectConnectGatewayAssociation+  where+  toJSON CreateDirectConnectGatewayAssociation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addAllowedPrefixesToDirectConnectGateway" Data..=)+              Prelude.<$> addAllowedPrefixesToDirectConnectGateway,+            ("gatewayId" Data..=) Prelude.<$> gatewayId,+            ("virtualGatewayId" Data..=)+              Prelude.<$> virtualGatewayId,+            Prelude.Just+              ( "directConnectGatewayId"+                  Data..= directConnectGatewayId+              )+          ]+      )++instance+  Data.ToPath+    CreateDirectConnectGatewayAssociation+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    CreateDirectConnectGatewayAssociation+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateDirectConnectGatewayAssociationResponse' smart constructor.+data CreateDirectConnectGatewayAssociationResponse = CreateDirectConnectGatewayAssociationResponse'+  { -- | The association to be created.+    directConnectGatewayAssociation :: Prelude.Maybe DirectConnectGatewayAssociation,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGatewayAssociationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociation', 'createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation' - The association to be created.+--+-- 'httpStatus', 'createDirectConnectGatewayAssociationResponse_httpStatus' - The response's http status code.+newCreateDirectConnectGatewayAssociationResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  CreateDirectConnectGatewayAssociationResponse+newCreateDirectConnectGatewayAssociationResponse+  pHttpStatus_ =+    CreateDirectConnectGatewayAssociationResponse'+      { directConnectGatewayAssociation =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | The association to be created.+createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens.Lens' CreateDirectConnectGatewayAssociationResponse (Prelude.Maybe DirectConnectGatewayAssociation)+createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation = Lens.lens (\CreateDirectConnectGatewayAssociationResponse' {directConnectGatewayAssociation} -> directConnectGatewayAssociation) (\s@CreateDirectConnectGatewayAssociationResponse' {} a -> s {directConnectGatewayAssociation = a} :: CreateDirectConnectGatewayAssociationResponse)++-- | The response's http status code.+createDirectConnectGatewayAssociationResponse_httpStatus :: Lens.Lens' CreateDirectConnectGatewayAssociationResponse Prelude.Int+createDirectConnectGatewayAssociationResponse_httpStatus = Lens.lens (\CreateDirectConnectGatewayAssociationResponse' {httpStatus} -> httpStatus) (\s@CreateDirectConnectGatewayAssociationResponse' {} a -> s {httpStatus = a} :: CreateDirectConnectGatewayAssociationResponse)++instance+  Prelude.NFData+    CreateDirectConnectGatewayAssociationResponse+  where+  rnf+    CreateDirectConnectGatewayAssociationResponse' {..} =+      Prelude.rnf directConnectGatewayAssociation+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/CreateDirectConnectGatewayAssociationProposal.hs view
@@ -0,0 +1,292 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a proposal to associate the specified virtual private gateway or+-- transit gateway with the specified Direct Connect gateway.+--+-- You can associate a Direct Connect gateway and virtual private gateway+-- or transit gateway that is owned by any Amazon Web Services account.+module Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal+  ( -- * Creating a Request+    CreateDirectConnectGatewayAssociationProposal (..),+    newCreateDirectConnectGatewayAssociationProposal,++    -- * Request Lenses+    createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociationProposal_directConnectGatewayId,+    createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount,+    createDirectConnectGatewayAssociationProposal_gatewayId,++    -- * Destructuring the Response+    CreateDirectConnectGatewayAssociationProposalResponse (..),+    newCreateDirectConnectGatewayAssociationProposalResponse,++    -- * Response Lenses+    createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal,+    createDirectConnectGatewayAssociationProposalResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateDirectConnectGatewayAssociationProposal' smart constructor.+data CreateDirectConnectGatewayAssociationProposal = CreateDirectConnectGatewayAssociationProposal'+  { -- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+    addAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The Amazon VPC prefixes to no longer advertise to the Direct Connect+    -- gateway.+    removeAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the Direct Connect+    -- gateway.+    directConnectGatewayOwnerAccount :: Prelude.Text,+    -- | The ID of the virtual private gateway or transit gateway.+    gatewayId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGatewayAssociationProposal' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addAllowedPrefixesToDirectConnectGateway', 'createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to advertise to the Direct Connect gateway.+--+-- 'removeAllowedPrefixesToDirectConnectGateway', 'createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to no longer advertise to the Direct Connect+-- gateway.+--+-- 'directConnectGatewayId', 'createDirectConnectGatewayAssociationProposal_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'directConnectGatewayOwnerAccount', 'createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount' - The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+--+-- 'gatewayId', 'createDirectConnectGatewayAssociationProposal_gatewayId' - The ID of the virtual private gateway or transit gateway.+newCreateDirectConnectGatewayAssociationProposal ::+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  -- | 'directConnectGatewayOwnerAccount'+  Prelude.Text ->+  -- | 'gatewayId'+  Prelude.Text ->+  CreateDirectConnectGatewayAssociationProposal+newCreateDirectConnectGatewayAssociationProposal+  pDirectConnectGatewayId_+  pDirectConnectGatewayOwnerAccount_+  pGatewayId_ =+    CreateDirectConnectGatewayAssociationProposal'+      { addAllowedPrefixesToDirectConnectGateway =+          Prelude.Nothing,+        removeAllowedPrefixesToDirectConnectGateway =+          Prelude.Nothing,+        directConnectGatewayId =+          pDirectConnectGatewayId_,+        directConnectGatewayOwnerAccount =+          pDirectConnectGatewayOwnerAccount_,+        gatewayId = pGatewayId_+      }++-- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway :: Lens.Lens' CreateDirectConnectGatewayAssociationProposal (Prelude.Maybe [RouteFilterPrefix])+createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway = Lens.lens (\CreateDirectConnectGatewayAssociationProposal' {addAllowedPrefixesToDirectConnectGateway} -> addAllowedPrefixesToDirectConnectGateway) (\s@CreateDirectConnectGatewayAssociationProposal' {} a -> s {addAllowedPrefixesToDirectConnectGateway = a} :: CreateDirectConnectGatewayAssociationProposal) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon VPC prefixes to no longer advertise to the Direct Connect+-- gateway.+createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway :: Lens.Lens' CreateDirectConnectGatewayAssociationProposal (Prelude.Maybe [RouteFilterPrefix])+createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway = Lens.lens (\CreateDirectConnectGatewayAssociationProposal' {removeAllowedPrefixesToDirectConnectGateway} -> removeAllowedPrefixesToDirectConnectGateway) (\s@CreateDirectConnectGatewayAssociationProposal' {} a -> s {removeAllowedPrefixesToDirectConnectGateway = a} :: CreateDirectConnectGatewayAssociationProposal) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the Direct Connect gateway.+createDirectConnectGatewayAssociationProposal_directConnectGatewayId :: Lens.Lens' CreateDirectConnectGatewayAssociationProposal Prelude.Text+createDirectConnectGatewayAssociationProposal_directConnectGatewayId = Lens.lens (\CreateDirectConnectGatewayAssociationProposal' {directConnectGatewayId} -> directConnectGatewayId) (\s@CreateDirectConnectGatewayAssociationProposal' {} a -> s {directConnectGatewayId = a} :: CreateDirectConnectGatewayAssociationProposal)++-- | The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens.Lens' CreateDirectConnectGatewayAssociationProposal Prelude.Text+createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount = Lens.lens (\CreateDirectConnectGatewayAssociationProposal' {directConnectGatewayOwnerAccount} -> directConnectGatewayOwnerAccount) (\s@CreateDirectConnectGatewayAssociationProposal' {} a -> s {directConnectGatewayOwnerAccount = a} :: CreateDirectConnectGatewayAssociationProposal)++-- | The ID of the virtual private gateway or transit gateway.+createDirectConnectGatewayAssociationProposal_gatewayId :: Lens.Lens' CreateDirectConnectGatewayAssociationProposal Prelude.Text+createDirectConnectGatewayAssociationProposal_gatewayId = Lens.lens (\CreateDirectConnectGatewayAssociationProposal' {gatewayId} -> gatewayId) (\s@CreateDirectConnectGatewayAssociationProposal' {} a -> s {gatewayId = a} :: CreateDirectConnectGatewayAssociationProposal)++instance+  Core.AWSRequest+    CreateDirectConnectGatewayAssociationProposal+  where+  type+    AWSResponse+      CreateDirectConnectGatewayAssociationProposal =+      CreateDirectConnectGatewayAssociationProposalResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          CreateDirectConnectGatewayAssociationProposalResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGatewayAssociationProposal"+                        )+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    CreateDirectConnectGatewayAssociationProposal+  where+  hashWithSalt+    _salt+    CreateDirectConnectGatewayAssociationProposal' {..} =+      _salt+        `Prelude.hashWithSalt` addAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` removeAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` directConnectGatewayOwnerAccount+        `Prelude.hashWithSalt` gatewayId++instance+  Prelude.NFData+    CreateDirectConnectGatewayAssociationProposal+  where+  rnf+    CreateDirectConnectGatewayAssociationProposal' {..} =+      Prelude.rnf+        addAllowedPrefixesToDirectConnectGateway+        `Prelude.seq` Prelude.rnf+          removeAllowedPrefixesToDirectConnectGateway+        `Prelude.seq` Prelude.rnf directConnectGatewayId+        `Prelude.seq` Prelude.rnf directConnectGatewayOwnerAccount+        `Prelude.seq` Prelude.rnf gatewayId++instance+  Data.ToHeaders+    CreateDirectConnectGatewayAssociationProposal+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateDirectConnectGatewayAssociationProposal" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    CreateDirectConnectGatewayAssociationProposal+  where+  toJSON+    CreateDirectConnectGatewayAssociationProposal' {..} =+      Data.object+        ( Prelude.catMaybes+            [ ("addAllowedPrefixesToDirectConnectGateway" Data..=)+                Prelude.<$> addAllowedPrefixesToDirectConnectGateway,+              ( "removeAllowedPrefixesToDirectConnectGateway"+                  Data..=+              )+                Prelude.<$> removeAllowedPrefixesToDirectConnectGateway,+              Prelude.Just+                ( "directConnectGatewayId"+                    Data..= directConnectGatewayId+                ),+              Prelude.Just+                ( "directConnectGatewayOwnerAccount"+                    Data..= directConnectGatewayOwnerAccount+                ),+              Prelude.Just ("gatewayId" Data..= gatewayId)+            ]+        )++instance+  Data.ToPath+    CreateDirectConnectGatewayAssociationProposal+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    CreateDirectConnectGatewayAssociationProposal+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateDirectConnectGatewayAssociationProposalResponse' smart constructor.+data CreateDirectConnectGatewayAssociationProposalResponse = CreateDirectConnectGatewayAssociationProposalResponse'+  { -- | Information about the Direct Connect gateway proposal.+    directConnectGatewayAssociationProposal :: Prelude.Maybe DirectConnectGatewayAssociationProposal,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateDirectConnectGatewayAssociationProposalResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociationProposal', 'createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal' - Information about the Direct Connect gateway proposal.+--+-- 'httpStatus', 'createDirectConnectGatewayAssociationProposalResponse_httpStatus' - The response's http status code.+newCreateDirectConnectGatewayAssociationProposalResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  CreateDirectConnectGatewayAssociationProposalResponse+newCreateDirectConnectGatewayAssociationProposalResponse+  pHttpStatus_ =+    CreateDirectConnectGatewayAssociationProposalResponse'+      { directConnectGatewayAssociationProposal =+          Prelude.Nothing,+        httpStatus =+          pHttpStatus_+      }++-- | Information about the Direct Connect gateway proposal.+createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens.Lens' CreateDirectConnectGatewayAssociationProposalResponse (Prelude.Maybe DirectConnectGatewayAssociationProposal)+createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal = Lens.lens (\CreateDirectConnectGatewayAssociationProposalResponse' {directConnectGatewayAssociationProposal} -> directConnectGatewayAssociationProposal) (\s@CreateDirectConnectGatewayAssociationProposalResponse' {} a -> s {directConnectGatewayAssociationProposal = a} :: CreateDirectConnectGatewayAssociationProposalResponse)++-- | The response's http status code.+createDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens.Lens' CreateDirectConnectGatewayAssociationProposalResponse Prelude.Int+createDirectConnectGatewayAssociationProposalResponse_httpStatus = Lens.lens (\CreateDirectConnectGatewayAssociationProposalResponse' {httpStatus} -> httpStatus) (\s@CreateDirectConnectGatewayAssociationProposalResponse' {} a -> s {httpStatus = a} :: CreateDirectConnectGatewayAssociationProposalResponse)++instance+  Prelude.NFData+    CreateDirectConnectGatewayAssociationProposalResponse+  where+  rnf+    CreateDirectConnectGatewayAssociationProposalResponse' {..} =+      Prelude.rnf directConnectGatewayAssociationProposal+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/CreateInterconnect.hs view
@@ -0,0 +1,232 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateInterconnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates an interconnect between an Direct Connect Partner\'s network and+-- a specific Direct Connect location.+--+-- An interconnect is a connection that is capable of hosting other+-- connections. The Direct Connect Partner can use an interconnect to+-- provide Direct Connect hosted connections to customers through their own+-- network services. Like a standard connection, an interconnect links the+-- partner\'s network to an Direct Connect location over a standard+-- Ethernet fiber-optic cable. One end is connected to the partner\'s+-- router, the other to an Direct Connect router.+--+-- You can automatically add the new interconnect to a link aggregation+-- group (LAG) by specifying a LAG ID in the request. This ensures that the+-- new interconnect is allocated on the same Direct Connect endpoint that+-- hosts the specified LAG. If there are no available ports on the+-- endpoint, the request fails and no interconnect is created.+--+-- For each end customer, the Direct Connect Partner provisions a+-- connection on their interconnect by calling AllocateHostedConnection.+-- The end customer can then connect to Amazon Web Services resources by+-- creating a virtual interface on their connection, using the VLAN+-- assigned to them by the Direct Connect Partner.+--+-- Intended for use by Direct Connect Partners only.+module Amazonka.DirectConnect.CreateInterconnect+  ( -- * Creating a Request+    CreateInterconnect (..),+    newCreateInterconnect,++    -- * Request Lenses+    createInterconnect_lagId,+    createInterconnect_providerName,+    createInterconnect_tags,+    createInterconnect_interconnectName,+    createInterconnect_bandwidth,+    createInterconnect_location,++    -- * Destructuring the Response+    Interconnect (..),+    newInterconnect,++    -- * Response Lenses+    interconnect_awsDevice,+    interconnect_awsDeviceV2,+    interconnect_awsLogicalDeviceId,+    interconnect_bandwidth,+    interconnect_hasLogicalRedundancy,+    interconnect_interconnectId,+    interconnect_interconnectName,+    interconnect_interconnectState,+    interconnect_jumboFrameCapable,+    interconnect_lagId,+    interconnect_loaIssueTime,+    interconnect_location,+    interconnect_providerName,+    interconnect_region,+    interconnect_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateInterconnect' smart constructor.+data CreateInterconnect = CreateInterconnect'+  { -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the interconnect.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | The tags to associate with the interconnect.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the interconnect.+    interconnectName :: Prelude.Text,+    -- | The port bandwidth, in Gbps. The possible values are 1 and 10.+    bandwidth :: Prelude.Text,+    -- | The location of the interconnect.+    location :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateInterconnect' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'lagId', 'createInterconnect_lagId' - The ID of the LAG.+--+-- 'providerName', 'createInterconnect_providerName' - The name of the service provider associated with the interconnect.+--+-- 'tags', 'createInterconnect_tags' - The tags to associate with the interconnect.+--+-- 'interconnectName', 'createInterconnect_interconnectName' - The name of the interconnect.+--+-- 'bandwidth', 'createInterconnect_bandwidth' - The port bandwidth, in Gbps. The possible values are 1 and 10.+--+-- 'location', 'createInterconnect_location' - The location of the interconnect.+newCreateInterconnect ::+  -- | 'interconnectName'+  Prelude.Text ->+  -- | 'bandwidth'+  Prelude.Text ->+  -- | 'location'+  Prelude.Text ->+  CreateInterconnect+newCreateInterconnect+  pInterconnectName_+  pBandwidth_+  pLocation_ =+    CreateInterconnect'+      { lagId = Prelude.Nothing,+        providerName = Prelude.Nothing,+        tags = Prelude.Nothing,+        interconnectName = pInterconnectName_,+        bandwidth = pBandwidth_,+        location = pLocation_+      }++-- | The ID of the LAG.+createInterconnect_lagId :: Lens.Lens' CreateInterconnect (Prelude.Maybe Prelude.Text)+createInterconnect_lagId = Lens.lens (\CreateInterconnect' {lagId} -> lagId) (\s@CreateInterconnect' {} a -> s {lagId = a} :: CreateInterconnect)++-- | The name of the service provider associated with the interconnect.+createInterconnect_providerName :: Lens.Lens' CreateInterconnect (Prelude.Maybe Prelude.Text)+createInterconnect_providerName = Lens.lens (\CreateInterconnect' {providerName} -> providerName) (\s@CreateInterconnect' {} a -> s {providerName = a} :: CreateInterconnect)++-- | The tags to associate with the interconnect.+createInterconnect_tags :: Lens.Lens' CreateInterconnect (Prelude.Maybe (Prelude.NonEmpty Tag))+createInterconnect_tags = Lens.lens (\CreateInterconnect' {tags} -> tags) (\s@CreateInterconnect' {} a -> s {tags = a} :: CreateInterconnect) Prelude.. Lens.mapping Lens.coerced++-- | The name of the interconnect.+createInterconnect_interconnectName :: Lens.Lens' CreateInterconnect Prelude.Text+createInterconnect_interconnectName = Lens.lens (\CreateInterconnect' {interconnectName} -> interconnectName) (\s@CreateInterconnect' {} a -> s {interconnectName = a} :: CreateInterconnect)++-- | The port bandwidth, in Gbps. The possible values are 1 and 10.+createInterconnect_bandwidth :: Lens.Lens' CreateInterconnect Prelude.Text+createInterconnect_bandwidth = Lens.lens (\CreateInterconnect' {bandwidth} -> bandwidth) (\s@CreateInterconnect' {} a -> s {bandwidth = a} :: CreateInterconnect)++-- | The location of the interconnect.+createInterconnect_location :: Lens.Lens' CreateInterconnect Prelude.Text+createInterconnect_location = Lens.lens (\CreateInterconnect' {location} -> location) (\s@CreateInterconnect' {} a -> s {location = a} :: CreateInterconnect)++instance Core.AWSRequest CreateInterconnect where+  type AWSResponse CreateInterconnect = Interconnect+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateInterconnect where+  hashWithSalt _salt CreateInterconnect' {..} =+    _salt+      `Prelude.hashWithSalt` lagId+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` interconnectName+      `Prelude.hashWithSalt` bandwidth+      `Prelude.hashWithSalt` location++instance Prelude.NFData CreateInterconnect where+  rnf CreateInterconnect' {..} =+    Prelude.rnf lagId+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf interconnectName+      `Prelude.seq` Prelude.rnf bandwidth+      `Prelude.seq` Prelude.rnf location++instance Data.ToHeaders CreateInterconnect where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateInterconnect" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateInterconnect where+  toJSON CreateInterconnect' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("lagId" Data..=) Prelude.<$> lagId,+            ("providerName" Data..=) Prelude.<$> providerName,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just+              ("interconnectName" Data..= interconnectName),+            Prelude.Just ("bandwidth" Data..= bandwidth),+            Prelude.Just ("location" Data..= location)+          ]+      )++instance Data.ToPath CreateInterconnect where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateInterconnect where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/CreateLag.hs view
@@ -0,0 +1,305 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateLag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a link aggregation group (LAG) with the specified number of+-- bundled physical dedicated connections between the customer network and+-- a specific Direct Connect location. A LAG is a logical interface that+-- uses the Link Aggregation Control Protocol (LACP) to aggregate multiple+-- interfaces, enabling you to treat them as a single interface.+--+-- All connections in a LAG must use the same bandwidth (either 1Gbps or+-- 10Gbps) and must terminate at the same Direct Connect endpoint.+--+-- You can have up to 10 dedicated connections per LAG. Regardless of this+-- limit, if you request more connections for the LAG than Direct Connect+-- can allocate on a single endpoint, no LAG is created.+--+-- You can specify an existing physical dedicated connection or+-- interconnect to include in the LAG (which counts towards the total+-- number of connections). Doing so interrupts the current physical+-- dedicated connection, and re-establishes them as a member of the LAG.+-- The LAG will be created on the same Direct Connect endpoint to which the+-- dedicated connection terminates. Any virtual interfaces associated with+-- the dedicated connection are automatically disassociated and+-- re-associated with the LAG. The connection ID does not change.+--+-- If the Amazon Web Services account used to create a LAG is a registered+-- Direct Connect Partner, the LAG is automatically enabled to host+-- sub-connections. For a LAG owned by a partner, any associated virtual+-- interfaces cannot be directly configured.+module Amazonka.DirectConnect.CreateLag+  ( -- * Creating a Request+    CreateLag (..),+    newCreateLag,++    -- * Request Lenses+    createLag_childConnectionTags,+    createLag_connectionId,+    createLag_providerName,+    createLag_requestMACSec,+    createLag_tags,+    createLag_numberOfConnections,+    createLag_location,+    createLag_connectionsBandwidth,+    createLag_lagName,++    -- * Destructuring the Response+    Lag (..),+    newLag,++    -- * Response Lenses+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateLag' smart constructor.+data CreateLag = CreateLag'+  { -- | The tags to associate with the automtically created LAGs.+    childConnectionTags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The ID of an existing dedicated connection to migrate to the LAG.+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the LAG.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the connection will support MAC Security (MACsec).+    --+    -- All connections in the LAG must be capable of supporting MAC Security+    -- (MACsec). For information about MAC Security (MACsec) prerequisties, see+    -- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+    -- in the /Direct Connect User Guide/.+    requestMACSec :: Prelude.Maybe Prelude.Bool,+    -- | The tags to associate with the LAG.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The number of physical dedicated connections initially provisioned and+    -- bundled by the LAG.+    numberOfConnections :: Prelude.Int,+    -- | The location for the LAG.+    location :: Prelude.Text,+    -- | The bandwidth of the individual physical dedicated connections bundled+    -- by the LAG. The possible values are 1Gbps and 10Gbps.+    connectionsBandwidth :: Prelude.Text,+    -- | The name of the LAG.+    lagName :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateLag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'childConnectionTags', 'createLag_childConnectionTags' - The tags to associate with the automtically created LAGs.+--+-- 'connectionId', 'createLag_connectionId' - The ID of an existing dedicated connection to migrate to the LAG.+--+-- 'providerName', 'createLag_providerName' - The name of the service provider associated with the LAG.+--+-- 'requestMACSec', 'createLag_requestMACSec' - Indicates whether the connection will support MAC Security (MACsec).+--+-- All connections in the LAG must be capable of supporting MAC Security+-- (MACsec). For information about MAC Security (MACsec) prerequisties, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+-- in the /Direct Connect User Guide/.+--+-- 'tags', 'createLag_tags' - The tags to associate with the LAG.+--+-- 'numberOfConnections', 'createLag_numberOfConnections' - The number of physical dedicated connections initially provisioned and+-- bundled by the LAG.+--+-- 'location', 'createLag_location' - The location for the LAG.+--+-- 'connectionsBandwidth', 'createLag_connectionsBandwidth' - The bandwidth of the individual physical dedicated connections bundled+-- by the LAG. The possible values are 1Gbps and 10Gbps.+--+-- 'lagName', 'createLag_lagName' - The name of the LAG.+newCreateLag ::+  -- | 'numberOfConnections'+  Prelude.Int ->+  -- | 'location'+  Prelude.Text ->+  -- | 'connectionsBandwidth'+  Prelude.Text ->+  -- | 'lagName'+  Prelude.Text ->+  CreateLag+newCreateLag+  pNumberOfConnections_+  pLocation_+  pConnectionsBandwidth_+  pLagName_ =+    CreateLag'+      { childConnectionTags = Prelude.Nothing,+        connectionId = Prelude.Nothing,+        providerName = Prelude.Nothing,+        requestMACSec = Prelude.Nothing,+        tags = Prelude.Nothing,+        numberOfConnections = pNumberOfConnections_,+        location = pLocation_,+        connectionsBandwidth = pConnectionsBandwidth_,+        lagName = pLagName_+      }++-- | The tags to associate with the automtically created LAGs.+createLag_childConnectionTags :: Lens.Lens' CreateLag (Prelude.Maybe (Prelude.NonEmpty Tag))+createLag_childConnectionTags = Lens.lens (\CreateLag' {childConnectionTags} -> childConnectionTags) (\s@CreateLag' {} a -> s {childConnectionTags = a} :: CreateLag) Prelude.. Lens.mapping Lens.coerced++-- | The ID of an existing dedicated connection to migrate to the LAG.+createLag_connectionId :: Lens.Lens' CreateLag (Prelude.Maybe Prelude.Text)+createLag_connectionId = Lens.lens (\CreateLag' {connectionId} -> connectionId) (\s@CreateLag' {} a -> s {connectionId = a} :: CreateLag)++-- | The name of the service provider associated with the LAG.+createLag_providerName :: Lens.Lens' CreateLag (Prelude.Maybe Prelude.Text)+createLag_providerName = Lens.lens (\CreateLag' {providerName} -> providerName) (\s@CreateLag' {} a -> s {providerName = a} :: CreateLag)++-- | Indicates whether the connection will support MAC Security (MACsec).+--+-- All connections in the LAG must be capable of supporting MAC Security+-- (MACsec). For information about MAC Security (MACsec) prerequisties, see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/direct-connect-mac-sec-getting-started.html#mac-sec-prerequisites MACsec prerequisties>+-- in the /Direct Connect User Guide/.+createLag_requestMACSec :: Lens.Lens' CreateLag (Prelude.Maybe Prelude.Bool)+createLag_requestMACSec = Lens.lens (\CreateLag' {requestMACSec} -> requestMACSec) (\s@CreateLag' {} a -> s {requestMACSec = a} :: CreateLag)++-- | The tags to associate with the LAG.+createLag_tags :: Lens.Lens' CreateLag (Prelude.Maybe (Prelude.NonEmpty Tag))+createLag_tags = Lens.lens (\CreateLag' {tags} -> tags) (\s@CreateLag' {} a -> s {tags = a} :: CreateLag) Prelude.. Lens.mapping Lens.coerced++-- | The number of physical dedicated connections initially provisioned and+-- bundled by the LAG.+createLag_numberOfConnections :: Lens.Lens' CreateLag Prelude.Int+createLag_numberOfConnections = Lens.lens (\CreateLag' {numberOfConnections} -> numberOfConnections) (\s@CreateLag' {} a -> s {numberOfConnections = a} :: CreateLag)++-- | The location for the LAG.+createLag_location :: Lens.Lens' CreateLag Prelude.Text+createLag_location = Lens.lens (\CreateLag' {location} -> location) (\s@CreateLag' {} a -> s {location = a} :: CreateLag)++-- | The bandwidth of the individual physical dedicated connections bundled+-- by the LAG. The possible values are 1Gbps and 10Gbps.+createLag_connectionsBandwidth :: Lens.Lens' CreateLag Prelude.Text+createLag_connectionsBandwidth = Lens.lens (\CreateLag' {connectionsBandwidth} -> connectionsBandwidth) (\s@CreateLag' {} a -> s {connectionsBandwidth = a} :: CreateLag)++-- | The name of the LAG.+createLag_lagName :: Lens.Lens' CreateLag Prelude.Text+createLag_lagName = Lens.lens (\CreateLag' {lagName} -> lagName) (\s@CreateLag' {} a -> s {lagName = a} :: CreateLag)++instance Core.AWSRequest CreateLag where+  type AWSResponse CreateLag = Lag+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateLag where+  hashWithSalt _salt CreateLag' {..} =+    _salt+      `Prelude.hashWithSalt` childConnectionTags+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` requestMACSec+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` numberOfConnections+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` connectionsBandwidth+      `Prelude.hashWithSalt` lagName++instance Prelude.NFData CreateLag where+  rnf CreateLag' {..} =+    Prelude.rnf childConnectionTags+      `Prelude.seq` Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf requestMACSec+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf numberOfConnections+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf connectionsBandwidth+      `Prelude.seq` Prelude.rnf lagName++instance Data.ToHeaders CreateLag where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ("OvertureService.CreateLag" :: Prelude.ByteString),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateLag where+  toJSON CreateLag' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("childConnectionTags" Data..=)+              Prelude.<$> childConnectionTags,+            ("connectionId" Data..=) Prelude.<$> connectionId,+            ("providerName" Data..=) Prelude.<$> providerName,+            ("requestMACSec" Data..=) Prelude.<$> requestMACSec,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just+              ("numberOfConnections" Data..= numberOfConnections),+            Prelude.Just ("location" Data..= location),+            Prelude.Just+              ( "connectionsBandwidth"+                  Data..= connectionsBandwidth+              ),+            Prelude.Just ("lagName" Data..= lagName)+          ]+      )++instance Data.ToPath CreateLag where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateLag where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/CreatePrivateVirtualInterface.hs view
@@ -0,0 +1,192 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreatePrivateVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a private virtual interface. A virtual interface is the VLAN+-- that transports Direct Connect traffic. A private virtual interface can+-- be connected to either a Direct Connect gateway or a Virtual Private+-- Gateway (VGW). Connecting the private virtual interface to a Direct+-- Connect gateway enables the possibility for connecting to multiple VPCs,+-- including VPCs in different Amazon Web Services Regions. Connecting the+-- private virtual interface to a VGW only provides access to a single VPC+-- within the same Region.+--+-- Setting the MTU of a virtual interface to 9001 (jumbo frames) can cause+-- an update to the underlying physical connection if it wasn\'t updated to+-- support jumbo frames. Updating the connection disrupts network+-- connectivity for all virtual interfaces associated with the connection+-- for up to 30 seconds. To check whether your connection supports jumbo+-- frames, call DescribeConnections. To check whether your virtual+-- interface supports jumbo frames, call DescribeVirtualInterfaces.+module Amazonka.DirectConnect.CreatePrivateVirtualInterface+  ( -- * Creating a Request+    CreatePrivateVirtualInterface (..),+    newCreatePrivateVirtualInterface,++    -- * Request Lenses+    createPrivateVirtualInterface_connectionId,+    createPrivateVirtualInterface_newPrivateVirtualInterface,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreatePrivateVirtualInterface' smart constructor.+data CreatePrivateVirtualInterface = CreatePrivateVirtualInterface'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text,+    -- | Information about the private virtual interface.+    newPrivateVirtualInterface' :: NewPrivateVirtualInterface+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreatePrivateVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'createPrivateVirtualInterface_connectionId' - The ID of the connection.+--+-- 'newPrivateVirtualInterface'', 'createPrivateVirtualInterface_newPrivateVirtualInterface' - Information about the private virtual interface.+newCreatePrivateVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'newPrivateVirtualInterface''+  NewPrivateVirtualInterface ->+  CreatePrivateVirtualInterface+newCreatePrivateVirtualInterface+  pConnectionId_+  pNewPrivateVirtualInterface_ =+    CreatePrivateVirtualInterface'+      { connectionId =+          pConnectionId_,+        newPrivateVirtualInterface' =+          pNewPrivateVirtualInterface_+      }++-- | The ID of the connection.+createPrivateVirtualInterface_connectionId :: Lens.Lens' CreatePrivateVirtualInterface Prelude.Text+createPrivateVirtualInterface_connectionId = Lens.lens (\CreatePrivateVirtualInterface' {connectionId} -> connectionId) (\s@CreatePrivateVirtualInterface' {} a -> s {connectionId = a} :: CreatePrivateVirtualInterface)++-- | Information about the private virtual interface.+createPrivateVirtualInterface_newPrivateVirtualInterface :: Lens.Lens' CreatePrivateVirtualInterface NewPrivateVirtualInterface+createPrivateVirtualInterface_newPrivateVirtualInterface = Lens.lens (\CreatePrivateVirtualInterface' {newPrivateVirtualInterface'} -> newPrivateVirtualInterface') (\s@CreatePrivateVirtualInterface' {} a -> s {newPrivateVirtualInterface' = a} :: CreatePrivateVirtualInterface)++instance+  Core.AWSRequest+    CreatePrivateVirtualInterface+  where+  type+    AWSResponse CreatePrivateVirtualInterface =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    CreatePrivateVirtualInterface+  where+  hashWithSalt _salt CreatePrivateVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` newPrivateVirtualInterface'++instance Prelude.NFData CreatePrivateVirtualInterface where+  rnf CreatePrivateVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf newPrivateVirtualInterface'++instance Data.ToHeaders CreatePrivateVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreatePrivateVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreatePrivateVirtualInterface where+  toJSON CreatePrivateVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just+              ( "newPrivateVirtualInterface"+                  Data..= newPrivateVirtualInterface'+              )+          ]+      )++instance Data.ToPath CreatePrivateVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery CreatePrivateVirtualInterface where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/CreatePublicVirtualInterface.hs view
@@ -0,0 +1,181 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreatePublicVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a public virtual interface. A virtual interface is the VLAN that+-- transports Direct Connect traffic. A public virtual interface supports+-- sending traffic to public services of Amazon Web Services such as Amazon+-- S3.+--+-- When creating an IPv6 public virtual interface (@addressFamily@ is+-- @ipv6@), leave the @customer@ and @amazon@ address fields blank to use+-- auto-assigned IPv6 space. Custom IPv6 addresses are not supported.+module Amazonka.DirectConnect.CreatePublicVirtualInterface+  ( -- * Creating a Request+    CreatePublicVirtualInterface (..),+    newCreatePublicVirtualInterface,++    -- * Request Lenses+    createPublicVirtualInterface_connectionId,+    createPublicVirtualInterface_newPublicVirtualInterface,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreatePublicVirtualInterface' smart constructor.+data CreatePublicVirtualInterface = CreatePublicVirtualInterface'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text,+    -- | Information about the public virtual interface.+    newPublicVirtualInterface' :: NewPublicVirtualInterface+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreatePublicVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'createPublicVirtualInterface_connectionId' - The ID of the connection.+--+-- 'newPublicVirtualInterface'', 'createPublicVirtualInterface_newPublicVirtualInterface' - Information about the public virtual interface.+newCreatePublicVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'newPublicVirtualInterface''+  NewPublicVirtualInterface ->+  CreatePublicVirtualInterface+newCreatePublicVirtualInterface+  pConnectionId_+  pNewPublicVirtualInterface_ =+    CreatePublicVirtualInterface'+      { connectionId =+          pConnectionId_,+        newPublicVirtualInterface' =+          pNewPublicVirtualInterface_+      }++-- | The ID of the connection.+createPublicVirtualInterface_connectionId :: Lens.Lens' CreatePublicVirtualInterface Prelude.Text+createPublicVirtualInterface_connectionId = Lens.lens (\CreatePublicVirtualInterface' {connectionId} -> connectionId) (\s@CreatePublicVirtualInterface' {} a -> s {connectionId = a} :: CreatePublicVirtualInterface)++-- | Information about the public virtual interface.+createPublicVirtualInterface_newPublicVirtualInterface :: Lens.Lens' CreatePublicVirtualInterface NewPublicVirtualInterface+createPublicVirtualInterface_newPublicVirtualInterface = Lens.lens (\CreatePublicVirtualInterface' {newPublicVirtualInterface'} -> newPublicVirtualInterface') (\s@CreatePublicVirtualInterface' {} a -> s {newPublicVirtualInterface' = a} :: CreatePublicVirtualInterface)++instance Core.AWSRequest CreatePublicVirtualInterface where+  type+    AWSResponse CreatePublicVirtualInterface =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    CreatePublicVirtualInterface+  where+  hashWithSalt _salt CreatePublicVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` newPublicVirtualInterface'++instance Prelude.NFData CreatePublicVirtualInterface where+  rnf CreatePublicVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf newPublicVirtualInterface'++instance Data.ToHeaders CreatePublicVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreatePublicVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreatePublicVirtualInterface where+  toJSON CreatePublicVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just+              ( "newPublicVirtualInterface"+                  Data..= newPublicVirtualInterface'+              )+          ]+      )++instance Data.ToPath CreatePublicVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery CreatePublicVirtualInterface where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/CreateTransitVirtualInterface.hs view
@@ -0,0 +1,220 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.CreateTransitVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a transit virtual interface. A transit virtual interface should+-- be used to access one or more transit gateways associated with Direct+-- Connect gateways. A transit virtual interface enables the connection of+-- multiple VPCs attached to a transit gateway to a Direct Connect gateway.+--+-- If you associate your transit gateway with one or more Direct Connect+-- gateways, the Autonomous System Number (ASN) used by the transit gateway+-- and the Direct Connect gateway must be different. For example, if you+-- use the default ASN 64512 for both your the transit gateway and Direct+-- Connect gateway, the association request fails.+--+-- Setting the MTU of a virtual interface to 8500 (jumbo frames) can cause+-- an update to the underlying physical connection if it wasn\'t updated to+-- support jumbo frames. Updating the connection disrupts network+-- connectivity for all virtual interfaces associated with the connection+-- for up to 30 seconds. To check whether your connection supports jumbo+-- frames, call DescribeConnections. To check whether your virtual+-- interface supports jumbo frames, call DescribeVirtualInterfaces.+module Amazonka.DirectConnect.CreateTransitVirtualInterface+  ( -- * Creating a Request+    CreateTransitVirtualInterface (..),+    newCreateTransitVirtualInterface,++    -- * Request Lenses+    createTransitVirtualInterface_connectionId,+    createTransitVirtualInterface_newTransitVirtualInterface,++    -- * Destructuring the Response+    CreateTransitVirtualInterfaceResponse (..),+    newCreateTransitVirtualInterfaceResponse,++    -- * Response Lenses+    createTransitVirtualInterfaceResponse_virtualInterface,+    createTransitVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateTransitVirtualInterface' smart constructor.+data CreateTransitVirtualInterface = CreateTransitVirtualInterface'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text,+    -- | Information about the transit virtual interface.+    newTransitVirtualInterface' :: NewTransitVirtualInterface+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateTransitVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'createTransitVirtualInterface_connectionId' - The ID of the connection.+--+-- 'newTransitVirtualInterface'', 'createTransitVirtualInterface_newTransitVirtualInterface' - Information about the transit virtual interface.+newCreateTransitVirtualInterface ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'newTransitVirtualInterface''+  NewTransitVirtualInterface ->+  CreateTransitVirtualInterface+newCreateTransitVirtualInterface+  pConnectionId_+  pNewTransitVirtualInterface_ =+    CreateTransitVirtualInterface'+      { connectionId =+          pConnectionId_,+        newTransitVirtualInterface' =+          pNewTransitVirtualInterface_+      }++-- | The ID of the connection.+createTransitVirtualInterface_connectionId :: Lens.Lens' CreateTransitVirtualInterface Prelude.Text+createTransitVirtualInterface_connectionId = Lens.lens (\CreateTransitVirtualInterface' {connectionId} -> connectionId) (\s@CreateTransitVirtualInterface' {} a -> s {connectionId = a} :: CreateTransitVirtualInterface)++-- | Information about the transit virtual interface.+createTransitVirtualInterface_newTransitVirtualInterface :: Lens.Lens' CreateTransitVirtualInterface NewTransitVirtualInterface+createTransitVirtualInterface_newTransitVirtualInterface = Lens.lens (\CreateTransitVirtualInterface' {newTransitVirtualInterface'} -> newTransitVirtualInterface') (\s@CreateTransitVirtualInterface' {} a -> s {newTransitVirtualInterface' = a} :: CreateTransitVirtualInterface)++instance+  Core.AWSRequest+    CreateTransitVirtualInterface+  where+  type+    AWSResponse CreateTransitVirtualInterface =+      CreateTransitVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          CreateTransitVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterface")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    CreateTransitVirtualInterface+  where+  hashWithSalt _salt CreateTransitVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` newTransitVirtualInterface'++instance Prelude.NFData CreateTransitVirtualInterface where+  rnf CreateTransitVirtualInterface' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf newTransitVirtualInterface'++instance Data.ToHeaders CreateTransitVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.CreateTransitVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON CreateTransitVirtualInterface where+  toJSON CreateTransitVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just+              ( "newTransitVirtualInterface"+                  Data..= newTransitVirtualInterface'+              )+          ]+      )++instance Data.ToPath CreateTransitVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery CreateTransitVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateTransitVirtualInterfaceResponse' smart constructor.+data CreateTransitVirtualInterfaceResponse = CreateTransitVirtualInterfaceResponse'+  { virtualInterface :: Prelude.Maybe VirtualInterface,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateTransitVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterface', 'createTransitVirtualInterfaceResponse_virtualInterface' - Undocumented member.+--+-- 'httpStatus', 'createTransitVirtualInterfaceResponse_httpStatus' - The response's http status code.+newCreateTransitVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  CreateTransitVirtualInterfaceResponse+newCreateTransitVirtualInterfaceResponse pHttpStatus_ =+  CreateTransitVirtualInterfaceResponse'+    { virtualInterface =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Undocumented member.+createTransitVirtualInterfaceResponse_virtualInterface :: Lens.Lens' CreateTransitVirtualInterfaceResponse (Prelude.Maybe VirtualInterface)+createTransitVirtualInterfaceResponse_virtualInterface = Lens.lens (\CreateTransitVirtualInterfaceResponse' {virtualInterface} -> virtualInterface) (\s@CreateTransitVirtualInterfaceResponse' {} a -> s {virtualInterface = a} :: CreateTransitVirtualInterfaceResponse)++-- | The response's http status code.+createTransitVirtualInterfaceResponse_httpStatus :: Lens.Lens' CreateTransitVirtualInterfaceResponse Prelude.Int+createTransitVirtualInterfaceResponse_httpStatus = Lens.lens (\CreateTransitVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@CreateTransitVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: CreateTransitVirtualInterfaceResponse)++instance+  Prelude.NFData+    CreateTransitVirtualInterfaceResponse+  where+  rnf CreateTransitVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterface+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteBGPPeer.hs view
@@ -0,0 +1,218 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteBGPPeer+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified BGP peer on the specified virtual interface with+-- the specified customer address and ASN.+--+-- You cannot delete the last BGP peer from a virtual interface.+module Amazonka.DirectConnect.DeleteBGPPeer+  ( -- * Creating a Request+    DeleteBGPPeer (..),+    newDeleteBGPPeer,++    -- * Request Lenses+    deleteBGPPeer_asn,+    deleteBGPPeer_bgpPeerId,+    deleteBGPPeer_customerAddress,+    deleteBGPPeer_virtualInterfaceId,++    -- * Destructuring the Response+    DeleteBGPPeerResponse (..),+    newDeleteBGPPeerResponse,++    -- * Response Lenses+    deleteBGPPeerResponse_virtualInterface,+    deleteBGPPeerResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteBGPPeer' smart constructor.+data DeleteBGPPeer = DeleteBGPPeer'+  { -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The ID of the BGP peer.+    bgpPeerId :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteBGPPeer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'asn', 'deleteBGPPeer_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- 'bgpPeerId', 'deleteBGPPeer_bgpPeerId' - The ID of the BGP peer.+--+-- 'customerAddress', 'deleteBGPPeer_customerAddress' - The IP address assigned to the customer interface.+--+-- 'virtualInterfaceId', 'deleteBGPPeer_virtualInterfaceId' - The ID of the virtual interface.+newDeleteBGPPeer ::+  DeleteBGPPeer+newDeleteBGPPeer =+  DeleteBGPPeer'+    { asn = Prelude.Nothing,+      bgpPeerId = Prelude.Nothing,+      customerAddress = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing+    }++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+deleteBGPPeer_asn :: Lens.Lens' DeleteBGPPeer (Prelude.Maybe Prelude.Int)+deleteBGPPeer_asn = Lens.lens (\DeleteBGPPeer' {asn} -> asn) (\s@DeleteBGPPeer' {} a -> s {asn = a} :: DeleteBGPPeer)++-- | The ID of the BGP peer.+deleteBGPPeer_bgpPeerId :: Lens.Lens' DeleteBGPPeer (Prelude.Maybe Prelude.Text)+deleteBGPPeer_bgpPeerId = Lens.lens (\DeleteBGPPeer' {bgpPeerId} -> bgpPeerId) (\s@DeleteBGPPeer' {} a -> s {bgpPeerId = a} :: DeleteBGPPeer)++-- | The IP address assigned to the customer interface.+deleteBGPPeer_customerAddress :: Lens.Lens' DeleteBGPPeer (Prelude.Maybe Prelude.Text)+deleteBGPPeer_customerAddress = Lens.lens (\DeleteBGPPeer' {customerAddress} -> customerAddress) (\s@DeleteBGPPeer' {} a -> s {customerAddress = a} :: DeleteBGPPeer)++-- | The ID of the virtual interface.+deleteBGPPeer_virtualInterfaceId :: Lens.Lens' DeleteBGPPeer (Prelude.Maybe Prelude.Text)+deleteBGPPeer_virtualInterfaceId = Lens.lens (\DeleteBGPPeer' {virtualInterfaceId} -> virtualInterfaceId) (\s@DeleteBGPPeer' {} a -> s {virtualInterfaceId = a} :: DeleteBGPPeer)++instance Core.AWSRequest DeleteBGPPeer where+  type+    AWSResponse DeleteBGPPeer =+      DeleteBGPPeerResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteBGPPeerResponse'+            Prelude.<$> (x Data..?> "virtualInterface")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DeleteBGPPeer where+  hashWithSalt _salt DeleteBGPPeer' {..} =+    _salt+      `Prelude.hashWithSalt` asn+      `Prelude.hashWithSalt` bgpPeerId+      `Prelude.hashWithSalt` customerAddress+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData DeleteBGPPeer where+  rnf DeleteBGPPeer' {..} =+    Prelude.rnf asn+      `Prelude.seq` Prelude.rnf bgpPeerId+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance Data.ToHeaders DeleteBGPPeer where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteBGPPeer" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteBGPPeer where+  toJSON DeleteBGPPeer' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("asn" Data..=) Prelude.<$> asn,+            ("bgpPeerId" Data..=) Prelude.<$> bgpPeerId,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("virtualInterfaceId" Data..=)+              Prelude.<$> virtualInterfaceId+          ]+      )++instance Data.ToPath DeleteBGPPeer where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteBGPPeer where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteBGPPeerResponse' smart constructor.+data DeleteBGPPeerResponse = DeleteBGPPeerResponse'+  { -- | The virtual interface.+    virtualInterface :: Prelude.Maybe VirtualInterface,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteBGPPeerResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterface', 'deleteBGPPeerResponse_virtualInterface' - The virtual interface.+--+-- 'httpStatus', 'deleteBGPPeerResponse_httpStatus' - The response's http status code.+newDeleteBGPPeerResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteBGPPeerResponse+newDeleteBGPPeerResponse pHttpStatus_ =+  DeleteBGPPeerResponse'+    { virtualInterface =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The virtual interface.+deleteBGPPeerResponse_virtualInterface :: Lens.Lens' DeleteBGPPeerResponse (Prelude.Maybe VirtualInterface)+deleteBGPPeerResponse_virtualInterface = Lens.lens (\DeleteBGPPeerResponse' {virtualInterface} -> virtualInterface) (\s@DeleteBGPPeerResponse' {} a -> s {virtualInterface = a} :: DeleteBGPPeerResponse)++-- | The response's http status code.+deleteBGPPeerResponse_httpStatus :: Lens.Lens' DeleteBGPPeerResponse Prelude.Int+deleteBGPPeerResponse_httpStatus = Lens.lens (\DeleteBGPPeerResponse' {httpStatus} -> httpStatus) (\s@DeleteBGPPeerResponse' {} a -> s {httpStatus = a} :: DeleteBGPPeerResponse)++instance Prelude.NFData DeleteBGPPeerResponse where+  rnf DeleteBGPPeerResponse' {..} =+    Prelude.rnf virtualInterface+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteConnection.hs view
@@ -0,0 +1,143 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified connection.+--+-- Deleting a connection only stops the Direct Connect port hour and data+-- transfer charges. If you are partnering with any third parties to+-- connect with the Direct Connect location, you must cancel your service+-- with them separately.+module Amazonka.DirectConnect.DeleteConnection+  ( -- * Creating a Request+    DeleteConnection (..),+    newDeleteConnection,++    -- * Request Lenses+    deleteConnection_connectionId,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteConnection' smart constructor.+data DeleteConnection = DeleteConnection'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'deleteConnection_connectionId' - The ID of the connection.+newDeleteConnection ::+  -- | 'connectionId'+  Prelude.Text ->+  DeleteConnection+newDeleteConnection pConnectionId_ =+  DeleteConnection' {connectionId = pConnectionId_}++-- | The ID of the connection.+deleteConnection_connectionId :: Lens.Lens' DeleteConnection Prelude.Text+deleteConnection_connectionId = Lens.lens (\DeleteConnection' {connectionId} -> connectionId) (\s@DeleteConnection' {} a -> s {connectionId = a} :: DeleteConnection)++instance Core.AWSRequest DeleteConnection where+  type AWSResponse DeleteConnection = Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DeleteConnection where+  hashWithSalt _salt DeleteConnection' {..} =+    _salt `Prelude.hashWithSalt` connectionId++instance Prelude.NFData DeleteConnection where+  rnf DeleteConnection' {..} = Prelude.rnf connectionId++instance Data.ToHeaders DeleteConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteConnection where+  toJSON DeleteConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("connectionId" Data..= connectionId)]+      )++instance Data.ToPath DeleteConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteConnection where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/DeleteDirectConnectGateway.hs view
@@ -0,0 +1,183 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteDirectConnectGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified Direct Connect gateway. You must first delete all+-- virtual interfaces that are attached to the Direct Connect gateway and+-- disassociate all virtual private gateways associated with the Direct+-- Connect gateway.+module Amazonka.DirectConnect.DeleteDirectConnectGateway+  ( -- * Creating a Request+    DeleteDirectConnectGateway (..),+    newDeleteDirectConnectGateway,++    -- * Request Lenses+    deleteDirectConnectGateway_directConnectGatewayId,++    -- * Destructuring the Response+    DeleteDirectConnectGatewayResponse (..),+    newDeleteDirectConnectGatewayResponse,++    -- * Response Lenses+    deleteDirectConnectGatewayResponse_directConnectGateway,+    deleteDirectConnectGatewayResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteDirectConnectGateway' smart constructor.+data DeleteDirectConnectGateway = DeleteDirectConnectGateway'+  { -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayId', 'deleteDirectConnectGateway_directConnectGatewayId' - The ID of the Direct Connect gateway.+newDeleteDirectConnectGateway ::+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  DeleteDirectConnectGateway+newDeleteDirectConnectGateway+  pDirectConnectGatewayId_ =+    DeleteDirectConnectGateway'+      { directConnectGatewayId =+          pDirectConnectGatewayId_+      }++-- | The ID of the Direct Connect gateway.+deleteDirectConnectGateway_directConnectGatewayId :: Lens.Lens' DeleteDirectConnectGateway Prelude.Text+deleteDirectConnectGateway_directConnectGatewayId = Lens.lens (\DeleteDirectConnectGateway' {directConnectGatewayId} -> directConnectGatewayId) (\s@DeleteDirectConnectGateway' {} a -> s {directConnectGatewayId = a} :: DeleteDirectConnectGateway)++instance Core.AWSRequest DeleteDirectConnectGateway where+  type+    AWSResponse DeleteDirectConnectGateway =+      DeleteDirectConnectGatewayResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteDirectConnectGatewayResponse'+            Prelude.<$> (x Data..?> "directConnectGateway")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DeleteDirectConnectGateway where+  hashWithSalt _salt DeleteDirectConnectGateway' {..} =+    _salt `Prelude.hashWithSalt` directConnectGatewayId++instance Prelude.NFData DeleteDirectConnectGateway where+  rnf DeleteDirectConnectGateway' {..} =+    Prelude.rnf directConnectGatewayId++instance Data.ToHeaders DeleteDirectConnectGateway where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteDirectConnectGateway" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteDirectConnectGateway where+  toJSON DeleteDirectConnectGateway' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ( "directConnectGatewayId"+                  Data..= directConnectGatewayId+              )+          ]+      )++instance Data.ToPath DeleteDirectConnectGateway where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteDirectConnectGateway where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteDirectConnectGatewayResponse' smart constructor.+data DeleteDirectConnectGatewayResponse = DeleteDirectConnectGatewayResponse'+  { -- | The Direct Connect gateway.+    directConnectGateway :: Prelude.Maybe DirectConnectGateway,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGateway', 'deleteDirectConnectGatewayResponse_directConnectGateway' - The Direct Connect gateway.+--+-- 'httpStatus', 'deleteDirectConnectGatewayResponse_httpStatus' - The response's http status code.+newDeleteDirectConnectGatewayResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteDirectConnectGatewayResponse+newDeleteDirectConnectGatewayResponse pHttpStatus_ =+  DeleteDirectConnectGatewayResponse'+    { directConnectGateway =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The Direct Connect gateway.+deleteDirectConnectGatewayResponse_directConnectGateway :: Lens.Lens' DeleteDirectConnectGatewayResponse (Prelude.Maybe DirectConnectGateway)+deleteDirectConnectGatewayResponse_directConnectGateway = Lens.lens (\DeleteDirectConnectGatewayResponse' {directConnectGateway} -> directConnectGateway) (\s@DeleteDirectConnectGatewayResponse' {} a -> s {directConnectGateway = a} :: DeleteDirectConnectGatewayResponse)++-- | The response's http status code.+deleteDirectConnectGatewayResponse_httpStatus :: Lens.Lens' DeleteDirectConnectGatewayResponse Prelude.Int+deleteDirectConnectGatewayResponse_httpStatus = Lens.lens (\DeleteDirectConnectGatewayResponse' {httpStatus} -> httpStatus) (\s@DeleteDirectConnectGatewayResponse' {} a -> s {httpStatus = a} :: DeleteDirectConnectGatewayResponse)++instance+  Prelude.NFData+    DeleteDirectConnectGatewayResponse+  where+  rnf DeleteDirectConnectGatewayResponse' {..} =+    Prelude.rnf directConnectGateway+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteDirectConnectGatewayAssociation.hs view
@@ -0,0 +1,236 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the association between the specified Direct Connect gateway and+-- virtual private gateway.+--+-- We recommend that you specify the @associationID@ to delete the+-- association. Alternatively, if you own virtual gateway and a Direct+-- Connect gateway association, you can specify the @virtualGatewayId@ and+-- @directConnectGatewayId@ to delete an association.+module Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation+  ( -- * Creating a Request+    DeleteDirectConnectGatewayAssociation (..),+    newDeleteDirectConnectGatewayAssociation,++    -- * Request Lenses+    deleteDirectConnectGatewayAssociation_associationId,+    deleteDirectConnectGatewayAssociation_directConnectGatewayId,+    deleteDirectConnectGatewayAssociation_virtualGatewayId,++    -- * Destructuring the Response+    DeleteDirectConnectGatewayAssociationResponse (..),+    newDeleteDirectConnectGatewayAssociationResponse,++    -- * Response Lenses+    deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    deleteDirectConnectGatewayAssociationResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteDirectConnectGatewayAssociation' smart constructor.+data DeleteDirectConnectGatewayAssociation = DeleteDirectConnectGatewayAssociation'+  { -- | The ID of the Direct Connect gateway association.+    associationId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGatewayAssociation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'associationId', 'deleteDirectConnectGatewayAssociation_associationId' - The ID of the Direct Connect gateway association.+--+-- 'directConnectGatewayId', 'deleteDirectConnectGatewayAssociation_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'virtualGatewayId', 'deleteDirectConnectGatewayAssociation_virtualGatewayId' - The ID of the virtual private gateway.+newDeleteDirectConnectGatewayAssociation ::+  DeleteDirectConnectGatewayAssociation+newDeleteDirectConnectGatewayAssociation =+  DeleteDirectConnectGatewayAssociation'+    { associationId =+        Prelude.Nothing,+      directConnectGatewayId =+        Prelude.Nothing,+      virtualGatewayId = Prelude.Nothing+    }++-- | The ID of the Direct Connect gateway association.+deleteDirectConnectGatewayAssociation_associationId :: Lens.Lens' DeleteDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+deleteDirectConnectGatewayAssociation_associationId = Lens.lens (\DeleteDirectConnectGatewayAssociation' {associationId} -> associationId) (\s@DeleteDirectConnectGatewayAssociation' {} a -> s {associationId = a} :: DeleteDirectConnectGatewayAssociation)++-- | The ID of the Direct Connect gateway.+deleteDirectConnectGatewayAssociation_directConnectGatewayId :: Lens.Lens' DeleteDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+deleteDirectConnectGatewayAssociation_directConnectGatewayId = Lens.lens (\DeleteDirectConnectGatewayAssociation' {directConnectGatewayId} -> directConnectGatewayId) (\s@DeleteDirectConnectGatewayAssociation' {} a -> s {directConnectGatewayId = a} :: DeleteDirectConnectGatewayAssociation)++-- | The ID of the virtual private gateway.+deleteDirectConnectGatewayAssociation_virtualGatewayId :: Lens.Lens' DeleteDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+deleteDirectConnectGatewayAssociation_virtualGatewayId = Lens.lens (\DeleteDirectConnectGatewayAssociation' {virtualGatewayId} -> virtualGatewayId) (\s@DeleteDirectConnectGatewayAssociation' {} a -> s {virtualGatewayId = a} :: DeleteDirectConnectGatewayAssociation)++instance+  Core.AWSRequest+    DeleteDirectConnectGatewayAssociation+  where+  type+    AWSResponse+      DeleteDirectConnectGatewayAssociation =+      DeleteDirectConnectGatewayAssociationResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteDirectConnectGatewayAssociationResponse'+            Prelude.<$> (x Data..?> "directConnectGatewayAssociation")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DeleteDirectConnectGatewayAssociation+  where+  hashWithSalt+    _salt+    DeleteDirectConnectGatewayAssociation' {..} =+      _salt+        `Prelude.hashWithSalt` associationId+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` virtualGatewayId++instance+  Prelude.NFData+    DeleteDirectConnectGatewayAssociation+  where+  rnf DeleteDirectConnectGatewayAssociation' {..} =+    Prelude.rnf associationId+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf virtualGatewayId++instance+  Data.ToHeaders+    DeleteDirectConnectGatewayAssociation+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteDirectConnectGatewayAssociation" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    DeleteDirectConnectGatewayAssociation+  where+  toJSON DeleteDirectConnectGatewayAssociation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("associationId" Data..=) Prelude.<$> associationId,+            ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("virtualGatewayId" Data..=)+              Prelude.<$> virtualGatewayId+          ]+      )++instance+  Data.ToPath+    DeleteDirectConnectGatewayAssociation+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    DeleteDirectConnectGatewayAssociation+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteDirectConnectGatewayAssociationResponse' smart constructor.+data DeleteDirectConnectGatewayAssociationResponse = DeleteDirectConnectGatewayAssociationResponse'+  { -- | Information about the deleted association.+    directConnectGatewayAssociation :: Prelude.Maybe DirectConnectGatewayAssociation,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGatewayAssociationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociation', 'deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation' - Information about the deleted association.+--+-- 'httpStatus', 'deleteDirectConnectGatewayAssociationResponse_httpStatus' - The response's http status code.+newDeleteDirectConnectGatewayAssociationResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteDirectConnectGatewayAssociationResponse+newDeleteDirectConnectGatewayAssociationResponse+  pHttpStatus_ =+    DeleteDirectConnectGatewayAssociationResponse'+      { directConnectGatewayAssociation =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | Information about the deleted association.+deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens.Lens' DeleteDirectConnectGatewayAssociationResponse (Prelude.Maybe DirectConnectGatewayAssociation)+deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation = Lens.lens (\DeleteDirectConnectGatewayAssociationResponse' {directConnectGatewayAssociation} -> directConnectGatewayAssociation) (\s@DeleteDirectConnectGatewayAssociationResponse' {} a -> s {directConnectGatewayAssociation = a} :: DeleteDirectConnectGatewayAssociationResponse)++-- | The response's http status code.+deleteDirectConnectGatewayAssociationResponse_httpStatus :: Lens.Lens' DeleteDirectConnectGatewayAssociationResponse Prelude.Int+deleteDirectConnectGatewayAssociationResponse_httpStatus = Lens.lens (\DeleteDirectConnectGatewayAssociationResponse' {httpStatus} -> httpStatus) (\s@DeleteDirectConnectGatewayAssociationResponse' {} a -> s {httpStatus = a} :: DeleteDirectConnectGatewayAssociationResponse)++instance+  Prelude.NFData+    DeleteDirectConnectGatewayAssociationResponse+  where+  rnf+    DeleteDirectConnectGatewayAssociationResponse' {..} =+      Prelude.rnf directConnectGatewayAssociation+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteDirectConnectGatewayAssociationProposal.hs view
@@ -0,0 +1,208 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the association proposal request between the specified Direct+-- Connect gateway and virtual private gateway or transit gateway.+module Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal+  ( -- * Creating a Request+    DeleteDirectConnectGatewayAssociationProposal (..),+    newDeleteDirectConnectGatewayAssociationProposal,++    -- * Request Lenses+    deleteDirectConnectGatewayAssociationProposal_proposalId,++    -- * Destructuring the Response+    DeleteDirectConnectGatewayAssociationProposalResponse (..),+    newDeleteDirectConnectGatewayAssociationProposalResponse,++    -- * Response Lenses+    deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal,+    deleteDirectConnectGatewayAssociationProposalResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteDirectConnectGatewayAssociationProposal' smart constructor.+data DeleteDirectConnectGatewayAssociationProposal = DeleteDirectConnectGatewayAssociationProposal'+  { -- | The ID of the proposal.+    proposalId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGatewayAssociationProposal' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'proposalId', 'deleteDirectConnectGatewayAssociationProposal_proposalId' - The ID of the proposal.+newDeleteDirectConnectGatewayAssociationProposal ::+  -- | 'proposalId'+  Prelude.Text ->+  DeleteDirectConnectGatewayAssociationProposal+newDeleteDirectConnectGatewayAssociationProposal+  pProposalId_ =+    DeleteDirectConnectGatewayAssociationProposal'+      { proposalId =+          pProposalId_+      }++-- | The ID of the proposal.+deleteDirectConnectGatewayAssociationProposal_proposalId :: Lens.Lens' DeleteDirectConnectGatewayAssociationProposal Prelude.Text+deleteDirectConnectGatewayAssociationProposal_proposalId = Lens.lens (\DeleteDirectConnectGatewayAssociationProposal' {proposalId} -> proposalId) (\s@DeleteDirectConnectGatewayAssociationProposal' {} a -> s {proposalId = a} :: DeleteDirectConnectGatewayAssociationProposal)++instance+  Core.AWSRequest+    DeleteDirectConnectGatewayAssociationProposal+  where+  type+    AWSResponse+      DeleteDirectConnectGatewayAssociationProposal =+      DeleteDirectConnectGatewayAssociationProposalResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteDirectConnectGatewayAssociationProposalResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGatewayAssociationProposal"+                        )+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DeleteDirectConnectGatewayAssociationProposal+  where+  hashWithSalt+    _salt+    DeleteDirectConnectGatewayAssociationProposal' {..} =+      _salt `Prelude.hashWithSalt` proposalId++instance+  Prelude.NFData+    DeleteDirectConnectGatewayAssociationProposal+  where+  rnf+    DeleteDirectConnectGatewayAssociationProposal' {..} =+      Prelude.rnf proposalId++instance+  Data.ToHeaders+    DeleteDirectConnectGatewayAssociationProposal+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteDirectConnectGatewayAssociationProposal" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    DeleteDirectConnectGatewayAssociationProposal+  where+  toJSON+    DeleteDirectConnectGatewayAssociationProposal' {..} =+      Data.object+        ( Prelude.catMaybes+            [Prelude.Just ("proposalId" Data..= proposalId)]+        )++instance+  Data.ToPath+    DeleteDirectConnectGatewayAssociationProposal+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    DeleteDirectConnectGatewayAssociationProposal+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteDirectConnectGatewayAssociationProposalResponse' smart constructor.+data DeleteDirectConnectGatewayAssociationProposalResponse = DeleteDirectConnectGatewayAssociationProposalResponse'+  { -- | The ID of the associated gateway.+    directConnectGatewayAssociationProposal :: Prelude.Maybe DirectConnectGatewayAssociationProposal,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteDirectConnectGatewayAssociationProposalResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociationProposal', 'deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal' - The ID of the associated gateway.+--+-- 'httpStatus', 'deleteDirectConnectGatewayAssociationProposalResponse_httpStatus' - The response's http status code.+newDeleteDirectConnectGatewayAssociationProposalResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteDirectConnectGatewayAssociationProposalResponse+newDeleteDirectConnectGatewayAssociationProposalResponse+  pHttpStatus_ =+    DeleteDirectConnectGatewayAssociationProposalResponse'+      { directConnectGatewayAssociationProposal =+          Prelude.Nothing,+        httpStatus =+          pHttpStatus_+      }++-- | The ID of the associated gateway.+deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal :: Lens.Lens' DeleteDirectConnectGatewayAssociationProposalResponse (Prelude.Maybe DirectConnectGatewayAssociationProposal)+deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal = Lens.lens (\DeleteDirectConnectGatewayAssociationProposalResponse' {directConnectGatewayAssociationProposal} -> directConnectGatewayAssociationProposal) (\s@DeleteDirectConnectGatewayAssociationProposalResponse' {} a -> s {directConnectGatewayAssociationProposal = a} :: DeleteDirectConnectGatewayAssociationProposalResponse)++-- | The response's http status code.+deleteDirectConnectGatewayAssociationProposalResponse_httpStatus :: Lens.Lens' DeleteDirectConnectGatewayAssociationProposalResponse Prelude.Int+deleteDirectConnectGatewayAssociationProposalResponse_httpStatus = Lens.lens (\DeleteDirectConnectGatewayAssociationProposalResponse' {httpStatus} -> httpStatus) (\s@DeleteDirectConnectGatewayAssociationProposalResponse' {} a -> s {httpStatus = a} :: DeleteDirectConnectGatewayAssociationProposalResponse)++instance+  Prelude.NFData+    DeleteDirectConnectGatewayAssociationProposalResponse+  where+  rnf+    DeleteDirectConnectGatewayAssociationProposalResponse' {..} =+      Prelude.rnf directConnectGatewayAssociationProposal+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteInterconnect.hs view
@@ -0,0 +1,227 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteInterconnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified interconnect.+--+-- Intended for use by Direct Connect Partners only.+module Amazonka.DirectConnect.DeleteInterconnect+  ( -- * Creating a Request+    DeleteInterconnect (..),+    newDeleteInterconnect,++    -- * Request Lenses+    deleteInterconnect_interconnectId,++    -- * Destructuring the Response+    DeleteInterconnectResponse (..),+    newDeleteInterconnectResponse,++    -- * Response Lenses+    deleteInterconnectResponse_interconnectState,+    deleteInterconnectResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteInterconnect' smart constructor.+data DeleteInterconnect = DeleteInterconnect'+  { -- | The ID of the interconnect.+    interconnectId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteInterconnect' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'interconnectId', 'deleteInterconnect_interconnectId' - The ID of the interconnect.+newDeleteInterconnect ::+  -- | 'interconnectId'+  Prelude.Text ->+  DeleteInterconnect+newDeleteInterconnect pInterconnectId_ =+  DeleteInterconnect'+    { interconnectId =+        pInterconnectId_+    }++-- | The ID of the interconnect.+deleteInterconnect_interconnectId :: Lens.Lens' DeleteInterconnect Prelude.Text+deleteInterconnect_interconnectId = Lens.lens (\DeleteInterconnect' {interconnectId} -> interconnectId) (\s@DeleteInterconnect' {} a -> s {interconnectId = a} :: DeleteInterconnect)++instance Core.AWSRequest DeleteInterconnect where+  type+    AWSResponse DeleteInterconnect =+      DeleteInterconnectResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteInterconnectResponse'+            Prelude.<$> (x Data..?> "interconnectState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DeleteInterconnect where+  hashWithSalt _salt DeleteInterconnect' {..} =+    _salt `Prelude.hashWithSalt` interconnectId++instance Prelude.NFData DeleteInterconnect where+  rnf DeleteInterconnect' {..} =+    Prelude.rnf interconnectId++instance Data.ToHeaders DeleteInterconnect where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteInterconnect" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteInterconnect where+  toJSON DeleteInterconnect' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("interconnectId" Data..= interconnectId)+          ]+      )++instance Data.ToPath DeleteInterconnect where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteInterconnect where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteInterconnectResponse' smart constructor.+data DeleteInterconnectResponse = DeleteInterconnectResponse'+  { -- | The state of the interconnect. The following are the possible values:+    --+    -- -   @requested@: The initial state of an interconnect. The interconnect+    --     stays in the requested state until the Letter of Authorization (LOA)+    --     is sent to the customer.+    --+    -- -   @pending@: The interconnect is approved, and is being initialized.+    --+    -- -   @available@: The network link is up, and the interconnect is ready+    --     for use.+    --+    -- -   @down@: The network link is down.+    --+    -- -   @deleting@: The interconnect is being deleted.+    --+    -- -   @deleted@: The interconnect is deleted.+    --+    -- -   @unknown@: The state of the interconnect is not available.+    interconnectState :: Prelude.Maybe InterconnectState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteInterconnectResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'interconnectState', 'deleteInterconnectResponse_interconnectState' - The state of the interconnect. The following are the possible values:+--+-- -   @requested@: The initial state of an interconnect. The interconnect+--     stays in the requested state until the Letter of Authorization (LOA)+--     is sent to the customer.+--+-- -   @pending@: The interconnect is approved, and is being initialized.+--+-- -   @available@: The network link is up, and the interconnect is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The interconnect is being deleted.+--+-- -   @deleted@: The interconnect is deleted.+--+-- -   @unknown@: The state of the interconnect is not available.+--+-- 'httpStatus', 'deleteInterconnectResponse_httpStatus' - The response's http status code.+newDeleteInterconnectResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteInterconnectResponse+newDeleteInterconnectResponse pHttpStatus_ =+  DeleteInterconnectResponse'+    { interconnectState =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The state of the interconnect. The following are the possible values:+--+-- -   @requested@: The initial state of an interconnect. The interconnect+--     stays in the requested state until the Letter of Authorization (LOA)+--     is sent to the customer.+--+-- -   @pending@: The interconnect is approved, and is being initialized.+--+-- -   @available@: The network link is up, and the interconnect is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The interconnect is being deleted.+--+-- -   @deleted@: The interconnect is deleted.+--+-- -   @unknown@: The state of the interconnect is not available.+deleteInterconnectResponse_interconnectState :: Lens.Lens' DeleteInterconnectResponse (Prelude.Maybe InterconnectState)+deleteInterconnectResponse_interconnectState = Lens.lens (\DeleteInterconnectResponse' {interconnectState} -> interconnectState) (\s@DeleteInterconnectResponse' {} a -> s {interconnectState = a} :: DeleteInterconnectResponse)++-- | The response's http status code.+deleteInterconnectResponse_httpStatus :: Lens.Lens' DeleteInterconnectResponse Prelude.Int+deleteInterconnectResponse_httpStatus = Lens.lens (\DeleteInterconnectResponse' {httpStatus} -> httpStatus) (\s@DeleteInterconnectResponse' {} a -> s {httpStatus = a} :: DeleteInterconnectResponse)++instance Prelude.NFData DeleteInterconnectResponse where+  rnf DeleteInterconnectResponse' {..} =+    Prelude.rnf interconnectState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DeleteLag.hs view
@@ -0,0 +1,135 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteLag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified link aggregation group (LAG). You cannot delete a+-- LAG if it has active virtual interfaces or hosted connections.+module Amazonka.DirectConnect.DeleteLag+  ( -- * Creating a Request+    DeleteLag (..),+    newDeleteLag,++    -- * Request Lenses+    deleteLag_lagId,++    -- * Destructuring the Response+    Lag (..),+    newLag,++    -- * Response Lenses+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteLag' smart constructor.+data DeleteLag = DeleteLag'+  { -- | The ID of the LAG.+    lagId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteLag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'lagId', 'deleteLag_lagId' - The ID of the LAG.+newDeleteLag ::+  -- | 'lagId'+  Prelude.Text ->+  DeleteLag+newDeleteLag pLagId_ = DeleteLag' {lagId = pLagId_}++-- | The ID of the LAG.+deleteLag_lagId :: Lens.Lens' DeleteLag Prelude.Text+deleteLag_lagId = Lens.lens (\DeleteLag' {lagId} -> lagId) (\s@DeleteLag' {} a -> s {lagId = a} :: DeleteLag)++instance Core.AWSRequest DeleteLag where+  type AWSResponse DeleteLag = Lag+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DeleteLag where+  hashWithSalt _salt DeleteLag' {..} =+    _salt `Prelude.hashWithSalt` lagId++instance Prelude.NFData DeleteLag where+  rnf DeleteLag' {..} = Prelude.rnf lagId++instance Data.ToHeaders DeleteLag where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ("OvertureService.DeleteLag" :: Prelude.ByteString),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteLag where+  toJSON DeleteLag' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("lagId" Data..= lagId)]+      )++instance Data.ToPath DeleteLag where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteLag where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/DeleteVirtualInterface.hs view
@@ -0,0 +1,273 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DeleteVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a virtual interface.+module Amazonka.DirectConnect.DeleteVirtualInterface+  ( -- * Creating a Request+    DeleteVirtualInterface (..),+    newDeleteVirtualInterface,++    -- * Request Lenses+    deleteVirtualInterface_virtualInterfaceId,++    -- * Destructuring the Response+    DeleteVirtualInterfaceResponse (..),+    newDeleteVirtualInterfaceResponse,++    -- * Response Lenses+    deleteVirtualInterfaceResponse_virtualInterfaceState,+    deleteVirtualInterfaceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteVirtualInterface' smart constructor.+data DeleteVirtualInterface = DeleteVirtualInterface'+  { -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceId', 'deleteVirtualInterface_virtualInterfaceId' - The ID of the virtual interface.+newDeleteVirtualInterface ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  DeleteVirtualInterface+newDeleteVirtualInterface pVirtualInterfaceId_ =+  DeleteVirtualInterface'+    { virtualInterfaceId =+        pVirtualInterfaceId_+    }++-- | The ID of the virtual interface.+deleteVirtualInterface_virtualInterfaceId :: Lens.Lens' DeleteVirtualInterface Prelude.Text+deleteVirtualInterface_virtualInterfaceId = Lens.lens (\DeleteVirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@DeleteVirtualInterface' {} a -> s {virtualInterfaceId = a} :: DeleteVirtualInterface)++instance Core.AWSRequest DeleteVirtualInterface where+  type+    AWSResponse DeleteVirtualInterface =+      DeleteVirtualInterfaceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DeleteVirtualInterfaceResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceState")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DeleteVirtualInterface where+  hashWithSalt _salt DeleteVirtualInterface' {..} =+    _salt `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData DeleteVirtualInterface where+  rnf DeleteVirtualInterface' {..} =+    Prelude.rnf virtualInterfaceId++instance Data.ToHeaders DeleteVirtualInterface where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DeleteVirtualInterface" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DeleteVirtualInterface where+  toJSON DeleteVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath DeleteVirtualInterface where+  toPath = Prelude.const "/"++instance Data.ToQuery DeleteVirtualInterface where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteVirtualInterfaceResponse' smart constructor.+data DeleteVirtualInterfaceResponse = DeleteVirtualInterfaceResponse'+  { -- | The state of the virtual interface. The following are the possible+    -- values:+    --+    -- -   @confirming@: The creation of the virtual interface is pending+    --     confirmation from the virtual interface owner. If the owner of the+    --     virtual interface is different from the owner of the connection on+    --     which it is provisioned, then the virtual interface will remain in+    --     this state until it is confirmed by the virtual interface owner.+    --+    -- -   @verifying@: This state only applies to public virtual interfaces.+    --     Each public virtual interface needs validation before the virtual+    --     interface can be created.+    --+    -- -   @pending@: A virtual interface is in this state from the time that+    --     it is created until the virtual interface is ready to forward+    --     traffic.+    --+    -- -   @available@: A virtual interface that is able to forward traffic.+    --+    -- -   @down@: A virtual interface that is BGP down.+    --+    -- -   @deleting@: A virtual interface is in this state immediately after+    --     calling DeleteVirtualInterface until it can no longer forward+    --     traffic.+    --+    -- -   @deleted@: A virtual interface that cannot forward traffic.+    --+    -- -   @rejected@: The virtual interface owner has declined creation of the+    --     virtual interface. If a virtual interface in the @Confirming@ state+    --     is deleted by the virtual interface owner, the virtual interface+    --     enters the @Rejected@ state.+    --+    -- -   @unknown@: The state of the virtual interface is not available.+    virtualInterfaceState :: Prelude.Maybe VirtualInterfaceState,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteVirtualInterfaceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceState', 'deleteVirtualInterfaceResponse_virtualInterfaceState' - The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+--+-- 'httpStatus', 'deleteVirtualInterfaceResponse_httpStatus' - The response's http status code.+newDeleteVirtualInterfaceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DeleteVirtualInterfaceResponse+newDeleteVirtualInterfaceResponse pHttpStatus_ =+  DeleteVirtualInterfaceResponse'+    { virtualInterfaceState =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+deleteVirtualInterfaceResponse_virtualInterfaceState :: Lens.Lens' DeleteVirtualInterfaceResponse (Prelude.Maybe VirtualInterfaceState)+deleteVirtualInterfaceResponse_virtualInterfaceState = Lens.lens (\DeleteVirtualInterfaceResponse' {virtualInterfaceState} -> virtualInterfaceState) (\s@DeleteVirtualInterfaceResponse' {} a -> s {virtualInterfaceState = a} :: DeleteVirtualInterfaceResponse)++-- | The response's http status code.+deleteVirtualInterfaceResponse_httpStatus :: Lens.Lens' DeleteVirtualInterfaceResponse Prelude.Int+deleteVirtualInterfaceResponse_httpStatus = Lens.lens (\DeleteVirtualInterfaceResponse' {httpStatus} -> httpStatus) (\s@DeleteVirtualInterfaceResponse' {} a -> s {httpStatus = a} :: DeleteVirtualInterfaceResponse)++instance+  Prelude.NFData+    DeleteVirtualInterfaceResponse+  where+  rnf DeleteVirtualInterfaceResponse' {..} =+    Prelude.rnf virtualInterfaceState+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeConnections.hs view
@@ -0,0 +1,119 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeConnections+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Displays the specified connection or all connections in this Region.+module Amazonka.DirectConnect.DescribeConnections+  ( -- * Creating a Request+    DescribeConnections (..),+    newDescribeConnections,++    -- * Request Lenses+    describeConnections_connectionId,++    -- * Destructuring the Response+    Connections (..),+    newConnections,++    -- * Response Lenses+    connections_connections,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeConnections' smart constructor.+data DescribeConnections = DescribeConnections'+  { -- | The ID of the connection.+    connectionId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeConnections' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'describeConnections_connectionId' - The ID of the connection.+newDescribeConnections ::+  DescribeConnections+newDescribeConnections =+  DescribeConnections'+    { connectionId =+        Prelude.Nothing+    }++-- | The ID of the connection.+describeConnections_connectionId :: Lens.Lens' DescribeConnections (Prelude.Maybe Prelude.Text)+describeConnections_connectionId = Lens.lens (\DescribeConnections' {connectionId} -> connectionId) (\s@DescribeConnections' {} a -> s {connectionId = a} :: DescribeConnections)++instance Core.AWSRequest DescribeConnections where+  type AWSResponse DescribeConnections = Connections+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DescribeConnections where+  hashWithSalt _salt DescribeConnections' {..} =+    _salt `Prelude.hashWithSalt` connectionId++instance Prelude.NFData DescribeConnections where+  rnf DescribeConnections' {..} =+    Prelude.rnf connectionId++instance Data.ToHeaders DescribeConnections where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeConnections" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeConnections where+  toJSON DescribeConnections' {..} =+    Data.object+      ( Prelude.catMaybes+          [("connectionId" Data..=) Prelude.<$> connectionId]+      )++instance Data.ToPath DescribeConnections where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeConnections where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/DescribeCustomerMetadata.hs view
@@ -0,0 +1,193 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeCustomerMetadata+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get and view a list of customer agreements, along with their signed+-- status and whether the customer is an NNIPartner, NNIPartnerV2, or a+-- nonPartner.+module Amazonka.DirectConnect.DescribeCustomerMetadata+  ( -- * Creating a Request+    DescribeCustomerMetadata (..),+    newDescribeCustomerMetadata,++    -- * Destructuring the Response+    DescribeCustomerMetadataResponse (..),+    newDescribeCustomerMetadataResponse,++    -- * Response Lenses+    describeCustomerMetadataResponse_agreements,+    describeCustomerMetadataResponse_nniPartnerType,+    describeCustomerMetadataResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeCustomerMetadata' smart constructor.+data DescribeCustomerMetadata = DescribeCustomerMetadata'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeCustomerMetadata' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDescribeCustomerMetadata ::+  DescribeCustomerMetadata+newDescribeCustomerMetadata =+  DescribeCustomerMetadata'++instance Core.AWSRequest DescribeCustomerMetadata where+  type+    AWSResponse DescribeCustomerMetadata =+      DescribeCustomerMetadataResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeCustomerMetadataResponse'+            Prelude.<$> (x Data..?> "agreements" Core..!@ Prelude.mempty)+            Prelude.<*> (x Data..?> "nniPartnerType")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeCustomerMetadata where+  hashWithSalt _salt _ =+    _salt `Prelude.hashWithSalt` ()++instance Prelude.NFData DescribeCustomerMetadata where+  rnf _ = ()++instance Data.ToHeaders DescribeCustomerMetadata where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeCustomerMetadata" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeCustomerMetadata where+  toJSON = Prelude.const (Data.Object Prelude.mempty)++instance Data.ToPath DescribeCustomerMetadata where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeCustomerMetadata where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeCustomerMetadataResponse' smart constructor.+data DescribeCustomerMetadataResponse = DescribeCustomerMetadataResponse'+  { -- | The list of customer agreements.+    agreements :: Prelude.Maybe [CustomerAgreement],+    -- | The type of network-to-network interface (NNI) partner. The partner type+    -- will be one of the following:+    --+    -- -   V1: This partner can only allocate 50Mbps, 100Mbps, 200Mbps,+    --     300Mbps, 400Mbps, or 500Mbps subgigabit connections.+    --+    -- -   V2: This partner can only allocate 1GB, 2GB, 5GB, or 10GB hosted+    --     connections.+    --+    -- -   nonPartner: The customer is not a partner.+    nniPartnerType :: Prelude.Maybe NniPartnerType,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeCustomerMetadataResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'agreements', 'describeCustomerMetadataResponse_agreements' - The list of customer agreements.+--+-- 'nniPartnerType', 'describeCustomerMetadataResponse_nniPartnerType' - The type of network-to-network interface (NNI) partner. The partner type+-- will be one of the following:+--+-- -   V1: This partner can only allocate 50Mbps, 100Mbps, 200Mbps,+--     300Mbps, 400Mbps, or 500Mbps subgigabit connections.+--+-- -   V2: This partner can only allocate 1GB, 2GB, 5GB, or 10GB hosted+--     connections.+--+-- -   nonPartner: The customer is not a partner.+--+-- 'httpStatus', 'describeCustomerMetadataResponse_httpStatus' - The response's http status code.+newDescribeCustomerMetadataResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeCustomerMetadataResponse+newDescribeCustomerMetadataResponse pHttpStatus_ =+  DescribeCustomerMetadataResponse'+    { agreements =+        Prelude.Nothing,+      nniPartnerType = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The list of customer agreements.+describeCustomerMetadataResponse_agreements :: Lens.Lens' DescribeCustomerMetadataResponse (Prelude.Maybe [CustomerAgreement])+describeCustomerMetadataResponse_agreements = Lens.lens (\DescribeCustomerMetadataResponse' {agreements} -> agreements) (\s@DescribeCustomerMetadataResponse' {} a -> s {agreements = a} :: DescribeCustomerMetadataResponse) Prelude.. Lens.mapping Lens.coerced++-- | The type of network-to-network interface (NNI) partner. The partner type+-- will be one of the following:+--+-- -   V1: This partner can only allocate 50Mbps, 100Mbps, 200Mbps,+--     300Mbps, 400Mbps, or 500Mbps subgigabit connections.+--+-- -   V2: This partner can only allocate 1GB, 2GB, 5GB, or 10GB hosted+--     connections.+--+-- -   nonPartner: The customer is not a partner.+describeCustomerMetadataResponse_nniPartnerType :: Lens.Lens' DescribeCustomerMetadataResponse (Prelude.Maybe NniPartnerType)+describeCustomerMetadataResponse_nniPartnerType = Lens.lens (\DescribeCustomerMetadataResponse' {nniPartnerType} -> nniPartnerType) (\s@DescribeCustomerMetadataResponse' {} a -> s {nniPartnerType = a} :: DescribeCustomerMetadataResponse)++-- | The response's http status code.+describeCustomerMetadataResponse_httpStatus :: Lens.Lens' DescribeCustomerMetadataResponse Prelude.Int+describeCustomerMetadataResponse_httpStatus = Lens.lens (\DescribeCustomerMetadataResponse' {httpStatus} -> httpStatus) (\s@DescribeCustomerMetadataResponse' {} a -> s {httpStatus = a} :: DescribeCustomerMetadataResponse)++instance+  Prelude.NFData+    DescribeCustomerMetadataResponse+  where+  rnf DescribeCustomerMetadataResponse' {..} =+    Prelude.rnf agreements+      `Prelude.seq` Prelude.rnf nniPartnerType+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeDirectConnectGatewayAssociationProposals.hs view
@@ -0,0 +1,298 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Describes one or more association proposals for connection between a+-- virtual private gateway or transit gateway and a Direct Connect gateway.+module Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals+  ( -- * Creating a Request+    DescribeDirectConnectGatewayAssociationProposals (..),+    newDescribeDirectConnectGatewayAssociationProposals,++    -- * Request Lenses+    describeDirectConnectGatewayAssociationProposals_associatedGatewayId,+    describeDirectConnectGatewayAssociationProposals_directConnectGatewayId,+    describeDirectConnectGatewayAssociationProposals_maxResults,+    describeDirectConnectGatewayAssociationProposals_nextToken,+    describeDirectConnectGatewayAssociationProposals_proposalId,++    -- * Destructuring the Response+    DescribeDirectConnectGatewayAssociationProposalsResponse (..),+    newDescribeDirectConnectGatewayAssociationProposalsResponse,++    -- * Response Lenses+    describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals,+    describeDirectConnectGatewayAssociationProposalsResponse_nextToken,+    describeDirectConnectGatewayAssociationProposalsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeDirectConnectGatewayAssociationProposals' smart constructor.+data DescribeDirectConnectGatewayAssociationProposals = DescribeDirectConnectGatewayAssociationProposals'+  { -- | The ID of the associated gateway.+    associatedGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The maximum number of results to return with a single call. To retrieve+    -- the remaining results, make another call with the returned @nextToken@+    -- value.+    --+    -- If @MaxResults@ is given a value larger than 100, only 100 results are+    -- returned.+    maxResults :: Prelude.Maybe Prelude.Int,+    -- | The token for the next page of results.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The ID of the proposal.+    proposalId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAssociationProposals' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'associatedGatewayId', 'describeDirectConnectGatewayAssociationProposals_associatedGatewayId' - The ID of the associated gateway.+--+-- 'directConnectGatewayId', 'describeDirectConnectGatewayAssociationProposals_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'maxResults', 'describeDirectConnectGatewayAssociationProposals_maxResults' - The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+--+-- 'nextToken', 'describeDirectConnectGatewayAssociationProposals_nextToken' - The token for the next page of results.+--+-- 'proposalId', 'describeDirectConnectGatewayAssociationProposals_proposalId' - The ID of the proposal.+newDescribeDirectConnectGatewayAssociationProposals ::+  DescribeDirectConnectGatewayAssociationProposals+newDescribeDirectConnectGatewayAssociationProposals =+  DescribeDirectConnectGatewayAssociationProposals'+    { associatedGatewayId =+        Prelude.Nothing,+      directConnectGatewayId =+        Prelude.Nothing,+      maxResults =+        Prelude.Nothing,+      nextToken =+        Prelude.Nothing,+      proposalId =+        Prelude.Nothing+    }++-- | The ID of the associated gateway.+describeDirectConnectGatewayAssociationProposals_associatedGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposals (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationProposals_associatedGatewayId = Lens.lens (\DescribeDirectConnectGatewayAssociationProposals' {associatedGatewayId} -> associatedGatewayId) (\s@DescribeDirectConnectGatewayAssociationProposals' {} a -> s {associatedGatewayId = a} :: DescribeDirectConnectGatewayAssociationProposals)++-- | The ID of the Direct Connect gateway.+describeDirectConnectGatewayAssociationProposals_directConnectGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposals (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationProposals_directConnectGatewayId = Lens.lens (\DescribeDirectConnectGatewayAssociationProposals' {directConnectGatewayId} -> directConnectGatewayId) (\s@DescribeDirectConnectGatewayAssociationProposals' {} a -> s {directConnectGatewayId = a} :: DescribeDirectConnectGatewayAssociationProposals)++-- | The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+describeDirectConnectGatewayAssociationProposals_maxResults :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposals (Prelude.Maybe Prelude.Int)+describeDirectConnectGatewayAssociationProposals_maxResults = Lens.lens (\DescribeDirectConnectGatewayAssociationProposals' {maxResults} -> maxResults) (\s@DescribeDirectConnectGatewayAssociationProposals' {} a -> s {maxResults = a} :: DescribeDirectConnectGatewayAssociationProposals)++-- | The token for the next page of results.+describeDirectConnectGatewayAssociationProposals_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposals (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationProposals_nextToken = Lens.lens (\DescribeDirectConnectGatewayAssociationProposals' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAssociationProposals' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAssociationProposals)++-- | The ID of the proposal.+describeDirectConnectGatewayAssociationProposals_proposalId :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposals (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationProposals_proposalId = Lens.lens (\DescribeDirectConnectGatewayAssociationProposals' {proposalId} -> proposalId) (\s@DescribeDirectConnectGatewayAssociationProposals' {} a -> s {proposalId = a} :: DescribeDirectConnectGatewayAssociationProposals)++instance+  Core.AWSRequest+    DescribeDirectConnectGatewayAssociationProposals+  where+  type+    AWSResponse+      DescribeDirectConnectGatewayAssociationProposals =+      DescribeDirectConnectGatewayAssociationProposalsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeDirectConnectGatewayAssociationProposalsResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGatewayAssociationProposals"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (x Data..?> "nextToken")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DescribeDirectConnectGatewayAssociationProposals+  where+  hashWithSalt+    _salt+    DescribeDirectConnectGatewayAssociationProposals' {..} =+      _salt+        `Prelude.hashWithSalt` associatedGatewayId+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` maxResults+        `Prelude.hashWithSalt` nextToken+        `Prelude.hashWithSalt` proposalId++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAssociationProposals+  where+  rnf+    DescribeDirectConnectGatewayAssociationProposals' {..} =+      Prelude.rnf associatedGatewayId+        `Prelude.seq` Prelude.rnf directConnectGatewayId+        `Prelude.seq` Prelude.rnf maxResults+        `Prelude.seq` Prelude.rnf nextToken+        `Prelude.seq` Prelude.rnf proposalId++instance+  Data.ToHeaders+    DescribeDirectConnectGatewayAssociationProposals+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeDirectConnectGatewayAssociationProposals" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    DescribeDirectConnectGatewayAssociationProposals+  where+  toJSON+    DescribeDirectConnectGatewayAssociationProposals' {..} =+      Data.object+        ( Prelude.catMaybes+            [ ("associatedGatewayId" Data..=)+                Prelude.<$> associatedGatewayId,+              ("directConnectGatewayId" Data..=)+                Prelude.<$> directConnectGatewayId,+              ("maxResults" Data..=) Prelude.<$> maxResults,+              ("nextToken" Data..=) Prelude.<$> nextToken,+              ("proposalId" Data..=) Prelude.<$> proposalId+            ]+        )++instance+  Data.ToPath+    DescribeDirectConnectGatewayAssociationProposals+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    DescribeDirectConnectGatewayAssociationProposals+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeDirectConnectGatewayAssociationProposalsResponse' smart constructor.+data DescribeDirectConnectGatewayAssociationProposalsResponse = DescribeDirectConnectGatewayAssociationProposalsResponse'+  { -- | Describes the Direct Connect gateway association proposals.+    directConnectGatewayAssociationProposals :: Prelude.Maybe [DirectConnectGatewayAssociationProposal],+    -- | The token to use to retrieve the next page of results. This value is+    -- @null@ when there are no more results to return.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAssociationProposalsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociationProposals', 'describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals' - Describes the Direct Connect gateway association proposals.+--+-- 'nextToken', 'describeDirectConnectGatewayAssociationProposalsResponse_nextToken' - The token to use to retrieve the next page of results. This value is+-- @null@ when there are no more results to return.+--+-- 'httpStatus', 'describeDirectConnectGatewayAssociationProposalsResponse_httpStatus' - The response's http status code.+newDescribeDirectConnectGatewayAssociationProposalsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeDirectConnectGatewayAssociationProposalsResponse+newDescribeDirectConnectGatewayAssociationProposalsResponse+  pHttpStatus_ =+    DescribeDirectConnectGatewayAssociationProposalsResponse'+      { directConnectGatewayAssociationProposals =+          Prelude.Nothing,+        nextToken =+          Prelude.Nothing,+        httpStatus =+          pHttpStatus_+      }++-- | Describes the Direct Connect gateway association proposals.+describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Prelude.Maybe [DirectConnectGatewayAssociationProposal])+describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals = Lens.lens (\DescribeDirectConnectGatewayAssociationProposalsResponse' {directConnectGatewayAssociationProposals} -> directConnectGatewayAssociationProposals) (\s@DescribeDirectConnectGatewayAssociationProposalsResponse' {} a -> s {directConnectGatewayAssociationProposals = a} :: DescribeDirectConnectGatewayAssociationProposalsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The token to use to retrieve the next page of results. This value is+-- @null@ when there are no more results to return.+describeDirectConnectGatewayAssociationProposalsResponse_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposalsResponse (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationProposalsResponse_nextToken = Lens.lens (\DescribeDirectConnectGatewayAssociationProposalsResponse' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAssociationProposalsResponse' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAssociationProposalsResponse)++-- | The response's http status code.+describeDirectConnectGatewayAssociationProposalsResponse_httpStatus :: Lens.Lens' DescribeDirectConnectGatewayAssociationProposalsResponse Prelude.Int+describeDirectConnectGatewayAssociationProposalsResponse_httpStatus = Lens.lens (\DescribeDirectConnectGatewayAssociationProposalsResponse' {httpStatus} -> httpStatus) (\s@DescribeDirectConnectGatewayAssociationProposalsResponse' {} a -> s {httpStatus = a} :: DescribeDirectConnectGatewayAssociationProposalsResponse)++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAssociationProposalsResponse+  where+  rnf+    DescribeDirectConnectGatewayAssociationProposalsResponse' {..} =+      Prelude.rnf+        directConnectGatewayAssociationProposals+        `Prelude.seq` Prelude.rnf nextToken+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeDirectConnectGatewayAssociations.hs view
@@ -0,0 +1,354 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the associations between your Direct Connect gateways and virtual+-- private gateways and transit gateways. You must specify one of the+-- following:+--+-- -   A Direct Connect gateway+--+--     The response contains all virtual private gateways and transit+--     gateways associated with the Direct Connect gateway.+--+-- -   A virtual private gateway+--+--     The response contains the Direct Connect gateway.+--+-- -   A transit gateway+--+--     The response contains the Direct Connect gateway.+--+-- -   A Direct Connect gateway and a virtual private gateway+--+--     The response contains the association between the Direct Connect+--     gateway and virtual private gateway.+--+-- -   A Direct Connect gateway and a transit gateway+--+--     The response contains the association between the Direct Connect+--     gateway and transit gateway.+--+-- This operation returns paginated results.+module Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations+  ( -- * Creating a Request+    DescribeDirectConnectGatewayAssociations (..),+    newDescribeDirectConnectGatewayAssociations,++    -- * Request Lenses+    describeDirectConnectGatewayAssociations_associatedGatewayId,+    describeDirectConnectGatewayAssociations_associationId,+    describeDirectConnectGatewayAssociations_directConnectGatewayId,+    describeDirectConnectGatewayAssociations_maxResults,+    describeDirectConnectGatewayAssociations_nextToken,+    describeDirectConnectGatewayAssociations_virtualGatewayId,++    -- * Destructuring the Response+    DescribeDirectConnectGatewayAssociationsResponse (..),+    newDescribeDirectConnectGatewayAssociationsResponse,++    -- * Response Lenses+    describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations,+    describeDirectConnectGatewayAssociationsResponse_nextToken,+    describeDirectConnectGatewayAssociationsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeDirectConnectGatewayAssociations' smart constructor.+data DescribeDirectConnectGatewayAssociations = DescribeDirectConnectGatewayAssociations'+  { -- | The ID of the associated gateway.+    associatedGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway association.+    associationId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The maximum number of results to return with a single call. To retrieve+    -- the remaining results, make another call with the returned @nextToken@+    -- value.+    --+    -- If @MaxResults@ is given a value larger than 100, only 100 results are+    -- returned.+    maxResults :: Prelude.Maybe Prelude.Int,+    -- | The token provided in the previous call to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private gateway or transit gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAssociations' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'associatedGatewayId', 'describeDirectConnectGatewayAssociations_associatedGatewayId' - The ID of the associated gateway.+--+-- 'associationId', 'describeDirectConnectGatewayAssociations_associationId' - The ID of the Direct Connect gateway association.+--+-- 'directConnectGatewayId', 'describeDirectConnectGatewayAssociations_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'maxResults', 'describeDirectConnectGatewayAssociations_maxResults' - The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+--+-- 'nextToken', 'describeDirectConnectGatewayAssociations_nextToken' - The token provided in the previous call to retrieve the next page.+--+-- 'virtualGatewayId', 'describeDirectConnectGatewayAssociations_virtualGatewayId' - The ID of the virtual private gateway or transit gateway.+newDescribeDirectConnectGatewayAssociations ::+  DescribeDirectConnectGatewayAssociations+newDescribeDirectConnectGatewayAssociations =+  DescribeDirectConnectGatewayAssociations'+    { associatedGatewayId =+        Prelude.Nothing,+      associationId = Prelude.Nothing,+      directConnectGatewayId =+        Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing,+      virtualGatewayId =+        Prelude.Nothing+    }++-- | The ID of the associated gateway.+describeDirectConnectGatewayAssociations_associatedGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociations_associatedGatewayId = Lens.lens (\DescribeDirectConnectGatewayAssociations' {associatedGatewayId} -> associatedGatewayId) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {associatedGatewayId = a} :: DescribeDirectConnectGatewayAssociations)++-- | The ID of the Direct Connect gateway association.+describeDirectConnectGatewayAssociations_associationId :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociations_associationId = Lens.lens (\DescribeDirectConnectGatewayAssociations' {associationId} -> associationId) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {associationId = a} :: DescribeDirectConnectGatewayAssociations)++-- | The ID of the Direct Connect gateway.+describeDirectConnectGatewayAssociations_directConnectGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociations_directConnectGatewayId = Lens.lens (\DescribeDirectConnectGatewayAssociations' {directConnectGatewayId} -> directConnectGatewayId) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {directConnectGatewayId = a} :: DescribeDirectConnectGatewayAssociations)++-- | The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+describeDirectConnectGatewayAssociations_maxResults :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Int)+describeDirectConnectGatewayAssociations_maxResults = Lens.lens (\DescribeDirectConnectGatewayAssociations' {maxResults} -> maxResults) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {maxResults = a} :: DescribeDirectConnectGatewayAssociations)++-- | The token provided in the previous call to retrieve the next page.+describeDirectConnectGatewayAssociations_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociations_nextToken = Lens.lens (\DescribeDirectConnectGatewayAssociations' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAssociations)++-- | The ID of the virtual private gateway or transit gateway.+describeDirectConnectGatewayAssociations_virtualGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAssociations (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociations_virtualGatewayId = Lens.lens (\DescribeDirectConnectGatewayAssociations' {virtualGatewayId} -> virtualGatewayId) (\s@DescribeDirectConnectGatewayAssociations' {} a -> s {virtualGatewayId = a} :: DescribeDirectConnectGatewayAssociations)++instance+  Core.AWSPager+    DescribeDirectConnectGatewayAssociations+  where+  page rq rs+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewayAssociationsResponse_nextToken+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Prelude.otherwise =+        Prelude.Just+          Prelude.$ rq+          Prelude.& describeDirectConnectGatewayAssociations_nextToken+          Lens..~ rs+          Lens.^? describeDirectConnectGatewayAssociationsResponse_nextToken+          Prelude.. Lens._Just++instance+  Core.AWSRequest+    DescribeDirectConnectGatewayAssociations+  where+  type+    AWSResponse+      DescribeDirectConnectGatewayAssociations =+      DescribeDirectConnectGatewayAssociationsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeDirectConnectGatewayAssociationsResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGatewayAssociations"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (x Data..?> "nextToken")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DescribeDirectConnectGatewayAssociations+  where+  hashWithSalt+    _salt+    DescribeDirectConnectGatewayAssociations' {..} =+      _salt+        `Prelude.hashWithSalt` associatedGatewayId+        `Prelude.hashWithSalt` associationId+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` maxResults+        `Prelude.hashWithSalt` nextToken+        `Prelude.hashWithSalt` virtualGatewayId++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAssociations+  where+  rnf DescribeDirectConnectGatewayAssociations' {..} =+    Prelude.rnf associatedGatewayId+      `Prelude.seq` Prelude.rnf associationId+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf virtualGatewayId++instance+  Data.ToHeaders+    DescribeDirectConnectGatewayAssociations+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeDirectConnectGatewayAssociations" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    DescribeDirectConnectGatewayAssociations+  where+  toJSON DescribeDirectConnectGatewayAssociations' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("associatedGatewayId" Data..=)+              Prelude.<$> associatedGatewayId,+            ("associationId" Data..=) Prelude.<$> associationId,+            ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("maxResults" Data..=) Prelude.<$> maxResults,+            ("nextToken" Data..=) Prelude.<$> nextToken,+            ("virtualGatewayId" Data..=)+              Prelude.<$> virtualGatewayId+          ]+      )++instance+  Data.ToPath+    DescribeDirectConnectGatewayAssociations+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    DescribeDirectConnectGatewayAssociations+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeDirectConnectGatewayAssociationsResponse' smart constructor.+data DescribeDirectConnectGatewayAssociationsResponse = DescribeDirectConnectGatewayAssociationsResponse'+  { -- | Information about the associations.+    directConnectGatewayAssociations :: Prelude.Maybe [DirectConnectGatewayAssociation],+    -- | The token to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAssociationsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociations', 'describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations' - Information about the associations.+--+-- 'nextToken', 'describeDirectConnectGatewayAssociationsResponse_nextToken' - The token to retrieve the next page.+--+-- 'httpStatus', 'describeDirectConnectGatewayAssociationsResponse_httpStatus' - The response's http status code.+newDescribeDirectConnectGatewayAssociationsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeDirectConnectGatewayAssociationsResponse+newDescribeDirectConnectGatewayAssociationsResponse+  pHttpStatus_ =+    DescribeDirectConnectGatewayAssociationsResponse'+      { directConnectGatewayAssociations =+          Prelude.Nothing,+        nextToken =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | Information about the associations.+describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations :: Lens.Lens' DescribeDirectConnectGatewayAssociationsResponse (Prelude.Maybe [DirectConnectGatewayAssociation])+describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations = Lens.lens (\DescribeDirectConnectGatewayAssociationsResponse' {directConnectGatewayAssociations} -> directConnectGatewayAssociations) (\s@DescribeDirectConnectGatewayAssociationsResponse' {} a -> s {directConnectGatewayAssociations = a} :: DescribeDirectConnectGatewayAssociationsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The token to retrieve the next page.+describeDirectConnectGatewayAssociationsResponse_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAssociationsResponse (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAssociationsResponse_nextToken = Lens.lens (\DescribeDirectConnectGatewayAssociationsResponse' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAssociationsResponse' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAssociationsResponse)++-- | The response's http status code.+describeDirectConnectGatewayAssociationsResponse_httpStatus :: Lens.Lens' DescribeDirectConnectGatewayAssociationsResponse Prelude.Int+describeDirectConnectGatewayAssociationsResponse_httpStatus = Lens.lens (\DescribeDirectConnectGatewayAssociationsResponse' {httpStatus} -> httpStatus) (\s@DescribeDirectConnectGatewayAssociationsResponse' {} a -> s {httpStatus = a} :: DescribeDirectConnectGatewayAssociationsResponse)++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAssociationsResponse+  where+  rnf+    DescribeDirectConnectGatewayAssociationsResponse' {..} =+      Prelude.rnf directConnectGatewayAssociations+        `Prelude.seq` Prelude.rnf nextToken+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeDirectConnectGatewayAttachments.hs view
@@ -0,0 +1,308 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the attachments between your Direct Connect gateways and virtual+-- interfaces. You must specify a Direct Connect gateway, a virtual+-- interface, or both. If you specify a Direct Connect gateway, the+-- response contains all virtual interfaces attached to the Direct Connect+-- gateway. If you specify a virtual interface, the response contains all+-- Direct Connect gateways attached to the virtual interface. If you+-- specify both, the response contains the attachment between the Direct+-- Connect gateway and the virtual interface.+--+-- This operation returns paginated results.+module Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments+  ( -- * Creating a Request+    DescribeDirectConnectGatewayAttachments (..),+    newDescribeDirectConnectGatewayAttachments,++    -- * Request Lenses+    describeDirectConnectGatewayAttachments_directConnectGatewayId,+    describeDirectConnectGatewayAttachments_maxResults,+    describeDirectConnectGatewayAttachments_nextToken,+    describeDirectConnectGatewayAttachments_virtualInterfaceId,++    -- * Destructuring the Response+    DescribeDirectConnectGatewayAttachmentsResponse (..),+    newDescribeDirectConnectGatewayAttachmentsResponse,++    -- * Response Lenses+    describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments,+    describeDirectConnectGatewayAttachmentsResponse_nextToken,+    describeDirectConnectGatewayAttachmentsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeDirectConnectGatewayAttachments' smart constructor.+data DescribeDirectConnectGatewayAttachments = DescribeDirectConnectGatewayAttachments'+  { -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The maximum number of results to return with a single call. To retrieve+    -- the remaining results, make another call with the returned @nextToken@+    -- value.+    --+    -- If @MaxResults@ is given a value larger than 100, only 100 results are+    -- returned.+    maxResults :: Prelude.Maybe Prelude.Int,+    -- | The token provided in the previous call to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAttachments' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayId', 'describeDirectConnectGatewayAttachments_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'maxResults', 'describeDirectConnectGatewayAttachments_maxResults' - The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+--+-- 'nextToken', 'describeDirectConnectGatewayAttachments_nextToken' - The token provided in the previous call to retrieve the next page.+--+-- 'virtualInterfaceId', 'describeDirectConnectGatewayAttachments_virtualInterfaceId' - The ID of the virtual interface.+newDescribeDirectConnectGatewayAttachments ::+  DescribeDirectConnectGatewayAttachments+newDescribeDirectConnectGatewayAttachments =+  DescribeDirectConnectGatewayAttachments'+    { directConnectGatewayId =+        Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing,+      virtualInterfaceId =+        Prelude.Nothing+    }++-- | The ID of the Direct Connect gateway.+describeDirectConnectGatewayAttachments_directConnectGatewayId :: Lens.Lens' DescribeDirectConnectGatewayAttachments (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAttachments_directConnectGatewayId = Lens.lens (\DescribeDirectConnectGatewayAttachments' {directConnectGatewayId} -> directConnectGatewayId) (\s@DescribeDirectConnectGatewayAttachments' {} a -> s {directConnectGatewayId = a} :: DescribeDirectConnectGatewayAttachments)++-- | The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+describeDirectConnectGatewayAttachments_maxResults :: Lens.Lens' DescribeDirectConnectGatewayAttachments (Prelude.Maybe Prelude.Int)+describeDirectConnectGatewayAttachments_maxResults = Lens.lens (\DescribeDirectConnectGatewayAttachments' {maxResults} -> maxResults) (\s@DescribeDirectConnectGatewayAttachments' {} a -> s {maxResults = a} :: DescribeDirectConnectGatewayAttachments)++-- | The token provided in the previous call to retrieve the next page.+describeDirectConnectGatewayAttachments_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAttachments (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAttachments_nextToken = Lens.lens (\DescribeDirectConnectGatewayAttachments' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAttachments' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAttachments)++-- | The ID of the virtual interface.+describeDirectConnectGatewayAttachments_virtualInterfaceId :: Lens.Lens' DescribeDirectConnectGatewayAttachments (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAttachments_virtualInterfaceId = Lens.lens (\DescribeDirectConnectGatewayAttachments' {virtualInterfaceId} -> virtualInterfaceId) (\s@DescribeDirectConnectGatewayAttachments' {} a -> s {virtualInterfaceId = a} :: DescribeDirectConnectGatewayAttachments)++instance+  Core.AWSPager+    DescribeDirectConnectGatewayAttachments+  where+  page rq rs+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewayAttachmentsResponse_nextToken+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Prelude.otherwise =+        Prelude.Just+          Prelude.$ rq+          Prelude.& describeDirectConnectGatewayAttachments_nextToken+          Lens..~ rs+          Lens.^? describeDirectConnectGatewayAttachmentsResponse_nextToken+          Prelude.. Lens._Just++instance+  Core.AWSRequest+    DescribeDirectConnectGatewayAttachments+  where+  type+    AWSResponse+      DescribeDirectConnectGatewayAttachments =+      DescribeDirectConnectGatewayAttachmentsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeDirectConnectGatewayAttachmentsResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGatewayAttachments"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (x Data..?> "nextToken")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DescribeDirectConnectGatewayAttachments+  where+  hashWithSalt+    _salt+    DescribeDirectConnectGatewayAttachments' {..} =+      _salt+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` maxResults+        `Prelude.hashWithSalt` nextToken+        `Prelude.hashWithSalt` virtualInterfaceId++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAttachments+  where+  rnf DescribeDirectConnectGatewayAttachments' {..} =+    Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance+  Data.ToHeaders+    DescribeDirectConnectGatewayAttachments+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeDirectConnectGatewayAttachments" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    DescribeDirectConnectGatewayAttachments+  where+  toJSON DescribeDirectConnectGatewayAttachments' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("maxResults" Data..=) Prelude.<$> maxResults,+            ("nextToken" Data..=) Prelude.<$> nextToken,+            ("virtualInterfaceId" Data..=)+              Prelude.<$> virtualInterfaceId+          ]+      )++instance+  Data.ToPath+    DescribeDirectConnectGatewayAttachments+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    DescribeDirectConnectGatewayAttachments+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeDirectConnectGatewayAttachmentsResponse' smart constructor.+data DescribeDirectConnectGatewayAttachmentsResponse = DescribeDirectConnectGatewayAttachmentsResponse'+  { -- | The attachments.+    directConnectGatewayAttachments :: Prelude.Maybe [DirectConnectGatewayAttachment],+    -- | The token to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewayAttachmentsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAttachments', 'describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments' - The attachments.+--+-- 'nextToken', 'describeDirectConnectGatewayAttachmentsResponse_nextToken' - The token to retrieve the next page.+--+-- 'httpStatus', 'describeDirectConnectGatewayAttachmentsResponse_httpStatus' - The response's http status code.+newDescribeDirectConnectGatewayAttachmentsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeDirectConnectGatewayAttachmentsResponse+newDescribeDirectConnectGatewayAttachmentsResponse+  pHttpStatus_ =+    DescribeDirectConnectGatewayAttachmentsResponse'+      { directConnectGatewayAttachments =+          Prelude.Nothing,+        nextToken =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | The attachments.+describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments :: Lens.Lens' DescribeDirectConnectGatewayAttachmentsResponse (Prelude.Maybe [DirectConnectGatewayAttachment])+describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments = Lens.lens (\DescribeDirectConnectGatewayAttachmentsResponse' {directConnectGatewayAttachments} -> directConnectGatewayAttachments) (\s@DescribeDirectConnectGatewayAttachmentsResponse' {} a -> s {directConnectGatewayAttachments = a} :: DescribeDirectConnectGatewayAttachmentsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The token to retrieve the next page.+describeDirectConnectGatewayAttachmentsResponse_nextToken :: Lens.Lens' DescribeDirectConnectGatewayAttachmentsResponse (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewayAttachmentsResponse_nextToken = Lens.lens (\DescribeDirectConnectGatewayAttachmentsResponse' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewayAttachmentsResponse' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewayAttachmentsResponse)++-- | The response's http status code.+describeDirectConnectGatewayAttachmentsResponse_httpStatus :: Lens.Lens' DescribeDirectConnectGatewayAttachmentsResponse Prelude.Int+describeDirectConnectGatewayAttachmentsResponse_httpStatus = Lens.lens (\DescribeDirectConnectGatewayAttachmentsResponse' {httpStatus} -> httpStatus) (\s@DescribeDirectConnectGatewayAttachmentsResponse' {} a -> s {httpStatus = a} :: DescribeDirectConnectGatewayAttachmentsResponse)++instance+  Prelude.NFData+    DescribeDirectConnectGatewayAttachmentsResponse+  where+  rnf+    DescribeDirectConnectGatewayAttachmentsResponse' {..} =+      Prelude.rnf directConnectGatewayAttachments+        `Prelude.seq` Prelude.rnf nextToken+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeDirectConnectGateways.hs view
@@ -0,0 +1,263 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeDirectConnectGateways+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists all your Direct Connect gateways or only the specified Direct+-- Connect gateway. Deleted Direct Connect gateways are not returned.+--+-- This operation returns paginated results.+module Amazonka.DirectConnect.DescribeDirectConnectGateways+  ( -- * Creating a Request+    DescribeDirectConnectGateways (..),+    newDescribeDirectConnectGateways,++    -- * Request Lenses+    describeDirectConnectGateways_directConnectGatewayId,+    describeDirectConnectGateways_maxResults,+    describeDirectConnectGateways_nextToken,++    -- * Destructuring the Response+    DescribeDirectConnectGatewaysResponse (..),+    newDescribeDirectConnectGatewaysResponse,++    -- * Response Lenses+    describeDirectConnectGatewaysResponse_directConnectGateways,+    describeDirectConnectGatewaysResponse_nextToken,+    describeDirectConnectGatewaysResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeDirectConnectGateways' smart constructor.+data DescribeDirectConnectGateways = DescribeDirectConnectGateways'+  { -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The maximum number of results to return with a single call. To retrieve+    -- the remaining results, make another call with the returned @nextToken@+    -- value.+    --+    -- If @MaxResults@ is given a value larger than 100, only 100 results are+    -- returned.+    maxResults :: Prelude.Maybe Prelude.Int,+    -- | The token provided in the previous call to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGateways' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayId', 'describeDirectConnectGateways_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'maxResults', 'describeDirectConnectGateways_maxResults' - The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+--+-- 'nextToken', 'describeDirectConnectGateways_nextToken' - The token provided in the previous call to retrieve the next page.+newDescribeDirectConnectGateways ::+  DescribeDirectConnectGateways+newDescribeDirectConnectGateways =+  DescribeDirectConnectGateways'+    { directConnectGatewayId =+        Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing+    }++-- | The ID of the Direct Connect gateway.+describeDirectConnectGateways_directConnectGatewayId :: Lens.Lens' DescribeDirectConnectGateways (Prelude.Maybe Prelude.Text)+describeDirectConnectGateways_directConnectGatewayId = Lens.lens (\DescribeDirectConnectGateways' {directConnectGatewayId} -> directConnectGatewayId) (\s@DescribeDirectConnectGateways' {} a -> s {directConnectGatewayId = a} :: DescribeDirectConnectGateways)++-- | The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+describeDirectConnectGateways_maxResults :: Lens.Lens' DescribeDirectConnectGateways (Prelude.Maybe Prelude.Int)+describeDirectConnectGateways_maxResults = Lens.lens (\DescribeDirectConnectGateways' {maxResults} -> maxResults) (\s@DescribeDirectConnectGateways' {} a -> s {maxResults = a} :: DescribeDirectConnectGateways)++-- | The token provided in the previous call to retrieve the next page.+describeDirectConnectGateways_nextToken :: Lens.Lens' DescribeDirectConnectGateways (Prelude.Maybe Prelude.Text)+describeDirectConnectGateways_nextToken = Lens.lens (\DescribeDirectConnectGateways' {nextToken} -> nextToken) (\s@DescribeDirectConnectGateways' {} a -> s {nextToken = a} :: DescribeDirectConnectGateways)++instance Core.AWSPager DescribeDirectConnectGateways where+  page rq rs+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewaysResponse_nextToken+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Core.stop+        ( rs+            Lens.^? describeDirectConnectGatewaysResponse_directConnectGateways+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Prelude.otherwise =+        Prelude.Just+          Prelude.$ rq+          Prelude.& describeDirectConnectGateways_nextToken+          Lens..~ rs+          Lens.^? describeDirectConnectGatewaysResponse_nextToken+          Prelude.. Lens._Just++instance+  Core.AWSRequest+    DescribeDirectConnectGateways+  where+  type+    AWSResponse DescribeDirectConnectGateways =+      DescribeDirectConnectGatewaysResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeDirectConnectGatewaysResponse'+            Prelude.<$> ( x+                            Data..?> "directConnectGateways"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (x Data..?> "nextToken")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DescribeDirectConnectGateways+  where+  hashWithSalt _salt DescribeDirectConnectGateways' {..} =+    _salt+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` maxResults+      `Prelude.hashWithSalt` nextToken++instance Prelude.NFData DescribeDirectConnectGateways where+  rnf DescribeDirectConnectGateways' {..} =+    Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken++instance Data.ToHeaders DescribeDirectConnectGateways where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeDirectConnectGateways" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeDirectConnectGateways where+  toJSON DescribeDirectConnectGateways' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("maxResults" Data..=) Prelude.<$> maxResults,+            ("nextToken" Data..=) Prelude.<$> nextToken+          ]+      )++instance Data.ToPath DescribeDirectConnectGateways where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeDirectConnectGateways where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeDirectConnectGatewaysResponse' smart constructor.+data DescribeDirectConnectGatewaysResponse = DescribeDirectConnectGatewaysResponse'+  { -- | The Direct Connect gateways.+    directConnectGateways :: Prelude.Maybe [DirectConnectGateway],+    -- | The token to retrieve the next page.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeDirectConnectGatewaysResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGateways', 'describeDirectConnectGatewaysResponse_directConnectGateways' - The Direct Connect gateways.+--+-- 'nextToken', 'describeDirectConnectGatewaysResponse_nextToken' - The token to retrieve the next page.+--+-- 'httpStatus', 'describeDirectConnectGatewaysResponse_httpStatus' - The response's http status code.+newDescribeDirectConnectGatewaysResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeDirectConnectGatewaysResponse+newDescribeDirectConnectGatewaysResponse pHttpStatus_ =+  DescribeDirectConnectGatewaysResponse'+    { directConnectGateways =+        Prelude.Nothing,+      nextToken = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The Direct Connect gateways.+describeDirectConnectGatewaysResponse_directConnectGateways :: Lens.Lens' DescribeDirectConnectGatewaysResponse (Prelude.Maybe [DirectConnectGateway])+describeDirectConnectGatewaysResponse_directConnectGateways = Lens.lens (\DescribeDirectConnectGatewaysResponse' {directConnectGateways} -> directConnectGateways) (\s@DescribeDirectConnectGatewaysResponse' {} a -> s {directConnectGateways = a} :: DescribeDirectConnectGatewaysResponse) Prelude.. Lens.mapping Lens.coerced++-- | The token to retrieve the next page.+describeDirectConnectGatewaysResponse_nextToken :: Lens.Lens' DescribeDirectConnectGatewaysResponse (Prelude.Maybe Prelude.Text)+describeDirectConnectGatewaysResponse_nextToken = Lens.lens (\DescribeDirectConnectGatewaysResponse' {nextToken} -> nextToken) (\s@DescribeDirectConnectGatewaysResponse' {} a -> s {nextToken = a} :: DescribeDirectConnectGatewaysResponse)++-- | The response's http status code.+describeDirectConnectGatewaysResponse_httpStatus :: Lens.Lens' DescribeDirectConnectGatewaysResponse Prelude.Int+describeDirectConnectGatewaysResponse_httpStatus = Lens.lens (\DescribeDirectConnectGatewaysResponse' {httpStatus} -> httpStatus) (\s@DescribeDirectConnectGatewaysResponse' {} a -> s {httpStatus = a} :: DescribeDirectConnectGatewaysResponse)++instance+  Prelude.NFData+    DescribeDirectConnectGatewaysResponse+  where+  rnf DescribeDirectConnectGatewaysResponse' {..} =+    Prelude.rnf directConnectGateways+      `Prelude.seq` Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeHostedConnections.hs view
@@ -0,0 +1,126 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeHostedConnections+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the hosted connections that have been provisioned on the specified+-- interconnect or link aggregation group (LAG).+--+-- Intended for use by Direct Connect Partners only.+module Amazonka.DirectConnect.DescribeHostedConnections+  ( -- * Creating a Request+    DescribeHostedConnections (..),+    newDescribeHostedConnections,++    -- * Request Lenses+    describeHostedConnections_connectionId,++    -- * Destructuring the Response+    Connections (..),+    newConnections,++    -- * Response Lenses+    connections_connections,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeHostedConnections' smart constructor.+data DescribeHostedConnections = DescribeHostedConnections'+  { -- | The ID of the interconnect or LAG.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeHostedConnections' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'describeHostedConnections_connectionId' - The ID of the interconnect or LAG.+newDescribeHostedConnections ::+  -- | 'connectionId'+  Prelude.Text ->+  DescribeHostedConnections+newDescribeHostedConnections pConnectionId_ =+  DescribeHostedConnections'+    { connectionId =+        pConnectionId_+    }++-- | The ID of the interconnect or LAG.+describeHostedConnections_connectionId :: Lens.Lens' DescribeHostedConnections Prelude.Text+describeHostedConnections_connectionId = Lens.lens (\DescribeHostedConnections' {connectionId} -> connectionId) (\s@DescribeHostedConnections' {} a -> s {connectionId = a} :: DescribeHostedConnections)++instance Core.AWSRequest DescribeHostedConnections where+  type+    AWSResponse DescribeHostedConnections =+      Connections+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DescribeHostedConnections where+  hashWithSalt _salt DescribeHostedConnections' {..} =+    _salt `Prelude.hashWithSalt` connectionId++instance Prelude.NFData DescribeHostedConnections where+  rnf DescribeHostedConnections' {..} =+    Prelude.rnf connectionId++instance Data.ToHeaders DescribeHostedConnections where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeHostedConnections" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeHostedConnections where+  toJSON DescribeHostedConnections' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("connectionId" Data..= connectionId)]+      )++instance Data.ToPath DescribeHostedConnections where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeHostedConnections where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/DescribeInterconnects.hs view
@@ -0,0 +1,173 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeInterconnects+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the interconnects owned by the Amazon Web Services account or only+-- the specified interconnect.+module Amazonka.DirectConnect.DescribeInterconnects+  ( -- * Creating a Request+    DescribeInterconnects (..),+    newDescribeInterconnects,++    -- * Request Lenses+    describeInterconnects_interconnectId,++    -- * Destructuring the Response+    DescribeInterconnectsResponse (..),+    newDescribeInterconnectsResponse,++    -- * Response Lenses+    describeInterconnectsResponse_interconnects,+    describeInterconnectsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeInterconnects' smart constructor.+data DescribeInterconnects = DescribeInterconnects'+  { -- | The ID of the interconnect.+    interconnectId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeInterconnects' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'interconnectId', 'describeInterconnects_interconnectId' - The ID of the interconnect.+newDescribeInterconnects ::+  DescribeInterconnects+newDescribeInterconnects =+  DescribeInterconnects'+    { interconnectId =+        Prelude.Nothing+    }++-- | The ID of the interconnect.+describeInterconnects_interconnectId :: Lens.Lens' DescribeInterconnects (Prelude.Maybe Prelude.Text)+describeInterconnects_interconnectId = Lens.lens (\DescribeInterconnects' {interconnectId} -> interconnectId) (\s@DescribeInterconnects' {} a -> s {interconnectId = a} :: DescribeInterconnects)++instance Core.AWSRequest DescribeInterconnects where+  type+    AWSResponse DescribeInterconnects =+      DescribeInterconnectsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeInterconnectsResponse'+            Prelude.<$> (x Data..?> "interconnects" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeInterconnects where+  hashWithSalt _salt DescribeInterconnects' {..} =+    _salt `Prelude.hashWithSalt` interconnectId++instance Prelude.NFData DescribeInterconnects where+  rnf DescribeInterconnects' {..} =+    Prelude.rnf interconnectId++instance Data.ToHeaders DescribeInterconnects where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeInterconnects" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeInterconnects where+  toJSON DescribeInterconnects' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("interconnectId" Data..=)+              Prelude.<$> interconnectId+          ]+      )++instance Data.ToPath DescribeInterconnects where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeInterconnects where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeInterconnectsResponse' smart constructor.+data DescribeInterconnectsResponse = DescribeInterconnectsResponse'+  { -- | The interconnects.+    interconnects :: Prelude.Maybe [Interconnect],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeInterconnectsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'interconnects', 'describeInterconnectsResponse_interconnects' - The interconnects.+--+-- 'httpStatus', 'describeInterconnectsResponse_httpStatus' - The response's http status code.+newDescribeInterconnectsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeInterconnectsResponse+newDescribeInterconnectsResponse pHttpStatus_ =+  DescribeInterconnectsResponse'+    { interconnects =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The interconnects.+describeInterconnectsResponse_interconnects :: Lens.Lens' DescribeInterconnectsResponse (Prelude.Maybe [Interconnect])+describeInterconnectsResponse_interconnects = Lens.lens (\DescribeInterconnectsResponse' {interconnects} -> interconnects) (\s@DescribeInterconnectsResponse' {} a -> s {interconnects = a} :: DescribeInterconnectsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeInterconnectsResponse_httpStatus :: Lens.Lens' DescribeInterconnectsResponse Prelude.Int+describeInterconnectsResponse_httpStatus = Lens.lens (\DescribeInterconnectsResponse' {httpStatus} -> httpStatus) (\s@DescribeInterconnectsResponse' {} a -> s {httpStatus = a} :: DescribeInterconnectsResponse)++instance Prelude.NFData DescribeInterconnectsResponse where+  rnf DescribeInterconnectsResponse' {..} =+    Prelude.rnf interconnects+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeLags.hs view
@@ -0,0 +1,163 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeLags+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Describes all your link aggregation groups (LAG) or the specified LAG.+module Amazonka.DirectConnect.DescribeLags+  ( -- * Creating a Request+    DescribeLags (..),+    newDescribeLags,++    -- * Request Lenses+    describeLags_lagId,++    -- * Destructuring the Response+    DescribeLagsResponse (..),+    newDescribeLagsResponse,++    -- * Response Lenses+    describeLagsResponse_lags,+    describeLagsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeLags' smart constructor.+data DescribeLags = DescribeLags'+  { -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLags' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'lagId', 'describeLags_lagId' - The ID of the LAG.+newDescribeLags ::+  DescribeLags+newDescribeLags =+  DescribeLags' {lagId = Prelude.Nothing}++-- | The ID of the LAG.+describeLags_lagId :: Lens.Lens' DescribeLags (Prelude.Maybe Prelude.Text)+describeLags_lagId = Lens.lens (\DescribeLags' {lagId} -> lagId) (\s@DescribeLags' {} a -> s {lagId = a} :: DescribeLags)++instance Core.AWSRequest DescribeLags where+  type AWSResponse DescribeLags = DescribeLagsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeLagsResponse'+            Prelude.<$> (x Data..?> "lags" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeLags where+  hashWithSalt _salt DescribeLags' {..} =+    _salt `Prelude.hashWithSalt` lagId++instance Prelude.NFData DescribeLags where+  rnf DescribeLags' {..} = Prelude.rnf lagId++instance Data.ToHeaders DescribeLags where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeLags" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeLags where+  toJSON DescribeLags' {..} =+    Data.object+      ( Prelude.catMaybes+          [("lagId" Data..=) Prelude.<$> lagId]+      )++instance Data.ToPath DescribeLags where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeLags where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeLagsResponse' smart constructor.+data DescribeLagsResponse = DescribeLagsResponse'+  { -- | The LAGs.+    lags :: Prelude.Maybe [Lag],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLagsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'lags', 'describeLagsResponse_lags' - The LAGs.+--+-- 'httpStatus', 'describeLagsResponse_httpStatus' - The response's http status code.+newDescribeLagsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeLagsResponse+newDescribeLagsResponse pHttpStatus_ =+  DescribeLagsResponse'+    { lags = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The LAGs.+describeLagsResponse_lags :: Lens.Lens' DescribeLagsResponse (Prelude.Maybe [Lag])+describeLagsResponse_lags = Lens.lens (\DescribeLagsResponse' {lags} -> lags) (\s@DescribeLagsResponse' {} a -> s {lags = a} :: DescribeLagsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeLagsResponse_httpStatus :: Lens.Lens' DescribeLagsResponse Prelude.Int+describeLagsResponse_httpStatus = Lens.lens (\DescribeLagsResponse' {httpStatus} -> httpStatus) (\s@DescribeLagsResponse' {} a -> s {httpStatus = a} :: DescribeLagsResponse)++instance Prelude.NFData DescribeLagsResponse where+  rnf DescribeLagsResponse' {..} =+    Prelude.rnf lags+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeLoa.hs view
@@ -0,0 +1,240 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeLoa+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the LOA-CFA for a connection, interconnect, or link aggregation+-- group (LAG).+--+-- The Letter of Authorization - Connecting Facility Assignment (LOA-CFA)+-- is a document that is used when establishing your cross connect to+-- Amazon Web Services at the colocation facility. For more information,+-- see+-- <https://docs.aws.amazon.com/directconnect/latest/UserGuide/Colocation.html Requesting Cross Connects at Direct Connect Locations>+-- in the /Direct Connect User Guide/.+module Amazonka.DirectConnect.DescribeLoa+  ( -- * Creating a Request+    DescribeLoa (..),+    newDescribeLoa,++    -- * Request Lenses+    describeLoa_loaContentType,+    describeLoa_providerName,+    describeLoa_connectionId,++    -- * Destructuring the Response+    DescribeLoaResponse (..),+    newDescribeLoaResponse,++    -- * Response Lenses+    describeLoaResponse_loaContent,+    describeLoaResponse_loaContentType,+    describeLoaResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeLoa' smart constructor.+data DescribeLoa = DescribeLoa'+  { -- | The standard media type for the LOA-CFA document. The only supported+    -- value is application\/pdf.+    loaContentType :: Prelude.Maybe LoaContentType,+    -- | The name of the service provider who establishes connectivity on your+    -- behalf. If you specify this parameter, the LOA-CFA lists the provider+    -- name alongside your company name as the requester of the cross connect.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | The ID of a connection, LAG, or interconnect.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLoa' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'loaContentType', 'describeLoa_loaContentType' - The standard media type for the LOA-CFA document. The only supported+-- value is application\/pdf.+--+-- 'providerName', 'describeLoa_providerName' - The name of the service provider who establishes connectivity on your+-- behalf. If you specify this parameter, the LOA-CFA lists the provider+-- name alongside your company name as the requester of the cross connect.+--+-- 'connectionId', 'describeLoa_connectionId' - The ID of a connection, LAG, or interconnect.+newDescribeLoa ::+  -- | 'connectionId'+  Prelude.Text ->+  DescribeLoa+newDescribeLoa pConnectionId_ =+  DescribeLoa'+    { loaContentType = Prelude.Nothing,+      providerName = Prelude.Nothing,+      connectionId = pConnectionId_+    }++-- | The standard media type for the LOA-CFA document. The only supported+-- value is application\/pdf.+describeLoa_loaContentType :: Lens.Lens' DescribeLoa (Prelude.Maybe LoaContentType)+describeLoa_loaContentType = Lens.lens (\DescribeLoa' {loaContentType} -> loaContentType) (\s@DescribeLoa' {} a -> s {loaContentType = a} :: DescribeLoa)++-- | The name of the service provider who establishes connectivity on your+-- behalf. If you specify this parameter, the LOA-CFA lists the provider+-- name alongside your company name as the requester of the cross connect.+describeLoa_providerName :: Lens.Lens' DescribeLoa (Prelude.Maybe Prelude.Text)+describeLoa_providerName = Lens.lens (\DescribeLoa' {providerName} -> providerName) (\s@DescribeLoa' {} a -> s {providerName = a} :: DescribeLoa)++-- | The ID of a connection, LAG, or interconnect.+describeLoa_connectionId :: Lens.Lens' DescribeLoa Prelude.Text+describeLoa_connectionId = Lens.lens (\DescribeLoa' {connectionId} -> connectionId) (\s@DescribeLoa' {} a -> s {connectionId = a} :: DescribeLoa)++instance Core.AWSRequest DescribeLoa where+  type AWSResponse DescribeLoa = DescribeLoaResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeLoaResponse'+            Prelude.<$> (x Data..?> "loaContent")+            Prelude.<*> (x Data..?> "loaContentType")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeLoa where+  hashWithSalt _salt DescribeLoa' {..} =+    _salt+      `Prelude.hashWithSalt` loaContentType+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` connectionId++instance Prelude.NFData DescribeLoa where+  rnf DescribeLoa' {..} =+    Prelude.rnf loaContentType+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf connectionId++instance Data.ToHeaders DescribeLoa where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeLoa" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeLoa where+  toJSON DescribeLoa' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("loaContentType" Data..=)+              Prelude.<$> loaContentType,+            ("providerName" Data..=) Prelude.<$> providerName,+            Prelude.Just ("connectionId" Data..= connectionId)+          ]+      )++instance Data.ToPath DescribeLoa where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeLoa where+  toQuery = Prelude.const Prelude.mempty++-- | Information about a Letter of Authorization - Connecting Facility+-- Assignment (LOA-CFA) for a connection.+--+-- /See:/ 'newDescribeLoaResponse' smart constructor.+data DescribeLoaResponse = DescribeLoaResponse'+  { -- | The binary contents of the LOA-CFA document.+    loaContent :: Prelude.Maybe Data.Base64,+    -- | The standard media type for the LOA-CFA document. The only supported+    -- value is application\/pdf.+    loaContentType :: Prelude.Maybe LoaContentType,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLoaResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'loaContent', 'describeLoaResponse_loaContent' - The binary contents of the LOA-CFA document.--+-- -- /Note:/ This 'Lens' automatically encodes and decodes Base64 data.+-- -- The underlying isomorphism will encode to Base64 representation during+-- -- serialisation, and decode from Base64 representation during deserialisation.+-- -- This 'Lens' accepts and returns only raw unencoded data.+--+-- 'loaContentType', 'describeLoaResponse_loaContentType' - The standard media type for the LOA-CFA document. The only supported+-- value is application\/pdf.+--+-- 'httpStatus', 'describeLoaResponse_httpStatus' - The response's http status code.+newDescribeLoaResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeLoaResponse+newDescribeLoaResponse pHttpStatus_ =+  DescribeLoaResponse'+    { loaContent = Prelude.Nothing,+      loaContentType = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The binary contents of the LOA-CFA document.--+-- -- /Note:/ This 'Lens' automatically encodes and decodes Base64 data.+-- -- The underlying isomorphism will encode to Base64 representation during+-- -- serialisation, and decode from Base64 representation during deserialisation.+-- -- This 'Lens' accepts and returns only raw unencoded data.+describeLoaResponse_loaContent :: Lens.Lens' DescribeLoaResponse (Prelude.Maybe Prelude.ByteString)+describeLoaResponse_loaContent = Lens.lens (\DescribeLoaResponse' {loaContent} -> loaContent) (\s@DescribeLoaResponse' {} a -> s {loaContent = a} :: DescribeLoaResponse) Prelude.. Lens.mapping Data._Base64++-- | The standard media type for the LOA-CFA document. The only supported+-- value is application\/pdf.+describeLoaResponse_loaContentType :: Lens.Lens' DescribeLoaResponse (Prelude.Maybe LoaContentType)+describeLoaResponse_loaContentType = Lens.lens (\DescribeLoaResponse' {loaContentType} -> loaContentType) (\s@DescribeLoaResponse' {} a -> s {loaContentType = a} :: DescribeLoaResponse)++-- | The response's http status code.+describeLoaResponse_httpStatus :: Lens.Lens' DescribeLoaResponse Prelude.Int+describeLoaResponse_httpStatus = Lens.lens (\DescribeLoaResponse' {httpStatus} -> httpStatus) (\s@DescribeLoaResponse' {} a -> s {httpStatus = a} :: DescribeLoaResponse)++instance Prelude.NFData DescribeLoaResponse where+  rnf DescribeLoaResponse' {..} =+    Prelude.rnf loaContent+      `Prelude.seq` Prelude.rnf loaContentType+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeLocations.hs view
@@ -0,0 +1,150 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeLocations+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the Direct Connect locations in the current Amazon Web Services+-- Region. These are the locations that can be selected when calling+-- CreateConnection or CreateInterconnect.+module Amazonka.DirectConnect.DescribeLocations+  ( -- * Creating a Request+    DescribeLocations (..),+    newDescribeLocations,++    -- * Destructuring the Response+    DescribeLocationsResponse (..),+    newDescribeLocationsResponse,++    -- * Response Lenses+    describeLocationsResponse_locations,+    describeLocationsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeLocations' smart constructor.+data DescribeLocations = DescribeLocations'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLocations' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDescribeLocations ::+  DescribeLocations+newDescribeLocations = DescribeLocations'++instance Core.AWSRequest DescribeLocations where+  type+    AWSResponse DescribeLocations =+      DescribeLocationsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeLocationsResponse'+            Prelude.<$> (x Data..?> "locations" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeLocations where+  hashWithSalt _salt _ =+    _salt `Prelude.hashWithSalt` ()++instance Prelude.NFData DescribeLocations where+  rnf _ = ()++instance Data.ToHeaders DescribeLocations where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeLocations" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeLocations where+  toJSON = Prelude.const (Data.Object Prelude.mempty)++instance Data.ToPath DescribeLocations where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeLocations where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeLocationsResponse' smart constructor.+data DescribeLocationsResponse = DescribeLocationsResponse'+  { -- | The locations.+    locations :: Prelude.Maybe [Location],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLocationsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'locations', 'describeLocationsResponse_locations' - The locations.+--+-- 'httpStatus', 'describeLocationsResponse_httpStatus' - The response's http status code.+newDescribeLocationsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeLocationsResponse+newDescribeLocationsResponse pHttpStatus_ =+  DescribeLocationsResponse'+    { locations =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The locations.+describeLocationsResponse_locations :: Lens.Lens' DescribeLocationsResponse (Prelude.Maybe [Location])+describeLocationsResponse_locations = Lens.lens (\DescribeLocationsResponse' {locations} -> locations) (\s@DescribeLocationsResponse' {} a -> s {locations = a} :: DescribeLocationsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeLocationsResponse_httpStatus :: Lens.Lens' DescribeLocationsResponse Prelude.Int+describeLocationsResponse_httpStatus = Lens.lens (\DescribeLocationsResponse' {httpStatus} -> httpStatus) (\s@DescribeLocationsResponse' {} a -> s {httpStatus = a} :: DescribeLocationsResponse)++instance Prelude.NFData DescribeLocationsResponse where+  rnf DescribeLocationsResponse' {..} =+    Prelude.rnf locations+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeRouterConfiguration.hs view
@@ -0,0 +1,233 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeRouterConfiguration+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Details about the router.+module Amazonka.DirectConnect.DescribeRouterConfiguration+  ( -- * Creating a Request+    DescribeRouterConfiguration (..),+    newDescribeRouterConfiguration,++    -- * Request Lenses+    describeRouterConfiguration_routerTypeIdentifier,+    describeRouterConfiguration_virtualInterfaceId,++    -- * Destructuring the Response+    DescribeRouterConfigurationResponse (..),+    newDescribeRouterConfigurationResponse,++    -- * Response Lenses+    describeRouterConfigurationResponse_customerRouterConfig,+    describeRouterConfigurationResponse_router,+    describeRouterConfigurationResponse_virtualInterfaceId,+    describeRouterConfigurationResponse_virtualInterfaceName,+    describeRouterConfigurationResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | Provides the details about a virtual interface\'s router.+--+-- /See:/ 'newDescribeRouterConfiguration' smart constructor.+data DescribeRouterConfiguration = DescribeRouterConfiguration'+  { -- | Identifies the router by a combination of vendor, platform, and software+    -- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+    routerTypeIdentifier :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeRouterConfiguration' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'routerTypeIdentifier', 'describeRouterConfiguration_routerTypeIdentifier' - Identifies the router by a combination of vendor, platform, and software+-- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+--+-- 'virtualInterfaceId', 'describeRouterConfiguration_virtualInterfaceId' - The ID of the virtual interface.+newDescribeRouterConfiguration ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  DescribeRouterConfiguration+newDescribeRouterConfiguration pVirtualInterfaceId_ =+  DescribeRouterConfiguration'+    { routerTypeIdentifier =+        Prelude.Nothing,+      virtualInterfaceId = pVirtualInterfaceId_+    }++-- | Identifies the router by a combination of vendor, platform, and software+-- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+describeRouterConfiguration_routerTypeIdentifier :: Lens.Lens' DescribeRouterConfiguration (Prelude.Maybe Prelude.Text)+describeRouterConfiguration_routerTypeIdentifier = Lens.lens (\DescribeRouterConfiguration' {routerTypeIdentifier} -> routerTypeIdentifier) (\s@DescribeRouterConfiguration' {} a -> s {routerTypeIdentifier = a} :: DescribeRouterConfiguration)++-- | The ID of the virtual interface.+describeRouterConfiguration_virtualInterfaceId :: Lens.Lens' DescribeRouterConfiguration Prelude.Text+describeRouterConfiguration_virtualInterfaceId = Lens.lens (\DescribeRouterConfiguration' {virtualInterfaceId} -> virtualInterfaceId) (\s@DescribeRouterConfiguration' {} a -> s {virtualInterfaceId = a} :: DescribeRouterConfiguration)++instance Core.AWSRequest DescribeRouterConfiguration where+  type+    AWSResponse DescribeRouterConfiguration =+      DescribeRouterConfigurationResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeRouterConfigurationResponse'+            Prelude.<$> (x Data..?> "customerRouterConfig")+            Prelude.<*> (x Data..?> "router")+            Prelude.<*> (x Data..?> "virtualInterfaceId")+            Prelude.<*> (x Data..?> "virtualInterfaceName")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeRouterConfiguration where+  hashWithSalt _salt DescribeRouterConfiguration' {..} =+    _salt+      `Prelude.hashWithSalt` routerTypeIdentifier+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData DescribeRouterConfiguration where+  rnf DescribeRouterConfiguration' {..} =+    Prelude.rnf routerTypeIdentifier+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance Data.ToHeaders DescribeRouterConfiguration where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeRouterConfiguration" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeRouterConfiguration where+  toJSON DescribeRouterConfiguration' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("routerTypeIdentifier" Data..=)+              Prelude.<$> routerTypeIdentifier,+            Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath DescribeRouterConfiguration where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeRouterConfiguration where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeRouterConfigurationResponse' smart constructor.+data DescribeRouterConfigurationResponse = DescribeRouterConfigurationResponse'+  { -- | The customer router configuration.+    customerRouterConfig :: Prelude.Maybe Prelude.Text,+    -- | The details about the router.+    router :: Prelude.Maybe RouterType,+    -- | The ID assigned to the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text,+    -- | Provides the details about a virtual interface\'s router.+    virtualInterfaceName :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeRouterConfigurationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'customerRouterConfig', 'describeRouterConfigurationResponse_customerRouterConfig' - The customer router configuration.+--+-- 'router', 'describeRouterConfigurationResponse_router' - The details about the router.+--+-- 'virtualInterfaceId', 'describeRouterConfigurationResponse_virtualInterfaceId' - The ID assigned to the virtual interface.+--+-- 'virtualInterfaceName', 'describeRouterConfigurationResponse_virtualInterfaceName' - Provides the details about a virtual interface\'s router.+--+-- 'httpStatus', 'describeRouterConfigurationResponse_httpStatus' - The response's http status code.+newDescribeRouterConfigurationResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeRouterConfigurationResponse+newDescribeRouterConfigurationResponse pHttpStatus_ =+  DescribeRouterConfigurationResponse'+    { customerRouterConfig =+        Prelude.Nothing,+      router = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing,+      virtualInterfaceName = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The customer router configuration.+describeRouterConfigurationResponse_customerRouterConfig :: Lens.Lens' DescribeRouterConfigurationResponse (Prelude.Maybe Prelude.Text)+describeRouterConfigurationResponse_customerRouterConfig = Lens.lens (\DescribeRouterConfigurationResponse' {customerRouterConfig} -> customerRouterConfig) (\s@DescribeRouterConfigurationResponse' {} a -> s {customerRouterConfig = a} :: DescribeRouterConfigurationResponse)++-- | The details about the router.+describeRouterConfigurationResponse_router :: Lens.Lens' DescribeRouterConfigurationResponse (Prelude.Maybe RouterType)+describeRouterConfigurationResponse_router = Lens.lens (\DescribeRouterConfigurationResponse' {router} -> router) (\s@DescribeRouterConfigurationResponse' {} a -> s {router = a} :: DescribeRouterConfigurationResponse)++-- | The ID assigned to the virtual interface.+describeRouterConfigurationResponse_virtualInterfaceId :: Lens.Lens' DescribeRouterConfigurationResponse (Prelude.Maybe Prelude.Text)+describeRouterConfigurationResponse_virtualInterfaceId = Lens.lens (\DescribeRouterConfigurationResponse' {virtualInterfaceId} -> virtualInterfaceId) (\s@DescribeRouterConfigurationResponse' {} a -> s {virtualInterfaceId = a} :: DescribeRouterConfigurationResponse)++-- | Provides the details about a virtual interface\'s router.+describeRouterConfigurationResponse_virtualInterfaceName :: Lens.Lens' DescribeRouterConfigurationResponse (Prelude.Maybe Prelude.Text)+describeRouterConfigurationResponse_virtualInterfaceName = Lens.lens (\DescribeRouterConfigurationResponse' {virtualInterfaceName} -> virtualInterfaceName) (\s@DescribeRouterConfigurationResponse' {} a -> s {virtualInterfaceName = a} :: DescribeRouterConfigurationResponse)++-- | The response's http status code.+describeRouterConfigurationResponse_httpStatus :: Lens.Lens' DescribeRouterConfigurationResponse Prelude.Int+describeRouterConfigurationResponse_httpStatus = Lens.lens (\DescribeRouterConfigurationResponse' {httpStatus} -> httpStatus) (\s@DescribeRouterConfigurationResponse' {} a -> s {httpStatus = a} :: DescribeRouterConfigurationResponse)++instance+  Prelude.NFData+    DescribeRouterConfigurationResponse+  where+  rnf DescribeRouterConfigurationResponse' {..} =+    Prelude.rnf customerRouterConfig+      `Prelude.seq` Prelude.rnf router+      `Prelude.seq` Prelude.rnf virtualInterfaceId+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeTags.hs view
@@ -0,0 +1,165 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeTags+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Describes the tags associated with the specified Direct Connect+-- resources.+module Amazonka.DirectConnect.DescribeTags+  ( -- * Creating a Request+    DescribeTags (..),+    newDescribeTags,++    -- * Request Lenses+    describeTags_resourceArns,++    -- * Destructuring the Response+    DescribeTagsResponse (..),+    newDescribeTagsResponse,++    -- * Response Lenses+    describeTagsResponse_resourceTags,+    describeTagsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeTags' smart constructor.+data DescribeTags = DescribeTags'+  { -- | The Amazon Resource Names (ARNs) of the resources.+    resourceArns :: [Prelude.Text]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTags' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceArns', 'describeTags_resourceArns' - The Amazon Resource Names (ARNs) of the resources.+newDescribeTags ::+  DescribeTags+newDescribeTags =+  DescribeTags' {resourceArns = Prelude.mempty}++-- | The Amazon Resource Names (ARNs) of the resources.+describeTags_resourceArns :: Lens.Lens' DescribeTags [Prelude.Text]+describeTags_resourceArns = Lens.lens (\DescribeTags' {resourceArns} -> resourceArns) (\s@DescribeTags' {} a -> s {resourceArns = a} :: DescribeTags) Prelude.. Lens.coerced++instance Core.AWSRequest DescribeTags where+  type AWSResponse DescribeTags = DescribeTagsResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeTagsResponse'+            Prelude.<$> (x Data..?> "resourceTags" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeTags where+  hashWithSalt _salt DescribeTags' {..} =+    _salt `Prelude.hashWithSalt` resourceArns++instance Prelude.NFData DescribeTags where+  rnf DescribeTags' {..} = Prelude.rnf resourceArns++instance Data.ToHeaders DescribeTags where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeTags" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeTags where+  toJSON DescribeTags' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("resourceArns" Data..= resourceArns)]+      )++instance Data.ToPath DescribeTags where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeTags where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeTagsResponse' smart constructor.+data DescribeTagsResponse = DescribeTagsResponse'+  { -- | Information about the tags.+    resourceTags :: Prelude.Maybe [ResourceTag],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTagsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceTags', 'describeTagsResponse_resourceTags' - Information about the tags.+--+-- 'httpStatus', 'describeTagsResponse_httpStatus' - The response's http status code.+newDescribeTagsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeTagsResponse+newDescribeTagsResponse pHttpStatus_ =+  DescribeTagsResponse'+    { resourceTags =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Information about the tags.+describeTagsResponse_resourceTags :: Lens.Lens' DescribeTagsResponse (Prelude.Maybe [ResourceTag])+describeTagsResponse_resourceTags = Lens.lens (\DescribeTagsResponse' {resourceTags} -> resourceTags) (\s@DescribeTagsResponse' {} a -> s {resourceTags = a} :: DescribeTagsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeTagsResponse_httpStatus :: Lens.Lens' DescribeTagsResponse Prelude.Int+describeTagsResponse_httpStatus = Lens.lens (\DescribeTagsResponse' {httpStatus} -> httpStatus) (\s@DescribeTagsResponse' {} a -> s {httpStatus = a} :: DescribeTagsResponse)++instance Prelude.NFData DescribeTagsResponse where+  rnf DescribeTagsResponse' {..} =+    Prelude.rnf resourceTags+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeVirtualGateways.hs view
@@ -0,0 +1,158 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeVirtualGateways+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the virtual private gateways owned by the Amazon Web Services+-- account.+--+-- You can create one or more Direct Connect private virtual interfaces+-- linked to a virtual private gateway.+module Amazonka.DirectConnect.DescribeVirtualGateways+  ( -- * Creating a Request+    DescribeVirtualGateways (..),+    newDescribeVirtualGateways,++    -- * Destructuring the Response+    DescribeVirtualGatewaysResponse (..),+    newDescribeVirtualGatewaysResponse,++    -- * Response Lenses+    describeVirtualGatewaysResponse_virtualGateways,+    describeVirtualGatewaysResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeVirtualGateways' smart constructor.+data DescribeVirtualGateways = DescribeVirtualGateways'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVirtualGateways' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDescribeVirtualGateways ::+  DescribeVirtualGateways+newDescribeVirtualGateways = DescribeVirtualGateways'++instance Core.AWSRequest DescribeVirtualGateways where+  type+    AWSResponse DescribeVirtualGateways =+      DescribeVirtualGatewaysResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeVirtualGatewaysResponse'+            Prelude.<$> ( x+                            Data..?> "virtualGateways"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeVirtualGateways where+  hashWithSalt _salt _ =+    _salt `Prelude.hashWithSalt` ()++instance Prelude.NFData DescribeVirtualGateways where+  rnf _ = ()++instance Data.ToHeaders DescribeVirtualGateways where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeVirtualGateways" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeVirtualGateways where+  toJSON = Prelude.const (Data.Object Prelude.mempty)++instance Data.ToPath DescribeVirtualGateways where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeVirtualGateways where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeVirtualGatewaysResponse' smart constructor.+data DescribeVirtualGatewaysResponse = DescribeVirtualGatewaysResponse'+  { -- | The virtual private gateways.+    virtualGateways :: Prelude.Maybe [VirtualGateway],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVirtualGatewaysResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualGateways', 'describeVirtualGatewaysResponse_virtualGateways' - The virtual private gateways.+--+-- 'httpStatus', 'describeVirtualGatewaysResponse_httpStatus' - The response's http status code.+newDescribeVirtualGatewaysResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeVirtualGatewaysResponse+newDescribeVirtualGatewaysResponse pHttpStatus_ =+  DescribeVirtualGatewaysResponse'+    { virtualGateways =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The virtual private gateways.+describeVirtualGatewaysResponse_virtualGateways :: Lens.Lens' DescribeVirtualGatewaysResponse (Prelude.Maybe [VirtualGateway])+describeVirtualGatewaysResponse_virtualGateways = Lens.lens (\DescribeVirtualGatewaysResponse' {virtualGateways} -> virtualGateways) (\s@DescribeVirtualGatewaysResponse' {} a -> s {virtualGateways = a} :: DescribeVirtualGatewaysResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeVirtualGatewaysResponse_httpStatus :: Lens.Lens' DescribeVirtualGatewaysResponse Prelude.Int+describeVirtualGatewaysResponse_httpStatus = Lens.lens (\DescribeVirtualGatewaysResponse' {httpStatus} -> httpStatus) (\s@DescribeVirtualGatewaysResponse' {} a -> s {httpStatus = a} :: DescribeVirtualGatewaysResponse)++instance+  Prelude.NFData+    DescribeVirtualGatewaysResponse+  where+  rnf DescribeVirtualGatewaysResponse' {..} =+    Prelude.rnf virtualGateways+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DescribeVirtualInterfaces.hs view
@@ -0,0 +1,200 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DescribeVirtualInterfaces+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Displays all virtual interfaces for an Amazon Web Services account.+-- Virtual interfaces deleted fewer than 15 minutes before you make the+-- request are also returned. If you specify a connection ID, only the+-- virtual interfaces associated with the connection are returned. If you+-- specify a virtual interface ID, then only a single virtual interface is+-- returned.+--+-- A virtual interface (VLAN) transmits the traffic between the Direct+-- Connect location and the customer network.+module Amazonka.DirectConnect.DescribeVirtualInterfaces+  ( -- * Creating a Request+    DescribeVirtualInterfaces (..),+    newDescribeVirtualInterfaces,++    -- * Request Lenses+    describeVirtualInterfaces_connectionId,+    describeVirtualInterfaces_virtualInterfaceId,++    -- * Destructuring the Response+    DescribeVirtualInterfacesResponse (..),+    newDescribeVirtualInterfacesResponse,++    -- * Response Lenses+    describeVirtualInterfacesResponse_virtualInterfaces,+    describeVirtualInterfacesResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeVirtualInterfaces' smart constructor.+data DescribeVirtualInterfaces = DescribeVirtualInterfaces'+  { -- | The ID of the connection.+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVirtualInterfaces' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'describeVirtualInterfaces_connectionId' - The ID of the connection.+--+-- 'virtualInterfaceId', 'describeVirtualInterfaces_virtualInterfaceId' - The ID of the virtual interface.+newDescribeVirtualInterfaces ::+  DescribeVirtualInterfaces+newDescribeVirtualInterfaces =+  DescribeVirtualInterfaces'+    { connectionId =+        Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing+    }++-- | The ID of the connection.+describeVirtualInterfaces_connectionId :: Lens.Lens' DescribeVirtualInterfaces (Prelude.Maybe Prelude.Text)+describeVirtualInterfaces_connectionId = Lens.lens (\DescribeVirtualInterfaces' {connectionId} -> connectionId) (\s@DescribeVirtualInterfaces' {} a -> s {connectionId = a} :: DescribeVirtualInterfaces)++-- | The ID of the virtual interface.+describeVirtualInterfaces_virtualInterfaceId :: Lens.Lens' DescribeVirtualInterfaces (Prelude.Maybe Prelude.Text)+describeVirtualInterfaces_virtualInterfaceId = Lens.lens (\DescribeVirtualInterfaces' {virtualInterfaceId} -> virtualInterfaceId) (\s@DescribeVirtualInterfaces' {} a -> s {virtualInterfaceId = a} :: DescribeVirtualInterfaces)++instance Core.AWSRequest DescribeVirtualInterfaces where+  type+    AWSResponse DescribeVirtualInterfaces =+      DescribeVirtualInterfacesResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeVirtualInterfacesResponse'+            Prelude.<$> ( x+                            Data..?> "virtualInterfaces"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeVirtualInterfaces where+  hashWithSalt _salt DescribeVirtualInterfaces' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData DescribeVirtualInterfaces where+  rnf DescribeVirtualInterfaces' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance Data.ToHeaders DescribeVirtualInterfaces where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DescribeVirtualInterfaces" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DescribeVirtualInterfaces where+  toJSON DescribeVirtualInterfaces' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("connectionId" Data..=) Prelude.<$> connectionId,+            ("virtualInterfaceId" Data..=)+              Prelude.<$> virtualInterfaceId+          ]+      )++instance Data.ToPath DescribeVirtualInterfaces where+  toPath = Prelude.const "/"++instance Data.ToQuery DescribeVirtualInterfaces where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeVirtualInterfacesResponse' smart constructor.+data DescribeVirtualInterfacesResponse = DescribeVirtualInterfacesResponse'+  { -- | The virtual interfaces+    virtualInterfaces :: Prelude.Maybe [VirtualInterface],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVirtualInterfacesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaces', 'describeVirtualInterfacesResponse_virtualInterfaces' - The virtual interfaces+--+-- 'httpStatus', 'describeVirtualInterfacesResponse_httpStatus' - The response's http status code.+newDescribeVirtualInterfacesResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeVirtualInterfacesResponse+newDescribeVirtualInterfacesResponse pHttpStatus_ =+  DescribeVirtualInterfacesResponse'+    { virtualInterfaces =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The virtual interfaces+describeVirtualInterfacesResponse_virtualInterfaces :: Lens.Lens' DescribeVirtualInterfacesResponse (Prelude.Maybe [VirtualInterface])+describeVirtualInterfacesResponse_virtualInterfaces = Lens.lens (\DescribeVirtualInterfacesResponse' {virtualInterfaces} -> virtualInterfaces) (\s@DescribeVirtualInterfacesResponse' {} a -> s {virtualInterfaces = a} :: DescribeVirtualInterfacesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeVirtualInterfacesResponse_httpStatus :: Lens.Lens' DescribeVirtualInterfacesResponse Prelude.Int+describeVirtualInterfacesResponse_httpStatus = Lens.lens (\DescribeVirtualInterfacesResponse' {httpStatus} -> httpStatus) (\s@DescribeVirtualInterfacesResponse' {} a -> s {httpStatus = a} :: DescribeVirtualInterfacesResponse)++instance+  Prelude.NFData+    DescribeVirtualInterfacesResponse+  where+  rnf DescribeVirtualInterfacesResponse' {..} =+    Prelude.rnf virtualInterfaces+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/DisassociateConnectionFromLag.hs view
@@ -0,0 +1,181 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DisassociateConnectionFromLag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Disassociates a connection from a link aggregation group (LAG). The+-- connection is interrupted and re-established as a standalone connection+-- (the connection is not deleted; to delete the connection, use the+-- DeleteConnection request). If the LAG has associated virtual interfaces+-- or hosted connections, they remain associated with the LAG. A+-- disassociated connection owned by an Direct Connect Partner is+-- automatically converted to an interconnect.+--+-- If disassociating the connection would cause the LAG to fall below its+-- setting for minimum number of operational connections, the request+-- fails, except when it\'s the last member of the LAG. If all connections+-- are disassociated, the LAG continues to exist as an empty LAG with no+-- physical connections.+module Amazonka.DirectConnect.DisassociateConnectionFromLag+  ( -- * Creating a Request+    DisassociateConnectionFromLag (..),+    newDisassociateConnectionFromLag,++    -- * Request Lenses+    disassociateConnectionFromLag_connectionId,+    disassociateConnectionFromLag_lagId,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDisassociateConnectionFromLag' smart constructor.+data DisassociateConnectionFromLag = DisassociateConnectionFromLag'+  { -- | The ID of the connection.+    connectionId :: Prelude.Text,+    -- | The ID of the LAG.+    lagId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DisassociateConnectionFromLag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'disassociateConnectionFromLag_connectionId' - The ID of the connection.+--+-- 'lagId', 'disassociateConnectionFromLag_lagId' - The ID of the LAG.+newDisassociateConnectionFromLag ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'lagId'+  Prelude.Text ->+  DisassociateConnectionFromLag+newDisassociateConnectionFromLag+  pConnectionId_+  pLagId_ =+    DisassociateConnectionFromLag'+      { connectionId =+          pConnectionId_,+        lagId = pLagId_+      }++-- | The ID of the connection.+disassociateConnectionFromLag_connectionId :: Lens.Lens' DisassociateConnectionFromLag Prelude.Text+disassociateConnectionFromLag_connectionId = Lens.lens (\DisassociateConnectionFromLag' {connectionId} -> connectionId) (\s@DisassociateConnectionFromLag' {} a -> s {connectionId = a} :: DisassociateConnectionFromLag)++-- | The ID of the LAG.+disassociateConnectionFromLag_lagId :: Lens.Lens' DisassociateConnectionFromLag Prelude.Text+disassociateConnectionFromLag_lagId = Lens.lens (\DisassociateConnectionFromLag' {lagId} -> lagId) (\s@DisassociateConnectionFromLag' {} a -> s {lagId = a} :: DisassociateConnectionFromLag)++instance+  Core.AWSRequest+    DisassociateConnectionFromLag+  where+  type+    AWSResponse DisassociateConnectionFromLag =+      Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    DisassociateConnectionFromLag+  where+  hashWithSalt _salt DisassociateConnectionFromLag' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` lagId++instance Prelude.NFData DisassociateConnectionFromLag where+  rnf DisassociateConnectionFromLag' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf lagId++instance Data.ToHeaders DisassociateConnectionFromLag where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DisassociateConnectionFromLag" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DisassociateConnectionFromLag where+  toJSON DisassociateConnectionFromLag' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("lagId" Data..= lagId)+          ]+      )++instance Data.ToPath DisassociateConnectionFromLag where+  toPath = Prelude.const "/"++instance Data.ToQuery DisassociateConnectionFromLag where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/DisassociateMacSecKey.hs view
@@ -0,0 +1,229 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.DisassociateMacSecKey+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Removes the association between a MAC Security (MACsec) security key and+-- an Direct Connect dedicated connection.+module Amazonka.DirectConnect.DisassociateMacSecKey+  ( -- * Creating a Request+    DisassociateMacSecKey (..),+    newDisassociateMacSecKey,++    -- * Request Lenses+    disassociateMacSecKey_connectionId,+    disassociateMacSecKey_secretARN,++    -- * Destructuring the Response+    DisassociateMacSecKeyResponse (..),+    newDisassociateMacSecKeyResponse,++    -- * Response Lenses+    disassociateMacSecKeyResponse_connectionId,+    disassociateMacSecKeyResponse_macSecKeys,+    disassociateMacSecKeyResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDisassociateMacSecKey' smart constructor.+data DisassociateMacSecKey = DisassociateMacSecKey'+  { -- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+    -- (dxlag-xxxx).+    --+    -- You can use DescribeConnections or DescribeLags to retrieve connection+    -- ID.+    connectionId :: Prelude.Text,+    -- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+    --+    -- You can use DescribeConnections to retrieve the ARN of the MAC Security+    -- (MACsec) secret key.+    secretARN :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DisassociateMacSecKey' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'disassociateMacSecKey_connectionId' - The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- You can use DescribeConnections or DescribeLags to retrieve connection+-- ID.+--+-- 'secretARN', 'disassociateMacSecKey_secretARN' - The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+--+-- You can use DescribeConnections to retrieve the ARN of the MAC Security+-- (MACsec) secret key.+newDisassociateMacSecKey ::+  -- | 'connectionId'+  Prelude.Text ->+  -- | 'secretARN'+  Prelude.Text ->+  DisassociateMacSecKey+newDisassociateMacSecKey pConnectionId_ pSecretARN_ =+  DisassociateMacSecKey'+    { connectionId =+        pConnectionId_,+      secretARN = pSecretARN_+    }++-- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- You can use DescribeConnections or DescribeLags to retrieve connection+-- ID.+disassociateMacSecKey_connectionId :: Lens.Lens' DisassociateMacSecKey Prelude.Text+disassociateMacSecKey_connectionId = Lens.lens (\DisassociateMacSecKey' {connectionId} -> connectionId) (\s@DisassociateMacSecKey' {} a -> s {connectionId = a} :: DisassociateMacSecKey)++-- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+--+-- You can use DescribeConnections to retrieve the ARN of the MAC Security+-- (MACsec) secret key.+disassociateMacSecKey_secretARN :: Lens.Lens' DisassociateMacSecKey Prelude.Text+disassociateMacSecKey_secretARN = Lens.lens (\DisassociateMacSecKey' {secretARN} -> secretARN) (\s@DisassociateMacSecKey' {} a -> s {secretARN = a} :: DisassociateMacSecKey)++instance Core.AWSRequest DisassociateMacSecKey where+  type+    AWSResponse DisassociateMacSecKey =+      DisassociateMacSecKeyResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DisassociateMacSecKeyResponse'+            Prelude.<$> (x Data..?> "connectionId")+            Prelude.<*> (x Data..?> "macSecKeys" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DisassociateMacSecKey where+  hashWithSalt _salt DisassociateMacSecKey' {..} =+    _salt+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` secretARN++instance Prelude.NFData DisassociateMacSecKey where+  rnf DisassociateMacSecKey' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf secretARN++instance Data.ToHeaders DisassociateMacSecKey where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.DisassociateMacSecKey" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON DisassociateMacSecKey where+  toJSON DisassociateMacSecKey' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("connectionId" Data..= connectionId),+            Prelude.Just ("secretARN" Data..= secretARN)+          ]+      )++instance Data.ToPath DisassociateMacSecKey where+  toPath = Prelude.const "/"++instance Data.ToQuery DisassociateMacSecKey where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDisassociateMacSecKeyResponse' smart constructor.+data DisassociateMacSecKeyResponse = DisassociateMacSecKeyResponse'+  { -- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+    -- (dxlag-xxxx).+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The MAC Security (MACsec) security keys no longer associated with the+    -- dedicated connection.+    macSecKeys :: Prelude.Maybe [MacSecKey],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DisassociateMacSecKeyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionId', 'disassociateMacSecKeyResponse_connectionId' - The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+--+-- 'macSecKeys', 'disassociateMacSecKeyResponse_macSecKeys' - The MAC Security (MACsec) security keys no longer associated with the+-- dedicated connection.+--+-- 'httpStatus', 'disassociateMacSecKeyResponse_httpStatus' - The response's http status code.+newDisassociateMacSecKeyResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DisassociateMacSecKeyResponse+newDisassociateMacSecKeyResponse pHttpStatus_ =+  DisassociateMacSecKeyResponse'+    { connectionId =+        Prelude.Nothing,+      macSecKeys = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | The ID of the dedicated connection (dxcon-xxxx), or the ID of the LAG+-- (dxlag-xxxx).+disassociateMacSecKeyResponse_connectionId :: Lens.Lens' DisassociateMacSecKeyResponse (Prelude.Maybe Prelude.Text)+disassociateMacSecKeyResponse_connectionId = Lens.lens (\DisassociateMacSecKeyResponse' {connectionId} -> connectionId) (\s@DisassociateMacSecKeyResponse' {} a -> s {connectionId = a} :: DisassociateMacSecKeyResponse)++-- | The MAC Security (MACsec) security keys no longer associated with the+-- dedicated connection.+disassociateMacSecKeyResponse_macSecKeys :: Lens.Lens' DisassociateMacSecKeyResponse (Prelude.Maybe [MacSecKey])+disassociateMacSecKeyResponse_macSecKeys = Lens.lens (\DisassociateMacSecKeyResponse' {macSecKeys} -> macSecKeys) (\s@DisassociateMacSecKeyResponse' {} a -> s {macSecKeys = a} :: DisassociateMacSecKeyResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+disassociateMacSecKeyResponse_httpStatus :: Lens.Lens' DisassociateMacSecKeyResponse Prelude.Int+disassociateMacSecKeyResponse_httpStatus = Lens.lens (\DisassociateMacSecKeyResponse' {httpStatus} -> httpStatus) (\s@DisassociateMacSecKeyResponse' {} a -> s {httpStatus = a} :: DisassociateMacSecKeyResponse)++instance Prelude.NFData DisassociateMacSecKeyResponse where+  rnf DisassociateMacSecKeyResponse' {..} =+    Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf macSecKeys+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/Lens.hs view
@@ -0,0 +1,1139 @@+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Lens+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Lens+  ( -- * Operations++    -- ** AcceptDirectConnectGatewayAssociationProposal+    acceptDirectConnectGatewayAssociationProposal_overrideAllowedPrefixesToDirectConnectGateway,+    acceptDirectConnectGatewayAssociationProposal_directConnectGatewayId,+    acceptDirectConnectGatewayAssociationProposal_proposalId,+    acceptDirectConnectGatewayAssociationProposal_associatedGatewayOwnerAccount,+    acceptDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociation,+    acceptDirectConnectGatewayAssociationProposalResponse_httpStatus,++    -- ** AllocateHostedConnection+    allocateHostedConnection_tags,+    allocateHostedConnection_connectionId,+    allocateHostedConnection_ownerAccount,+    allocateHostedConnection_bandwidth,+    allocateHostedConnection_connectionName,+    allocateHostedConnection_vlan,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** AllocatePrivateVirtualInterface+    allocatePrivateVirtualInterface_connectionId,+    allocatePrivateVirtualInterface_ownerAccount,+    allocatePrivateVirtualInterface_newPrivateVirtualInterfaceAllocation,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** AllocatePublicVirtualInterface+    allocatePublicVirtualInterface_connectionId,+    allocatePublicVirtualInterface_ownerAccount,+    allocatePublicVirtualInterface_newPublicVirtualInterfaceAllocation,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** AllocateTransitVirtualInterface+    allocateTransitVirtualInterface_connectionId,+    allocateTransitVirtualInterface_ownerAccount,+    allocateTransitVirtualInterface_newTransitVirtualInterfaceAllocation,+    allocateTransitVirtualInterfaceResponse_virtualInterface,+    allocateTransitVirtualInterfaceResponse_httpStatus,++    -- ** AssociateConnectionWithLag+    associateConnectionWithLag_connectionId,+    associateConnectionWithLag_lagId,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** AssociateHostedConnection+    associateHostedConnection_connectionId,+    associateHostedConnection_parentConnectionId,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** AssociateMacSecKey+    associateMacSecKey_cak,+    associateMacSecKey_ckn,+    associateMacSecKey_secretARN,+    associateMacSecKey_connectionId,+    associateMacSecKeyResponse_connectionId,+    associateMacSecKeyResponse_macSecKeys,+    associateMacSecKeyResponse_httpStatus,++    -- ** AssociateVirtualInterface+    associateVirtualInterface_virtualInterfaceId,+    associateVirtualInterface_connectionId,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** ConfirmConnection+    confirmConnection_connectionId,+    confirmConnectionResponse_connectionState,+    confirmConnectionResponse_httpStatus,++    -- ** ConfirmCustomerAgreement+    confirmCustomerAgreement_agreementName,+    confirmCustomerAgreementResponse_status,+    confirmCustomerAgreementResponse_httpStatus,++    -- ** ConfirmPrivateVirtualInterface+    confirmPrivateVirtualInterface_directConnectGatewayId,+    confirmPrivateVirtualInterface_virtualGatewayId,+    confirmPrivateVirtualInterface_virtualInterfaceId,+    confirmPrivateVirtualInterfaceResponse_virtualInterfaceState,+    confirmPrivateVirtualInterfaceResponse_httpStatus,++    -- ** ConfirmPublicVirtualInterface+    confirmPublicVirtualInterface_virtualInterfaceId,+    confirmPublicVirtualInterfaceResponse_virtualInterfaceState,+    confirmPublicVirtualInterfaceResponse_httpStatus,++    -- ** ConfirmTransitVirtualInterface+    confirmTransitVirtualInterface_virtualInterfaceId,+    confirmTransitVirtualInterface_directConnectGatewayId,+    confirmTransitVirtualInterfaceResponse_virtualInterfaceState,+    confirmTransitVirtualInterfaceResponse_httpStatus,++    -- ** CreateBGPPeer+    createBGPPeer_newBGPPeer,+    createBGPPeer_virtualInterfaceId,+    createBGPPeerResponse_virtualInterface,+    createBGPPeerResponse_httpStatus,++    -- ** CreateConnection+    createConnection_lagId,+    createConnection_providerName,+    createConnection_requestMACSec,+    createConnection_tags,+    createConnection_location,+    createConnection_bandwidth,+    createConnection_connectionName,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** CreateDirectConnectGateway+    createDirectConnectGateway_amazonSideAsn,+    createDirectConnectGateway_directConnectGatewayName,+    createDirectConnectGatewayResponse_directConnectGateway,+    createDirectConnectGatewayResponse_httpStatus,++    -- ** CreateDirectConnectGatewayAssociation+    createDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociation_gatewayId,+    createDirectConnectGatewayAssociation_virtualGatewayId,+    createDirectConnectGatewayAssociation_directConnectGatewayId,+    createDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    createDirectConnectGatewayAssociationResponse_httpStatus,++    -- ** CreateDirectConnectGatewayAssociationProposal+    createDirectConnectGatewayAssociationProposal_addAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociationProposal_removeAllowedPrefixesToDirectConnectGateway,+    createDirectConnectGatewayAssociationProposal_directConnectGatewayId,+    createDirectConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount,+    createDirectConnectGatewayAssociationProposal_gatewayId,+    createDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal,+    createDirectConnectGatewayAssociationProposalResponse_httpStatus,++    -- ** CreateInterconnect+    createInterconnect_lagId,+    createInterconnect_providerName,+    createInterconnect_tags,+    createInterconnect_interconnectName,+    createInterconnect_bandwidth,+    createInterconnect_location,+    interconnect_awsDevice,+    interconnect_awsDeviceV2,+    interconnect_awsLogicalDeviceId,+    interconnect_bandwidth,+    interconnect_hasLogicalRedundancy,+    interconnect_interconnectId,+    interconnect_interconnectName,+    interconnect_interconnectState,+    interconnect_jumboFrameCapable,+    interconnect_lagId,+    interconnect_loaIssueTime,+    interconnect_location,+    interconnect_providerName,+    interconnect_region,+    interconnect_tags,++    -- ** CreateLag+    createLag_childConnectionTags,+    createLag_connectionId,+    createLag_providerName,+    createLag_requestMACSec,+    createLag_tags,+    createLag_numberOfConnections,+    createLag_location,+    createLag_connectionsBandwidth,+    createLag_lagName,+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,++    -- ** CreatePrivateVirtualInterface+    createPrivateVirtualInterface_connectionId,+    createPrivateVirtualInterface_newPrivateVirtualInterface,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** CreatePublicVirtualInterface+    createPublicVirtualInterface_connectionId,+    createPublicVirtualInterface_newPublicVirtualInterface,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** CreateTransitVirtualInterface+    createTransitVirtualInterface_connectionId,+    createTransitVirtualInterface_newTransitVirtualInterface,+    createTransitVirtualInterfaceResponse_virtualInterface,+    createTransitVirtualInterfaceResponse_httpStatus,++    -- ** DeleteBGPPeer+    deleteBGPPeer_asn,+    deleteBGPPeer_bgpPeerId,+    deleteBGPPeer_customerAddress,+    deleteBGPPeer_virtualInterfaceId,+    deleteBGPPeerResponse_virtualInterface,+    deleteBGPPeerResponse_httpStatus,++    -- ** DeleteConnection+    deleteConnection_connectionId,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** DeleteDirectConnectGateway+    deleteDirectConnectGateway_directConnectGatewayId,+    deleteDirectConnectGatewayResponse_directConnectGateway,+    deleteDirectConnectGatewayResponse_httpStatus,++    -- ** DeleteDirectConnectGatewayAssociation+    deleteDirectConnectGatewayAssociation_associationId,+    deleteDirectConnectGatewayAssociation_directConnectGatewayId,+    deleteDirectConnectGatewayAssociation_virtualGatewayId,+    deleteDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    deleteDirectConnectGatewayAssociationResponse_httpStatus,++    -- ** DeleteDirectConnectGatewayAssociationProposal+    deleteDirectConnectGatewayAssociationProposal_proposalId,+    deleteDirectConnectGatewayAssociationProposalResponse_directConnectGatewayAssociationProposal,+    deleteDirectConnectGatewayAssociationProposalResponse_httpStatus,++    -- ** DeleteInterconnect+    deleteInterconnect_interconnectId,+    deleteInterconnectResponse_interconnectState,+    deleteInterconnectResponse_httpStatus,++    -- ** DeleteLag+    deleteLag_lagId,+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,++    -- ** DeleteVirtualInterface+    deleteVirtualInterface_virtualInterfaceId,+    deleteVirtualInterfaceResponse_virtualInterfaceState,+    deleteVirtualInterfaceResponse_httpStatus,++    -- ** DescribeConnections+    describeConnections_connectionId,+    connections_connections,++    -- ** DescribeCustomerMetadata+    describeCustomerMetadataResponse_agreements,+    describeCustomerMetadataResponse_nniPartnerType,+    describeCustomerMetadataResponse_httpStatus,++    -- ** DescribeDirectConnectGatewayAssociationProposals+    describeDirectConnectGatewayAssociationProposals_associatedGatewayId,+    describeDirectConnectGatewayAssociationProposals_directConnectGatewayId,+    describeDirectConnectGatewayAssociationProposals_maxResults,+    describeDirectConnectGatewayAssociationProposals_nextToken,+    describeDirectConnectGatewayAssociationProposals_proposalId,+    describeDirectConnectGatewayAssociationProposalsResponse_directConnectGatewayAssociationProposals,+    describeDirectConnectGatewayAssociationProposalsResponse_nextToken,+    describeDirectConnectGatewayAssociationProposalsResponse_httpStatus,++    -- ** DescribeDirectConnectGatewayAssociations+    describeDirectConnectGatewayAssociations_associatedGatewayId,+    describeDirectConnectGatewayAssociations_associationId,+    describeDirectConnectGatewayAssociations_directConnectGatewayId,+    describeDirectConnectGatewayAssociations_maxResults,+    describeDirectConnectGatewayAssociations_nextToken,+    describeDirectConnectGatewayAssociations_virtualGatewayId,+    describeDirectConnectGatewayAssociationsResponse_directConnectGatewayAssociations,+    describeDirectConnectGatewayAssociationsResponse_nextToken,+    describeDirectConnectGatewayAssociationsResponse_httpStatus,++    -- ** DescribeDirectConnectGatewayAttachments+    describeDirectConnectGatewayAttachments_directConnectGatewayId,+    describeDirectConnectGatewayAttachments_maxResults,+    describeDirectConnectGatewayAttachments_nextToken,+    describeDirectConnectGatewayAttachments_virtualInterfaceId,+    describeDirectConnectGatewayAttachmentsResponse_directConnectGatewayAttachments,+    describeDirectConnectGatewayAttachmentsResponse_nextToken,+    describeDirectConnectGatewayAttachmentsResponse_httpStatus,++    -- ** DescribeDirectConnectGateways+    describeDirectConnectGateways_directConnectGatewayId,+    describeDirectConnectGateways_maxResults,+    describeDirectConnectGateways_nextToken,+    describeDirectConnectGatewaysResponse_directConnectGateways,+    describeDirectConnectGatewaysResponse_nextToken,+    describeDirectConnectGatewaysResponse_httpStatus,++    -- ** DescribeHostedConnections+    describeHostedConnections_connectionId,+    connections_connections,++    -- ** DescribeInterconnects+    describeInterconnects_interconnectId,+    describeInterconnectsResponse_interconnects,+    describeInterconnectsResponse_httpStatus,++    -- ** DescribeLags+    describeLags_lagId,+    describeLagsResponse_lags,+    describeLagsResponse_httpStatus,++    -- ** DescribeLoa+    describeLoa_loaContentType,+    describeLoa_providerName,+    describeLoa_connectionId,+    describeLoaResponse_loaContent,+    describeLoaResponse_loaContentType,+    describeLoaResponse_httpStatus,++    -- ** DescribeLocations+    describeLocationsResponse_locations,+    describeLocationsResponse_httpStatus,++    -- ** DescribeRouterConfiguration+    describeRouterConfiguration_routerTypeIdentifier,+    describeRouterConfiguration_virtualInterfaceId,+    describeRouterConfigurationResponse_customerRouterConfig,+    describeRouterConfigurationResponse_router,+    describeRouterConfigurationResponse_virtualInterfaceId,+    describeRouterConfigurationResponse_virtualInterfaceName,+    describeRouterConfigurationResponse_httpStatus,++    -- ** DescribeTags+    describeTags_resourceArns,+    describeTagsResponse_resourceTags,+    describeTagsResponse_httpStatus,++    -- ** DescribeVirtualGateways+    describeVirtualGatewaysResponse_virtualGateways,+    describeVirtualGatewaysResponse_httpStatus,++    -- ** DescribeVirtualInterfaces+    describeVirtualInterfaces_connectionId,+    describeVirtualInterfaces_virtualInterfaceId,+    describeVirtualInterfacesResponse_virtualInterfaces,+    describeVirtualInterfacesResponse_httpStatus,++    -- ** DisassociateConnectionFromLag+    disassociateConnectionFromLag_connectionId,+    disassociateConnectionFromLag_lagId,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** DisassociateMacSecKey+    disassociateMacSecKey_connectionId,+    disassociateMacSecKey_secretARN,+    disassociateMacSecKeyResponse_connectionId,+    disassociateMacSecKeyResponse_macSecKeys,+    disassociateMacSecKeyResponse_httpStatus,++    -- ** ListVirtualInterfaceTestHistory+    listVirtualInterfaceTestHistory_bgpPeers,+    listVirtualInterfaceTestHistory_maxResults,+    listVirtualInterfaceTestHistory_nextToken,+    listVirtualInterfaceTestHistory_status,+    listVirtualInterfaceTestHistory_testId,+    listVirtualInterfaceTestHistory_virtualInterfaceId,+    listVirtualInterfaceTestHistoryResponse_nextToken,+    listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory,+    listVirtualInterfaceTestHistoryResponse_httpStatus,++    -- ** StartBgpFailoverTest+    startBgpFailoverTest_bgpPeers,+    startBgpFailoverTest_testDurationInMinutes,+    startBgpFailoverTest_virtualInterfaceId,+    startBgpFailoverTestResponse_virtualInterfaceTest,+    startBgpFailoverTestResponse_httpStatus,++    -- ** StopBgpFailoverTest+    stopBgpFailoverTest_virtualInterfaceId,+    stopBgpFailoverTestResponse_virtualInterfaceTest,+    stopBgpFailoverTestResponse_httpStatus,++    -- ** TagResource+    tagResource_resourceArn,+    tagResource_tags,+    tagResourceResponse_httpStatus,++    -- ** UntagResource+    untagResource_resourceArn,+    untagResource_tagKeys,+    untagResourceResponse_httpStatus,++    -- ** UpdateConnection+    updateConnection_connectionName,+    updateConnection_encryptionMode,+    updateConnection_connectionId,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** UpdateDirectConnectGateway+    updateDirectConnectGateway_directConnectGatewayId,+    updateDirectConnectGateway_newDirectConnectGatewayName,+    updateDirectConnectGatewayResponse_directConnectGateway,+    updateDirectConnectGatewayResponse_httpStatus,++    -- ** UpdateDirectConnectGatewayAssociation+    updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway,+    updateDirectConnectGatewayAssociation_associationId,+    updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway,+    updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    updateDirectConnectGatewayAssociationResponse_httpStatus,++    -- ** UpdateLag+    updateLag_encryptionMode,+    updateLag_lagName,+    updateLag_minimumLinks,+    updateLag_lagId,+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,++    -- ** UpdateVirtualInterfaceAttributes+    updateVirtualInterfaceAttributes_enableSiteLink,+    updateVirtualInterfaceAttributes_mtu,+    updateVirtualInterfaceAttributes_virtualInterfaceName,+    updateVirtualInterfaceAttributes_virtualInterfaceId,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- * Types++    -- ** AssociatedGateway+    associatedGateway_id,+    associatedGateway_ownerAccount,+    associatedGateway_region,+    associatedGateway_type,++    -- ** BGPPeer+    bGPPeer_addressFamily,+    bGPPeer_amazonAddress,+    bGPPeer_asn,+    bGPPeer_authKey,+    bGPPeer_awsDeviceV2,+    bGPPeer_awsLogicalDeviceId,+    bGPPeer_bgpPeerId,+    bGPPeer_bgpPeerState,+    bGPPeer_bgpStatus,+    bGPPeer_customerAddress,++    -- ** Connection+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- ** Connections+    connections_connections,++    -- ** CustomerAgreement+    customerAgreement_agreementName,+    customerAgreement_status,++    -- ** DirectConnectGateway+    directConnectGateway_amazonSideAsn,+    directConnectGateway_directConnectGatewayId,+    directConnectGateway_directConnectGatewayName,+    directConnectGateway_directConnectGatewayState,+    directConnectGateway_ownerAccount,+    directConnectGateway_stateChangeError,++    -- ** DirectConnectGatewayAssociation+    directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway,+    directConnectGatewayAssociation_associatedGateway,+    directConnectGatewayAssociation_associationId,+    directConnectGatewayAssociation_associationState,+    directConnectGatewayAssociation_directConnectGatewayId,+    directConnectGatewayAssociation_directConnectGatewayOwnerAccount,+    directConnectGatewayAssociation_stateChangeError,+    directConnectGatewayAssociation_virtualGatewayId,+    directConnectGatewayAssociation_virtualGatewayOwnerAccount,+    directConnectGatewayAssociation_virtualGatewayRegion,++    -- ** DirectConnectGatewayAssociationProposal+    directConnectGatewayAssociationProposal_associatedGateway,+    directConnectGatewayAssociationProposal_directConnectGatewayId,+    directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount,+    directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway,+    directConnectGatewayAssociationProposal_proposalId,+    directConnectGatewayAssociationProposal_proposalState,+    directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway,++    -- ** DirectConnectGatewayAttachment+    directConnectGatewayAttachment_attachmentState,+    directConnectGatewayAttachment_attachmentType,+    directConnectGatewayAttachment_directConnectGatewayId,+    directConnectGatewayAttachment_stateChangeError,+    directConnectGatewayAttachment_virtualInterfaceId,+    directConnectGatewayAttachment_virtualInterfaceOwnerAccount,+    directConnectGatewayAttachment_virtualInterfaceRegion,++    -- ** Interconnect+    interconnect_awsDevice,+    interconnect_awsDeviceV2,+    interconnect_awsLogicalDeviceId,+    interconnect_bandwidth,+    interconnect_hasLogicalRedundancy,+    interconnect_interconnectId,+    interconnect_interconnectName,+    interconnect_interconnectState,+    interconnect_jumboFrameCapable,+    interconnect_lagId,+    interconnect_loaIssueTime,+    interconnect_location,+    interconnect_providerName,+    interconnect_region,+    interconnect_tags,++    -- ** Lag+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,++    -- ** Location+    location_availableMacSecPortSpeeds,+    location_availablePortSpeeds,+    location_availableProviders,+    location_locationCode,+    location_locationName,+    location_region,++    -- ** MacSecKey+    macSecKey_ckn,+    macSecKey_secretARN,+    macSecKey_startOn,+    macSecKey_state,++    -- ** NewBGPPeer+    newBGPPeer_addressFamily,+    newBGPPeer_amazonAddress,+    newBGPPeer_asn,+    newBGPPeer_authKey,+    newBGPPeer_customerAddress,++    -- ** NewPrivateVirtualInterface+    newPrivateVirtualInterface_addressFamily,+    newPrivateVirtualInterface_amazonAddress,+    newPrivateVirtualInterface_authKey,+    newPrivateVirtualInterface_customerAddress,+    newPrivateVirtualInterface_directConnectGatewayId,+    newPrivateVirtualInterface_enableSiteLink,+    newPrivateVirtualInterface_mtu,+    newPrivateVirtualInterface_tags,+    newPrivateVirtualInterface_virtualGatewayId,+    newPrivateVirtualInterface_virtualInterfaceName,+    newPrivateVirtualInterface_vlan,+    newPrivateVirtualInterface_asn,++    -- ** NewPrivateVirtualInterfaceAllocation+    newPrivateVirtualInterfaceAllocation_addressFamily,+    newPrivateVirtualInterfaceAllocation_amazonAddress,+    newPrivateVirtualInterfaceAllocation_authKey,+    newPrivateVirtualInterfaceAllocation_customerAddress,+    newPrivateVirtualInterfaceAllocation_mtu,+    newPrivateVirtualInterfaceAllocation_tags,+    newPrivateVirtualInterfaceAllocation_virtualInterfaceName,+    newPrivateVirtualInterfaceAllocation_vlan,+    newPrivateVirtualInterfaceAllocation_asn,++    -- ** NewPublicVirtualInterface+    newPublicVirtualInterface_addressFamily,+    newPublicVirtualInterface_amazonAddress,+    newPublicVirtualInterface_authKey,+    newPublicVirtualInterface_customerAddress,+    newPublicVirtualInterface_routeFilterPrefixes,+    newPublicVirtualInterface_tags,+    newPublicVirtualInterface_virtualInterfaceName,+    newPublicVirtualInterface_vlan,+    newPublicVirtualInterface_asn,++    -- ** NewPublicVirtualInterfaceAllocation+    newPublicVirtualInterfaceAllocation_addressFamily,+    newPublicVirtualInterfaceAllocation_amazonAddress,+    newPublicVirtualInterfaceAllocation_authKey,+    newPublicVirtualInterfaceAllocation_customerAddress,+    newPublicVirtualInterfaceAllocation_routeFilterPrefixes,+    newPublicVirtualInterfaceAllocation_tags,+    newPublicVirtualInterfaceAllocation_virtualInterfaceName,+    newPublicVirtualInterfaceAllocation_vlan,+    newPublicVirtualInterfaceAllocation_asn,++    -- ** NewTransitVirtualInterface+    newTransitVirtualInterface_addressFamily,+    newTransitVirtualInterface_amazonAddress,+    newTransitVirtualInterface_asn,+    newTransitVirtualInterface_authKey,+    newTransitVirtualInterface_customerAddress,+    newTransitVirtualInterface_directConnectGatewayId,+    newTransitVirtualInterface_enableSiteLink,+    newTransitVirtualInterface_mtu,+    newTransitVirtualInterface_tags,+    newTransitVirtualInterface_virtualInterfaceName,+    newTransitVirtualInterface_vlan,++    -- ** NewTransitVirtualInterfaceAllocation+    newTransitVirtualInterfaceAllocation_addressFamily,+    newTransitVirtualInterfaceAllocation_amazonAddress,+    newTransitVirtualInterfaceAllocation_asn,+    newTransitVirtualInterfaceAllocation_authKey,+    newTransitVirtualInterfaceAllocation_customerAddress,+    newTransitVirtualInterfaceAllocation_mtu,+    newTransitVirtualInterfaceAllocation_tags,+    newTransitVirtualInterfaceAllocation_virtualInterfaceName,+    newTransitVirtualInterfaceAllocation_vlan,++    -- ** ResourceTag+    resourceTag_resourceArn,+    resourceTag_tags,++    -- ** RouteFilterPrefix+    routeFilterPrefix_cidr,++    -- ** RouterType+    routerType_platform,+    routerType_routerTypeIdentifier,+    routerType_software,+    routerType_vendor,+    routerType_xsltTemplateName,+    routerType_xsltTemplateNameForMacSec,++    -- ** Tag+    tag_value,+    tag_key,++    -- ** VirtualGateway+    virtualGateway_virtualGatewayId,+    virtualGateway_virtualGatewayState,++    -- ** VirtualInterface+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- ** VirtualInterfaceTestHistory+    virtualInterfaceTestHistory_bgpPeers,+    virtualInterfaceTestHistory_endTime,+    virtualInterfaceTestHistory_ownerAccount,+    virtualInterfaceTestHistory_startTime,+    virtualInterfaceTestHistory_status,+    virtualInterfaceTestHistory_testDurationInMinutes,+    virtualInterfaceTestHistory_testId,+    virtualInterfaceTestHistory_virtualInterfaceId,+  )+where++import Amazonka.DirectConnect.AcceptDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.AllocateHostedConnection+import Amazonka.DirectConnect.AllocatePrivateVirtualInterface+import Amazonka.DirectConnect.AllocatePublicVirtualInterface+import Amazonka.DirectConnect.AllocateTransitVirtualInterface+import Amazonka.DirectConnect.AssociateConnectionWithLag+import Amazonka.DirectConnect.AssociateHostedConnection+import Amazonka.DirectConnect.AssociateMacSecKey+import Amazonka.DirectConnect.AssociateVirtualInterface+import Amazonka.DirectConnect.ConfirmConnection+import Amazonka.DirectConnect.ConfirmCustomerAgreement+import Amazonka.DirectConnect.ConfirmPrivateVirtualInterface+import Amazonka.DirectConnect.ConfirmPublicVirtualInterface+import Amazonka.DirectConnect.ConfirmTransitVirtualInterface+import Amazonka.DirectConnect.CreateBGPPeer+import Amazonka.DirectConnect.CreateConnection+import Amazonka.DirectConnect.CreateDirectConnectGateway+import Amazonka.DirectConnect.CreateDirectConnectGatewayAssociation+import Amazonka.DirectConnect.CreateDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.CreateInterconnect+import Amazonka.DirectConnect.CreateLag+import Amazonka.DirectConnect.CreatePrivateVirtualInterface+import Amazonka.DirectConnect.CreatePublicVirtualInterface+import Amazonka.DirectConnect.CreateTransitVirtualInterface+import Amazonka.DirectConnect.DeleteBGPPeer+import Amazonka.DirectConnect.DeleteConnection+import Amazonka.DirectConnect.DeleteDirectConnectGateway+import Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociation+import Amazonka.DirectConnect.DeleteDirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.DeleteInterconnect+import Amazonka.DirectConnect.DeleteLag+import Amazonka.DirectConnect.DeleteVirtualInterface+import Amazonka.DirectConnect.DescribeConnections+import Amazonka.DirectConnect.DescribeCustomerMetadata+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociationProposals+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAssociations+import Amazonka.DirectConnect.DescribeDirectConnectGatewayAttachments+import Amazonka.DirectConnect.DescribeDirectConnectGateways+import Amazonka.DirectConnect.DescribeHostedConnections+import Amazonka.DirectConnect.DescribeInterconnects+import Amazonka.DirectConnect.DescribeLags+import Amazonka.DirectConnect.DescribeLoa+import Amazonka.DirectConnect.DescribeLocations+import Amazonka.DirectConnect.DescribeRouterConfiguration+import Amazonka.DirectConnect.DescribeTags+import Amazonka.DirectConnect.DescribeVirtualGateways+import Amazonka.DirectConnect.DescribeVirtualInterfaces+import Amazonka.DirectConnect.DisassociateConnectionFromLag+import Amazonka.DirectConnect.DisassociateMacSecKey+import Amazonka.DirectConnect.ListVirtualInterfaceTestHistory+import Amazonka.DirectConnect.StartBgpFailoverTest+import Amazonka.DirectConnect.StopBgpFailoverTest+import Amazonka.DirectConnect.TagResource+import Amazonka.DirectConnect.Types.AssociatedGateway+import Amazonka.DirectConnect.Types.BGPPeer+import Amazonka.DirectConnect.Types.Connection+import Amazonka.DirectConnect.Types.Connections+import Amazonka.DirectConnect.Types.CustomerAgreement+import Amazonka.DirectConnect.Types.DirectConnectGateway+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment+import Amazonka.DirectConnect.Types.Interconnect+import Amazonka.DirectConnect.Types.Lag+import Amazonka.DirectConnect.Types.Location+import Amazonka.DirectConnect.Types.MacSecKey+import Amazonka.DirectConnect.Types.NewBGPPeer+import Amazonka.DirectConnect.Types.NewPrivateVirtualInterface+import Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.NewPublicVirtualInterface+import Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.NewTransitVirtualInterface+import Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.ResourceTag+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import Amazonka.DirectConnect.Types.RouterType+import Amazonka.DirectConnect.Types.Tag+import Amazonka.DirectConnect.Types.VirtualGateway+import Amazonka.DirectConnect.Types.VirtualInterface+import Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory+import Amazonka.DirectConnect.UntagResource+import Amazonka.DirectConnect.UpdateConnection+import Amazonka.DirectConnect.UpdateDirectConnectGateway+import Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation+import Amazonka.DirectConnect.UpdateLag+import Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes
+ gen/Amazonka/DirectConnect/ListVirtualInterfaceTestHistory.hs view
@@ -0,0 +1,293 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.ListVirtualInterfaceTestHistory+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the virtual interface failover test history.+module Amazonka.DirectConnect.ListVirtualInterfaceTestHistory+  ( -- * Creating a Request+    ListVirtualInterfaceTestHistory (..),+    newListVirtualInterfaceTestHistory,++    -- * Request Lenses+    listVirtualInterfaceTestHistory_bgpPeers,+    listVirtualInterfaceTestHistory_maxResults,+    listVirtualInterfaceTestHistory_nextToken,+    listVirtualInterfaceTestHistory_status,+    listVirtualInterfaceTestHistory_testId,+    listVirtualInterfaceTestHistory_virtualInterfaceId,++    -- * Destructuring the Response+    ListVirtualInterfaceTestHistoryResponse (..),+    newListVirtualInterfaceTestHistoryResponse,++    -- * Response Lenses+    listVirtualInterfaceTestHistoryResponse_nextToken,+    listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory,+    listVirtualInterfaceTestHistoryResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newListVirtualInterfaceTestHistory' smart constructor.+data ListVirtualInterfaceTestHistory = ListVirtualInterfaceTestHistory'+  { -- | The BGP peers that were placed in the DOWN state during the virtual+    -- interface failover test.+    bgpPeers :: Prelude.Maybe [Prelude.Text],+    -- | The maximum number of results to return with a single call. To retrieve+    -- the remaining results, make another call with the returned @nextToken@+    -- value.+    --+    -- If @MaxResults@ is given a value larger than 100, only 100 results are+    -- returned.+    maxResults :: Prelude.Maybe Prelude.Int,+    -- | The token for the next page of results.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The status of the virtual interface failover test.+    status :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface failover test.+    testId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface that was tested.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVirtualInterfaceTestHistory' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bgpPeers', 'listVirtualInterfaceTestHistory_bgpPeers' - The BGP peers that were placed in the DOWN state during the virtual+-- interface failover test.+--+-- 'maxResults', 'listVirtualInterfaceTestHistory_maxResults' - The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+--+-- 'nextToken', 'listVirtualInterfaceTestHistory_nextToken' - The token for the next page of results.+--+-- 'status', 'listVirtualInterfaceTestHistory_status' - The status of the virtual interface failover test.+--+-- 'testId', 'listVirtualInterfaceTestHistory_testId' - The ID of the virtual interface failover test.+--+-- 'virtualInterfaceId', 'listVirtualInterfaceTestHistory_virtualInterfaceId' - The ID of the virtual interface that was tested.+newListVirtualInterfaceTestHistory ::+  ListVirtualInterfaceTestHistory+newListVirtualInterfaceTestHistory =+  ListVirtualInterfaceTestHistory'+    { bgpPeers =+        Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing,+      status = Prelude.Nothing,+      testId = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing+    }++-- | The BGP peers that were placed in the DOWN state during the virtual+-- interface failover test.+listVirtualInterfaceTestHistory_bgpPeers :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe [Prelude.Text])+listVirtualInterfaceTestHistory_bgpPeers = Lens.lens (\ListVirtualInterfaceTestHistory' {bgpPeers} -> bgpPeers) (\s@ListVirtualInterfaceTestHistory' {} a -> s {bgpPeers = a} :: ListVirtualInterfaceTestHistory) Prelude.. Lens.mapping Lens.coerced++-- | The maximum number of results to return with a single call. To retrieve+-- the remaining results, make another call with the returned @nextToken@+-- value.+--+-- If @MaxResults@ is given a value larger than 100, only 100 results are+-- returned.+listVirtualInterfaceTestHistory_maxResults :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe Prelude.Int)+listVirtualInterfaceTestHistory_maxResults = Lens.lens (\ListVirtualInterfaceTestHistory' {maxResults} -> maxResults) (\s@ListVirtualInterfaceTestHistory' {} a -> s {maxResults = a} :: ListVirtualInterfaceTestHistory)++-- | The token for the next page of results.+listVirtualInterfaceTestHistory_nextToken :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+listVirtualInterfaceTestHistory_nextToken = Lens.lens (\ListVirtualInterfaceTestHistory' {nextToken} -> nextToken) (\s@ListVirtualInterfaceTestHistory' {} a -> s {nextToken = a} :: ListVirtualInterfaceTestHistory)++-- | The status of the virtual interface failover test.+listVirtualInterfaceTestHistory_status :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+listVirtualInterfaceTestHistory_status = Lens.lens (\ListVirtualInterfaceTestHistory' {status} -> status) (\s@ListVirtualInterfaceTestHistory' {} a -> s {status = a} :: ListVirtualInterfaceTestHistory)++-- | The ID of the virtual interface failover test.+listVirtualInterfaceTestHistory_testId :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+listVirtualInterfaceTestHistory_testId = Lens.lens (\ListVirtualInterfaceTestHistory' {testId} -> testId) (\s@ListVirtualInterfaceTestHistory' {} a -> s {testId = a} :: ListVirtualInterfaceTestHistory)++-- | The ID of the virtual interface that was tested.+listVirtualInterfaceTestHistory_virtualInterfaceId :: Lens.Lens' ListVirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+listVirtualInterfaceTestHistory_virtualInterfaceId = Lens.lens (\ListVirtualInterfaceTestHistory' {virtualInterfaceId} -> virtualInterfaceId) (\s@ListVirtualInterfaceTestHistory' {} a -> s {virtualInterfaceId = a} :: ListVirtualInterfaceTestHistory)++instance+  Core.AWSRequest+    ListVirtualInterfaceTestHistory+  where+  type+    AWSResponse ListVirtualInterfaceTestHistory =+      ListVirtualInterfaceTestHistoryResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          ListVirtualInterfaceTestHistoryResponse'+            Prelude.<$> (x Data..?> "nextToken")+            Prelude.<*> ( x+                            Data..?> "virtualInterfaceTestHistory"+                            Core..!@ Prelude.mempty+                        )+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    ListVirtualInterfaceTestHistory+  where+  hashWithSalt+    _salt+    ListVirtualInterfaceTestHistory' {..} =+      _salt+        `Prelude.hashWithSalt` bgpPeers+        `Prelude.hashWithSalt` maxResults+        `Prelude.hashWithSalt` nextToken+        `Prelude.hashWithSalt` status+        `Prelude.hashWithSalt` testId+        `Prelude.hashWithSalt` virtualInterfaceId++instance+  Prelude.NFData+    ListVirtualInterfaceTestHistory+  where+  rnf ListVirtualInterfaceTestHistory' {..} =+    Prelude.rnf bgpPeers+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf status+      `Prelude.seq` Prelude.rnf testId+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance+  Data.ToHeaders+    ListVirtualInterfaceTestHistory+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.ListVirtualInterfaceTestHistory" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON ListVirtualInterfaceTestHistory where+  toJSON ListVirtualInterfaceTestHistory' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("bgpPeers" Data..=) Prelude.<$> bgpPeers,+            ("maxResults" Data..=) Prelude.<$> maxResults,+            ("nextToken" Data..=) Prelude.<$> nextToken,+            ("status" Data..=) Prelude.<$> status,+            ("testId" Data..=) Prelude.<$> testId,+            ("virtualInterfaceId" Data..=)+              Prelude.<$> virtualInterfaceId+          ]+      )++instance Data.ToPath ListVirtualInterfaceTestHistory where+  toPath = Prelude.const "/"++instance Data.ToQuery ListVirtualInterfaceTestHistory where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListVirtualInterfaceTestHistoryResponse' smart constructor.+data ListVirtualInterfaceTestHistoryResponse = ListVirtualInterfaceTestHistoryResponse'+  { -- | The token to use to retrieve the next page of results. This value is+    -- @null@ when there are no more results to return.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The ID of the tested virtual interface.+    virtualInterfaceTestHistory :: Prelude.Maybe [VirtualInterfaceTestHistory],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVirtualInterfaceTestHistoryResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'nextToken', 'listVirtualInterfaceTestHistoryResponse_nextToken' - The token to use to retrieve the next page of results. This value is+-- @null@ when there are no more results to return.+--+-- 'virtualInterfaceTestHistory', 'listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory' - The ID of the tested virtual interface.+--+-- 'httpStatus', 'listVirtualInterfaceTestHistoryResponse_httpStatus' - The response's http status code.+newListVirtualInterfaceTestHistoryResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  ListVirtualInterfaceTestHistoryResponse+newListVirtualInterfaceTestHistoryResponse+  pHttpStatus_ =+    ListVirtualInterfaceTestHistoryResponse'+      { nextToken =+          Prelude.Nothing,+        virtualInterfaceTestHistory =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | The token to use to retrieve the next page of results. This value is+-- @null@ when there are no more results to return.+listVirtualInterfaceTestHistoryResponse_nextToken :: Lens.Lens' ListVirtualInterfaceTestHistoryResponse (Prelude.Maybe Prelude.Text)+listVirtualInterfaceTestHistoryResponse_nextToken = Lens.lens (\ListVirtualInterfaceTestHistoryResponse' {nextToken} -> nextToken) (\s@ListVirtualInterfaceTestHistoryResponse' {} a -> s {nextToken = a} :: ListVirtualInterfaceTestHistoryResponse)++-- | The ID of the tested virtual interface.+listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory :: Lens.Lens' ListVirtualInterfaceTestHistoryResponse (Prelude.Maybe [VirtualInterfaceTestHistory])+listVirtualInterfaceTestHistoryResponse_virtualInterfaceTestHistory = Lens.lens (\ListVirtualInterfaceTestHistoryResponse' {virtualInterfaceTestHistory} -> virtualInterfaceTestHistory) (\s@ListVirtualInterfaceTestHistoryResponse' {} a -> s {virtualInterfaceTestHistory = a} :: ListVirtualInterfaceTestHistoryResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listVirtualInterfaceTestHistoryResponse_httpStatus :: Lens.Lens' ListVirtualInterfaceTestHistoryResponse Prelude.Int+listVirtualInterfaceTestHistoryResponse_httpStatus = Lens.lens (\ListVirtualInterfaceTestHistoryResponse' {httpStatus} -> httpStatus) (\s@ListVirtualInterfaceTestHistoryResponse' {} a -> s {httpStatus = a} :: ListVirtualInterfaceTestHistoryResponse)++instance+  Prelude.NFData+    ListVirtualInterfaceTestHistoryResponse+  where+  rnf ListVirtualInterfaceTestHistoryResponse' {..} =+    Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf virtualInterfaceTestHistory+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/StartBgpFailoverTest.hs view
@@ -0,0 +1,226 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.StartBgpFailoverTest+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Starts the virtual interface failover test that verifies your+-- configuration meets your resiliency requirements by placing the BGP+-- peering session in the DOWN state. You can then send traffic to verify+-- that there are no outages.+--+-- You can run the test on public, private, transit, and hosted virtual+-- interfaces.+--+-- You can use+-- <https://docs.aws.amazon.com/directconnect/latest/APIReference/API_ListVirtualInterfaceTestHistory.html ListVirtualInterfaceTestHistory>+-- to view the virtual interface test history.+--+-- If you need to stop the test before the test interval completes, use+-- <https://docs.aws.amazon.com/directconnect/latest/APIReference/API_StopBgpFailoverTest.html StopBgpFailoverTest>.+module Amazonka.DirectConnect.StartBgpFailoverTest+  ( -- * Creating a Request+    StartBgpFailoverTest (..),+    newStartBgpFailoverTest,++    -- * Request Lenses+    startBgpFailoverTest_bgpPeers,+    startBgpFailoverTest_testDurationInMinutes,+    startBgpFailoverTest_virtualInterfaceId,++    -- * Destructuring the Response+    StartBgpFailoverTestResponse (..),+    newStartBgpFailoverTestResponse,++    -- * Response Lenses+    startBgpFailoverTestResponse_virtualInterfaceTest,+    startBgpFailoverTestResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newStartBgpFailoverTest' smart constructor.+data StartBgpFailoverTest = StartBgpFailoverTest'+  { -- | The BGP peers to place in the DOWN state.+    bgpPeers :: Prelude.Maybe [Prelude.Text],+    -- | The time in minutes that the virtual interface failover test will last.+    --+    -- Maximum value: 180 minutes (3 hours).+    --+    -- Default: 180 minutes (3 hours).+    testDurationInMinutes :: Prelude.Maybe Prelude.Int,+    -- | The ID of the virtual interface you want to test.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StartBgpFailoverTest' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bgpPeers', 'startBgpFailoverTest_bgpPeers' - The BGP peers to place in the DOWN state.+--+-- 'testDurationInMinutes', 'startBgpFailoverTest_testDurationInMinutes' - The time in minutes that the virtual interface failover test will last.+--+-- Maximum value: 180 minutes (3 hours).+--+-- Default: 180 minutes (3 hours).+--+-- 'virtualInterfaceId', 'startBgpFailoverTest_virtualInterfaceId' - The ID of the virtual interface you want to test.+newStartBgpFailoverTest ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  StartBgpFailoverTest+newStartBgpFailoverTest pVirtualInterfaceId_ =+  StartBgpFailoverTest'+    { bgpPeers = Prelude.Nothing,+      testDurationInMinutes = Prelude.Nothing,+      virtualInterfaceId = pVirtualInterfaceId_+    }++-- | The BGP peers to place in the DOWN state.+startBgpFailoverTest_bgpPeers :: Lens.Lens' StartBgpFailoverTest (Prelude.Maybe [Prelude.Text])+startBgpFailoverTest_bgpPeers = Lens.lens (\StartBgpFailoverTest' {bgpPeers} -> bgpPeers) (\s@StartBgpFailoverTest' {} a -> s {bgpPeers = a} :: StartBgpFailoverTest) Prelude.. Lens.mapping Lens.coerced++-- | The time in minutes that the virtual interface failover test will last.+--+-- Maximum value: 180 minutes (3 hours).+--+-- Default: 180 minutes (3 hours).+startBgpFailoverTest_testDurationInMinutes :: Lens.Lens' StartBgpFailoverTest (Prelude.Maybe Prelude.Int)+startBgpFailoverTest_testDurationInMinutes = Lens.lens (\StartBgpFailoverTest' {testDurationInMinutes} -> testDurationInMinutes) (\s@StartBgpFailoverTest' {} a -> s {testDurationInMinutes = a} :: StartBgpFailoverTest)++-- | The ID of the virtual interface you want to test.+startBgpFailoverTest_virtualInterfaceId :: Lens.Lens' StartBgpFailoverTest Prelude.Text+startBgpFailoverTest_virtualInterfaceId = Lens.lens (\StartBgpFailoverTest' {virtualInterfaceId} -> virtualInterfaceId) (\s@StartBgpFailoverTest' {} a -> s {virtualInterfaceId = a} :: StartBgpFailoverTest)++instance Core.AWSRequest StartBgpFailoverTest where+  type+    AWSResponse StartBgpFailoverTest =+      StartBgpFailoverTestResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          StartBgpFailoverTestResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceTest")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable StartBgpFailoverTest where+  hashWithSalt _salt StartBgpFailoverTest' {..} =+    _salt+      `Prelude.hashWithSalt` bgpPeers+      `Prelude.hashWithSalt` testDurationInMinutes+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData StartBgpFailoverTest where+  rnf StartBgpFailoverTest' {..} =+    Prelude.rnf bgpPeers+      `Prelude.seq` Prelude.rnf testDurationInMinutes+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance Data.ToHeaders StartBgpFailoverTest where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.StartBgpFailoverTest" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON StartBgpFailoverTest where+  toJSON StartBgpFailoverTest' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("bgpPeers" Data..=) Prelude.<$> bgpPeers,+            ("testDurationInMinutes" Data..=)+              Prelude.<$> testDurationInMinutes,+            Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath StartBgpFailoverTest where+  toPath = Prelude.const "/"++instance Data.ToQuery StartBgpFailoverTest where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newStartBgpFailoverTestResponse' smart constructor.+data StartBgpFailoverTestResponse = StartBgpFailoverTestResponse'+  { -- | Information about the virtual interface failover test.+    virtualInterfaceTest :: Prelude.Maybe VirtualInterfaceTestHistory,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StartBgpFailoverTestResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceTest', 'startBgpFailoverTestResponse_virtualInterfaceTest' - Information about the virtual interface failover test.+--+-- 'httpStatus', 'startBgpFailoverTestResponse_httpStatus' - The response's http status code.+newStartBgpFailoverTestResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  StartBgpFailoverTestResponse+newStartBgpFailoverTestResponse pHttpStatus_ =+  StartBgpFailoverTestResponse'+    { virtualInterfaceTest =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Information about the virtual interface failover test.+startBgpFailoverTestResponse_virtualInterfaceTest :: Lens.Lens' StartBgpFailoverTestResponse (Prelude.Maybe VirtualInterfaceTestHistory)+startBgpFailoverTestResponse_virtualInterfaceTest = Lens.lens (\StartBgpFailoverTestResponse' {virtualInterfaceTest} -> virtualInterfaceTest) (\s@StartBgpFailoverTestResponse' {} a -> s {virtualInterfaceTest = a} :: StartBgpFailoverTestResponse)++-- | The response's http status code.+startBgpFailoverTestResponse_httpStatus :: Lens.Lens' StartBgpFailoverTestResponse Prelude.Int+startBgpFailoverTestResponse_httpStatus = Lens.lens (\StartBgpFailoverTestResponse' {httpStatus} -> httpStatus) (\s@StartBgpFailoverTestResponse' {} a -> s {httpStatus = a} :: StartBgpFailoverTestResponse)++instance Prelude.NFData StartBgpFailoverTestResponse where+  rnf StartBgpFailoverTestResponse' {..} =+    Prelude.rnf virtualInterfaceTest+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/StopBgpFailoverTest.hs view
@@ -0,0 +1,174 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.StopBgpFailoverTest+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Stops the virtual interface failover test.+module Amazonka.DirectConnect.StopBgpFailoverTest+  ( -- * Creating a Request+    StopBgpFailoverTest (..),+    newStopBgpFailoverTest,++    -- * Request Lenses+    stopBgpFailoverTest_virtualInterfaceId,++    -- * Destructuring the Response+    StopBgpFailoverTestResponse (..),+    newStopBgpFailoverTestResponse,++    -- * Response Lenses+    stopBgpFailoverTestResponse_virtualInterfaceTest,+    stopBgpFailoverTestResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newStopBgpFailoverTest' smart constructor.+data StopBgpFailoverTest = StopBgpFailoverTest'+  { -- | The ID of the virtual interface you no longer want to test.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StopBgpFailoverTest' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceId', 'stopBgpFailoverTest_virtualInterfaceId' - The ID of the virtual interface you no longer want to test.+newStopBgpFailoverTest ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  StopBgpFailoverTest+newStopBgpFailoverTest pVirtualInterfaceId_ =+  StopBgpFailoverTest'+    { virtualInterfaceId =+        pVirtualInterfaceId_+    }++-- | The ID of the virtual interface you no longer want to test.+stopBgpFailoverTest_virtualInterfaceId :: Lens.Lens' StopBgpFailoverTest Prelude.Text+stopBgpFailoverTest_virtualInterfaceId = Lens.lens (\StopBgpFailoverTest' {virtualInterfaceId} -> virtualInterfaceId) (\s@StopBgpFailoverTest' {} a -> s {virtualInterfaceId = a} :: StopBgpFailoverTest)++instance Core.AWSRequest StopBgpFailoverTest where+  type+    AWSResponse StopBgpFailoverTest =+      StopBgpFailoverTestResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          StopBgpFailoverTestResponse'+            Prelude.<$> (x Data..?> "virtualInterfaceTest")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable StopBgpFailoverTest where+  hashWithSalt _salt StopBgpFailoverTest' {..} =+    _salt `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData StopBgpFailoverTest where+  rnf StopBgpFailoverTest' {..} =+    Prelude.rnf virtualInterfaceId++instance Data.ToHeaders StopBgpFailoverTest where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.StopBgpFailoverTest" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON StopBgpFailoverTest where+  toJSON StopBgpFailoverTest' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath StopBgpFailoverTest where+  toPath = Prelude.const "/"++instance Data.ToQuery StopBgpFailoverTest where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newStopBgpFailoverTestResponse' smart constructor.+data StopBgpFailoverTestResponse = StopBgpFailoverTestResponse'+  { -- | Information about the virtual interface failover test.+    virtualInterfaceTest :: Prelude.Maybe VirtualInterfaceTestHistory,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StopBgpFailoverTestResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualInterfaceTest', 'stopBgpFailoverTestResponse_virtualInterfaceTest' - Information about the virtual interface failover test.+--+-- 'httpStatus', 'stopBgpFailoverTestResponse_httpStatus' - The response's http status code.+newStopBgpFailoverTestResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  StopBgpFailoverTestResponse+newStopBgpFailoverTestResponse pHttpStatus_ =+  StopBgpFailoverTestResponse'+    { virtualInterfaceTest =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Information about the virtual interface failover test.+stopBgpFailoverTestResponse_virtualInterfaceTest :: Lens.Lens' StopBgpFailoverTestResponse (Prelude.Maybe VirtualInterfaceTestHistory)+stopBgpFailoverTestResponse_virtualInterfaceTest = Lens.lens (\StopBgpFailoverTestResponse' {virtualInterfaceTest} -> virtualInterfaceTest) (\s@StopBgpFailoverTestResponse' {} a -> s {virtualInterfaceTest = a} :: StopBgpFailoverTestResponse)++-- | The response's http status code.+stopBgpFailoverTestResponse_httpStatus :: Lens.Lens' StopBgpFailoverTestResponse Prelude.Int+stopBgpFailoverTestResponse_httpStatus = Lens.lens (\StopBgpFailoverTestResponse' {httpStatus} -> httpStatus) (\s@StopBgpFailoverTestResponse' {} a -> s {httpStatus = a} :: StopBgpFailoverTestResponse)++instance Prelude.NFData StopBgpFailoverTestResponse where+  rnf StopBgpFailoverTestResponse' {..} =+    Prelude.rnf virtualInterfaceTest+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/TagResource.hs view
@@ -0,0 +1,175 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.TagResource+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Adds the specified tags to the specified Direct Connect resource. Each+-- resource can have a maximum of 50 tags.+--+-- Each tag consists of a key and an optional value. If a tag with the same+-- key is already associated with the resource, this action updates its+-- value.+module Amazonka.DirectConnect.TagResource+  ( -- * Creating a Request+    TagResource (..),+    newTagResource,++    -- * Request Lenses+    tagResource_resourceArn,+    tagResource_tags,++    -- * Destructuring the Response+    TagResourceResponse (..),+    newTagResourceResponse,++    -- * Response Lenses+    tagResourceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newTagResource' smart constructor.+data TagResource = TagResource'+  { -- | The Amazon Resource Name (ARN) of the resource.+    resourceArn :: Prelude.Text,+    -- | The tags to add.+    tags :: Prelude.NonEmpty Tag+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'TagResource' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceArn', 'tagResource_resourceArn' - The Amazon Resource Name (ARN) of the resource.+--+-- 'tags', 'tagResource_tags' - The tags to add.+newTagResource ::+  -- | 'resourceArn'+  Prelude.Text ->+  -- | 'tags'+  Prelude.NonEmpty Tag ->+  TagResource+newTagResource pResourceArn_ pTags_ =+  TagResource'+    { resourceArn = pResourceArn_,+      tags = Lens.coerced Lens.# pTags_+    }++-- | The Amazon Resource Name (ARN) of the resource.+tagResource_resourceArn :: Lens.Lens' TagResource Prelude.Text+tagResource_resourceArn = Lens.lens (\TagResource' {resourceArn} -> resourceArn) (\s@TagResource' {} a -> s {resourceArn = a} :: TagResource)++-- | The tags to add.+tagResource_tags :: Lens.Lens' TagResource (Prelude.NonEmpty Tag)+tagResource_tags = Lens.lens (\TagResource' {tags} -> tags) (\s@TagResource' {} a -> s {tags = a} :: TagResource) Prelude.. Lens.coerced++instance Core.AWSRequest TagResource where+  type AWSResponse TagResource = TagResourceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveEmpty+      ( \s h x ->+          TagResourceResponse'+            Prelude.<$> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable TagResource where+  hashWithSalt _salt TagResource' {..} =+    _salt+      `Prelude.hashWithSalt` resourceArn+      `Prelude.hashWithSalt` tags++instance Prelude.NFData TagResource where+  rnf TagResource' {..} =+    Prelude.rnf resourceArn+      `Prelude.seq` Prelude.rnf tags++instance Data.ToHeaders TagResource where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.TagResource" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON TagResource where+  toJSON TagResource' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("resourceArn" Data..= resourceArn),+            Prelude.Just ("tags" Data..= tags)+          ]+      )++instance Data.ToPath TagResource where+  toPath = Prelude.const "/"++instance Data.ToQuery TagResource where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newTagResourceResponse' smart constructor.+data TagResourceResponse = TagResourceResponse'+  { -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'TagResourceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'httpStatus', 'tagResourceResponse_httpStatus' - The response's http status code.+newTagResourceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  TagResourceResponse+newTagResourceResponse pHttpStatus_ =+  TagResourceResponse' {httpStatus = pHttpStatus_}++-- | The response's http status code.+tagResourceResponse_httpStatus :: Lens.Lens' TagResourceResponse Prelude.Int+tagResourceResponse_httpStatus = Lens.lens (\TagResourceResponse' {httpStatus} -> httpStatus) (\s@TagResourceResponse' {} a -> s {httpStatus = a} :: TagResourceResponse)++instance Prelude.NFData TagResourceResponse where+  rnf TagResourceResponse' {..} = Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/Types.hs view
@@ -0,0 +1,554 @@+{-# LANGUAGE DisambiguateRecordFields #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types+  ( -- * Service Configuration+    defaultService,++    -- * Errors+    _DirectConnectClientException,+    _DirectConnectServerException,+    _DuplicateTagKeysException,+    _TooManyTagsException,++    -- * AddressFamily+    AddressFamily (..),++    -- * BGPPeerState+    BGPPeerState (..),++    -- * BGPStatus+    BGPStatus (..),++    -- * ConnectionState+    ConnectionState (..),++    -- * DirectConnectGatewayAssociationProposalState+    DirectConnectGatewayAssociationProposalState (..),++    -- * DirectConnectGatewayAssociationState+    DirectConnectGatewayAssociationState (..),++    -- * DirectConnectGatewayAttachmentState+    DirectConnectGatewayAttachmentState (..),++    -- * DirectConnectGatewayAttachmentType+    DirectConnectGatewayAttachmentType (..),++    -- * DirectConnectGatewayState+    DirectConnectGatewayState (..),++    -- * GatewayType+    GatewayType (..),++    -- * HasLogicalRedundancy+    HasLogicalRedundancy (..),++    -- * InterconnectState+    InterconnectState (..),++    -- * LagState+    LagState (..),++    -- * LoaContentType+    LoaContentType (..),++    -- * NniPartnerType+    NniPartnerType (..),++    -- * VirtualInterfaceState+    VirtualInterfaceState (..),++    -- * AssociatedGateway+    AssociatedGateway (..),+    newAssociatedGateway,+    associatedGateway_id,+    associatedGateway_ownerAccount,+    associatedGateway_region,+    associatedGateway_type,++    -- * BGPPeer+    BGPPeer (..),+    newBGPPeer,+    bGPPeer_addressFamily,+    bGPPeer_amazonAddress,+    bGPPeer_asn,+    bGPPeer_authKey,+    bGPPeer_awsDeviceV2,+    bGPPeer_awsLogicalDeviceId,+    bGPPeer_bgpPeerId,+    bGPPeer_bgpPeerState,+    bGPPeer_bgpStatus,+    bGPPeer_customerAddress,++    -- * Connection+    Connection (..),+    newConnection,+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,++    -- * Connections+    Connections (..),+    newConnections,+    connections_connections,++    -- * CustomerAgreement+    CustomerAgreement (..),+    newCustomerAgreement,+    customerAgreement_agreementName,+    customerAgreement_status,++    -- * DirectConnectGateway+    DirectConnectGateway (..),+    newDirectConnectGateway,+    directConnectGateway_amazonSideAsn,+    directConnectGateway_directConnectGatewayId,+    directConnectGateway_directConnectGatewayName,+    directConnectGateway_directConnectGatewayState,+    directConnectGateway_ownerAccount,+    directConnectGateway_stateChangeError,++    -- * DirectConnectGatewayAssociation+    DirectConnectGatewayAssociation (..),+    newDirectConnectGatewayAssociation,+    directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway,+    directConnectGatewayAssociation_associatedGateway,+    directConnectGatewayAssociation_associationId,+    directConnectGatewayAssociation_associationState,+    directConnectGatewayAssociation_directConnectGatewayId,+    directConnectGatewayAssociation_directConnectGatewayOwnerAccount,+    directConnectGatewayAssociation_stateChangeError,+    directConnectGatewayAssociation_virtualGatewayId,+    directConnectGatewayAssociation_virtualGatewayOwnerAccount,+    directConnectGatewayAssociation_virtualGatewayRegion,++    -- * DirectConnectGatewayAssociationProposal+    DirectConnectGatewayAssociationProposal (..),+    newDirectConnectGatewayAssociationProposal,+    directConnectGatewayAssociationProposal_associatedGateway,+    directConnectGatewayAssociationProposal_directConnectGatewayId,+    directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount,+    directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway,+    directConnectGatewayAssociationProposal_proposalId,+    directConnectGatewayAssociationProposal_proposalState,+    directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway,++    -- * DirectConnectGatewayAttachment+    DirectConnectGatewayAttachment (..),+    newDirectConnectGatewayAttachment,+    directConnectGatewayAttachment_attachmentState,+    directConnectGatewayAttachment_attachmentType,+    directConnectGatewayAttachment_directConnectGatewayId,+    directConnectGatewayAttachment_stateChangeError,+    directConnectGatewayAttachment_virtualInterfaceId,+    directConnectGatewayAttachment_virtualInterfaceOwnerAccount,+    directConnectGatewayAttachment_virtualInterfaceRegion,++    -- * Interconnect+    Interconnect (..),+    newInterconnect,+    interconnect_awsDevice,+    interconnect_awsDeviceV2,+    interconnect_awsLogicalDeviceId,+    interconnect_bandwidth,+    interconnect_hasLogicalRedundancy,+    interconnect_interconnectId,+    interconnect_interconnectName,+    interconnect_interconnectState,+    interconnect_jumboFrameCapable,+    interconnect_lagId,+    interconnect_loaIssueTime,+    interconnect_location,+    interconnect_providerName,+    interconnect_region,+    interconnect_tags,++    -- * Lag+    Lag (..),+    newLag,+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,++    -- * Location+    Location (..),+    newLocation,+    location_availableMacSecPortSpeeds,+    location_availablePortSpeeds,+    location_availableProviders,+    location_locationCode,+    location_locationName,+    location_region,++    -- * MacSecKey+    MacSecKey (..),+    newMacSecKey,+    macSecKey_ckn,+    macSecKey_secretARN,+    macSecKey_startOn,+    macSecKey_state,++    -- * NewBGPPeer+    NewBGPPeer (..),+    newNewBGPPeer,+    newBGPPeer_addressFamily,+    newBGPPeer_amazonAddress,+    newBGPPeer_asn,+    newBGPPeer_authKey,+    newBGPPeer_customerAddress,++    -- * NewPrivateVirtualInterface+    NewPrivateVirtualInterface (..),+    newNewPrivateVirtualInterface,+    newPrivateVirtualInterface_addressFamily,+    newPrivateVirtualInterface_amazonAddress,+    newPrivateVirtualInterface_authKey,+    newPrivateVirtualInterface_customerAddress,+    newPrivateVirtualInterface_directConnectGatewayId,+    newPrivateVirtualInterface_enableSiteLink,+    newPrivateVirtualInterface_mtu,+    newPrivateVirtualInterface_tags,+    newPrivateVirtualInterface_virtualGatewayId,+    newPrivateVirtualInterface_virtualInterfaceName,+    newPrivateVirtualInterface_vlan,+    newPrivateVirtualInterface_asn,++    -- * NewPrivateVirtualInterfaceAllocation+    NewPrivateVirtualInterfaceAllocation (..),+    newNewPrivateVirtualInterfaceAllocation,+    newPrivateVirtualInterfaceAllocation_addressFamily,+    newPrivateVirtualInterfaceAllocation_amazonAddress,+    newPrivateVirtualInterfaceAllocation_authKey,+    newPrivateVirtualInterfaceAllocation_customerAddress,+    newPrivateVirtualInterfaceAllocation_mtu,+    newPrivateVirtualInterfaceAllocation_tags,+    newPrivateVirtualInterfaceAllocation_virtualInterfaceName,+    newPrivateVirtualInterfaceAllocation_vlan,+    newPrivateVirtualInterfaceAllocation_asn,++    -- * NewPublicVirtualInterface+    NewPublicVirtualInterface (..),+    newNewPublicVirtualInterface,+    newPublicVirtualInterface_addressFamily,+    newPublicVirtualInterface_amazonAddress,+    newPublicVirtualInterface_authKey,+    newPublicVirtualInterface_customerAddress,+    newPublicVirtualInterface_routeFilterPrefixes,+    newPublicVirtualInterface_tags,+    newPublicVirtualInterface_virtualInterfaceName,+    newPublicVirtualInterface_vlan,+    newPublicVirtualInterface_asn,++    -- * NewPublicVirtualInterfaceAllocation+    NewPublicVirtualInterfaceAllocation (..),+    newNewPublicVirtualInterfaceAllocation,+    newPublicVirtualInterfaceAllocation_addressFamily,+    newPublicVirtualInterfaceAllocation_amazonAddress,+    newPublicVirtualInterfaceAllocation_authKey,+    newPublicVirtualInterfaceAllocation_customerAddress,+    newPublicVirtualInterfaceAllocation_routeFilterPrefixes,+    newPublicVirtualInterfaceAllocation_tags,+    newPublicVirtualInterfaceAllocation_virtualInterfaceName,+    newPublicVirtualInterfaceAllocation_vlan,+    newPublicVirtualInterfaceAllocation_asn,++    -- * NewTransitVirtualInterface+    NewTransitVirtualInterface (..),+    newNewTransitVirtualInterface,+    newTransitVirtualInterface_addressFamily,+    newTransitVirtualInterface_amazonAddress,+    newTransitVirtualInterface_asn,+    newTransitVirtualInterface_authKey,+    newTransitVirtualInterface_customerAddress,+    newTransitVirtualInterface_directConnectGatewayId,+    newTransitVirtualInterface_enableSiteLink,+    newTransitVirtualInterface_mtu,+    newTransitVirtualInterface_tags,+    newTransitVirtualInterface_virtualInterfaceName,+    newTransitVirtualInterface_vlan,++    -- * NewTransitVirtualInterfaceAllocation+    NewTransitVirtualInterfaceAllocation (..),+    newNewTransitVirtualInterfaceAllocation,+    newTransitVirtualInterfaceAllocation_addressFamily,+    newTransitVirtualInterfaceAllocation_amazonAddress,+    newTransitVirtualInterfaceAllocation_asn,+    newTransitVirtualInterfaceAllocation_authKey,+    newTransitVirtualInterfaceAllocation_customerAddress,+    newTransitVirtualInterfaceAllocation_mtu,+    newTransitVirtualInterfaceAllocation_tags,+    newTransitVirtualInterfaceAllocation_virtualInterfaceName,+    newTransitVirtualInterfaceAllocation_vlan,++    -- * ResourceTag+    ResourceTag (..),+    newResourceTag,+    resourceTag_resourceArn,+    resourceTag_tags,++    -- * RouteFilterPrefix+    RouteFilterPrefix (..),+    newRouteFilterPrefix,+    routeFilterPrefix_cidr,++    -- * RouterType+    RouterType (..),+    newRouterType,+    routerType_platform,+    routerType_routerTypeIdentifier,+    routerType_software,+    routerType_vendor,+    routerType_xsltTemplateName,+    routerType_xsltTemplateNameForMacSec,++    -- * Tag+    Tag (..),+    newTag,+    tag_value,+    tag_key,++    -- * VirtualGateway+    VirtualGateway (..),+    newVirtualGateway,+    virtualGateway_virtualGatewayId,+    virtualGateway_virtualGatewayState,++    -- * VirtualInterface+    VirtualInterface (..),+    newVirtualInterface,+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,++    -- * VirtualInterfaceTestHistory+    VirtualInterfaceTestHistory (..),+    newVirtualInterfaceTestHistory,+    virtualInterfaceTestHistory_bgpPeers,+    virtualInterfaceTestHistory_endTime,+    virtualInterfaceTestHistory_ownerAccount,+    virtualInterfaceTestHistory_startTime,+    virtualInterfaceTestHistory_status,+    virtualInterfaceTestHistory_testDurationInMinutes,+    virtualInterfaceTestHistory_testId,+    virtualInterfaceTestHistory_virtualInterfaceId,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.AssociatedGateway+import Amazonka.DirectConnect.Types.BGPPeer+import Amazonka.DirectConnect.Types.BGPPeerState+import Amazonka.DirectConnect.Types.BGPStatus+import Amazonka.DirectConnect.Types.Connection+import Amazonka.DirectConnect.Types.ConnectionState+import Amazonka.DirectConnect.Types.Connections+import Amazonka.DirectConnect.Types.CustomerAgreement+import Amazonka.DirectConnect.Types.DirectConnectGateway+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType+import Amazonka.DirectConnect.Types.DirectConnectGatewayState+import Amazonka.DirectConnect.Types.GatewayType+import Amazonka.DirectConnect.Types.HasLogicalRedundancy+import Amazonka.DirectConnect.Types.Interconnect+import Amazonka.DirectConnect.Types.InterconnectState+import Amazonka.DirectConnect.Types.Lag+import Amazonka.DirectConnect.Types.LagState+import Amazonka.DirectConnect.Types.LoaContentType+import Amazonka.DirectConnect.Types.Location+import Amazonka.DirectConnect.Types.MacSecKey+import Amazonka.DirectConnect.Types.NewBGPPeer+import Amazonka.DirectConnect.Types.NewPrivateVirtualInterface+import Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.NewPublicVirtualInterface+import Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.NewTransitVirtualInterface+import Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation+import Amazonka.DirectConnect.Types.NniPartnerType+import Amazonka.DirectConnect.Types.ResourceTag+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import Amazonka.DirectConnect.Types.RouterType+import Amazonka.DirectConnect.Types.Tag+import Amazonka.DirectConnect.Types.VirtualGateway+import Amazonka.DirectConnect.Types.VirtualInterface+import Amazonka.DirectConnect.Types.VirtualInterfaceState+import Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Sign.V4 as Sign++-- | API version @2012-10-25@ of the Amazon Direct Connect SDK configuration.+defaultService :: Core.Service+defaultService =+  Core.Service+    { Core.abbrev = "DirectConnect",+      Core.signer = Sign.v4,+      Core.endpointPrefix = "directconnect",+      Core.signingName = "directconnect",+      Core.version = "2012-10-25",+      Core.s3AddressingStyle = Core.S3AddressingStyleAuto,+      Core.endpoint = Core.defaultEndpoint defaultService,+      Core.timeout = Prelude.Just 70,+      Core.check = Core.statusSuccess,+      Core.error = Core.parseJSONError "DirectConnect",+      Core.retry = retry+    }+  where+    retry =+      Core.Exponential+        { Core.base = 5.0e-2,+          Core.growth = 2,+          Core.attempts = 5,+          Core.check = check+        }+    check e+      | Lens.has (Core.hasStatus 502) e =+          Prelude.Just "bad_gateway"+      | Lens.has (Core.hasStatus 504) e =+          Prelude.Just "gateway_timeout"+      | Lens.has (Core.hasStatus 500) e =+          Prelude.Just "general_server_error"+      | Lens.has (Core.hasStatus 509) e =+          Prelude.Just "limit_exceeded"+      | Lens.has+          ( Core.hasCode "RequestThrottledException"+              Prelude.. Core.hasStatus 400+          )+          e =+          Prelude.Just "request_throttled_exception"+      | Lens.has (Core.hasStatus 503) e =+          Prelude.Just "service_unavailable"+      | Lens.has+          ( Core.hasCode "ThrottledException"+              Prelude.. Core.hasStatus 400+          )+          e =+          Prelude.Just "throttled_exception"+      | Lens.has+          ( Core.hasCode "Throttling"+              Prelude.. Core.hasStatus 400+          )+          e =+          Prelude.Just "throttling"+      | Lens.has+          ( Core.hasCode "ThrottlingException"+              Prelude.. Core.hasStatus 400+          )+          e =+          Prelude.Just "throttling_exception"+      | Lens.has+          ( Core.hasCode+              "ProvisionedThroughputExceededException"+              Prelude.. Core.hasStatus 400+          )+          e =+          Prelude.Just "throughput_exceeded"+      | Lens.has (Core.hasStatus 429) e =+          Prelude.Just "too_many_requests"+      | Prelude.otherwise = Prelude.Nothing++-- | One or more parameters are not valid.+_DirectConnectClientException :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_DirectConnectClientException =+  Core._MatchServiceError+    defaultService+    "DirectConnectClientException"++-- | A server-side error occurred.+_DirectConnectServerException :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_DirectConnectServerException =+  Core._MatchServiceError+    defaultService+    "DirectConnectServerException"++-- | A tag key was specified more than once.+_DuplicateTagKeysException :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_DuplicateTagKeysException =+  Core._MatchServiceError+    defaultService+    "DuplicateTagKeysException"++-- | You have reached the limit on the number of tags that can be assigned.+_TooManyTagsException :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_TooManyTagsException =+  Core._MatchServiceError+    defaultService+    "TooManyTagsException"
+ gen/Amazonka/DirectConnect/Types/AddressFamily.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.AddressFamily+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.AddressFamily+  ( AddressFamily+      ( ..,+        AddressFamily_Ipv4,+        AddressFamily_Ipv6+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype AddressFamily = AddressFamily'+  { fromAddressFamily ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern AddressFamily_Ipv4 :: AddressFamily+pattern AddressFamily_Ipv4 = AddressFamily' "ipv4"++pattern AddressFamily_Ipv6 :: AddressFamily+pattern AddressFamily_Ipv6 = AddressFamily' "ipv6"++{-# COMPLETE+  AddressFamily_Ipv4,+  AddressFamily_Ipv6,+  AddressFamily'+  #-}
+ gen/Amazonka/DirectConnect/Types/AssociatedGateway.hs view
@@ -0,0 +1,112 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.AssociatedGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.AssociatedGateway where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.GatewayType+import qualified Amazonka.Prelude as Prelude++-- | Information about the associated gateway.+--+-- /See:/ 'newAssociatedGateway' smart constructor.+data AssociatedGateway = AssociatedGateway'+  { -- | The ID of the associated gateway.+    id :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the associated+    -- virtual private gateway or transit gateway.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The Region where the associated gateway is located.+    region :: Prelude.Maybe Prelude.Text,+    -- | The type of associated gateway.+    type' :: Prelude.Maybe GatewayType+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociatedGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'id', 'associatedGateway_id' - The ID of the associated gateway.+--+-- 'ownerAccount', 'associatedGateway_ownerAccount' - The ID of the Amazon Web Services account that owns the associated+-- virtual private gateway or transit gateway.+--+-- 'region', 'associatedGateway_region' - The Region where the associated gateway is located.+--+-- 'type'', 'associatedGateway_type' - The type of associated gateway.+newAssociatedGateway ::+  AssociatedGateway+newAssociatedGateway =+  AssociatedGateway'+    { id = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      region = Prelude.Nothing,+      type' = Prelude.Nothing+    }++-- | The ID of the associated gateway.+associatedGateway_id :: Lens.Lens' AssociatedGateway (Prelude.Maybe Prelude.Text)+associatedGateway_id = Lens.lens (\AssociatedGateway' {id} -> id) (\s@AssociatedGateway' {} a -> s {id = a} :: AssociatedGateway)++-- | The ID of the Amazon Web Services account that owns the associated+-- virtual private gateway or transit gateway.+associatedGateway_ownerAccount :: Lens.Lens' AssociatedGateway (Prelude.Maybe Prelude.Text)+associatedGateway_ownerAccount = Lens.lens (\AssociatedGateway' {ownerAccount} -> ownerAccount) (\s@AssociatedGateway' {} a -> s {ownerAccount = a} :: AssociatedGateway)++-- | The Region where the associated gateway is located.+associatedGateway_region :: Lens.Lens' AssociatedGateway (Prelude.Maybe Prelude.Text)+associatedGateway_region = Lens.lens (\AssociatedGateway' {region} -> region) (\s@AssociatedGateway' {} a -> s {region = a} :: AssociatedGateway)++-- | The type of associated gateway.+associatedGateway_type :: Lens.Lens' AssociatedGateway (Prelude.Maybe GatewayType)+associatedGateway_type = Lens.lens (\AssociatedGateway' {type'} -> type') (\s@AssociatedGateway' {} a -> s {type' = a} :: AssociatedGateway)++instance Data.FromJSON AssociatedGateway where+  parseJSON =+    Data.withObject+      "AssociatedGateway"+      ( \x ->+          AssociatedGateway'+            Prelude.<$> (x Data..:? "id")+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "region")+            Prelude.<*> (x Data..:? "type")+      )++instance Prelude.Hashable AssociatedGateway where+  hashWithSalt _salt AssociatedGateway' {..} =+    _salt+      `Prelude.hashWithSalt` id+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` region+      `Prelude.hashWithSalt` type'++instance Prelude.NFData AssociatedGateway where+  rnf AssociatedGateway' {..} =+    Prelude.rnf id+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf region+      `Prelude.seq` Prelude.rnf type'
+ gen/Amazonka/DirectConnect/Types/BGPPeer.hs view
@@ -0,0 +1,258 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.BGPPeer+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.BGPPeer where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.BGPPeerState+import Amazonka.DirectConnect.Types.BGPStatus+import qualified Amazonka.Prelude as Prelude++-- | Information about a BGP peer.+--+-- /See:/ 'newBGPPeer' smart constructor.+data BGPPeer = BGPPeer'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the BGP peer.+    awsDeviceV2 :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the logical connection. This+    -- device might be different than the device that terminates the physical+    -- connection.+    awsLogicalDeviceId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the BGP peer.+    bgpPeerId :: Prelude.Maybe Prelude.Text,+    -- | The state of the BGP peer. The following are the possible values:+    --+    -- -   @verifying@: The BGP peering addresses or ASN require validation+    --     before the BGP peer can be created. This state applies only to+    --     public virtual interfaces.+    --+    -- -   @pending@: The BGP peer is created, and remains in this state until+    --     it is ready to be established.+    --+    -- -   @available@: The BGP peer is ready to be established.+    --+    -- -   @deleting@: The BGP peer is being deleted.+    --+    -- -   @deleted@: The BGP peer is deleted and cannot be established.+    bgpPeerState :: Prelude.Maybe BGPPeerState,+    -- | The status of the BGP peer. The following are the possible values:+    --+    -- -   @up@: The BGP peer is established. This state does not indicate the+    --     state of the routing function. Ensure that you are receiving routes+    --     over the BGP session.+    --+    -- -   @down@: The BGP peer is down.+    --+    -- -   @unknown@: The BGP peer status is not available.+    bgpStatus :: Prelude.Maybe BGPStatus,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'BGPPeer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'bGPPeer_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'bGPPeer_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'asn', 'bGPPeer_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- 'authKey', 'bGPPeer_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'awsDeviceV2', 'bGPPeer_awsDeviceV2' - The Direct Connect endpoint that terminates the BGP peer.+--+-- 'awsLogicalDeviceId', 'bGPPeer_awsLogicalDeviceId' - The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+--+-- 'bgpPeerId', 'bGPPeer_bgpPeerId' - The ID of the BGP peer.+--+-- 'bgpPeerState', 'bGPPeer_bgpPeerState' - The state of the BGP peer. The following are the possible values:+--+-- -   @verifying@: The BGP peering addresses or ASN require validation+--     before the BGP peer can be created. This state applies only to+--     public virtual interfaces.+--+-- -   @pending@: The BGP peer is created, and remains in this state until+--     it is ready to be established.+--+-- -   @available@: The BGP peer is ready to be established.+--+-- -   @deleting@: The BGP peer is being deleted.+--+-- -   @deleted@: The BGP peer is deleted and cannot be established.+--+-- 'bgpStatus', 'bGPPeer_bgpStatus' - The status of the BGP peer. The following are the possible values:+--+-- -   @up@: The BGP peer is established. This state does not indicate the+--     state of the routing function. Ensure that you are receiving routes+--     over the BGP session.+--+-- -   @down@: The BGP peer is down.+--+-- -   @unknown@: The BGP peer status is not available.+--+-- 'customerAddress', 'bGPPeer_customerAddress' - The IP address assigned to the customer interface.+newBGPPeer ::+  BGPPeer+newBGPPeer =+  BGPPeer'+    { addressFamily = Prelude.Nothing,+      amazonAddress = Prelude.Nothing,+      asn = Prelude.Nothing,+      authKey = Prelude.Nothing,+      awsDeviceV2 = Prelude.Nothing,+      awsLogicalDeviceId = Prelude.Nothing,+      bgpPeerId = Prelude.Nothing,+      bgpPeerState = Prelude.Nothing,+      bgpStatus = Prelude.Nothing,+      customerAddress = Prelude.Nothing+    }++-- | The address family for the BGP peer.+bGPPeer_addressFamily :: Lens.Lens' BGPPeer (Prelude.Maybe AddressFamily)+bGPPeer_addressFamily = Lens.lens (\BGPPeer' {addressFamily} -> addressFamily) (\s@BGPPeer' {} a -> s {addressFamily = a} :: BGPPeer)++-- | The IP address assigned to the Amazon interface.+bGPPeer_amazonAddress :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_amazonAddress = Lens.lens (\BGPPeer' {amazonAddress} -> amazonAddress) (\s@BGPPeer' {} a -> s {amazonAddress = a} :: BGPPeer)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+bGPPeer_asn :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Int)+bGPPeer_asn = Lens.lens (\BGPPeer' {asn} -> asn) (\s@BGPPeer' {} a -> s {asn = a} :: BGPPeer)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+bGPPeer_authKey :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_authKey = Lens.lens (\BGPPeer' {authKey} -> authKey) (\s@BGPPeer' {} a -> s {authKey = a} :: BGPPeer)++-- | The Direct Connect endpoint that terminates the BGP peer.+bGPPeer_awsDeviceV2 :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_awsDeviceV2 = Lens.lens (\BGPPeer' {awsDeviceV2} -> awsDeviceV2) (\s@BGPPeer' {} a -> s {awsDeviceV2 = a} :: BGPPeer)++-- | The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+bGPPeer_awsLogicalDeviceId :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_awsLogicalDeviceId = Lens.lens (\BGPPeer' {awsLogicalDeviceId} -> awsLogicalDeviceId) (\s@BGPPeer' {} a -> s {awsLogicalDeviceId = a} :: BGPPeer)++-- | The ID of the BGP peer.+bGPPeer_bgpPeerId :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_bgpPeerId = Lens.lens (\BGPPeer' {bgpPeerId} -> bgpPeerId) (\s@BGPPeer' {} a -> s {bgpPeerId = a} :: BGPPeer)++-- | The state of the BGP peer. The following are the possible values:+--+-- -   @verifying@: The BGP peering addresses or ASN require validation+--     before the BGP peer can be created. This state applies only to+--     public virtual interfaces.+--+-- -   @pending@: The BGP peer is created, and remains in this state until+--     it is ready to be established.+--+-- -   @available@: The BGP peer is ready to be established.+--+-- -   @deleting@: The BGP peer is being deleted.+--+-- -   @deleted@: The BGP peer is deleted and cannot be established.+bGPPeer_bgpPeerState :: Lens.Lens' BGPPeer (Prelude.Maybe BGPPeerState)+bGPPeer_bgpPeerState = Lens.lens (\BGPPeer' {bgpPeerState} -> bgpPeerState) (\s@BGPPeer' {} a -> s {bgpPeerState = a} :: BGPPeer)++-- | The status of the BGP peer. The following are the possible values:+--+-- -   @up@: The BGP peer is established. This state does not indicate the+--     state of the routing function. Ensure that you are receiving routes+--     over the BGP session.+--+-- -   @down@: The BGP peer is down.+--+-- -   @unknown@: The BGP peer status is not available.+bGPPeer_bgpStatus :: Lens.Lens' BGPPeer (Prelude.Maybe BGPStatus)+bGPPeer_bgpStatus = Lens.lens (\BGPPeer' {bgpStatus} -> bgpStatus) (\s@BGPPeer' {} a -> s {bgpStatus = a} :: BGPPeer)++-- | The IP address assigned to the customer interface.+bGPPeer_customerAddress :: Lens.Lens' BGPPeer (Prelude.Maybe Prelude.Text)+bGPPeer_customerAddress = Lens.lens (\BGPPeer' {customerAddress} -> customerAddress) (\s@BGPPeer' {} a -> s {customerAddress = a} :: BGPPeer)++instance Data.FromJSON BGPPeer where+  parseJSON =+    Data.withObject+      "BGPPeer"+      ( \x ->+          BGPPeer'+            Prelude.<$> (x Data..:? "addressFamily")+            Prelude.<*> (x Data..:? "amazonAddress")+            Prelude.<*> (x Data..:? "asn")+            Prelude.<*> (x Data..:? "authKey")+            Prelude.<*> (x Data..:? "awsDeviceV2")+            Prelude.<*> (x Data..:? "awsLogicalDeviceId")+            Prelude.<*> (x Data..:? "bgpPeerId")+            Prelude.<*> (x Data..:? "bgpPeerState")+            Prelude.<*> (x Data..:? "bgpStatus")+            Prelude.<*> (x Data..:? "customerAddress")+      )++instance Prelude.Hashable BGPPeer where+  hashWithSalt _salt BGPPeer' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` asn+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` awsDeviceV2+      `Prelude.hashWithSalt` awsLogicalDeviceId+      `Prelude.hashWithSalt` bgpPeerId+      `Prelude.hashWithSalt` bgpPeerState+      `Prelude.hashWithSalt` bgpStatus+      `Prelude.hashWithSalt` customerAddress++instance Prelude.NFData BGPPeer where+  rnf BGPPeer' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf asn+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf awsDeviceV2+      `Prelude.seq` Prelude.rnf awsLogicalDeviceId+      `Prelude.seq` Prelude.rnf bgpPeerId+      `Prelude.seq` Prelude.rnf bgpPeerState+      `Prelude.seq` Prelude.rnf bgpStatus+      `Prelude.seq` Prelude.rnf customerAddress
+ gen/Amazonka/DirectConnect/Types/BGPPeerState.hs view
@@ -0,0 +1,86 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.BGPPeerState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.BGPPeerState+  ( BGPPeerState+      ( ..,+        BGPPeerState_Available,+        BGPPeerState_Deleted,+        BGPPeerState_Deleting,+        BGPPeerState_Pending,+        BGPPeerState_Verifying+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype BGPPeerState = BGPPeerState'+  { fromBGPPeerState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern BGPPeerState_Available :: BGPPeerState+pattern BGPPeerState_Available = BGPPeerState' "available"++pattern BGPPeerState_Deleted :: BGPPeerState+pattern BGPPeerState_Deleted = BGPPeerState' "deleted"++pattern BGPPeerState_Deleting :: BGPPeerState+pattern BGPPeerState_Deleting = BGPPeerState' "deleting"++pattern BGPPeerState_Pending :: BGPPeerState+pattern BGPPeerState_Pending = BGPPeerState' "pending"++pattern BGPPeerState_Verifying :: BGPPeerState+pattern BGPPeerState_Verifying = BGPPeerState' "verifying"++{-# COMPLETE+  BGPPeerState_Available,+  BGPPeerState_Deleted,+  BGPPeerState_Deleting,+  BGPPeerState_Pending,+  BGPPeerState_Verifying,+  BGPPeerState'+  #-}
+ gen/Amazonka/DirectConnect/Types/BGPStatus.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.BGPStatus+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.BGPStatus+  ( BGPStatus+      ( ..,+        BGPStatus_Down,+        BGPStatus_Unknown,+        BGPStatus_Up+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype BGPStatus = BGPStatus'+  { fromBGPStatus ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern BGPStatus_Down :: BGPStatus+pattern BGPStatus_Down = BGPStatus' "down"++pattern BGPStatus_Unknown :: BGPStatus+pattern BGPStatus_Unknown = BGPStatus' "unknown"++pattern BGPStatus_Up :: BGPStatus+pattern BGPStatus_Up = BGPStatus' "up"++{-# COMPLETE+  BGPStatus_Down,+  BGPStatus_Unknown,+  BGPStatus_Up,+  BGPStatus'+  #-}
+ gen/Amazonka/DirectConnect/Types/Connection.hs view
@@ -0,0 +1,433 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Connection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Connection where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.ConnectionState+import Amazonka.DirectConnect.Types.HasLogicalRedundancy+import Amazonka.DirectConnect.Types.MacSecKey+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about an Direct Connect connection.+--+-- /See:/ 'newConnection' smart constructor.+data Connection = Connection'+  { -- | The Direct Connect endpoint on which the physical connection terminates.+    awsDevice :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the physical connection.+    awsDeviceV2 :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the logical connection. This+    -- device might be different than the device that terminates the physical+    -- connection.+    awsLogicalDeviceId :: Prelude.Maybe Prelude.Text,+    -- | The bandwidth of the connection.+    bandwidth :: Prelude.Maybe Prelude.Text,+    -- | The ID of the connection.+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The name of the connection.+    connectionName :: Prelude.Maybe Prelude.Text,+    -- | The state of the connection. The following are the possible values:+    --+    -- -   @ordering@: The initial state of a hosted connection provisioned on+    --     an interconnect. The connection stays in the ordering state until+    --     the owner of the hosted connection confirms or declines the+    --     connection order.+    --+    -- -   @requested@: The initial state of a standard connection. The+    --     connection stays in the requested state until the Letter of+    --     Authorization (LOA) is sent to the customer.+    --+    -- -   @pending@: The connection has been approved and is being+    --     initialized.+    --+    -- -   @available@: The network link is up and the connection is ready for+    --     use.+    --+    -- -   @down@: The network link is down.+    --+    -- -   @deleting@: The connection is being deleted.+    --+    -- -   @deleted@: The connection has been deleted.+    --+    -- -   @rejected@: A hosted connection in the @ordering@ state enters the+    --     @rejected@ state if it is deleted by the customer.+    --+    -- -   @unknown@: The state of the connection is not available.+    connectionState :: Prelude.Maybe ConnectionState,+    -- | The MAC Security (MACsec) connection encryption mode.+    --+    -- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+    encryptionMode :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the connection supports a secondary BGP peer in the+    -- same address family (IPv4\/IPv6).+    hasLogicalRedundancy :: Prelude.Maybe HasLogicalRedundancy,+    -- | Indicates whether jumbo frames (9001 MTU) are supported.+    jumboFrameCapable :: Prelude.Maybe Prelude.Bool,+    -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text,+    -- | The time of the most recent call to DescribeLoa for this connection.+    loaIssueTime :: Prelude.Maybe Data.POSIX,+    -- | The location of the connection.+    location :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the connection supports MAC Security (MACsec).+    macSecCapable :: Prelude.Maybe Prelude.Bool,+    -- | The MAC Security (MACsec) security keys associated with the connection.+    macSecKeys :: Prelude.Maybe [MacSecKey],+    -- | The ID of the Amazon Web Services account that owns the connection.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The name of the Direct Connect service provider associated with the+    -- connection.+    partnerName :: Prelude.Maybe Prelude.Text,+    -- | The MAC Security (MACsec) port link status of the connection.+    --+    -- The valid values are @Encryption Up@, which means that there is an+    -- active Connection Key Name, or @Encryption Down@.+    portEncryptionStatus :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the connection.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the connection is located.+    region :: Prelude.Maybe Prelude.Text,+    -- | The tags associated with the connection.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The ID of the VLAN.+    vlan :: Prelude.Maybe Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Connection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'awsDevice', 'connection_awsDevice' - The Direct Connect endpoint on which the physical connection terminates.+--+-- 'awsDeviceV2', 'connection_awsDeviceV2' - The Direct Connect endpoint that terminates the physical connection.+--+-- 'awsLogicalDeviceId', 'connection_awsLogicalDeviceId' - The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+--+-- 'bandwidth', 'connection_bandwidth' - The bandwidth of the connection.+--+-- 'connectionId', 'connection_connectionId' - The ID of the connection.+--+-- 'connectionName', 'connection_connectionName' - The name of the connection.+--+-- 'connectionState', 'connection_connectionState' - The state of the connection. The following are the possible values:+--+-- -   @ordering@: The initial state of a hosted connection provisioned on+--     an interconnect. The connection stays in the ordering state until+--     the owner of the hosted connection confirms or declines the+--     connection order.+--+-- -   @requested@: The initial state of a standard connection. The+--     connection stays in the requested state until the Letter of+--     Authorization (LOA) is sent to the customer.+--+-- -   @pending@: The connection has been approved and is being+--     initialized.+--+-- -   @available@: The network link is up and the connection is ready for+--     use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The connection is being deleted.+--+-- -   @deleted@: The connection has been deleted.+--+-- -   @rejected@: A hosted connection in the @ordering@ state enters the+--     @rejected@ state if it is deleted by the customer.+--+-- -   @unknown@: The state of the connection is not available.+--+-- 'encryptionMode', 'connection_encryptionMode' - The MAC Security (MACsec) connection encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+--+-- 'hasLogicalRedundancy', 'connection_hasLogicalRedundancy' - Indicates whether the connection supports a secondary BGP peer in the+-- same address family (IPv4\/IPv6).+--+-- 'jumboFrameCapable', 'connection_jumboFrameCapable' - Indicates whether jumbo frames (9001 MTU) are supported.+--+-- 'lagId', 'connection_lagId' - The ID of the LAG.+--+-- 'loaIssueTime', 'connection_loaIssueTime' - The time of the most recent call to DescribeLoa for this connection.+--+-- 'location', 'connection_location' - The location of the connection.+--+-- 'macSecCapable', 'connection_macSecCapable' - Indicates whether the connection supports MAC Security (MACsec).+--+-- 'macSecKeys', 'connection_macSecKeys' - The MAC Security (MACsec) security keys associated with the connection.+--+-- 'ownerAccount', 'connection_ownerAccount' - The ID of the Amazon Web Services account that owns the connection.+--+-- 'partnerName', 'connection_partnerName' - The name of the Direct Connect service provider associated with the+-- connection.+--+-- 'portEncryptionStatus', 'connection_portEncryptionStatus' - The MAC Security (MACsec) port link status of the connection.+--+-- The valid values are @Encryption Up@, which means that there is an+-- active Connection Key Name, or @Encryption Down@.+--+-- 'providerName', 'connection_providerName' - The name of the service provider associated with the connection.+--+-- 'region', 'connection_region' - The Amazon Web Services Region where the connection is located.+--+-- 'tags', 'connection_tags' - The tags associated with the connection.+--+-- 'vlan', 'connection_vlan' - The ID of the VLAN.+newConnection ::+  Connection+newConnection =+  Connection'+    { awsDevice = Prelude.Nothing,+      awsDeviceV2 = Prelude.Nothing,+      awsLogicalDeviceId = Prelude.Nothing,+      bandwidth = Prelude.Nothing,+      connectionId = Prelude.Nothing,+      connectionName = Prelude.Nothing,+      connectionState = Prelude.Nothing,+      encryptionMode = Prelude.Nothing,+      hasLogicalRedundancy = Prelude.Nothing,+      jumboFrameCapable = Prelude.Nothing,+      lagId = Prelude.Nothing,+      loaIssueTime = Prelude.Nothing,+      location = Prelude.Nothing,+      macSecCapable = Prelude.Nothing,+      macSecKeys = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      partnerName = Prelude.Nothing,+      portEncryptionStatus = Prelude.Nothing,+      providerName = Prelude.Nothing,+      region = Prelude.Nothing,+      tags = Prelude.Nothing,+      vlan = Prelude.Nothing+    }++-- | The Direct Connect endpoint on which the physical connection terminates.+connection_awsDevice :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_awsDevice = Lens.lens (\Connection' {awsDevice} -> awsDevice) (\s@Connection' {} a -> s {awsDevice = a} :: Connection)++-- | The Direct Connect endpoint that terminates the physical connection.+connection_awsDeviceV2 :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_awsDeviceV2 = Lens.lens (\Connection' {awsDeviceV2} -> awsDeviceV2) (\s@Connection' {} a -> s {awsDeviceV2 = a} :: Connection)++-- | The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+connection_awsLogicalDeviceId :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_awsLogicalDeviceId = Lens.lens (\Connection' {awsLogicalDeviceId} -> awsLogicalDeviceId) (\s@Connection' {} a -> s {awsLogicalDeviceId = a} :: Connection)++-- | The bandwidth of the connection.+connection_bandwidth :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_bandwidth = Lens.lens (\Connection' {bandwidth} -> bandwidth) (\s@Connection' {} a -> s {bandwidth = a} :: Connection)++-- | The ID of the connection.+connection_connectionId :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_connectionId = Lens.lens (\Connection' {connectionId} -> connectionId) (\s@Connection' {} a -> s {connectionId = a} :: Connection)++-- | The name of the connection.+connection_connectionName :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_connectionName = Lens.lens (\Connection' {connectionName} -> connectionName) (\s@Connection' {} a -> s {connectionName = a} :: Connection)++-- | The state of the connection. The following are the possible values:+--+-- -   @ordering@: The initial state of a hosted connection provisioned on+--     an interconnect. The connection stays in the ordering state until+--     the owner of the hosted connection confirms or declines the+--     connection order.+--+-- -   @requested@: The initial state of a standard connection. The+--     connection stays in the requested state until the Letter of+--     Authorization (LOA) is sent to the customer.+--+-- -   @pending@: The connection has been approved and is being+--     initialized.+--+-- -   @available@: The network link is up and the connection is ready for+--     use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The connection is being deleted.+--+-- -   @deleted@: The connection has been deleted.+--+-- -   @rejected@: A hosted connection in the @ordering@ state enters the+--     @rejected@ state if it is deleted by the customer.+--+-- -   @unknown@: The state of the connection is not available.+connection_connectionState :: Lens.Lens' Connection (Prelude.Maybe ConnectionState)+connection_connectionState = Lens.lens (\Connection' {connectionState} -> connectionState) (\s@Connection' {} a -> s {connectionState = a} :: Connection)++-- | The MAC Security (MACsec) connection encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+connection_encryptionMode :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_encryptionMode = Lens.lens (\Connection' {encryptionMode} -> encryptionMode) (\s@Connection' {} a -> s {encryptionMode = a} :: Connection)++-- | Indicates whether the connection supports a secondary BGP peer in the+-- same address family (IPv4\/IPv6).+connection_hasLogicalRedundancy :: Lens.Lens' Connection (Prelude.Maybe HasLogicalRedundancy)+connection_hasLogicalRedundancy = Lens.lens (\Connection' {hasLogicalRedundancy} -> hasLogicalRedundancy) (\s@Connection' {} a -> s {hasLogicalRedundancy = a} :: Connection)++-- | Indicates whether jumbo frames (9001 MTU) are supported.+connection_jumboFrameCapable :: Lens.Lens' Connection (Prelude.Maybe Prelude.Bool)+connection_jumboFrameCapable = Lens.lens (\Connection' {jumboFrameCapable} -> jumboFrameCapable) (\s@Connection' {} a -> s {jumboFrameCapable = a} :: Connection)++-- | The ID of the LAG.+connection_lagId :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_lagId = Lens.lens (\Connection' {lagId} -> lagId) (\s@Connection' {} a -> s {lagId = a} :: Connection)++-- | The time of the most recent call to DescribeLoa for this connection.+connection_loaIssueTime :: Lens.Lens' Connection (Prelude.Maybe Prelude.UTCTime)+connection_loaIssueTime = Lens.lens (\Connection' {loaIssueTime} -> loaIssueTime) (\s@Connection' {} a -> s {loaIssueTime = a} :: Connection) Prelude.. Lens.mapping Data._Time++-- | The location of the connection.+connection_location :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_location = Lens.lens (\Connection' {location} -> location) (\s@Connection' {} a -> s {location = a} :: Connection)++-- | Indicates whether the connection supports MAC Security (MACsec).+connection_macSecCapable :: Lens.Lens' Connection (Prelude.Maybe Prelude.Bool)+connection_macSecCapable = Lens.lens (\Connection' {macSecCapable} -> macSecCapable) (\s@Connection' {} a -> s {macSecCapable = a} :: Connection)++-- | The MAC Security (MACsec) security keys associated with the connection.+connection_macSecKeys :: Lens.Lens' Connection (Prelude.Maybe [MacSecKey])+connection_macSecKeys = Lens.lens (\Connection' {macSecKeys} -> macSecKeys) (\s@Connection' {} a -> s {macSecKeys = a} :: Connection) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the Amazon Web Services account that owns the connection.+connection_ownerAccount :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_ownerAccount = Lens.lens (\Connection' {ownerAccount} -> ownerAccount) (\s@Connection' {} a -> s {ownerAccount = a} :: Connection)++-- | The name of the Direct Connect service provider associated with the+-- connection.+connection_partnerName :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_partnerName = Lens.lens (\Connection' {partnerName} -> partnerName) (\s@Connection' {} a -> s {partnerName = a} :: Connection)++-- | The MAC Security (MACsec) port link status of the connection.+--+-- The valid values are @Encryption Up@, which means that there is an+-- active Connection Key Name, or @Encryption Down@.+connection_portEncryptionStatus :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_portEncryptionStatus = Lens.lens (\Connection' {portEncryptionStatus} -> portEncryptionStatus) (\s@Connection' {} a -> s {portEncryptionStatus = a} :: Connection)++-- | The name of the service provider associated with the connection.+connection_providerName :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_providerName = Lens.lens (\Connection' {providerName} -> providerName) (\s@Connection' {} a -> s {providerName = a} :: Connection)++-- | The Amazon Web Services Region where the connection is located.+connection_region :: Lens.Lens' Connection (Prelude.Maybe Prelude.Text)+connection_region = Lens.lens (\Connection' {region} -> region) (\s@Connection' {} a -> s {region = a} :: Connection)++-- | The tags associated with the connection.+connection_tags :: Lens.Lens' Connection (Prelude.Maybe (Prelude.NonEmpty Tag))+connection_tags = Lens.lens (\Connection' {tags} -> tags) (\s@Connection' {} a -> s {tags = a} :: Connection) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the VLAN.+connection_vlan :: Lens.Lens' Connection (Prelude.Maybe Prelude.Int)+connection_vlan = Lens.lens (\Connection' {vlan} -> vlan) (\s@Connection' {} a -> s {vlan = a} :: Connection)++instance Data.FromJSON Connection where+  parseJSON =+    Data.withObject+      "Connection"+      ( \x ->+          Connection'+            Prelude.<$> (x Data..:? "awsDevice")+            Prelude.<*> (x Data..:? "awsDeviceV2")+            Prelude.<*> (x Data..:? "awsLogicalDeviceId")+            Prelude.<*> (x Data..:? "bandwidth")+            Prelude.<*> (x Data..:? "connectionId")+            Prelude.<*> (x Data..:? "connectionName")+            Prelude.<*> (x Data..:? "connectionState")+            Prelude.<*> (x Data..:? "encryptionMode")+            Prelude.<*> (x Data..:? "hasLogicalRedundancy")+            Prelude.<*> (x Data..:? "jumboFrameCapable")+            Prelude.<*> (x Data..:? "lagId")+            Prelude.<*> (x Data..:? "loaIssueTime")+            Prelude.<*> (x Data..:? "location")+            Prelude.<*> (x Data..:? "macSecCapable")+            Prelude.<*> (x Data..:? "macSecKeys" Data..!= Prelude.mempty)+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "partnerName")+            Prelude.<*> (x Data..:? "portEncryptionStatus")+            Prelude.<*> (x Data..:? "providerName")+            Prelude.<*> (x Data..:? "region")+            Prelude.<*> (x Data..:? "tags")+            Prelude.<*> (x Data..:? "vlan")+      )++instance Prelude.Hashable Connection where+  hashWithSalt _salt Connection' {..} =+    _salt+      `Prelude.hashWithSalt` awsDevice+      `Prelude.hashWithSalt` awsDeviceV2+      `Prelude.hashWithSalt` awsLogicalDeviceId+      `Prelude.hashWithSalt` bandwidth+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` connectionName+      `Prelude.hashWithSalt` connectionState+      `Prelude.hashWithSalt` encryptionMode+      `Prelude.hashWithSalt` hasLogicalRedundancy+      `Prelude.hashWithSalt` jumboFrameCapable+      `Prelude.hashWithSalt` lagId+      `Prelude.hashWithSalt` loaIssueTime+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` macSecCapable+      `Prelude.hashWithSalt` macSecKeys+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` partnerName+      `Prelude.hashWithSalt` portEncryptionStatus+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` region+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` vlan++instance Prelude.NFData Connection where+  rnf Connection' {..} =+    Prelude.rnf awsDevice+      `Prelude.seq` Prelude.rnf awsDeviceV2+      `Prelude.seq` Prelude.rnf awsLogicalDeviceId+      `Prelude.seq` Prelude.rnf bandwidth+      `Prelude.seq` Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf connectionName+      `Prelude.seq` Prelude.rnf connectionState+      `Prelude.seq` Prelude.rnf encryptionMode+      `Prelude.seq` Prelude.rnf hasLogicalRedundancy+      `Prelude.seq` Prelude.rnf jumboFrameCapable+      `Prelude.seq` Prelude.rnf lagId+      `Prelude.seq` Prelude.rnf loaIssueTime+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf macSecCapable+      `Prelude.seq` Prelude.rnf macSecKeys+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf partnerName+      `Prelude.seq` Prelude.rnf portEncryptionStatus+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf region+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf vlan
+ gen/Amazonka/DirectConnect/Types/ConnectionState.hs view
@@ -0,0 +1,106 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.ConnectionState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.ConnectionState+  ( ConnectionState+      ( ..,+        ConnectionState_Available,+        ConnectionState_Deleted,+        ConnectionState_Deleting,+        ConnectionState_Down,+        ConnectionState_Ordering,+        ConnectionState_Pending,+        ConnectionState_Rejected,+        ConnectionState_Requested,+        ConnectionState_Unknown+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype ConnectionState = ConnectionState'+  { fromConnectionState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern ConnectionState_Available :: ConnectionState+pattern ConnectionState_Available = ConnectionState' "available"++pattern ConnectionState_Deleted :: ConnectionState+pattern ConnectionState_Deleted = ConnectionState' "deleted"++pattern ConnectionState_Deleting :: ConnectionState+pattern ConnectionState_Deleting = ConnectionState' "deleting"++pattern ConnectionState_Down :: ConnectionState+pattern ConnectionState_Down = ConnectionState' "down"++pattern ConnectionState_Ordering :: ConnectionState+pattern ConnectionState_Ordering = ConnectionState' "ordering"++pattern ConnectionState_Pending :: ConnectionState+pattern ConnectionState_Pending = ConnectionState' "pending"++pattern ConnectionState_Rejected :: ConnectionState+pattern ConnectionState_Rejected = ConnectionState' "rejected"++pattern ConnectionState_Requested :: ConnectionState+pattern ConnectionState_Requested = ConnectionState' "requested"++pattern ConnectionState_Unknown :: ConnectionState+pattern ConnectionState_Unknown = ConnectionState' "unknown"++{-# COMPLETE+  ConnectionState_Available,+  ConnectionState_Deleted,+  ConnectionState_Deleting,+  ConnectionState_Down,+  ConnectionState_Ordering,+  ConnectionState_Pending,+  ConnectionState_Rejected,+  ConnectionState_Requested,+  ConnectionState_Unknown,+  ConnectionState'+  #-}
+ gen/Amazonka/DirectConnect/Types/Connections.hs view
@@ -0,0 +1,67 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Connections+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Connections where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.Connection+import qualified Amazonka.Prelude as Prelude++-- | /See:/ 'newConnections' smart constructor.+data Connections = Connections'+  { -- | The connections.+    connections :: Prelude.Maybe [Connection]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Connections' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connections', 'connections_connections' - The connections.+newConnections ::+  Connections+newConnections =+  Connections' {connections = Prelude.Nothing}++-- | The connections.+connections_connections :: Lens.Lens' Connections (Prelude.Maybe [Connection])+connections_connections = Lens.lens (\Connections' {connections} -> connections) (\s@Connections' {} a -> s {connections = a} :: Connections) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON Connections where+  parseJSON =+    Data.withObject+      "Connections"+      ( \x ->+          Connections'+            Prelude.<$> (x Data..:? "connections" Data..!= Prelude.mempty)+      )++instance Prelude.Hashable Connections where+  hashWithSalt _salt Connections' {..} =+    _salt `Prelude.hashWithSalt` connections++instance Prelude.NFData Connections where+  rnf Connections' {..} = Prelude.rnf connections
+ gen/Amazonka/DirectConnect/Types/CustomerAgreement.hs view
@@ -0,0 +1,87 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.CustomerAgreement+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.CustomerAgreement where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | The name and status of a customer agreement.+--+-- /See:/ 'newCustomerAgreement' smart constructor.+data CustomerAgreement = CustomerAgreement'+  { -- | The name of the agreement.+    agreementName :: Prelude.Maybe Prelude.Text,+    -- | The status of the customer agreement. This will be either @signed@ or+    -- @unsigned@+    status :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CustomerAgreement' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'agreementName', 'customerAgreement_agreementName' - The name of the agreement.+--+-- 'status', 'customerAgreement_status' - The status of the customer agreement. This will be either @signed@ or+-- @unsigned@+newCustomerAgreement ::+  CustomerAgreement+newCustomerAgreement =+  CustomerAgreement'+    { agreementName = Prelude.Nothing,+      status = Prelude.Nothing+    }++-- | The name of the agreement.+customerAgreement_agreementName :: Lens.Lens' CustomerAgreement (Prelude.Maybe Prelude.Text)+customerAgreement_agreementName = Lens.lens (\CustomerAgreement' {agreementName} -> agreementName) (\s@CustomerAgreement' {} a -> s {agreementName = a} :: CustomerAgreement)++-- | The status of the customer agreement. This will be either @signed@ or+-- @unsigned@+customerAgreement_status :: Lens.Lens' CustomerAgreement (Prelude.Maybe Prelude.Text)+customerAgreement_status = Lens.lens (\CustomerAgreement' {status} -> status) (\s@CustomerAgreement' {} a -> s {status = a} :: CustomerAgreement)++instance Data.FromJSON CustomerAgreement where+  parseJSON =+    Data.withObject+      "CustomerAgreement"+      ( \x ->+          CustomerAgreement'+            Prelude.<$> (x Data..:? "agreementName")+            Prelude.<*> (x Data..:? "status")+      )++instance Prelude.Hashable CustomerAgreement where+  hashWithSalt _salt CustomerAgreement' {..} =+    _salt+      `Prelude.hashWithSalt` agreementName+      `Prelude.hashWithSalt` status++instance Prelude.NFData CustomerAgreement where+  rnf CustomerAgreement' {..} =+    Prelude.rnf agreementName+      `Prelude.seq` Prelude.rnf status
+ gen/Amazonka/DirectConnect/Types/DirectConnectGateway.hs view
@@ -0,0 +1,177 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGateway where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.DirectConnectGatewayState+import qualified Amazonka.Prelude as Prelude++-- | Information about a Direct Connect gateway, which enables you to connect+-- virtual interfaces and virtual private gateway or transit gateways.+--+-- /See:/ 'newDirectConnectGateway' smart constructor.+data DirectConnectGateway = DirectConnectGateway'+  { -- | The autonomous system number (ASN) for the Amazon side of the+    -- connection.+    amazonSideAsn :: Prelude.Maybe Prelude.Integer,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The name of the Direct Connect gateway.+    directConnectGatewayName :: Prelude.Maybe Prelude.Text,+    -- | The state of the Direct Connect gateway. The following are the possible+    -- values:+    --+    -- -   @pending@: The initial state after calling+    --     CreateDirectConnectGateway.+    --+    -- -   @available@: The Direct Connect gateway is ready for use.+    --+    -- -   @deleting@: The initial state after calling+    --     DeleteDirectConnectGateway.+    --+    -- -   @deleted@: The Direct Connect gateway is deleted and cannot pass+    --     traffic.+    directConnectGatewayState :: Prelude.Maybe DirectConnectGatewayState,+    -- | The ID of the Amazon Web Services account that owns the Direct Connect+    -- gateway.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The error message if the state of an object failed to advance.+    stateChangeError :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DirectConnectGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'amazonSideAsn', 'directConnectGateway_amazonSideAsn' - The autonomous system number (ASN) for the Amazon side of the+-- connection.+--+-- 'directConnectGatewayId', 'directConnectGateway_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'directConnectGatewayName', 'directConnectGateway_directConnectGatewayName' - The name of the Direct Connect gateway.+--+-- 'directConnectGatewayState', 'directConnectGateway_directConnectGatewayState' - The state of the Direct Connect gateway. The following are the possible+-- values:+--+-- -   @pending@: The initial state after calling+--     CreateDirectConnectGateway.+--+-- -   @available@: The Direct Connect gateway is ready for use.+--+-- -   @deleting@: The initial state after calling+--     DeleteDirectConnectGateway.+--+-- -   @deleted@: The Direct Connect gateway is deleted and cannot pass+--     traffic.+--+-- 'ownerAccount', 'directConnectGateway_ownerAccount' - The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+--+-- 'stateChangeError', 'directConnectGateway_stateChangeError' - The error message if the state of an object failed to advance.+newDirectConnectGateway ::+  DirectConnectGateway+newDirectConnectGateway =+  DirectConnectGateway'+    { amazonSideAsn =+        Prelude.Nothing,+      directConnectGatewayId = Prelude.Nothing,+      directConnectGatewayName = Prelude.Nothing,+      directConnectGatewayState = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      stateChangeError = Prelude.Nothing+    }++-- | The autonomous system number (ASN) for the Amazon side of the+-- connection.+directConnectGateway_amazonSideAsn :: Lens.Lens' DirectConnectGateway (Prelude.Maybe Prelude.Integer)+directConnectGateway_amazonSideAsn = Lens.lens (\DirectConnectGateway' {amazonSideAsn} -> amazonSideAsn) (\s@DirectConnectGateway' {} a -> s {amazonSideAsn = a} :: DirectConnectGateway)++-- | The ID of the Direct Connect gateway.+directConnectGateway_directConnectGatewayId :: Lens.Lens' DirectConnectGateway (Prelude.Maybe Prelude.Text)+directConnectGateway_directConnectGatewayId = Lens.lens (\DirectConnectGateway' {directConnectGatewayId} -> directConnectGatewayId) (\s@DirectConnectGateway' {} a -> s {directConnectGatewayId = a} :: DirectConnectGateway)++-- | The name of the Direct Connect gateway.+directConnectGateway_directConnectGatewayName :: Lens.Lens' DirectConnectGateway (Prelude.Maybe Prelude.Text)+directConnectGateway_directConnectGatewayName = Lens.lens (\DirectConnectGateway' {directConnectGatewayName} -> directConnectGatewayName) (\s@DirectConnectGateway' {} a -> s {directConnectGatewayName = a} :: DirectConnectGateway)++-- | The state of the Direct Connect gateway. The following are the possible+-- values:+--+-- -   @pending@: The initial state after calling+--     CreateDirectConnectGateway.+--+-- -   @available@: The Direct Connect gateway is ready for use.+--+-- -   @deleting@: The initial state after calling+--     DeleteDirectConnectGateway.+--+-- -   @deleted@: The Direct Connect gateway is deleted and cannot pass+--     traffic.+directConnectGateway_directConnectGatewayState :: Lens.Lens' DirectConnectGateway (Prelude.Maybe DirectConnectGatewayState)+directConnectGateway_directConnectGatewayState = Lens.lens (\DirectConnectGateway' {directConnectGatewayState} -> directConnectGatewayState) (\s@DirectConnectGateway' {} a -> s {directConnectGatewayState = a} :: DirectConnectGateway)++-- | The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+directConnectGateway_ownerAccount :: Lens.Lens' DirectConnectGateway (Prelude.Maybe Prelude.Text)+directConnectGateway_ownerAccount = Lens.lens (\DirectConnectGateway' {ownerAccount} -> ownerAccount) (\s@DirectConnectGateway' {} a -> s {ownerAccount = a} :: DirectConnectGateway)++-- | The error message if the state of an object failed to advance.+directConnectGateway_stateChangeError :: Lens.Lens' DirectConnectGateway (Prelude.Maybe Prelude.Text)+directConnectGateway_stateChangeError = Lens.lens (\DirectConnectGateway' {stateChangeError} -> stateChangeError) (\s@DirectConnectGateway' {} a -> s {stateChangeError = a} :: DirectConnectGateway)++instance Data.FromJSON DirectConnectGateway where+  parseJSON =+    Data.withObject+      "DirectConnectGateway"+      ( \x ->+          DirectConnectGateway'+            Prelude.<$> (x Data..:? "amazonSideAsn")+            Prelude.<*> (x Data..:? "directConnectGatewayId")+            Prelude.<*> (x Data..:? "directConnectGatewayName")+            Prelude.<*> (x Data..:? "directConnectGatewayState")+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "stateChangeError")+      )++instance Prelude.Hashable DirectConnectGateway where+  hashWithSalt _salt DirectConnectGateway' {..} =+    _salt+      `Prelude.hashWithSalt` amazonSideAsn+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` directConnectGatewayName+      `Prelude.hashWithSalt` directConnectGatewayState+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` stateChangeError++instance Prelude.NFData DirectConnectGateway where+  rnf DirectConnectGateway' {..} =+    Prelude.rnf amazonSideAsn+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf directConnectGatewayName+      `Prelude.seq` Prelude.rnf directConnectGatewayState+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf stateChangeError
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAssociation.hs view
@@ -0,0 +1,258 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAssociation where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AssociatedGateway+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import qualified Amazonka.Prelude as Prelude++-- | Information about an association between a Direct Connect gateway and a+-- virtual private gateway or transit gateway.+--+-- /See:/ 'newDirectConnectGatewayAssociation' smart constructor.+data DirectConnectGatewayAssociation = DirectConnectGatewayAssociation'+  { -- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+    allowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | Information about the associated gateway.+    associatedGateway :: Prelude.Maybe AssociatedGateway,+    -- | The ID of the Direct Connect gateway association.+    associationId :: Prelude.Maybe Prelude.Text,+    -- | The state of the association. The following are the possible values:+    --+    -- -   @associating@: The initial state after calling+    --     CreateDirectConnectGatewayAssociation.+    --+    -- -   @associated@: The Direct Connect gateway and virtual private gateway+    --     or transit gateway are successfully associated and ready to pass+    --     traffic.+    --+    -- -   @disassociating@: The initial state after calling+    --     DeleteDirectConnectGatewayAssociation.+    --+    -- -   @disassociated@: The virtual private gateway or transit gateway is+    --     disassociated from the Direct Connect gateway. Traffic flow between+    --     the Direct Connect gateway and virtual private gateway or transit+    --     gateway is stopped.+    associationState :: Prelude.Maybe DirectConnectGatewayAssociationState,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the associated+    -- gateway.+    directConnectGatewayOwnerAccount :: Prelude.Maybe Prelude.Text,+    -- | The error message if the state of an object failed to advance.+    stateChangeError :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private gateway. Applies only to private virtual+    -- interfaces.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the virtual private+    -- gateway.+    virtualGatewayOwnerAccount :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the virtual private gateway is+    -- located.+    virtualGatewayRegion :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DirectConnectGatewayAssociation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'allowedPrefixesToDirectConnectGateway', 'directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to advertise to the Direct Connect gateway.+--+-- 'associatedGateway', 'directConnectGatewayAssociation_associatedGateway' - Information about the associated gateway.+--+-- 'associationId', 'directConnectGatewayAssociation_associationId' - The ID of the Direct Connect gateway association.+--+-- 'associationState', 'directConnectGatewayAssociation_associationState' - The state of the association. The following are the possible values:+--+-- -   @associating@: The initial state after calling+--     CreateDirectConnectGatewayAssociation.+--+-- -   @associated@: The Direct Connect gateway and virtual private gateway+--     or transit gateway are successfully associated and ready to pass+--     traffic.+--+-- -   @disassociating@: The initial state after calling+--     DeleteDirectConnectGatewayAssociation.+--+-- -   @disassociated@: The virtual private gateway or transit gateway is+--     disassociated from the Direct Connect gateway. Traffic flow between+--     the Direct Connect gateway and virtual private gateway or transit+--     gateway is stopped.+--+-- 'directConnectGatewayId', 'directConnectGatewayAssociation_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'directConnectGatewayOwnerAccount', 'directConnectGatewayAssociation_directConnectGatewayOwnerAccount' - The ID of the Amazon Web Services account that owns the associated+-- gateway.+--+-- 'stateChangeError', 'directConnectGatewayAssociation_stateChangeError' - The error message if the state of an object failed to advance.+--+-- 'virtualGatewayId', 'directConnectGatewayAssociation_virtualGatewayId' - The ID of the virtual private gateway. Applies only to private virtual+-- interfaces.+--+-- 'virtualGatewayOwnerAccount', 'directConnectGatewayAssociation_virtualGatewayOwnerAccount' - The ID of the Amazon Web Services account that owns the virtual private+-- gateway.+--+-- 'virtualGatewayRegion', 'directConnectGatewayAssociation_virtualGatewayRegion' - The Amazon Web Services Region where the virtual private gateway is+-- located.+newDirectConnectGatewayAssociation ::+  DirectConnectGatewayAssociation+newDirectConnectGatewayAssociation =+  DirectConnectGatewayAssociation'+    { allowedPrefixesToDirectConnectGateway =+        Prelude.Nothing,+      associatedGateway = Prelude.Nothing,+      associationId = Prelude.Nothing,+      associationState = Prelude.Nothing,+      directConnectGatewayId = Prelude.Nothing,+      directConnectGatewayOwnerAccount =+        Prelude.Nothing,+      stateChangeError = Prelude.Nothing,+      virtualGatewayId = Prelude.Nothing,+      virtualGatewayOwnerAccount =+        Prelude.Nothing,+      virtualGatewayRegion = Prelude.Nothing+    }++-- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe [RouteFilterPrefix])+directConnectGatewayAssociation_allowedPrefixesToDirectConnectGateway = Lens.lens (\DirectConnectGatewayAssociation' {allowedPrefixesToDirectConnectGateway} -> allowedPrefixesToDirectConnectGateway) (\s@DirectConnectGatewayAssociation' {} a -> s {allowedPrefixesToDirectConnectGateway = a} :: DirectConnectGatewayAssociation) Prelude.. Lens.mapping Lens.coerced++-- | Information about the associated gateway.+directConnectGatewayAssociation_associatedGateway :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe AssociatedGateway)+directConnectGatewayAssociation_associatedGateway = Lens.lens (\DirectConnectGatewayAssociation' {associatedGateway} -> associatedGateway) (\s@DirectConnectGatewayAssociation' {} a -> s {associatedGateway = a} :: DirectConnectGatewayAssociation)++-- | The ID of the Direct Connect gateway association.+directConnectGatewayAssociation_associationId :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_associationId = Lens.lens (\DirectConnectGatewayAssociation' {associationId} -> associationId) (\s@DirectConnectGatewayAssociation' {} a -> s {associationId = a} :: DirectConnectGatewayAssociation)++-- | The state of the association. The following are the possible values:+--+-- -   @associating@: The initial state after calling+--     CreateDirectConnectGatewayAssociation.+--+-- -   @associated@: The Direct Connect gateway and virtual private gateway+--     or transit gateway are successfully associated and ready to pass+--     traffic.+--+-- -   @disassociating@: The initial state after calling+--     DeleteDirectConnectGatewayAssociation.+--+-- -   @disassociated@: The virtual private gateway or transit gateway is+--     disassociated from the Direct Connect gateway. Traffic flow between+--     the Direct Connect gateway and virtual private gateway or transit+--     gateway is stopped.+directConnectGatewayAssociation_associationState :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe DirectConnectGatewayAssociationState)+directConnectGatewayAssociation_associationState = Lens.lens (\DirectConnectGatewayAssociation' {associationState} -> associationState) (\s@DirectConnectGatewayAssociation' {} a -> s {associationState = a} :: DirectConnectGatewayAssociation)++-- | The ID of the Direct Connect gateway.+directConnectGatewayAssociation_directConnectGatewayId :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_directConnectGatewayId = Lens.lens (\DirectConnectGatewayAssociation' {directConnectGatewayId} -> directConnectGatewayId) (\s@DirectConnectGatewayAssociation' {} a -> s {directConnectGatewayId = a} :: DirectConnectGatewayAssociation)++-- | The ID of the Amazon Web Services account that owns the associated+-- gateway.+directConnectGatewayAssociation_directConnectGatewayOwnerAccount :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_directConnectGatewayOwnerAccount = Lens.lens (\DirectConnectGatewayAssociation' {directConnectGatewayOwnerAccount} -> directConnectGatewayOwnerAccount) (\s@DirectConnectGatewayAssociation' {} a -> s {directConnectGatewayOwnerAccount = a} :: DirectConnectGatewayAssociation)++-- | The error message if the state of an object failed to advance.+directConnectGatewayAssociation_stateChangeError :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_stateChangeError = Lens.lens (\DirectConnectGatewayAssociation' {stateChangeError} -> stateChangeError) (\s@DirectConnectGatewayAssociation' {} a -> s {stateChangeError = a} :: DirectConnectGatewayAssociation)++-- | The ID of the virtual private gateway. Applies only to private virtual+-- interfaces.+directConnectGatewayAssociation_virtualGatewayId :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_virtualGatewayId = Lens.lens (\DirectConnectGatewayAssociation' {virtualGatewayId} -> virtualGatewayId) (\s@DirectConnectGatewayAssociation' {} a -> s {virtualGatewayId = a} :: DirectConnectGatewayAssociation)++-- | The ID of the Amazon Web Services account that owns the virtual private+-- gateway.+directConnectGatewayAssociation_virtualGatewayOwnerAccount :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_virtualGatewayOwnerAccount = Lens.lens (\DirectConnectGatewayAssociation' {virtualGatewayOwnerAccount} -> virtualGatewayOwnerAccount) (\s@DirectConnectGatewayAssociation' {} a -> s {virtualGatewayOwnerAccount = a} :: DirectConnectGatewayAssociation)++-- | The Amazon Web Services Region where the virtual private gateway is+-- located.+directConnectGatewayAssociation_virtualGatewayRegion :: Lens.Lens' DirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociation_virtualGatewayRegion = Lens.lens (\DirectConnectGatewayAssociation' {virtualGatewayRegion} -> virtualGatewayRegion) (\s@DirectConnectGatewayAssociation' {} a -> s {virtualGatewayRegion = a} :: DirectConnectGatewayAssociation)++instance+  Data.FromJSON+    DirectConnectGatewayAssociation+  where+  parseJSON =+    Data.withObject+      "DirectConnectGatewayAssociation"+      ( \x ->+          DirectConnectGatewayAssociation'+            Prelude.<$> ( x+                            Data..:? "allowedPrefixesToDirectConnectGateway"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> (x Data..:? "associatedGateway")+            Prelude.<*> (x Data..:? "associationId")+            Prelude.<*> (x Data..:? "associationState")+            Prelude.<*> (x Data..:? "directConnectGatewayId")+            Prelude.<*> (x Data..:? "directConnectGatewayOwnerAccount")+            Prelude.<*> (x Data..:? "stateChangeError")+            Prelude.<*> (x Data..:? "virtualGatewayId")+            Prelude.<*> (x Data..:? "virtualGatewayOwnerAccount")+            Prelude.<*> (x Data..:? "virtualGatewayRegion")+      )++instance+  Prelude.Hashable+    DirectConnectGatewayAssociation+  where+  hashWithSalt+    _salt+    DirectConnectGatewayAssociation' {..} =+      _salt+        `Prelude.hashWithSalt` allowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` associatedGateway+        `Prelude.hashWithSalt` associationId+        `Prelude.hashWithSalt` associationState+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` directConnectGatewayOwnerAccount+        `Prelude.hashWithSalt` stateChangeError+        `Prelude.hashWithSalt` virtualGatewayId+        `Prelude.hashWithSalt` virtualGatewayOwnerAccount+        `Prelude.hashWithSalt` virtualGatewayRegion++instance+  Prelude.NFData+    DirectConnectGatewayAssociation+  where+  rnf DirectConnectGatewayAssociation' {..} =+    Prelude.rnf allowedPrefixesToDirectConnectGateway+      `Prelude.seq` Prelude.rnf associatedGateway+      `Prelude.seq` Prelude.rnf associationId+      `Prelude.seq` Prelude.rnf associationState+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf directConnectGatewayOwnerAccount+      `Prelude.seq` Prelude.rnf stateChangeError+      `Prelude.seq` Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf virtualGatewayOwnerAccount+      `Prelude.seq` Prelude.rnf virtualGatewayRegion
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAssociationProposal.hs view
@@ -0,0 +1,208 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposal where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AssociatedGateway+import Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import qualified Amazonka.Prelude as Prelude++-- | Information about the proposal request to attach a virtual private+-- gateway to a Direct Connect gateway.+--+-- /See:/ 'newDirectConnectGatewayAssociationProposal' smart constructor.+data DirectConnectGatewayAssociationProposal = DirectConnectGatewayAssociationProposal'+  { -- | Information about the associated gateway.+    associatedGateway :: Prelude.Maybe AssociatedGateway,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the Direct Connect+    -- gateway.+    directConnectGatewayOwnerAccount :: Prelude.Maybe Prelude.Text,+    -- | The existing Amazon VPC prefixes advertised to the Direct Connect+    -- gateway.+    existingAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The ID of the association proposal.+    proposalId :: Prelude.Maybe Prelude.Text,+    -- | The state of the proposal. The following are possible values:+    --+    -- -   @accepted@: The proposal has been accepted. The Direct Connect+    --     gateway association is available to use in this state.+    --+    -- -   @deleted@: The proposal has been deleted by the owner that made the+    --     proposal. The Direct Connect gateway association cannot be used in+    --     this state.+    --+    -- -   @requested@: The proposal has been requested. The Direct Connect+    --     gateway association cannot be used in this state.+    proposalState :: Prelude.Maybe DirectConnectGatewayAssociationProposalState,+    -- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+    requestedAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DirectConnectGatewayAssociationProposal' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'associatedGateway', 'directConnectGatewayAssociationProposal_associatedGateway' - Information about the associated gateway.+--+-- 'directConnectGatewayId', 'directConnectGatewayAssociationProposal_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'directConnectGatewayOwnerAccount', 'directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount' - The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+--+-- 'existingAllowedPrefixesToDirectConnectGateway', 'directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway' - The existing Amazon VPC prefixes advertised to the Direct Connect+-- gateway.+--+-- 'proposalId', 'directConnectGatewayAssociationProposal_proposalId' - The ID of the association proposal.+--+-- 'proposalState', 'directConnectGatewayAssociationProposal_proposalState' - The state of the proposal. The following are possible values:+--+-- -   @accepted@: The proposal has been accepted. The Direct Connect+--     gateway association is available to use in this state.+--+-- -   @deleted@: The proposal has been deleted by the owner that made the+--     proposal. The Direct Connect gateway association cannot be used in+--     this state.+--+-- -   @requested@: The proposal has been requested. The Direct Connect+--     gateway association cannot be used in this state.+--+-- 'requestedAllowedPrefixesToDirectConnectGateway', 'directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to advertise to the Direct Connect gateway.+newDirectConnectGatewayAssociationProposal ::+  DirectConnectGatewayAssociationProposal+newDirectConnectGatewayAssociationProposal =+  DirectConnectGatewayAssociationProposal'+    { associatedGateway =+        Prelude.Nothing,+      directConnectGatewayId =+        Prelude.Nothing,+      directConnectGatewayOwnerAccount =+        Prelude.Nothing,+      existingAllowedPrefixesToDirectConnectGateway =+        Prelude.Nothing,+      proposalId = Prelude.Nothing,+      proposalState = Prelude.Nothing,+      requestedAllowedPrefixesToDirectConnectGateway =+        Prelude.Nothing+    }++-- | Information about the associated gateway.+directConnectGatewayAssociationProposal_associatedGateway :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe AssociatedGateway)+directConnectGatewayAssociationProposal_associatedGateway = Lens.lens (\DirectConnectGatewayAssociationProposal' {associatedGateway} -> associatedGateway) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {associatedGateway = a} :: DirectConnectGatewayAssociationProposal)++-- | The ID of the Direct Connect gateway.+directConnectGatewayAssociationProposal_directConnectGatewayId :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociationProposal_directConnectGatewayId = Lens.lens (\DirectConnectGatewayAssociationProposal' {directConnectGatewayId} -> directConnectGatewayId) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {directConnectGatewayId = a} :: DirectConnectGatewayAssociationProposal)++-- | The ID of the Amazon Web Services account that owns the Direct Connect+-- gateway.+directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociationProposal_directConnectGatewayOwnerAccount = Lens.lens (\DirectConnectGatewayAssociationProposal' {directConnectGatewayOwnerAccount} -> directConnectGatewayOwnerAccount) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {directConnectGatewayOwnerAccount = a} :: DirectConnectGatewayAssociationProposal)++-- | The existing Amazon VPC prefixes advertised to the Direct Connect+-- gateway.+directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe [RouteFilterPrefix])+directConnectGatewayAssociationProposal_existingAllowedPrefixesToDirectConnectGateway = Lens.lens (\DirectConnectGatewayAssociationProposal' {existingAllowedPrefixesToDirectConnectGateway} -> existingAllowedPrefixesToDirectConnectGateway) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {existingAllowedPrefixesToDirectConnectGateway = a} :: DirectConnectGatewayAssociationProposal) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the association proposal.+directConnectGatewayAssociationProposal_proposalId :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe Prelude.Text)+directConnectGatewayAssociationProposal_proposalId = Lens.lens (\DirectConnectGatewayAssociationProposal' {proposalId} -> proposalId) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {proposalId = a} :: DirectConnectGatewayAssociationProposal)++-- | The state of the proposal. The following are possible values:+--+-- -   @accepted@: The proposal has been accepted. The Direct Connect+--     gateway association is available to use in this state.+--+-- -   @deleted@: The proposal has been deleted by the owner that made the+--     proposal. The Direct Connect gateway association cannot be used in+--     this state.+--+-- -   @requested@: The proposal has been requested. The Direct Connect+--     gateway association cannot be used in this state.+directConnectGatewayAssociationProposal_proposalState :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe DirectConnectGatewayAssociationProposalState)+directConnectGatewayAssociationProposal_proposalState = Lens.lens (\DirectConnectGatewayAssociationProposal' {proposalState} -> proposalState) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {proposalState = a} :: DirectConnectGatewayAssociationProposal)++-- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway :: Lens.Lens' DirectConnectGatewayAssociationProposal (Prelude.Maybe [RouteFilterPrefix])+directConnectGatewayAssociationProposal_requestedAllowedPrefixesToDirectConnectGateway = Lens.lens (\DirectConnectGatewayAssociationProposal' {requestedAllowedPrefixesToDirectConnectGateway} -> requestedAllowedPrefixesToDirectConnectGateway) (\s@DirectConnectGatewayAssociationProposal' {} a -> s {requestedAllowedPrefixesToDirectConnectGateway = a} :: DirectConnectGatewayAssociationProposal) Prelude.. Lens.mapping Lens.coerced++instance+  Data.FromJSON+    DirectConnectGatewayAssociationProposal+  where+  parseJSON =+    Data.withObject+      "DirectConnectGatewayAssociationProposal"+      ( \x ->+          DirectConnectGatewayAssociationProposal'+            Prelude.<$> (x Data..:? "associatedGateway")+            Prelude.<*> (x Data..:? "directConnectGatewayId")+            Prelude.<*> (x Data..:? "directConnectGatewayOwnerAccount")+            Prelude.<*> ( x+                            Data..:? "existingAllowedPrefixesToDirectConnectGateway"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> (x Data..:? "proposalId")+            Prelude.<*> (x Data..:? "proposalState")+            Prelude.<*> ( x+                            Data..:? "requestedAllowedPrefixesToDirectConnectGateway"+                            Data..!= Prelude.mempty+                        )+      )++instance+  Prelude.Hashable+    DirectConnectGatewayAssociationProposal+  where+  hashWithSalt+    _salt+    DirectConnectGatewayAssociationProposal' {..} =+      _salt+        `Prelude.hashWithSalt` associatedGateway+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` directConnectGatewayOwnerAccount+        `Prelude.hashWithSalt` existingAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` proposalId+        `Prelude.hashWithSalt` proposalState+        `Prelude.hashWithSalt` requestedAllowedPrefixesToDirectConnectGateway++instance+  Prelude.NFData+    DirectConnectGatewayAssociationProposal+  where+  rnf DirectConnectGatewayAssociationProposal' {..} =+    Prelude.rnf associatedGateway+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf directConnectGatewayOwnerAccount+      `Prelude.seq` Prelude.rnf+        existingAllowedPrefixesToDirectConnectGateway+      `Prelude.seq` Prelude.rnf proposalId+      `Prelude.seq` Prelude.rnf proposalState+      `Prelude.seq` Prelude.rnf+        requestedAllowedPrefixesToDirectConnectGateway
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAssociationProposalState.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationProposalState+  ( DirectConnectGatewayAssociationProposalState+      ( ..,+        DirectConnectGatewayAssociationProposalState_Accepted,+        DirectConnectGatewayAssociationProposalState_Deleted,+        DirectConnectGatewayAssociationProposalState_Requested+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype DirectConnectGatewayAssociationProposalState = DirectConnectGatewayAssociationProposalState'+  { fromDirectConnectGatewayAssociationProposalState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern DirectConnectGatewayAssociationProposalState_Accepted :: DirectConnectGatewayAssociationProposalState+pattern DirectConnectGatewayAssociationProposalState_Accepted = DirectConnectGatewayAssociationProposalState' "accepted"++pattern DirectConnectGatewayAssociationProposalState_Deleted :: DirectConnectGatewayAssociationProposalState+pattern DirectConnectGatewayAssociationProposalState_Deleted = DirectConnectGatewayAssociationProposalState' "deleted"++pattern DirectConnectGatewayAssociationProposalState_Requested :: DirectConnectGatewayAssociationProposalState+pattern DirectConnectGatewayAssociationProposalState_Requested = DirectConnectGatewayAssociationProposalState' "requested"++{-# COMPLETE+  DirectConnectGatewayAssociationProposalState_Accepted,+  DirectConnectGatewayAssociationProposalState_Deleted,+  DirectConnectGatewayAssociationProposalState_Requested,+  DirectConnectGatewayAssociationProposalState'+  #-}
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAssociationState.hs view
@@ -0,0 +1,86 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAssociationState+  ( DirectConnectGatewayAssociationState+      ( ..,+        DirectConnectGatewayAssociationState_Associated,+        DirectConnectGatewayAssociationState_Associating,+        DirectConnectGatewayAssociationState_Disassociated,+        DirectConnectGatewayAssociationState_Disassociating,+        DirectConnectGatewayAssociationState_Updating+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype DirectConnectGatewayAssociationState = DirectConnectGatewayAssociationState'+  { fromDirectConnectGatewayAssociationState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern DirectConnectGatewayAssociationState_Associated :: DirectConnectGatewayAssociationState+pattern DirectConnectGatewayAssociationState_Associated = DirectConnectGatewayAssociationState' "associated"++pattern DirectConnectGatewayAssociationState_Associating :: DirectConnectGatewayAssociationState+pattern DirectConnectGatewayAssociationState_Associating = DirectConnectGatewayAssociationState' "associating"++pattern DirectConnectGatewayAssociationState_Disassociated :: DirectConnectGatewayAssociationState+pattern DirectConnectGatewayAssociationState_Disassociated = DirectConnectGatewayAssociationState' "disassociated"++pattern DirectConnectGatewayAssociationState_Disassociating :: DirectConnectGatewayAssociationState+pattern DirectConnectGatewayAssociationState_Disassociating = DirectConnectGatewayAssociationState' "disassociating"++pattern DirectConnectGatewayAssociationState_Updating :: DirectConnectGatewayAssociationState+pattern DirectConnectGatewayAssociationState_Updating = DirectConnectGatewayAssociationState' "updating"++{-# COMPLETE+  DirectConnectGatewayAssociationState_Associated,+  DirectConnectGatewayAssociationState_Associating,+  DirectConnectGatewayAssociationState_Disassociated,+  DirectConnectGatewayAssociationState_Disassociating,+  DirectConnectGatewayAssociationState_Updating,+  DirectConnectGatewayAssociationState'+  #-}
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAttachment.hs view
@@ -0,0 +1,196 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAttachment where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState+import Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType+import qualified Amazonka.Prelude as Prelude++-- | Information about an attachment between a Direct Connect gateway and a+-- virtual interface.+--+-- /See:/ 'newDirectConnectGatewayAttachment' smart constructor.+data DirectConnectGatewayAttachment = DirectConnectGatewayAttachment'+  { -- | The state of the attachment. The following are the possible values:+    --+    -- -   @attaching@: The initial state after a virtual interface is created+    --     using the Direct Connect gateway.+    --+    -- -   @attached@: The Direct Connect gateway and virtual interface are+    --     attached and ready to pass traffic.+    --+    -- -   @detaching@: The initial state after calling DeleteVirtualInterface.+    --+    -- -   @detached@: The virtual interface is detached from the Direct+    --     Connect gateway. Traffic flow between the Direct Connect gateway and+    --     virtual interface is stopped.+    attachmentState :: Prelude.Maybe DirectConnectGatewayAttachmentState,+    -- | The type of attachment.+    attachmentType :: Prelude.Maybe DirectConnectGatewayAttachmentType,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The error message if the state of an object failed to advance.+    stateChangeError :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Amazon Web Services account that owns the virtual+    -- interface.+    virtualInterfaceOwnerAccount :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the virtual interface is located.+    virtualInterfaceRegion :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DirectConnectGatewayAttachment' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'attachmentState', 'directConnectGatewayAttachment_attachmentState' - The state of the attachment. The following are the possible values:+--+-- -   @attaching@: The initial state after a virtual interface is created+--     using the Direct Connect gateway.+--+-- -   @attached@: The Direct Connect gateway and virtual interface are+--     attached and ready to pass traffic.+--+-- -   @detaching@: The initial state after calling DeleteVirtualInterface.+--+-- -   @detached@: The virtual interface is detached from the Direct+--     Connect gateway. Traffic flow between the Direct Connect gateway and+--     virtual interface is stopped.+--+-- 'attachmentType', 'directConnectGatewayAttachment_attachmentType' - The type of attachment.+--+-- 'directConnectGatewayId', 'directConnectGatewayAttachment_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'stateChangeError', 'directConnectGatewayAttachment_stateChangeError' - The error message if the state of an object failed to advance.+--+-- 'virtualInterfaceId', 'directConnectGatewayAttachment_virtualInterfaceId' - The ID of the virtual interface.+--+-- 'virtualInterfaceOwnerAccount', 'directConnectGatewayAttachment_virtualInterfaceOwnerAccount' - The ID of the Amazon Web Services account that owns the virtual+-- interface.+--+-- 'virtualInterfaceRegion', 'directConnectGatewayAttachment_virtualInterfaceRegion' - The Amazon Web Services Region where the virtual interface is located.+newDirectConnectGatewayAttachment ::+  DirectConnectGatewayAttachment+newDirectConnectGatewayAttachment =+  DirectConnectGatewayAttachment'+    { attachmentState =+        Prelude.Nothing,+      attachmentType = Prelude.Nothing,+      directConnectGatewayId = Prelude.Nothing,+      stateChangeError = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing,+      virtualInterfaceOwnerAccount =+        Prelude.Nothing,+      virtualInterfaceRegion = Prelude.Nothing+    }++-- | The state of the attachment. The following are the possible values:+--+-- -   @attaching@: The initial state after a virtual interface is created+--     using the Direct Connect gateway.+--+-- -   @attached@: The Direct Connect gateway and virtual interface are+--     attached and ready to pass traffic.+--+-- -   @detaching@: The initial state after calling DeleteVirtualInterface.+--+-- -   @detached@: The virtual interface is detached from the Direct+--     Connect gateway. Traffic flow between the Direct Connect gateway and+--     virtual interface is stopped.+directConnectGatewayAttachment_attachmentState :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe DirectConnectGatewayAttachmentState)+directConnectGatewayAttachment_attachmentState = Lens.lens (\DirectConnectGatewayAttachment' {attachmentState} -> attachmentState) (\s@DirectConnectGatewayAttachment' {} a -> s {attachmentState = a} :: DirectConnectGatewayAttachment)++-- | The type of attachment.+directConnectGatewayAttachment_attachmentType :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe DirectConnectGatewayAttachmentType)+directConnectGatewayAttachment_attachmentType = Lens.lens (\DirectConnectGatewayAttachment' {attachmentType} -> attachmentType) (\s@DirectConnectGatewayAttachment' {} a -> s {attachmentType = a} :: DirectConnectGatewayAttachment)++-- | The ID of the Direct Connect gateway.+directConnectGatewayAttachment_directConnectGatewayId :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe Prelude.Text)+directConnectGatewayAttachment_directConnectGatewayId = Lens.lens (\DirectConnectGatewayAttachment' {directConnectGatewayId} -> directConnectGatewayId) (\s@DirectConnectGatewayAttachment' {} a -> s {directConnectGatewayId = a} :: DirectConnectGatewayAttachment)++-- | The error message if the state of an object failed to advance.+directConnectGatewayAttachment_stateChangeError :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe Prelude.Text)+directConnectGatewayAttachment_stateChangeError = Lens.lens (\DirectConnectGatewayAttachment' {stateChangeError} -> stateChangeError) (\s@DirectConnectGatewayAttachment' {} a -> s {stateChangeError = a} :: DirectConnectGatewayAttachment)++-- | The ID of the virtual interface.+directConnectGatewayAttachment_virtualInterfaceId :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe Prelude.Text)+directConnectGatewayAttachment_virtualInterfaceId = Lens.lens (\DirectConnectGatewayAttachment' {virtualInterfaceId} -> virtualInterfaceId) (\s@DirectConnectGatewayAttachment' {} a -> s {virtualInterfaceId = a} :: DirectConnectGatewayAttachment)++-- | The ID of the Amazon Web Services account that owns the virtual+-- interface.+directConnectGatewayAttachment_virtualInterfaceOwnerAccount :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe Prelude.Text)+directConnectGatewayAttachment_virtualInterfaceOwnerAccount = Lens.lens (\DirectConnectGatewayAttachment' {virtualInterfaceOwnerAccount} -> virtualInterfaceOwnerAccount) (\s@DirectConnectGatewayAttachment' {} a -> s {virtualInterfaceOwnerAccount = a} :: DirectConnectGatewayAttachment)++-- | The Amazon Web Services Region where the virtual interface is located.+directConnectGatewayAttachment_virtualInterfaceRegion :: Lens.Lens' DirectConnectGatewayAttachment (Prelude.Maybe Prelude.Text)+directConnectGatewayAttachment_virtualInterfaceRegion = Lens.lens (\DirectConnectGatewayAttachment' {virtualInterfaceRegion} -> virtualInterfaceRegion) (\s@DirectConnectGatewayAttachment' {} a -> s {virtualInterfaceRegion = a} :: DirectConnectGatewayAttachment)++instance Data.FromJSON DirectConnectGatewayAttachment where+  parseJSON =+    Data.withObject+      "DirectConnectGatewayAttachment"+      ( \x ->+          DirectConnectGatewayAttachment'+            Prelude.<$> (x Data..:? "attachmentState")+            Prelude.<*> (x Data..:? "attachmentType")+            Prelude.<*> (x Data..:? "directConnectGatewayId")+            Prelude.<*> (x Data..:? "stateChangeError")+            Prelude.<*> (x Data..:? "virtualInterfaceId")+            Prelude.<*> (x Data..:? "virtualInterfaceOwnerAccount")+            Prelude.<*> (x Data..:? "virtualInterfaceRegion")+      )++instance+  Prelude.Hashable+    DirectConnectGatewayAttachment+  where+  hashWithSalt+    _salt+    DirectConnectGatewayAttachment' {..} =+      _salt+        `Prelude.hashWithSalt` attachmentState+        `Prelude.hashWithSalt` attachmentType+        `Prelude.hashWithSalt` directConnectGatewayId+        `Prelude.hashWithSalt` stateChangeError+        `Prelude.hashWithSalt` virtualInterfaceId+        `Prelude.hashWithSalt` virtualInterfaceOwnerAccount+        `Prelude.hashWithSalt` virtualInterfaceRegion++instance+  Prelude.NFData+    DirectConnectGatewayAttachment+  where+  rnf DirectConnectGatewayAttachment' {..} =+    Prelude.rnf attachmentState+      `Prelude.seq` Prelude.rnf attachmentType+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf stateChangeError+      `Prelude.seq` Prelude.rnf virtualInterfaceId+      `Prelude.seq` Prelude.rnf virtualInterfaceOwnerAccount+      `Prelude.seq` Prelude.rnf virtualInterfaceRegion
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAttachmentState.hs view
@@ -0,0 +1,81 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentState+  ( DirectConnectGatewayAttachmentState+      ( ..,+        DirectConnectGatewayAttachmentState_Attached,+        DirectConnectGatewayAttachmentState_Attaching,+        DirectConnectGatewayAttachmentState_Detached,+        DirectConnectGatewayAttachmentState_Detaching+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype DirectConnectGatewayAttachmentState = DirectConnectGatewayAttachmentState'+  { fromDirectConnectGatewayAttachmentState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern DirectConnectGatewayAttachmentState_Attached :: DirectConnectGatewayAttachmentState+pattern DirectConnectGatewayAttachmentState_Attached = DirectConnectGatewayAttachmentState' "attached"++pattern DirectConnectGatewayAttachmentState_Attaching :: DirectConnectGatewayAttachmentState+pattern DirectConnectGatewayAttachmentState_Attaching = DirectConnectGatewayAttachmentState' "attaching"++pattern DirectConnectGatewayAttachmentState_Detached :: DirectConnectGatewayAttachmentState+pattern DirectConnectGatewayAttachmentState_Detached = DirectConnectGatewayAttachmentState' "detached"++pattern DirectConnectGatewayAttachmentState_Detaching :: DirectConnectGatewayAttachmentState+pattern DirectConnectGatewayAttachmentState_Detaching = DirectConnectGatewayAttachmentState' "detaching"++{-# COMPLETE+  DirectConnectGatewayAttachmentState_Attached,+  DirectConnectGatewayAttachmentState_Attaching,+  DirectConnectGatewayAttachmentState_Detached,+  DirectConnectGatewayAttachmentState_Detaching,+  DirectConnectGatewayAttachmentState'+  #-}
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayAttachmentType.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayAttachmentType+  ( DirectConnectGatewayAttachmentType+      ( ..,+        DirectConnectGatewayAttachmentType_PrivateVirtualInterface,+        DirectConnectGatewayAttachmentType_TransitVirtualInterface+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype DirectConnectGatewayAttachmentType = DirectConnectGatewayAttachmentType'+  { fromDirectConnectGatewayAttachmentType ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern DirectConnectGatewayAttachmentType_PrivateVirtualInterface :: DirectConnectGatewayAttachmentType+pattern DirectConnectGatewayAttachmentType_PrivateVirtualInterface = DirectConnectGatewayAttachmentType' "PrivateVirtualInterface"++pattern DirectConnectGatewayAttachmentType_TransitVirtualInterface :: DirectConnectGatewayAttachmentType+pattern DirectConnectGatewayAttachmentType_TransitVirtualInterface = DirectConnectGatewayAttachmentType' "TransitVirtualInterface"++{-# COMPLETE+  DirectConnectGatewayAttachmentType_PrivateVirtualInterface,+  DirectConnectGatewayAttachmentType_TransitVirtualInterface,+  DirectConnectGatewayAttachmentType'+  #-}
+ gen/Amazonka/DirectConnect/Types/DirectConnectGatewayState.hs view
@@ -0,0 +1,81 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.DirectConnectGatewayState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.DirectConnectGatewayState+  ( DirectConnectGatewayState+      ( ..,+        DirectConnectGatewayState_Available,+        DirectConnectGatewayState_Deleted,+        DirectConnectGatewayState_Deleting,+        DirectConnectGatewayState_Pending+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype DirectConnectGatewayState = DirectConnectGatewayState'+  { fromDirectConnectGatewayState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern DirectConnectGatewayState_Available :: DirectConnectGatewayState+pattern DirectConnectGatewayState_Available = DirectConnectGatewayState' "available"++pattern DirectConnectGatewayState_Deleted :: DirectConnectGatewayState+pattern DirectConnectGatewayState_Deleted = DirectConnectGatewayState' "deleted"++pattern DirectConnectGatewayState_Deleting :: DirectConnectGatewayState+pattern DirectConnectGatewayState_Deleting = DirectConnectGatewayState' "deleting"++pattern DirectConnectGatewayState_Pending :: DirectConnectGatewayState+pattern DirectConnectGatewayState_Pending = DirectConnectGatewayState' "pending"++{-# COMPLETE+  DirectConnectGatewayState_Available,+  DirectConnectGatewayState_Deleted,+  DirectConnectGatewayState_Deleting,+  DirectConnectGatewayState_Pending,+  DirectConnectGatewayState'+  #-}
+ gen/Amazonka/DirectConnect/Types/GatewayType.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.GatewayType+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.GatewayType+  ( GatewayType+      ( ..,+        GatewayType_TransitGateway,+        GatewayType_VirtualPrivateGateway+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype GatewayType = GatewayType'+  { fromGatewayType ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern GatewayType_TransitGateway :: GatewayType+pattern GatewayType_TransitGateway = GatewayType' "transitGateway"++pattern GatewayType_VirtualPrivateGateway :: GatewayType+pattern GatewayType_VirtualPrivateGateway = GatewayType' "virtualPrivateGateway"++{-# COMPLETE+  GatewayType_TransitGateway,+  GatewayType_VirtualPrivateGateway,+  GatewayType'+  #-}
+ gen/Amazonka/DirectConnect/Types/HasLogicalRedundancy.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.HasLogicalRedundancy+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.HasLogicalRedundancy+  ( HasLogicalRedundancy+      ( ..,+        HasLogicalRedundancy_No,+        HasLogicalRedundancy_Unknown,+        HasLogicalRedundancy_Yes+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype HasLogicalRedundancy = HasLogicalRedundancy'+  { fromHasLogicalRedundancy ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern HasLogicalRedundancy_No :: HasLogicalRedundancy+pattern HasLogicalRedundancy_No = HasLogicalRedundancy' "no"++pattern HasLogicalRedundancy_Unknown :: HasLogicalRedundancy+pattern HasLogicalRedundancy_Unknown = HasLogicalRedundancy' "unknown"++pattern HasLogicalRedundancy_Yes :: HasLogicalRedundancy+pattern HasLogicalRedundancy_Yes = HasLogicalRedundancy' "yes"++{-# COMPLETE+  HasLogicalRedundancy_No,+  HasLogicalRedundancy_Unknown,+  HasLogicalRedundancy_Yes,+  HasLogicalRedundancy'+  #-}
+ gen/Amazonka/DirectConnect/Types/Interconnect.hs view
@@ -0,0 +1,303 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Interconnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Interconnect where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.HasLogicalRedundancy+import Amazonka.DirectConnect.Types.InterconnectState+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about an interconnect.+--+-- /See:/ 'newInterconnect' smart constructor.+data Interconnect = Interconnect'+  { -- | The Direct Connect endpoint on which the physical connection terminates.+    awsDevice :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the physical connection.+    awsDeviceV2 :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the logical connection. This+    -- device might be different than the device that terminates the physical+    -- connection.+    awsLogicalDeviceId :: Prelude.Maybe Prelude.Text,+    -- | The bandwidth of the connection.+    bandwidth :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the interconnect supports a secondary BGP in the same+    -- address family (IPv4\/IPv6).+    hasLogicalRedundancy :: Prelude.Maybe HasLogicalRedundancy,+    -- | The ID of the interconnect.+    interconnectId :: Prelude.Maybe Prelude.Text,+    -- | The name of the interconnect.+    interconnectName :: Prelude.Maybe Prelude.Text,+    -- | The state of the interconnect. The following are the possible values:+    --+    -- -   @requested@: The initial state of an interconnect. The interconnect+    --     stays in the requested state until the Letter of Authorization (LOA)+    --     is sent to the customer.+    --+    -- -   @pending@: The interconnect is approved, and is being initialized.+    --+    -- -   @available@: The network link is up, and the interconnect is ready+    --     for use.+    --+    -- -   @down@: The network link is down.+    --+    -- -   @deleting@: The interconnect is being deleted.+    --+    -- -   @deleted@: The interconnect is deleted.+    --+    -- -   @unknown@: The state of the interconnect is not available.+    interconnectState :: Prelude.Maybe InterconnectState,+    -- | Indicates whether jumbo frames (9001 MTU) are supported.+    jumboFrameCapable :: Prelude.Maybe Prelude.Bool,+    -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text,+    -- | The time of the most recent call to DescribeLoa for this connection.+    loaIssueTime :: Prelude.Maybe Data.POSIX,+    -- | The location of the connection.+    location :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the interconnect.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the connection is located.+    region :: Prelude.Maybe Prelude.Text,+    -- | The tags associated with the interconnect.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag)+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Interconnect' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'awsDevice', 'interconnect_awsDevice' - The Direct Connect endpoint on which the physical connection terminates.+--+-- 'awsDeviceV2', 'interconnect_awsDeviceV2' - The Direct Connect endpoint that terminates the physical connection.+--+-- 'awsLogicalDeviceId', 'interconnect_awsLogicalDeviceId' - The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+--+-- 'bandwidth', 'interconnect_bandwidth' - The bandwidth of the connection.+--+-- 'hasLogicalRedundancy', 'interconnect_hasLogicalRedundancy' - Indicates whether the interconnect supports a secondary BGP in the same+-- address family (IPv4\/IPv6).+--+-- 'interconnectId', 'interconnect_interconnectId' - The ID of the interconnect.+--+-- 'interconnectName', 'interconnect_interconnectName' - The name of the interconnect.+--+-- 'interconnectState', 'interconnect_interconnectState' - The state of the interconnect. The following are the possible values:+--+-- -   @requested@: The initial state of an interconnect. The interconnect+--     stays in the requested state until the Letter of Authorization (LOA)+--     is sent to the customer.+--+-- -   @pending@: The interconnect is approved, and is being initialized.+--+-- -   @available@: The network link is up, and the interconnect is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The interconnect is being deleted.+--+-- -   @deleted@: The interconnect is deleted.+--+-- -   @unknown@: The state of the interconnect is not available.+--+-- 'jumboFrameCapable', 'interconnect_jumboFrameCapable' - Indicates whether jumbo frames (9001 MTU) are supported.+--+-- 'lagId', 'interconnect_lagId' - The ID of the LAG.+--+-- 'loaIssueTime', 'interconnect_loaIssueTime' - The time of the most recent call to DescribeLoa for this connection.+--+-- 'location', 'interconnect_location' - The location of the connection.+--+-- 'providerName', 'interconnect_providerName' - The name of the service provider associated with the interconnect.+--+-- 'region', 'interconnect_region' - The Amazon Web Services Region where the connection is located.+--+-- 'tags', 'interconnect_tags' - The tags associated with the interconnect.+newInterconnect ::+  Interconnect+newInterconnect =+  Interconnect'+    { awsDevice = Prelude.Nothing,+      awsDeviceV2 = Prelude.Nothing,+      awsLogicalDeviceId = Prelude.Nothing,+      bandwidth = Prelude.Nothing,+      hasLogicalRedundancy = Prelude.Nothing,+      interconnectId = Prelude.Nothing,+      interconnectName = Prelude.Nothing,+      interconnectState = Prelude.Nothing,+      jumboFrameCapable = Prelude.Nothing,+      lagId = Prelude.Nothing,+      loaIssueTime = Prelude.Nothing,+      location = Prelude.Nothing,+      providerName = Prelude.Nothing,+      region = Prelude.Nothing,+      tags = Prelude.Nothing+    }++-- | The Direct Connect endpoint on which the physical connection terminates.+interconnect_awsDevice :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_awsDevice = Lens.lens (\Interconnect' {awsDevice} -> awsDevice) (\s@Interconnect' {} a -> s {awsDevice = a} :: Interconnect)++-- | The Direct Connect endpoint that terminates the physical connection.+interconnect_awsDeviceV2 :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_awsDeviceV2 = Lens.lens (\Interconnect' {awsDeviceV2} -> awsDeviceV2) (\s@Interconnect' {} a -> s {awsDeviceV2 = a} :: Interconnect)++-- | The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+interconnect_awsLogicalDeviceId :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_awsLogicalDeviceId = Lens.lens (\Interconnect' {awsLogicalDeviceId} -> awsLogicalDeviceId) (\s@Interconnect' {} a -> s {awsLogicalDeviceId = a} :: Interconnect)++-- | The bandwidth of the connection.+interconnect_bandwidth :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_bandwidth = Lens.lens (\Interconnect' {bandwidth} -> bandwidth) (\s@Interconnect' {} a -> s {bandwidth = a} :: Interconnect)++-- | Indicates whether the interconnect supports a secondary BGP in the same+-- address family (IPv4\/IPv6).+interconnect_hasLogicalRedundancy :: Lens.Lens' Interconnect (Prelude.Maybe HasLogicalRedundancy)+interconnect_hasLogicalRedundancy = Lens.lens (\Interconnect' {hasLogicalRedundancy} -> hasLogicalRedundancy) (\s@Interconnect' {} a -> s {hasLogicalRedundancy = a} :: Interconnect)++-- | The ID of the interconnect.+interconnect_interconnectId :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_interconnectId = Lens.lens (\Interconnect' {interconnectId} -> interconnectId) (\s@Interconnect' {} a -> s {interconnectId = a} :: Interconnect)++-- | The name of the interconnect.+interconnect_interconnectName :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_interconnectName = Lens.lens (\Interconnect' {interconnectName} -> interconnectName) (\s@Interconnect' {} a -> s {interconnectName = a} :: Interconnect)++-- | The state of the interconnect. The following are the possible values:+--+-- -   @requested@: The initial state of an interconnect. The interconnect+--     stays in the requested state until the Letter of Authorization (LOA)+--     is sent to the customer.+--+-- -   @pending@: The interconnect is approved, and is being initialized.+--+-- -   @available@: The network link is up, and the interconnect is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The interconnect is being deleted.+--+-- -   @deleted@: The interconnect is deleted.+--+-- -   @unknown@: The state of the interconnect is not available.+interconnect_interconnectState :: Lens.Lens' Interconnect (Prelude.Maybe InterconnectState)+interconnect_interconnectState = Lens.lens (\Interconnect' {interconnectState} -> interconnectState) (\s@Interconnect' {} a -> s {interconnectState = a} :: Interconnect)++-- | Indicates whether jumbo frames (9001 MTU) are supported.+interconnect_jumboFrameCapable :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Bool)+interconnect_jumboFrameCapable = Lens.lens (\Interconnect' {jumboFrameCapable} -> jumboFrameCapable) (\s@Interconnect' {} a -> s {jumboFrameCapable = a} :: Interconnect)++-- | The ID of the LAG.+interconnect_lagId :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_lagId = Lens.lens (\Interconnect' {lagId} -> lagId) (\s@Interconnect' {} a -> s {lagId = a} :: Interconnect)++-- | The time of the most recent call to DescribeLoa for this connection.+interconnect_loaIssueTime :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.UTCTime)+interconnect_loaIssueTime = Lens.lens (\Interconnect' {loaIssueTime} -> loaIssueTime) (\s@Interconnect' {} a -> s {loaIssueTime = a} :: Interconnect) Prelude.. Lens.mapping Data._Time++-- | The location of the connection.+interconnect_location :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_location = Lens.lens (\Interconnect' {location} -> location) (\s@Interconnect' {} a -> s {location = a} :: Interconnect)++-- | The name of the service provider associated with the interconnect.+interconnect_providerName :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_providerName = Lens.lens (\Interconnect' {providerName} -> providerName) (\s@Interconnect' {} a -> s {providerName = a} :: Interconnect)++-- | The Amazon Web Services Region where the connection is located.+interconnect_region :: Lens.Lens' Interconnect (Prelude.Maybe Prelude.Text)+interconnect_region = Lens.lens (\Interconnect' {region} -> region) (\s@Interconnect' {} a -> s {region = a} :: Interconnect)++-- | The tags associated with the interconnect.+interconnect_tags :: Lens.Lens' Interconnect (Prelude.Maybe (Prelude.NonEmpty Tag))+interconnect_tags = Lens.lens (\Interconnect' {tags} -> tags) (\s@Interconnect' {} a -> s {tags = a} :: Interconnect) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON Interconnect where+  parseJSON =+    Data.withObject+      "Interconnect"+      ( \x ->+          Interconnect'+            Prelude.<$> (x Data..:? "awsDevice")+            Prelude.<*> (x Data..:? "awsDeviceV2")+            Prelude.<*> (x Data..:? "awsLogicalDeviceId")+            Prelude.<*> (x Data..:? "bandwidth")+            Prelude.<*> (x Data..:? "hasLogicalRedundancy")+            Prelude.<*> (x Data..:? "interconnectId")+            Prelude.<*> (x Data..:? "interconnectName")+            Prelude.<*> (x Data..:? "interconnectState")+            Prelude.<*> (x Data..:? "jumboFrameCapable")+            Prelude.<*> (x Data..:? "lagId")+            Prelude.<*> (x Data..:? "loaIssueTime")+            Prelude.<*> (x Data..:? "location")+            Prelude.<*> (x Data..:? "providerName")+            Prelude.<*> (x Data..:? "region")+            Prelude.<*> (x Data..:? "tags")+      )++instance Prelude.Hashable Interconnect where+  hashWithSalt _salt Interconnect' {..} =+    _salt+      `Prelude.hashWithSalt` awsDevice+      `Prelude.hashWithSalt` awsDeviceV2+      `Prelude.hashWithSalt` awsLogicalDeviceId+      `Prelude.hashWithSalt` bandwidth+      `Prelude.hashWithSalt` hasLogicalRedundancy+      `Prelude.hashWithSalt` interconnectId+      `Prelude.hashWithSalt` interconnectName+      `Prelude.hashWithSalt` interconnectState+      `Prelude.hashWithSalt` jumboFrameCapable+      `Prelude.hashWithSalt` lagId+      `Prelude.hashWithSalt` loaIssueTime+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` region+      `Prelude.hashWithSalt` tags++instance Prelude.NFData Interconnect where+  rnf Interconnect' {..} =+    Prelude.rnf awsDevice+      `Prelude.seq` Prelude.rnf awsDeviceV2+      `Prelude.seq` Prelude.rnf awsLogicalDeviceId+      `Prelude.seq` Prelude.rnf bandwidth+      `Prelude.seq` Prelude.rnf hasLogicalRedundancy+      `Prelude.seq` Prelude.rnf interconnectId+      `Prelude.seq` Prelude.rnf interconnectName+      `Prelude.seq` Prelude.rnf interconnectState+      `Prelude.seq` Prelude.rnf jumboFrameCapable+      `Prelude.seq` Prelude.rnf lagId+      `Prelude.seq` Prelude.rnf loaIssueTime+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf region+      `Prelude.seq` Prelude.rnf tags
+ gen/Amazonka/DirectConnect/Types/InterconnectState.hs view
@@ -0,0 +1,96 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.InterconnectState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.InterconnectState+  ( InterconnectState+      ( ..,+        InterconnectState_Available,+        InterconnectState_Deleted,+        InterconnectState_Deleting,+        InterconnectState_Down,+        InterconnectState_Pending,+        InterconnectState_Requested,+        InterconnectState_Unknown+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype InterconnectState = InterconnectState'+  { fromInterconnectState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern InterconnectState_Available :: InterconnectState+pattern InterconnectState_Available = InterconnectState' "available"++pattern InterconnectState_Deleted :: InterconnectState+pattern InterconnectState_Deleted = InterconnectState' "deleted"++pattern InterconnectState_Deleting :: InterconnectState+pattern InterconnectState_Deleting = InterconnectState' "deleting"++pattern InterconnectState_Down :: InterconnectState+pattern InterconnectState_Down = InterconnectState' "down"++pattern InterconnectState_Pending :: InterconnectState+pattern InterconnectState_Pending = InterconnectState' "pending"++pattern InterconnectState_Requested :: InterconnectState+pattern InterconnectState_Requested = InterconnectState' "requested"++pattern InterconnectState_Unknown :: InterconnectState+pattern InterconnectState_Unknown = InterconnectState' "unknown"++{-# COMPLETE+  InterconnectState_Available,+  InterconnectState_Deleted,+  InterconnectState_Deleting,+  InterconnectState_Down,+  InterconnectState_Pending,+  InterconnectState_Requested,+  InterconnectState_Unknown,+  InterconnectState'+  #-}
+ gen/Amazonka/DirectConnect/Types/Lag.hs view
@@ -0,0 +1,392 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Lag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Lag where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.Connection+import Amazonka.DirectConnect.Types.HasLogicalRedundancy+import Amazonka.DirectConnect.Types.LagState+import Amazonka.DirectConnect.Types.MacSecKey+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a link aggregation group (LAG).+--+-- /See:/ 'newLag' smart constructor.+data Lag = Lag'+  { -- | Indicates whether the LAG can host other connections.+    allowsHostedConnections :: Prelude.Maybe Prelude.Bool,+    -- | The Direct Connect endpoint that hosts the LAG.+    awsDevice :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that hosts the LAG.+    awsDeviceV2 :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the logical connection. This+    -- device might be different than the device that terminates the physical+    -- connection.+    awsLogicalDeviceId :: Prelude.Maybe Prelude.Text,+    -- | The connections bundled by the LAG.+    connections :: Prelude.Maybe [Connection],+    -- | The individual bandwidth of the physical connections bundled by the LAG.+    -- The possible values are 1Gbps and 10Gbps.+    connectionsBandwidth :: Prelude.Maybe Prelude.Text,+    -- | The LAG MAC Security (MACsec) encryption mode.+    --+    -- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+    encryptionMode :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the LAG supports a secondary BGP peer in the same+    -- address family (IPv4\/IPv6).+    hasLogicalRedundancy :: Prelude.Maybe HasLogicalRedundancy,+    -- | Indicates whether jumbo frames (9001 MTU) are supported.+    jumboFrameCapable :: Prelude.Maybe Prelude.Bool,+    -- | The ID of the LAG.+    lagId :: Prelude.Maybe Prelude.Text,+    -- | The name of the LAG.+    lagName :: Prelude.Maybe Prelude.Text,+    -- | The state of the LAG. The following are the possible values:+    --+    -- -   @requested@: The initial state of a LAG. The LAG stays in the+    --     requested state until the Letter of Authorization (LOA) is+    --     available.+    --+    -- -   @pending@: The LAG has been approved and is being initialized.+    --+    -- -   @available@: The network link is established and the LAG is ready+    --     for use.+    --+    -- -   @down@: The network link is down.+    --+    -- -   @deleting@: The LAG is being deleted.+    --+    -- -   @deleted@: The LAG is deleted.+    --+    -- -   @unknown@: The state of the LAG is not available.+    lagState :: Prelude.Maybe LagState,+    -- | The location of the LAG.+    location :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether the LAG supports MAC Security (MACsec).+    macSecCapable :: Prelude.Maybe Prelude.Bool,+    -- | The MAC Security (MACsec) security keys associated with the LAG.+    macSecKeys :: Prelude.Maybe [MacSecKey],+    -- | The minimum number of physical dedicated connections that must be+    -- operational for the LAG itself to be operational.+    minimumLinks :: Prelude.Maybe Prelude.Int,+    -- | The number of physical dedicated connections bundled by the LAG, up to a+    -- maximum of 10.+    numberOfConnections :: Prelude.Maybe Prelude.Int,+    -- | The ID of the Amazon Web Services account that owns the LAG.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The name of the service provider associated with the LAG.+    providerName :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the connection is located.+    region :: Prelude.Maybe Prelude.Text,+    -- | The tags associated with the LAG.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag)+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Lag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'allowsHostedConnections', 'lag_allowsHostedConnections' - Indicates whether the LAG can host other connections.+--+-- 'awsDevice', 'lag_awsDevice' - The Direct Connect endpoint that hosts the LAG.+--+-- 'awsDeviceV2', 'lag_awsDeviceV2' - The Direct Connect endpoint that hosts the LAG.+--+-- 'awsLogicalDeviceId', 'lag_awsLogicalDeviceId' - The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+--+-- 'connections', 'lag_connections' - The connections bundled by the LAG.+--+-- 'connectionsBandwidth', 'lag_connectionsBandwidth' - The individual bandwidth of the physical connections bundled by the LAG.+-- The possible values are 1Gbps and 10Gbps.+--+-- 'encryptionMode', 'lag_encryptionMode' - The LAG MAC Security (MACsec) encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+--+-- 'hasLogicalRedundancy', 'lag_hasLogicalRedundancy' - Indicates whether the LAG supports a secondary BGP peer in the same+-- address family (IPv4\/IPv6).+--+-- 'jumboFrameCapable', 'lag_jumboFrameCapable' - Indicates whether jumbo frames (9001 MTU) are supported.+--+-- 'lagId', 'lag_lagId' - The ID of the LAG.+--+-- 'lagName', 'lag_lagName' - The name of the LAG.+--+-- 'lagState', 'lag_lagState' - The state of the LAG. The following are the possible values:+--+-- -   @requested@: The initial state of a LAG. The LAG stays in the+--     requested state until the Letter of Authorization (LOA) is+--     available.+--+-- -   @pending@: The LAG has been approved and is being initialized.+--+-- -   @available@: The network link is established and the LAG is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The LAG is being deleted.+--+-- -   @deleted@: The LAG is deleted.+--+-- -   @unknown@: The state of the LAG is not available.+--+-- 'location', 'lag_location' - The location of the LAG.+--+-- 'macSecCapable', 'lag_macSecCapable' - Indicates whether the LAG supports MAC Security (MACsec).+--+-- 'macSecKeys', 'lag_macSecKeys' - The MAC Security (MACsec) security keys associated with the LAG.+--+-- 'minimumLinks', 'lag_minimumLinks' - The minimum number of physical dedicated connections that must be+-- operational for the LAG itself to be operational.+--+-- 'numberOfConnections', 'lag_numberOfConnections' - The number of physical dedicated connections bundled by the LAG, up to a+-- maximum of 10.+--+-- 'ownerAccount', 'lag_ownerAccount' - The ID of the Amazon Web Services account that owns the LAG.+--+-- 'providerName', 'lag_providerName' - The name of the service provider associated with the LAG.+--+-- 'region', 'lag_region' - The Amazon Web Services Region where the connection is located.+--+-- 'tags', 'lag_tags' - The tags associated with the LAG.+newLag ::+  Lag+newLag =+  Lag'+    { allowsHostedConnections = Prelude.Nothing,+      awsDevice = Prelude.Nothing,+      awsDeviceV2 = Prelude.Nothing,+      awsLogicalDeviceId = Prelude.Nothing,+      connections = Prelude.Nothing,+      connectionsBandwidth = Prelude.Nothing,+      encryptionMode = Prelude.Nothing,+      hasLogicalRedundancy = Prelude.Nothing,+      jumboFrameCapable = Prelude.Nothing,+      lagId = Prelude.Nothing,+      lagName = Prelude.Nothing,+      lagState = Prelude.Nothing,+      location = Prelude.Nothing,+      macSecCapable = Prelude.Nothing,+      macSecKeys = Prelude.Nothing,+      minimumLinks = Prelude.Nothing,+      numberOfConnections = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      providerName = Prelude.Nothing,+      region = Prelude.Nothing,+      tags = Prelude.Nothing+    }++-- | Indicates whether the LAG can host other connections.+lag_allowsHostedConnections :: Lens.Lens' Lag (Prelude.Maybe Prelude.Bool)+lag_allowsHostedConnections = Lens.lens (\Lag' {allowsHostedConnections} -> allowsHostedConnections) (\s@Lag' {} a -> s {allowsHostedConnections = a} :: Lag)++-- | The Direct Connect endpoint that hosts the LAG.+lag_awsDevice :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_awsDevice = Lens.lens (\Lag' {awsDevice} -> awsDevice) (\s@Lag' {} a -> s {awsDevice = a} :: Lag)++-- | The Direct Connect endpoint that hosts the LAG.+lag_awsDeviceV2 :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_awsDeviceV2 = Lens.lens (\Lag' {awsDeviceV2} -> awsDeviceV2) (\s@Lag' {} a -> s {awsDeviceV2 = a} :: Lag)++-- | The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+lag_awsLogicalDeviceId :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_awsLogicalDeviceId = Lens.lens (\Lag' {awsLogicalDeviceId} -> awsLogicalDeviceId) (\s@Lag' {} a -> s {awsLogicalDeviceId = a} :: Lag)++-- | The connections bundled by the LAG.+lag_connections :: Lens.Lens' Lag (Prelude.Maybe [Connection])+lag_connections = Lens.lens (\Lag' {connections} -> connections) (\s@Lag' {} a -> s {connections = a} :: Lag) Prelude.. Lens.mapping Lens.coerced++-- | The individual bandwidth of the physical connections bundled by the LAG.+-- The possible values are 1Gbps and 10Gbps.+lag_connectionsBandwidth :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_connectionsBandwidth = Lens.lens (\Lag' {connectionsBandwidth} -> connectionsBandwidth) (\s@Lag' {} a -> s {connectionsBandwidth = a} :: Lag)++-- | The LAG MAC Security (MACsec) encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+lag_encryptionMode :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_encryptionMode = Lens.lens (\Lag' {encryptionMode} -> encryptionMode) (\s@Lag' {} a -> s {encryptionMode = a} :: Lag)++-- | Indicates whether the LAG supports a secondary BGP peer in the same+-- address family (IPv4\/IPv6).+lag_hasLogicalRedundancy :: Lens.Lens' Lag (Prelude.Maybe HasLogicalRedundancy)+lag_hasLogicalRedundancy = Lens.lens (\Lag' {hasLogicalRedundancy} -> hasLogicalRedundancy) (\s@Lag' {} a -> s {hasLogicalRedundancy = a} :: Lag)++-- | Indicates whether jumbo frames (9001 MTU) are supported.+lag_jumboFrameCapable :: Lens.Lens' Lag (Prelude.Maybe Prelude.Bool)+lag_jumboFrameCapable = Lens.lens (\Lag' {jumboFrameCapable} -> jumboFrameCapable) (\s@Lag' {} a -> s {jumboFrameCapable = a} :: Lag)++-- | The ID of the LAG.+lag_lagId :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_lagId = Lens.lens (\Lag' {lagId} -> lagId) (\s@Lag' {} a -> s {lagId = a} :: Lag)++-- | The name of the LAG.+lag_lagName :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_lagName = Lens.lens (\Lag' {lagName} -> lagName) (\s@Lag' {} a -> s {lagName = a} :: Lag)++-- | The state of the LAG. The following are the possible values:+--+-- -   @requested@: The initial state of a LAG. The LAG stays in the+--     requested state until the Letter of Authorization (LOA) is+--     available.+--+-- -   @pending@: The LAG has been approved and is being initialized.+--+-- -   @available@: The network link is established and the LAG is ready+--     for use.+--+-- -   @down@: The network link is down.+--+-- -   @deleting@: The LAG is being deleted.+--+-- -   @deleted@: The LAG is deleted.+--+-- -   @unknown@: The state of the LAG is not available.+lag_lagState :: Lens.Lens' Lag (Prelude.Maybe LagState)+lag_lagState = Lens.lens (\Lag' {lagState} -> lagState) (\s@Lag' {} a -> s {lagState = a} :: Lag)++-- | The location of the LAG.+lag_location :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_location = Lens.lens (\Lag' {location} -> location) (\s@Lag' {} a -> s {location = a} :: Lag)++-- | Indicates whether the LAG supports MAC Security (MACsec).+lag_macSecCapable :: Lens.Lens' Lag (Prelude.Maybe Prelude.Bool)+lag_macSecCapable = Lens.lens (\Lag' {macSecCapable} -> macSecCapable) (\s@Lag' {} a -> s {macSecCapable = a} :: Lag)++-- | The MAC Security (MACsec) security keys associated with the LAG.+lag_macSecKeys :: Lens.Lens' Lag (Prelude.Maybe [MacSecKey])+lag_macSecKeys = Lens.lens (\Lag' {macSecKeys} -> macSecKeys) (\s@Lag' {} a -> s {macSecKeys = a} :: Lag) Prelude.. Lens.mapping Lens.coerced++-- | The minimum number of physical dedicated connections that must be+-- operational for the LAG itself to be operational.+lag_minimumLinks :: Lens.Lens' Lag (Prelude.Maybe Prelude.Int)+lag_minimumLinks = Lens.lens (\Lag' {minimumLinks} -> minimumLinks) (\s@Lag' {} a -> s {minimumLinks = a} :: Lag)++-- | The number of physical dedicated connections bundled by the LAG, up to a+-- maximum of 10.+lag_numberOfConnections :: Lens.Lens' Lag (Prelude.Maybe Prelude.Int)+lag_numberOfConnections = Lens.lens (\Lag' {numberOfConnections} -> numberOfConnections) (\s@Lag' {} a -> s {numberOfConnections = a} :: Lag)++-- | The ID of the Amazon Web Services account that owns the LAG.+lag_ownerAccount :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_ownerAccount = Lens.lens (\Lag' {ownerAccount} -> ownerAccount) (\s@Lag' {} a -> s {ownerAccount = a} :: Lag)++-- | The name of the service provider associated with the LAG.+lag_providerName :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_providerName = Lens.lens (\Lag' {providerName} -> providerName) (\s@Lag' {} a -> s {providerName = a} :: Lag)++-- | The Amazon Web Services Region where the connection is located.+lag_region :: Lens.Lens' Lag (Prelude.Maybe Prelude.Text)+lag_region = Lens.lens (\Lag' {region} -> region) (\s@Lag' {} a -> s {region = a} :: Lag)++-- | The tags associated with the LAG.+lag_tags :: Lens.Lens' Lag (Prelude.Maybe (Prelude.NonEmpty Tag))+lag_tags = Lens.lens (\Lag' {tags} -> tags) (\s@Lag' {} a -> s {tags = a} :: Lag) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON Lag where+  parseJSON =+    Data.withObject+      "Lag"+      ( \x ->+          Lag'+            Prelude.<$> (x Data..:? "allowsHostedConnections")+            Prelude.<*> (x Data..:? "awsDevice")+            Prelude.<*> (x Data..:? "awsDeviceV2")+            Prelude.<*> (x Data..:? "awsLogicalDeviceId")+            Prelude.<*> (x Data..:? "connections" Data..!= Prelude.mempty)+            Prelude.<*> (x Data..:? "connectionsBandwidth")+            Prelude.<*> (x Data..:? "encryptionMode")+            Prelude.<*> (x Data..:? "hasLogicalRedundancy")+            Prelude.<*> (x Data..:? "jumboFrameCapable")+            Prelude.<*> (x Data..:? "lagId")+            Prelude.<*> (x Data..:? "lagName")+            Prelude.<*> (x Data..:? "lagState")+            Prelude.<*> (x Data..:? "location")+            Prelude.<*> (x Data..:? "macSecCapable")+            Prelude.<*> (x Data..:? "macSecKeys" Data..!= Prelude.mempty)+            Prelude.<*> (x Data..:? "minimumLinks")+            Prelude.<*> (x Data..:? "numberOfConnections")+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "providerName")+            Prelude.<*> (x Data..:? "region")+            Prelude.<*> (x Data..:? "tags")+      )++instance Prelude.Hashable Lag where+  hashWithSalt _salt Lag' {..} =+    _salt+      `Prelude.hashWithSalt` allowsHostedConnections+      `Prelude.hashWithSalt` awsDevice+      `Prelude.hashWithSalt` awsDeviceV2+      `Prelude.hashWithSalt` awsLogicalDeviceId+      `Prelude.hashWithSalt` connections+      `Prelude.hashWithSalt` connectionsBandwidth+      `Prelude.hashWithSalt` encryptionMode+      `Prelude.hashWithSalt` hasLogicalRedundancy+      `Prelude.hashWithSalt` jumboFrameCapable+      `Prelude.hashWithSalt` lagId+      `Prelude.hashWithSalt` lagName+      `Prelude.hashWithSalt` lagState+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` macSecCapable+      `Prelude.hashWithSalt` macSecKeys+      `Prelude.hashWithSalt` minimumLinks+      `Prelude.hashWithSalt` numberOfConnections+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` providerName+      `Prelude.hashWithSalt` region+      `Prelude.hashWithSalt` tags++instance Prelude.NFData Lag where+  rnf Lag' {..} =+    Prelude.rnf allowsHostedConnections+      `Prelude.seq` Prelude.rnf awsDevice+      `Prelude.seq` Prelude.rnf awsDeviceV2+      `Prelude.seq` Prelude.rnf awsLogicalDeviceId+      `Prelude.seq` Prelude.rnf connections+      `Prelude.seq` Prelude.rnf connectionsBandwidth+      `Prelude.seq` Prelude.rnf encryptionMode+      `Prelude.seq` Prelude.rnf hasLogicalRedundancy+      `Prelude.seq` Prelude.rnf jumboFrameCapable+      `Prelude.seq` Prelude.rnf lagId+      `Prelude.seq` Prelude.rnf lagName+      `Prelude.seq` Prelude.rnf lagState+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf macSecCapable+      `Prelude.seq` Prelude.rnf macSecKeys+      `Prelude.seq` Prelude.rnf minimumLinks+      `Prelude.seq` Prelude.rnf numberOfConnections+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf providerName+      `Prelude.seq` Prelude.rnf region+      `Prelude.seq` Prelude.rnf tags
+ gen/Amazonka/DirectConnect/Types/LagState.hs view
@@ -0,0 +1,96 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.LagState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.LagState+  ( LagState+      ( ..,+        LagState_Available,+        LagState_Deleted,+        LagState_Deleting,+        LagState_Down,+        LagState_Pending,+        LagState_Requested,+        LagState_Unknown+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype LagState = LagState'+  { fromLagState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern LagState_Available :: LagState+pattern LagState_Available = LagState' "available"++pattern LagState_Deleted :: LagState+pattern LagState_Deleted = LagState' "deleted"++pattern LagState_Deleting :: LagState+pattern LagState_Deleting = LagState' "deleting"++pattern LagState_Down :: LagState+pattern LagState_Down = LagState' "down"++pattern LagState_Pending :: LagState+pattern LagState_Pending = LagState' "pending"++pattern LagState_Requested :: LagState+pattern LagState_Requested = LagState' "requested"++pattern LagState_Unknown :: LagState+pattern LagState_Unknown = LagState' "unknown"++{-# COMPLETE+  LagState_Available,+  LagState_Deleted,+  LagState_Deleting,+  LagState_Down,+  LagState_Pending,+  LagState_Requested,+  LagState_Unknown,+  LagState'+  #-}
+ gen/Amazonka/DirectConnect/Types/LoaContentType.hs view
@@ -0,0 +1,66 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.LoaContentType+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.LoaContentType+  ( LoaContentType+      ( ..,+        LoaContentType_Application_pdf+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype LoaContentType = LoaContentType'+  { fromLoaContentType ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern LoaContentType_Application_pdf :: LoaContentType+pattern LoaContentType_Application_pdf = LoaContentType' "application/pdf"++{-# COMPLETE+  LoaContentType_Application_pdf,+  LoaContentType'+  #-}
+ gen/Amazonka/DirectConnect/Types/Location.hs view
@@ -0,0 +1,145 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Location+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Location where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about an Direct Connect location.+--+-- /See:/ 'newLocation' smart constructor.+data Location = Location'+  { -- | The available MAC Security (MACsec) port speeds for the location.+    availableMacSecPortSpeeds :: Prelude.Maybe [Prelude.Text],+    -- | The available port speeds for the location.+    availablePortSpeeds :: Prelude.Maybe [Prelude.Text],+    -- | The name of the service provider for the location.+    availableProviders :: Prelude.Maybe [Prelude.Text],+    -- | The code for the location.+    locationCode :: Prelude.Maybe Prelude.Text,+    -- | The name of the location. This includes the name of the colocation+    -- partner and the physical site of the building.+    locationName :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region for the location.+    region :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Location' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'availableMacSecPortSpeeds', 'location_availableMacSecPortSpeeds' - The available MAC Security (MACsec) port speeds for the location.+--+-- 'availablePortSpeeds', 'location_availablePortSpeeds' - The available port speeds for the location.+--+-- 'availableProviders', 'location_availableProviders' - The name of the service provider for the location.+--+-- 'locationCode', 'location_locationCode' - The code for the location.+--+-- 'locationName', 'location_locationName' - The name of the location. This includes the name of the colocation+-- partner and the physical site of the building.+--+-- 'region', 'location_region' - The Amazon Web Services Region for the location.+newLocation ::+  Location+newLocation =+  Location'+    { availableMacSecPortSpeeds =+        Prelude.Nothing,+      availablePortSpeeds = Prelude.Nothing,+      availableProviders = Prelude.Nothing,+      locationCode = Prelude.Nothing,+      locationName = Prelude.Nothing,+      region = Prelude.Nothing+    }++-- | The available MAC Security (MACsec) port speeds for the location.+location_availableMacSecPortSpeeds :: Lens.Lens' Location (Prelude.Maybe [Prelude.Text])+location_availableMacSecPortSpeeds = Lens.lens (\Location' {availableMacSecPortSpeeds} -> availableMacSecPortSpeeds) (\s@Location' {} a -> s {availableMacSecPortSpeeds = a} :: Location) Prelude.. Lens.mapping Lens.coerced++-- | The available port speeds for the location.+location_availablePortSpeeds :: Lens.Lens' Location (Prelude.Maybe [Prelude.Text])+location_availablePortSpeeds = Lens.lens (\Location' {availablePortSpeeds} -> availablePortSpeeds) (\s@Location' {} a -> s {availablePortSpeeds = a} :: Location) Prelude.. Lens.mapping Lens.coerced++-- | The name of the service provider for the location.+location_availableProviders :: Lens.Lens' Location (Prelude.Maybe [Prelude.Text])+location_availableProviders = Lens.lens (\Location' {availableProviders} -> availableProviders) (\s@Location' {} a -> s {availableProviders = a} :: Location) Prelude.. Lens.mapping Lens.coerced++-- | The code for the location.+location_locationCode :: Lens.Lens' Location (Prelude.Maybe Prelude.Text)+location_locationCode = Lens.lens (\Location' {locationCode} -> locationCode) (\s@Location' {} a -> s {locationCode = a} :: Location)++-- | The name of the location. This includes the name of the colocation+-- partner and the physical site of the building.+location_locationName :: Lens.Lens' Location (Prelude.Maybe Prelude.Text)+location_locationName = Lens.lens (\Location' {locationName} -> locationName) (\s@Location' {} a -> s {locationName = a} :: Location)++-- | The Amazon Web Services Region for the location.+location_region :: Lens.Lens' Location (Prelude.Maybe Prelude.Text)+location_region = Lens.lens (\Location' {region} -> region) (\s@Location' {} a -> s {region = a} :: Location)++instance Data.FromJSON Location where+  parseJSON =+    Data.withObject+      "Location"+      ( \x ->+          Location'+            Prelude.<$> ( x+                            Data..:? "availableMacSecPortSpeeds"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> ( x+                            Data..:? "availablePortSpeeds"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> ( x+                            Data..:? "availableProviders"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> (x Data..:? "locationCode")+            Prelude.<*> (x Data..:? "locationName")+            Prelude.<*> (x Data..:? "region")+      )++instance Prelude.Hashable Location where+  hashWithSalt _salt Location' {..} =+    _salt+      `Prelude.hashWithSalt` availableMacSecPortSpeeds+      `Prelude.hashWithSalt` availablePortSpeeds+      `Prelude.hashWithSalt` availableProviders+      `Prelude.hashWithSalt` locationCode+      `Prelude.hashWithSalt` locationName+      `Prelude.hashWithSalt` region++instance Prelude.NFData Location where+  rnf Location' {..} =+    Prelude.rnf availableMacSecPortSpeeds+      `Prelude.seq` Prelude.rnf availablePortSpeeds+      `Prelude.seq` Prelude.rnf availableProviders+      `Prelude.seq` Prelude.rnf locationCode+      `Prelude.seq` Prelude.rnf locationName+      `Prelude.seq` Prelude.rnf region
+ gen/Amazonka/DirectConnect/Types/MacSecKey.hs view
@@ -0,0 +1,153 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.MacSecKey+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.MacSecKey where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about the MAC Security (MACsec) secret key.+--+-- /See:/ 'newMacSecKey' smart constructor.+data MacSecKey = MacSecKey'+  { -- | The Connection Key Name (CKN) for the MAC Security secret key.+    ckn :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+    secretARN :: Prelude.Maybe Prelude.Text,+    -- | The date that the MAC Security (MACsec) secret key takes effect. The+    -- value is displayed in UTC format.+    startOn :: Prelude.Maybe Prelude.Text,+    -- | The state of the MAC Security (MACsec) secret key.+    --+    -- The possible values are:+    --+    -- -   @associating@: The MAC Security (MACsec) secret key is being+    --     validated and not yet associated with the connection or LAG.+    --+    -- -   @associated@: The MAC Security (MACsec) secret key is validated and+    --     associated with the connection or LAG.+    --+    -- -   @disassociating@: The MAC Security (MACsec) secret key is being+    --     disassociated from the connection or LAG+    --+    -- -   @disassociated@: The MAC Security (MACsec) secret key is no longer+    --     associated with the connection or LAG.+    state :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'MacSecKey' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'ckn', 'macSecKey_ckn' - The Connection Key Name (CKN) for the MAC Security secret key.+--+-- 'secretARN', 'macSecKey_secretARN' - The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+--+-- 'startOn', 'macSecKey_startOn' - The date that the MAC Security (MACsec) secret key takes effect. The+-- value is displayed in UTC format.+--+-- 'state', 'macSecKey_state' - The state of the MAC Security (MACsec) secret key.+--+-- The possible values are:+--+-- -   @associating@: The MAC Security (MACsec) secret key is being+--     validated and not yet associated with the connection or LAG.+--+-- -   @associated@: The MAC Security (MACsec) secret key is validated and+--     associated with the connection or LAG.+--+-- -   @disassociating@: The MAC Security (MACsec) secret key is being+--     disassociated from the connection or LAG+--+-- -   @disassociated@: The MAC Security (MACsec) secret key is no longer+--     associated with the connection or LAG.+newMacSecKey ::+  MacSecKey+newMacSecKey =+  MacSecKey'+    { ckn = Prelude.Nothing,+      secretARN = Prelude.Nothing,+      startOn = Prelude.Nothing,+      state = Prelude.Nothing+    }++-- | The Connection Key Name (CKN) for the MAC Security secret key.+macSecKey_ckn :: Lens.Lens' MacSecKey (Prelude.Maybe Prelude.Text)+macSecKey_ckn = Lens.lens (\MacSecKey' {ckn} -> ckn) (\s@MacSecKey' {} a -> s {ckn = a} :: MacSecKey)++-- | The Amazon Resource Name (ARN) of the MAC Security (MACsec) secret key.+macSecKey_secretARN :: Lens.Lens' MacSecKey (Prelude.Maybe Prelude.Text)+macSecKey_secretARN = Lens.lens (\MacSecKey' {secretARN} -> secretARN) (\s@MacSecKey' {} a -> s {secretARN = a} :: MacSecKey)++-- | The date that the MAC Security (MACsec) secret key takes effect. The+-- value is displayed in UTC format.+macSecKey_startOn :: Lens.Lens' MacSecKey (Prelude.Maybe Prelude.Text)+macSecKey_startOn = Lens.lens (\MacSecKey' {startOn} -> startOn) (\s@MacSecKey' {} a -> s {startOn = a} :: MacSecKey)++-- | The state of the MAC Security (MACsec) secret key.+--+-- The possible values are:+--+-- -   @associating@: The MAC Security (MACsec) secret key is being+--     validated and not yet associated with the connection or LAG.+--+-- -   @associated@: The MAC Security (MACsec) secret key is validated and+--     associated with the connection or LAG.+--+-- -   @disassociating@: The MAC Security (MACsec) secret key is being+--     disassociated from the connection or LAG+--+-- -   @disassociated@: The MAC Security (MACsec) secret key is no longer+--     associated with the connection or LAG.+macSecKey_state :: Lens.Lens' MacSecKey (Prelude.Maybe Prelude.Text)+macSecKey_state = Lens.lens (\MacSecKey' {state} -> state) (\s@MacSecKey' {} a -> s {state = a} :: MacSecKey)++instance Data.FromJSON MacSecKey where+  parseJSON =+    Data.withObject+      "MacSecKey"+      ( \x ->+          MacSecKey'+            Prelude.<$> (x Data..:? "ckn")+            Prelude.<*> (x Data..:? "secretARN")+            Prelude.<*> (x Data..:? "startOn")+            Prelude.<*> (x Data..:? "state")+      )++instance Prelude.Hashable MacSecKey where+  hashWithSalt _salt MacSecKey' {..} =+    _salt+      `Prelude.hashWithSalt` ckn+      `Prelude.hashWithSalt` secretARN+      `Prelude.hashWithSalt` startOn+      `Prelude.hashWithSalt` state++instance Prelude.NFData MacSecKey where+  rnf MacSecKey' {..} =+    Prelude.rnf ckn+      `Prelude.seq` Prelude.rnf secretARN+      `Prelude.seq` Prelude.rnf startOn+      `Prelude.seq` Prelude.rnf state
+ gen/Amazonka/DirectConnect/Types/NewBGPPeer.hs view
@@ -0,0 +1,127 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewBGPPeer+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewBGPPeer where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import qualified Amazonka.Prelude as Prelude++-- | Information about a new BGP peer.+--+-- /See:/ 'newNewBGPPeer' smart constructor.+data NewBGPPeer = NewBGPPeer'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewBGPPeer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newBGPPeer_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newBGPPeer_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'asn', 'newBGPPeer_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- 'authKey', 'newBGPPeer_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newBGPPeer_customerAddress' - The IP address assigned to the customer interface.+newNewBGPPeer ::+  NewBGPPeer+newNewBGPPeer =+  NewBGPPeer'+    { addressFamily = Prelude.Nothing,+      amazonAddress = Prelude.Nothing,+      asn = Prelude.Nothing,+      authKey = Prelude.Nothing,+      customerAddress = Prelude.Nothing+    }++-- | The address family for the BGP peer.+newBGPPeer_addressFamily :: Lens.Lens' NewBGPPeer (Prelude.Maybe AddressFamily)+newBGPPeer_addressFamily = Lens.lens (\NewBGPPeer' {addressFamily} -> addressFamily) (\s@NewBGPPeer' {} a -> s {addressFamily = a} :: NewBGPPeer)++-- | The IP address assigned to the Amazon interface.+newBGPPeer_amazonAddress :: Lens.Lens' NewBGPPeer (Prelude.Maybe Prelude.Text)+newBGPPeer_amazonAddress = Lens.lens (\NewBGPPeer' {amazonAddress} -> amazonAddress) (\s@NewBGPPeer' {} a -> s {amazonAddress = a} :: NewBGPPeer)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+newBGPPeer_asn :: Lens.Lens' NewBGPPeer (Prelude.Maybe Prelude.Int)+newBGPPeer_asn = Lens.lens (\NewBGPPeer' {asn} -> asn) (\s@NewBGPPeer' {} a -> s {asn = a} :: NewBGPPeer)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newBGPPeer_authKey :: Lens.Lens' NewBGPPeer (Prelude.Maybe Prelude.Text)+newBGPPeer_authKey = Lens.lens (\NewBGPPeer' {authKey} -> authKey) (\s@NewBGPPeer' {} a -> s {authKey = a} :: NewBGPPeer)++-- | The IP address assigned to the customer interface.+newBGPPeer_customerAddress :: Lens.Lens' NewBGPPeer (Prelude.Maybe Prelude.Text)+newBGPPeer_customerAddress = Lens.lens (\NewBGPPeer' {customerAddress} -> customerAddress) (\s@NewBGPPeer' {} a -> s {customerAddress = a} :: NewBGPPeer)++instance Prelude.Hashable NewBGPPeer where+  hashWithSalt _salt NewBGPPeer' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` asn+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` customerAddress++instance Prelude.NFData NewBGPPeer where+  rnf NewBGPPeer' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf asn+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress++instance Data.ToJSON NewBGPPeer where+  toJSON NewBGPPeer' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("asn" Data..=) Prelude.<$> asn,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewPrivateVirtualInterface.hs view
@@ -0,0 +1,243 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewPrivateVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewPrivateVirtualInterface where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a private virtual interface.+--+-- /See:/ 'newNewPrivateVirtualInterface' smart constructor.+data NewPrivateVirtualInterface = NewPrivateVirtualInterface'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether to enable or disable SiteLink.+    enableSiteLink :: Prelude.Maybe Prelude.Bool,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The tags associated with the private virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The ID of the virtual private gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Int,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewPrivateVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newPrivateVirtualInterface_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newPrivateVirtualInterface_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'authKey', 'newPrivateVirtualInterface_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newPrivateVirtualInterface_customerAddress' - The IP address assigned to the customer interface.+--+-- 'directConnectGatewayId', 'newPrivateVirtualInterface_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'enableSiteLink', 'newPrivateVirtualInterface_enableSiteLink' - Indicates whether to enable or disable SiteLink.+--+-- 'mtu', 'newPrivateVirtualInterface_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'tags', 'newPrivateVirtualInterface_tags' - The tags associated with the private virtual interface.+--+-- 'virtualGatewayId', 'newPrivateVirtualInterface_virtualGatewayId' - The ID of the virtual private gateway.+--+-- 'virtualInterfaceName', 'newPrivateVirtualInterface_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newPrivateVirtualInterface_vlan' - The ID of the VLAN.+--+-- 'asn', 'newPrivateVirtualInterface_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newNewPrivateVirtualInterface ::+  -- | 'virtualInterfaceName'+  Prelude.Text ->+  -- | 'vlan'+  Prelude.Int ->+  -- | 'asn'+  Prelude.Int ->+  NewPrivateVirtualInterface+newNewPrivateVirtualInterface+  pVirtualInterfaceName_+  pVlan_+  pAsn_ =+    NewPrivateVirtualInterface'+      { addressFamily =+          Prelude.Nothing,+        amazonAddress = Prelude.Nothing,+        authKey = Prelude.Nothing,+        customerAddress = Prelude.Nothing,+        directConnectGatewayId = Prelude.Nothing,+        enableSiteLink = Prelude.Nothing,+        mtu = Prelude.Nothing,+        tags = Prelude.Nothing,+        virtualGatewayId = Prelude.Nothing,+        virtualInterfaceName = pVirtualInterfaceName_,+        vlan = pVlan_,+        asn = pAsn_+      }++-- | The address family for the BGP peer.+newPrivateVirtualInterface_addressFamily :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe AddressFamily)+newPrivateVirtualInterface_addressFamily = Lens.lens (\NewPrivateVirtualInterface' {addressFamily} -> addressFamily) (\s@NewPrivateVirtualInterface' {} a -> s {addressFamily = a} :: NewPrivateVirtualInterface)++-- | The IP address assigned to the Amazon interface.+newPrivateVirtualInterface_amazonAddress :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterface_amazonAddress = Lens.lens (\NewPrivateVirtualInterface' {amazonAddress} -> amazonAddress) (\s@NewPrivateVirtualInterface' {} a -> s {amazonAddress = a} :: NewPrivateVirtualInterface)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newPrivateVirtualInterface_authKey :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterface_authKey = Lens.lens (\NewPrivateVirtualInterface' {authKey} -> authKey) (\s@NewPrivateVirtualInterface' {} a -> s {authKey = a} :: NewPrivateVirtualInterface)++-- | The IP address assigned to the customer interface.+newPrivateVirtualInterface_customerAddress :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterface_customerAddress = Lens.lens (\NewPrivateVirtualInterface' {customerAddress} -> customerAddress) (\s@NewPrivateVirtualInterface' {} a -> s {customerAddress = a} :: NewPrivateVirtualInterface)++-- | The ID of the Direct Connect gateway.+newPrivateVirtualInterface_directConnectGatewayId :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterface_directConnectGatewayId = Lens.lens (\NewPrivateVirtualInterface' {directConnectGatewayId} -> directConnectGatewayId) (\s@NewPrivateVirtualInterface' {} a -> s {directConnectGatewayId = a} :: NewPrivateVirtualInterface)++-- | Indicates whether to enable or disable SiteLink.+newPrivateVirtualInterface_enableSiteLink :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Bool)+newPrivateVirtualInterface_enableSiteLink = Lens.lens (\NewPrivateVirtualInterface' {enableSiteLink} -> enableSiteLink) (\s@NewPrivateVirtualInterface' {} a -> s {enableSiteLink = a} :: NewPrivateVirtualInterface)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+newPrivateVirtualInterface_mtu :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Int)+newPrivateVirtualInterface_mtu = Lens.lens (\NewPrivateVirtualInterface' {mtu} -> mtu) (\s@NewPrivateVirtualInterface' {} a -> s {mtu = a} :: NewPrivateVirtualInterface)++-- | The tags associated with the private virtual interface.+newPrivateVirtualInterface_tags :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe (Prelude.NonEmpty Tag))+newPrivateVirtualInterface_tags = Lens.lens (\NewPrivateVirtualInterface' {tags} -> tags) (\s@NewPrivateVirtualInterface' {} a -> s {tags = a} :: NewPrivateVirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the virtual private gateway.+newPrivateVirtualInterface_virtualGatewayId :: Lens.Lens' NewPrivateVirtualInterface (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterface_virtualGatewayId = Lens.lens (\NewPrivateVirtualInterface' {virtualGatewayId} -> virtualGatewayId) (\s@NewPrivateVirtualInterface' {} a -> s {virtualGatewayId = a} :: NewPrivateVirtualInterface)++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newPrivateVirtualInterface_virtualInterfaceName :: Lens.Lens' NewPrivateVirtualInterface Prelude.Text+newPrivateVirtualInterface_virtualInterfaceName = Lens.lens (\NewPrivateVirtualInterface' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewPrivateVirtualInterface' {} a -> s {virtualInterfaceName = a} :: NewPrivateVirtualInterface)++-- | The ID of the VLAN.+newPrivateVirtualInterface_vlan :: Lens.Lens' NewPrivateVirtualInterface Prelude.Int+newPrivateVirtualInterface_vlan = Lens.lens (\NewPrivateVirtualInterface' {vlan} -> vlan) (\s@NewPrivateVirtualInterface' {} a -> s {vlan = a} :: NewPrivateVirtualInterface)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newPrivateVirtualInterface_asn :: Lens.Lens' NewPrivateVirtualInterface Prelude.Int+newPrivateVirtualInterface_asn = Lens.lens (\NewPrivateVirtualInterface' {asn} -> asn) (\s@NewPrivateVirtualInterface' {} a -> s {asn = a} :: NewPrivateVirtualInterface)++instance Prelude.Hashable NewPrivateVirtualInterface where+  hashWithSalt _salt NewPrivateVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` customerAddress+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` enableSiteLink+      `Prelude.hashWithSalt` mtu+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` virtualGatewayId+      `Prelude.hashWithSalt` virtualInterfaceName+      `Prelude.hashWithSalt` vlan+      `Prelude.hashWithSalt` asn++instance Prelude.NFData NewPrivateVirtualInterface where+  rnf NewPrivateVirtualInterface' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf enableSiteLink+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan+      `Prelude.seq` Prelude.rnf asn++instance Data.ToJSON NewPrivateVirtualInterface where+  toJSON NewPrivateVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("enableSiteLink" Data..=)+              Prelude.<$> enableSiteLink,+            ("mtu" Data..=) Prelude.<$> mtu,+            ("tags" Data..=) Prelude.<$> tags,+            ("virtualGatewayId" Data..=)+              Prelude.<$> virtualGatewayId,+            Prelude.Just+              ( "virtualInterfaceName"+                  Data..= virtualInterfaceName+              ),+            Prelude.Just ("vlan" Data..= vlan),+            Prelude.Just ("asn" Data..= asn)+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewPrivateVirtualInterfaceAllocation.hs view
@@ -0,0 +1,217 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewPrivateVirtualInterfaceAllocation where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a private virtual interface to be provisioned on a+-- connection.+--+-- /See:/ 'newNewPrivateVirtualInterfaceAllocation' smart constructor.+data NewPrivateVirtualInterfaceAllocation = NewPrivateVirtualInterfaceAllocation'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The tags associated with the private virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Int,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewPrivateVirtualInterfaceAllocation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newPrivateVirtualInterfaceAllocation_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newPrivateVirtualInterfaceAllocation_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'authKey', 'newPrivateVirtualInterfaceAllocation_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newPrivateVirtualInterfaceAllocation_customerAddress' - The IP address assigned to the customer interface.+--+-- 'mtu', 'newPrivateVirtualInterfaceAllocation_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'tags', 'newPrivateVirtualInterfaceAllocation_tags' - The tags associated with the private virtual interface.+--+-- 'virtualInterfaceName', 'newPrivateVirtualInterfaceAllocation_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newPrivateVirtualInterfaceAllocation_vlan' - The ID of the VLAN.+--+-- 'asn', 'newPrivateVirtualInterfaceAllocation_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newNewPrivateVirtualInterfaceAllocation ::+  -- | 'virtualInterfaceName'+  Prelude.Text ->+  -- | 'vlan'+  Prelude.Int ->+  -- | 'asn'+  Prelude.Int ->+  NewPrivateVirtualInterfaceAllocation+newNewPrivateVirtualInterfaceAllocation+  pVirtualInterfaceName_+  pVlan_+  pAsn_ =+    NewPrivateVirtualInterfaceAllocation'+      { addressFamily =+          Prelude.Nothing,+        amazonAddress = Prelude.Nothing,+        authKey = Prelude.Nothing,+        customerAddress = Prelude.Nothing,+        mtu = Prelude.Nothing,+        tags = Prelude.Nothing,+        virtualInterfaceName =+          pVirtualInterfaceName_,+        vlan = pVlan_,+        asn = pAsn_+      }++-- | The address family for the BGP peer.+newPrivateVirtualInterfaceAllocation_addressFamily :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe AddressFamily)+newPrivateVirtualInterfaceAllocation_addressFamily = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {addressFamily} -> addressFamily) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {addressFamily = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The IP address assigned to the Amazon interface.+newPrivateVirtualInterfaceAllocation_amazonAddress :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterfaceAllocation_amazonAddress = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {amazonAddress} -> amazonAddress) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {amazonAddress = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newPrivateVirtualInterfaceAllocation_authKey :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterfaceAllocation_authKey = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {authKey} -> authKey) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {authKey = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The IP address assigned to the customer interface.+newPrivateVirtualInterfaceAllocation_customerAddress :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPrivateVirtualInterfaceAllocation_customerAddress = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {customerAddress} -> customerAddress) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {customerAddress = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+newPrivateVirtualInterfaceAllocation_mtu :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe Prelude.Int)+newPrivateVirtualInterfaceAllocation_mtu = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {mtu} -> mtu) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {mtu = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The tags associated with the private virtual interface.+newPrivateVirtualInterfaceAllocation_tags :: Lens.Lens' NewPrivateVirtualInterfaceAllocation (Prelude.Maybe (Prelude.NonEmpty Tag))+newPrivateVirtualInterfaceAllocation_tags = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {tags} -> tags) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {tags = a} :: NewPrivateVirtualInterfaceAllocation) Prelude.. Lens.mapping Lens.coerced++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newPrivateVirtualInterfaceAllocation_virtualInterfaceName :: Lens.Lens' NewPrivateVirtualInterfaceAllocation Prelude.Text+newPrivateVirtualInterfaceAllocation_virtualInterfaceName = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {virtualInterfaceName = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The ID of the VLAN.+newPrivateVirtualInterfaceAllocation_vlan :: Lens.Lens' NewPrivateVirtualInterfaceAllocation Prelude.Int+newPrivateVirtualInterfaceAllocation_vlan = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {vlan} -> vlan) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {vlan = a} :: NewPrivateVirtualInterfaceAllocation)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newPrivateVirtualInterfaceAllocation_asn :: Lens.Lens' NewPrivateVirtualInterfaceAllocation Prelude.Int+newPrivateVirtualInterfaceAllocation_asn = Lens.lens (\NewPrivateVirtualInterfaceAllocation' {asn} -> asn) (\s@NewPrivateVirtualInterfaceAllocation' {} a -> s {asn = a} :: NewPrivateVirtualInterfaceAllocation)++instance+  Prelude.Hashable+    NewPrivateVirtualInterfaceAllocation+  where+  hashWithSalt+    _salt+    NewPrivateVirtualInterfaceAllocation' {..} =+      _salt+        `Prelude.hashWithSalt` addressFamily+        `Prelude.hashWithSalt` amazonAddress+        `Prelude.hashWithSalt` authKey+        `Prelude.hashWithSalt` customerAddress+        `Prelude.hashWithSalt` mtu+        `Prelude.hashWithSalt` tags+        `Prelude.hashWithSalt` virtualInterfaceName+        `Prelude.hashWithSalt` vlan+        `Prelude.hashWithSalt` asn++instance+  Prelude.NFData+    NewPrivateVirtualInterfaceAllocation+  where+  rnf NewPrivateVirtualInterfaceAllocation' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan+      `Prelude.seq` Prelude.rnf asn++instance+  Data.ToJSON+    NewPrivateVirtualInterfaceAllocation+  where+  toJSON NewPrivateVirtualInterfaceAllocation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("mtu" Data..=) Prelude.<$> mtu,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just+              ( "virtualInterfaceName"+                  Data..= virtualInterfaceName+              ),+            Prelude.Just ("vlan" Data..= vlan),+            Prelude.Just ("asn" Data..= asn)+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewPublicVirtualInterface.hs view
@@ -0,0 +1,206 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewPublicVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewPublicVirtualInterface where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a public virtual interface.+--+-- /See:/ 'newNewPublicVirtualInterface' smart constructor.+data NewPublicVirtualInterface = NewPublicVirtualInterface'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The routes to be advertised to the Amazon Web Services network in this+    -- Region. Applies to public virtual interfaces.+    routeFilterPrefixes :: Prelude.Maybe [RouteFilterPrefix],+    -- | The tags associated with the public virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Int,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewPublicVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newPublicVirtualInterface_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newPublicVirtualInterface_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'authKey', 'newPublicVirtualInterface_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newPublicVirtualInterface_customerAddress' - The IP address assigned to the customer interface.+--+-- 'routeFilterPrefixes', 'newPublicVirtualInterface_routeFilterPrefixes' - The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+--+-- 'tags', 'newPublicVirtualInterface_tags' - The tags associated with the public virtual interface.+--+-- 'virtualInterfaceName', 'newPublicVirtualInterface_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newPublicVirtualInterface_vlan' - The ID of the VLAN.+--+-- 'asn', 'newPublicVirtualInterface_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newNewPublicVirtualInterface ::+  -- | 'virtualInterfaceName'+  Prelude.Text ->+  -- | 'vlan'+  Prelude.Int ->+  -- | 'asn'+  Prelude.Int ->+  NewPublicVirtualInterface+newNewPublicVirtualInterface+  pVirtualInterfaceName_+  pVlan_+  pAsn_ =+    NewPublicVirtualInterface'+      { addressFamily =+          Prelude.Nothing,+        amazonAddress = Prelude.Nothing,+        authKey = Prelude.Nothing,+        customerAddress = Prelude.Nothing,+        routeFilterPrefixes = Prelude.Nothing,+        tags = Prelude.Nothing,+        virtualInterfaceName = pVirtualInterfaceName_,+        vlan = pVlan_,+        asn = pAsn_+      }++-- | The address family for the BGP peer.+newPublicVirtualInterface_addressFamily :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe AddressFamily)+newPublicVirtualInterface_addressFamily = Lens.lens (\NewPublicVirtualInterface' {addressFamily} -> addressFamily) (\s@NewPublicVirtualInterface' {} a -> s {addressFamily = a} :: NewPublicVirtualInterface)++-- | The IP address assigned to the Amazon interface.+newPublicVirtualInterface_amazonAddress :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe Prelude.Text)+newPublicVirtualInterface_amazonAddress = Lens.lens (\NewPublicVirtualInterface' {amazonAddress} -> amazonAddress) (\s@NewPublicVirtualInterface' {} a -> s {amazonAddress = a} :: NewPublicVirtualInterface)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newPublicVirtualInterface_authKey :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe Prelude.Text)+newPublicVirtualInterface_authKey = Lens.lens (\NewPublicVirtualInterface' {authKey} -> authKey) (\s@NewPublicVirtualInterface' {} a -> s {authKey = a} :: NewPublicVirtualInterface)++-- | The IP address assigned to the customer interface.+newPublicVirtualInterface_customerAddress :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe Prelude.Text)+newPublicVirtualInterface_customerAddress = Lens.lens (\NewPublicVirtualInterface' {customerAddress} -> customerAddress) (\s@NewPublicVirtualInterface' {} a -> s {customerAddress = a} :: NewPublicVirtualInterface)++-- | The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+newPublicVirtualInterface_routeFilterPrefixes :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe [RouteFilterPrefix])+newPublicVirtualInterface_routeFilterPrefixes = Lens.lens (\NewPublicVirtualInterface' {routeFilterPrefixes} -> routeFilterPrefixes) (\s@NewPublicVirtualInterface' {} a -> s {routeFilterPrefixes = a} :: NewPublicVirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The tags associated with the public virtual interface.+newPublicVirtualInterface_tags :: Lens.Lens' NewPublicVirtualInterface (Prelude.Maybe (Prelude.NonEmpty Tag))+newPublicVirtualInterface_tags = Lens.lens (\NewPublicVirtualInterface' {tags} -> tags) (\s@NewPublicVirtualInterface' {} a -> s {tags = a} :: NewPublicVirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newPublicVirtualInterface_virtualInterfaceName :: Lens.Lens' NewPublicVirtualInterface Prelude.Text+newPublicVirtualInterface_virtualInterfaceName = Lens.lens (\NewPublicVirtualInterface' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewPublicVirtualInterface' {} a -> s {virtualInterfaceName = a} :: NewPublicVirtualInterface)++-- | The ID of the VLAN.+newPublicVirtualInterface_vlan :: Lens.Lens' NewPublicVirtualInterface Prelude.Int+newPublicVirtualInterface_vlan = Lens.lens (\NewPublicVirtualInterface' {vlan} -> vlan) (\s@NewPublicVirtualInterface' {} a -> s {vlan = a} :: NewPublicVirtualInterface)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newPublicVirtualInterface_asn :: Lens.Lens' NewPublicVirtualInterface Prelude.Int+newPublicVirtualInterface_asn = Lens.lens (\NewPublicVirtualInterface' {asn} -> asn) (\s@NewPublicVirtualInterface' {} a -> s {asn = a} :: NewPublicVirtualInterface)++instance Prelude.Hashable NewPublicVirtualInterface where+  hashWithSalt _salt NewPublicVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` customerAddress+      `Prelude.hashWithSalt` routeFilterPrefixes+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` virtualInterfaceName+      `Prelude.hashWithSalt` vlan+      `Prelude.hashWithSalt` asn++instance Prelude.NFData NewPublicVirtualInterface where+  rnf NewPublicVirtualInterface' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf routeFilterPrefixes+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan+      `Prelude.seq` Prelude.rnf asn++instance Data.ToJSON NewPublicVirtualInterface where+  toJSON NewPublicVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("routeFilterPrefixes" Data..=)+              Prelude.<$> routeFilterPrefixes,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just+              ( "virtualInterfaceName"+                  Data..= virtualInterfaceName+              ),+            Prelude.Just ("vlan" Data..= vlan),+            Prelude.Just ("asn" Data..= asn)+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewPublicVirtualInterfaceAllocation.hs view
@@ -0,0 +1,219 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewPublicVirtualInterfaceAllocation where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a public virtual interface to be provisioned on a+-- connection.+--+-- /See:/ 'newNewPublicVirtualInterfaceAllocation' smart constructor.+data NewPublicVirtualInterfaceAllocation = NewPublicVirtualInterfaceAllocation'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The routes to be advertised to the Amazon Web Services network in this+    -- Region. Applies to public virtual interfaces.+    routeFilterPrefixes :: Prelude.Maybe [RouteFilterPrefix],+    -- | The tags associated with the public virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Int,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewPublicVirtualInterfaceAllocation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newPublicVirtualInterfaceAllocation_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newPublicVirtualInterfaceAllocation_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'authKey', 'newPublicVirtualInterfaceAllocation_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newPublicVirtualInterfaceAllocation_customerAddress' - The IP address assigned to the customer interface.+--+-- 'routeFilterPrefixes', 'newPublicVirtualInterfaceAllocation_routeFilterPrefixes' - The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+--+-- 'tags', 'newPublicVirtualInterfaceAllocation_tags' - The tags associated with the public virtual interface.+--+-- 'virtualInterfaceName', 'newPublicVirtualInterfaceAllocation_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newPublicVirtualInterfaceAllocation_vlan' - The ID of the VLAN.+--+-- 'asn', 'newPublicVirtualInterfaceAllocation_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newNewPublicVirtualInterfaceAllocation ::+  -- | 'virtualInterfaceName'+  Prelude.Text ->+  -- | 'vlan'+  Prelude.Int ->+  -- | 'asn'+  Prelude.Int ->+  NewPublicVirtualInterfaceAllocation+newNewPublicVirtualInterfaceAllocation+  pVirtualInterfaceName_+  pVlan_+  pAsn_ =+    NewPublicVirtualInterfaceAllocation'+      { addressFamily =+          Prelude.Nothing,+        amazonAddress = Prelude.Nothing,+        authKey = Prelude.Nothing,+        customerAddress = Prelude.Nothing,+        routeFilterPrefixes = Prelude.Nothing,+        tags = Prelude.Nothing,+        virtualInterfaceName =+          pVirtualInterfaceName_,+        vlan = pVlan_,+        asn = pAsn_+      }++-- | The address family for the BGP peer.+newPublicVirtualInterfaceAllocation_addressFamily :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe AddressFamily)+newPublicVirtualInterfaceAllocation_addressFamily = Lens.lens (\NewPublicVirtualInterfaceAllocation' {addressFamily} -> addressFamily) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {addressFamily = a} :: NewPublicVirtualInterfaceAllocation)++-- | The IP address assigned to the Amazon interface.+newPublicVirtualInterfaceAllocation_amazonAddress :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPublicVirtualInterfaceAllocation_amazonAddress = Lens.lens (\NewPublicVirtualInterfaceAllocation' {amazonAddress} -> amazonAddress) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {amazonAddress = a} :: NewPublicVirtualInterfaceAllocation)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newPublicVirtualInterfaceAllocation_authKey :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPublicVirtualInterfaceAllocation_authKey = Lens.lens (\NewPublicVirtualInterfaceAllocation' {authKey} -> authKey) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {authKey = a} :: NewPublicVirtualInterfaceAllocation)++-- | The IP address assigned to the customer interface.+newPublicVirtualInterfaceAllocation_customerAddress :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newPublicVirtualInterfaceAllocation_customerAddress = Lens.lens (\NewPublicVirtualInterfaceAllocation' {customerAddress} -> customerAddress) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {customerAddress = a} :: NewPublicVirtualInterfaceAllocation)++-- | The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+newPublicVirtualInterfaceAllocation_routeFilterPrefixes :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe [RouteFilterPrefix])+newPublicVirtualInterfaceAllocation_routeFilterPrefixes = Lens.lens (\NewPublicVirtualInterfaceAllocation' {routeFilterPrefixes} -> routeFilterPrefixes) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {routeFilterPrefixes = a} :: NewPublicVirtualInterfaceAllocation) Prelude.. Lens.mapping Lens.coerced++-- | The tags associated with the public virtual interface.+newPublicVirtualInterfaceAllocation_tags :: Lens.Lens' NewPublicVirtualInterfaceAllocation (Prelude.Maybe (Prelude.NonEmpty Tag))+newPublicVirtualInterfaceAllocation_tags = Lens.lens (\NewPublicVirtualInterfaceAllocation' {tags} -> tags) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {tags = a} :: NewPublicVirtualInterfaceAllocation) Prelude.. Lens.mapping Lens.coerced++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newPublicVirtualInterfaceAllocation_virtualInterfaceName :: Lens.Lens' NewPublicVirtualInterfaceAllocation Prelude.Text+newPublicVirtualInterfaceAllocation_virtualInterfaceName = Lens.lens (\NewPublicVirtualInterfaceAllocation' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {virtualInterfaceName = a} :: NewPublicVirtualInterfaceAllocation)++-- | The ID of the VLAN.+newPublicVirtualInterfaceAllocation_vlan :: Lens.Lens' NewPublicVirtualInterfaceAllocation Prelude.Int+newPublicVirtualInterfaceAllocation_vlan = Lens.lens (\NewPublicVirtualInterfaceAllocation' {vlan} -> vlan) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {vlan = a} :: NewPublicVirtualInterfaceAllocation)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newPublicVirtualInterfaceAllocation_asn :: Lens.Lens' NewPublicVirtualInterfaceAllocation Prelude.Int+newPublicVirtualInterfaceAllocation_asn = Lens.lens (\NewPublicVirtualInterfaceAllocation' {asn} -> asn) (\s@NewPublicVirtualInterfaceAllocation' {} a -> s {asn = a} :: NewPublicVirtualInterfaceAllocation)++instance+  Prelude.Hashable+    NewPublicVirtualInterfaceAllocation+  where+  hashWithSalt+    _salt+    NewPublicVirtualInterfaceAllocation' {..} =+      _salt+        `Prelude.hashWithSalt` addressFamily+        `Prelude.hashWithSalt` amazonAddress+        `Prelude.hashWithSalt` authKey+        `Prelude.hashWithSalt` customerAddress+        `Prelude.hashWithSalt` routeFilterPrefixes+        `Prelude.hashWithSalt` tags+        `Prelude.hashWithSalt` virtualInterfaceName+        `Prelude.hashWithSalt` vlan+        `Prelude.hashWithSalt` asn++instance+  Prelude.NFData+    NewPublicVirtualInterfaceAllocation+  where+  rnf NewPublicVirtualInterfaceAllocation' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf routeFilterPrefixes+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan+      `Prelude.seq` Prelude.rnf asn++instance+  Data.ToJSON+    NewPublicVirtualInterfaceAllocation+  where+  toJSON NewPublicVirtualInterfaceAllocation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("routeFilterPrefixes" Data..=)+              Prelude.<$> routeFilterPrefixes,+            ("tags" Data..=) Prelude.<$> tags,+            Prelude.Just+              ( "virtualInterfaceName"+                  Data..= virtualInterfaceName+              ),+            Prelude.Just ("vlan" Data..= vlan),+            Prelude.Just ("asn" Data..= asn)+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewTransitVirtualInterface.hs view
@@ -0,0 +1,219 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewTransitVirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewTransitVirtualInterface where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a transit virtual interface.+--+-- /See:/ 'newNewTransitVirtualInterface' smart constructor.+data NewTransitVirtualInterface = NewTransitVirtualInterface'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether to enable or disable SiteLink.+    enableSiteLink :: Prelude.Maybe Prelude.Bool,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The tags associated with the transitive virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Maybe Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Maybe Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewTransitVirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newTransitVirtualInterface_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newTransitVirtualInterface_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'asn', 'newTransitVirtualInterface_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+--+-- 'authKey', 'newTransitVirtualInterface_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newTransitVirtualInterface_customerAddress' - The IP address assigned to the customer interface.+--+-- 'directConnectGatewayId', 'newTransitVirtualInterface_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'enableSiteLink', 'newTransitVirtualInterface_enableSiteLink' - Indicates whether to enable or disable SiteLink.+--+-- 'mtu', 'newTransitVirtualInterface_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'tags', 'newTransitVirtualInterface_tags' - The tags associated with the transitive virtual interface.+--+-- 'virtualInterfaceName', 'newTransitVirtualInterface_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newTransitVirtualInterface_vlan' - The ID of the VLAN.+newNewTransitVirtualInterface ::+  NewTransitVirtualInterface+newNewTransitVirtualInterface =+  NewTransitVirtualInterface'+    { addressFamily =+        Prelude.Nothing,+      amazonAddress = Prelude.Nothing,+      asn = Prelude.Nothing,+      authKey = Prelude.Nothing,+      customerAddress = Prelude.Nothing,+      directConnectGatewayId = Prelude.Nothing,+      enableSiteLink = Prelude.Nothing,+      mtu = Prelude.Nothing,+      tags = Prelude.Nothing,+      virtualInterfaceName = Prelude.Nothing,+      vlan = Prelude.Nothing+    }++-- | The address family for the BGP peer.+newTransitVirtualInterface_addressFamily :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe AddressFamily)+newTransitVirtualInterface_addressFamily = Lens.lens (\NewTransitVirtualInterface' {addressFamily} -> addressFamily) (\s@NewTransitVirtualInterface' {} a -> s {addressFamily = a} :: NewTransitVirtualInterface)++-- | The IP address assigned to the Amazon interface.+newTransitVirtualInterface_amazonAddress :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Text)+newTransitVirtualInterface_amazonAddress = Lens.lens (\NewTransitVirtualInterface' {amazonAddress} -> amazonAddress) (\s@NewTransitVirtualInterface' {} a -> s {amazonAddress = a} :: NewTransitVirtualInterface)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newTransitVirtualInterface_asn :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Int)+newTransitVirtualInterface_asn = Lens.lens (\NewTransitVirtualInterface' {asn} -> asn) (\s@NewTransitVirtualInterface' {} a -> s {asn = a} :: NewTransitVirtualInterface)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newTransitVirtualInterface_authKey :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Text)+newTransitVirtualInterface_authKey = Lens.lens (\NewTransitVirtualInterface' {authKey} -> authKey) (\s@NewTransitVirtualInterface' {} a -> s {authKey = a} :: NewTransitVirtualInterface)++-- | The IP address assigned to the customer interface.+newTransitVirtualInterface_customerAddress :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Text)+newTransitVirtualInterface_customerAddress = Lens.lens (\NewTransitVirtualInterface' {customerAddress} -> customerAddress) (\s@NewTransitVirtualInterface' {} a -> s {customerAddress = a} :: NewTransitVirtualInterface)++-- | The ID of the Direct Connect gateway.+newTransitVirtualInterface_directConnectGatewayId :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Text)+newTransitVirtualInterface_directConnectGatewayId = Lens.lens (\NewTransitVirtualInterface' {directConnectGatewayId} -> directConnectGatewayId) (\s@NewTransitVirtualInterface' {} a -> s {directConnectGatewayId = a} :: NewTransitVirtualInterface)++-- | Indicates whether to enable or disable SiteLink.+newTransitVirtualInterface_enableSiteLink :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Bool)+newTransitVirtualInterface_enableSiteLink = Lens.lens (\NewTransitVirtualInterface' {enableSiteLink} -> enableSiteLink) (\s@NewTransitVirtualInterface' {} a -> s {enableSiteLink = a} :: NewTransitVirtualInterface)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+newTransitVirtualInterface_mtu :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Int)+newTransitVirtualInterface_mtu = Lens.lens (\NewTransitVirtualInterface' {mtu} -> mtu) (\s@NewTransitVirtualInterface' {} a -> s {mtu = a} :: NewTransitVirtualInterface)++-- | The tags associated with the transitive virtual interface.+newTransitVirtualInterface_tags :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe (Prelude.NonEmpty Tag))+newTransitVirtualInterface_tags = Lens.lens (\NewTransitVirtualInterface' {tags} -> tags) (\s@NewTransitVirtualInterface' {} a -> s {tags = a} :: NewTransitVirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newTransitVirtualInterface_virtualInterfaceName :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Text)+newTransitVirtualInterface_virtualInterfaceName = Lens.lens (\NewTransitVirtualInterface' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewTransitVirtualInterface' {} a -> s {virtualInterfaceName = a} :: NewTransitVirtualInterface)++-- | The ID of the VLAN.+newTransitVirtualInterface_vlan :: Lens.Lens' NewTransitVirtualInterface (Prelude.Maybe Prelude.Int)+newTransitVirtualInterface_vlan = Lens.lens (\NewTransitVirtualInterface' {vlan} -> vlan) (\s@NewTransitVirtualInterface' {} a -> s {vlan = a} :: NewTransitVirtualInterface)++instance Prelude.Hashable NewTransitVirtualInterface where+  hashWithSalt _salt NewTransitVirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` asn+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` customerAddress+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` enableSiteLink+      `Prelude.hashWithSalt` mtu+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` virtualInterfaceName+      `Prelude.hashWithSalt` vlan++instance Prelude.NFData NewTransitVirtualInterface where+  rnf NewTransitVirtualInterface' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf asn+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf enableSiteLink+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan++instance Data.ToJSON NewTransitVirtualInterface where+  toJSON NewTransitVirtualInterface' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("asn" Data..=) Prelude.<$> asn,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("directConnectGatewayId" Data..=)+              Prelude.<$> directConnectGatewayId,+            ("enableSiteLink" Data..=)+              Prelude.<$> enableSiteLink,+            ("mtu" Data..=) Prelude.<$> mtu,+            ("tags" Data..=) Prelude.<$> tags,+            ("virtualInterfaceName" Data..=)+              Prelude.<$> virtualInterfaceName,+            ("vlan" Data..=) Prelude.<$> vlan+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NewTransitVirtualInterfaceAllocation.hs view
@@ -0,0 +1,206 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NewTransitVirtualInterfaceAllocation where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a transit virtual interface to be provisioned on a+-- connection.+--+-- /See:/ 'newNewTransitVirtualInterfaceAllocation' smart constructor.+data NewTransitVirtualInterfaceAllocation = NewTransitVirtualInterfaceAllocation'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The tags associated with the transitive virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Maybe Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Maybe Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NewTransitVirtualInterfaceAllocation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'newTransitVirtualInterfaceAllocation_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'newTransitVirtualInterfaceAllocation_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'asn', 'newTransitVirtualInterfaceAllocation_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+--+-- 'authKey', 'newTransitVirtualInterfaceAllocation_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'customerAddress', 'newTransitVirtualInterfaceAllocation_customerAddress' - The IP address assigned to the customer interface.+--+-- 'mtu', 'newTransitVirtualInterfaceAllocation_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'tags', 'newTransitVirtualInterfaceAllocation_tags' - The tags associated with the transitive virtual interface.+--+-- 'virtualInterfaceName', 'newTransitVirtualInterfaceAllocation_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'vlan', 'newTransitVirtualInterfaceAllocation_vlan' - The ID of the VLAN.+newNewTransitVirtualInterfaceAllocation ::+  NewTransitVirtualInterfaceAllocation+newNewTransitVirtualInterfaceAllocation =+  NewTransitVirtualInterfaceAllocation'+    { addressFamily =+        Prelude.Nothing,+      amazonAddress = Prelude.Nothing,+      asn = Prelude.Nothing,+      authKey = Prelude.Nothing,+      customerAddress = Prelude.Nothing,+      mtu = Prelude.Nothing,+      tags = Prelude.Nothing,+      virtualInterfaceName =+        Prelude.Nothing,+      vlan = Prelude.Nothing+    }++-- | The address family for the BGP peer.+newTransitVirtualInterfaceAllocation_addressFamily :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe AddressFamily)+newTransitVirtualInterfaceAllocation_addressFamily = Lens.lens (\NewTransitVirtualInterfaceAllocation' {addressFamily} -> addressFamily) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {addressFamily = a} :: NewTransitVirtualInterfaceAllocation)++-- | The IP address assigned to the Amazon interface.+newTransitVirtualInterfaceAllocation_amazonAddress :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newTransitVirtualInterfaceAllocation_amazonAddress = Lens.lens (\NewTransitVirtualInterfaceAllocation' {amazonAddress} -> amazonAddress) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {amazonAddress = a} :: NewTransitVirtualInterfaceAllocation)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+newTransitVirtualInterfaceAllocation_asn :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Int)+newTransitVirtualInterfaceAllocation_asn = Lens.lens (\NewTransitVirtualInterfaceAllocation' {asn} -> asn) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {asn = a} :: NewTransitVirtualInterfaceAllocation)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+newTransitVirtualInterfaceAllocation_authKey :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newTransitVirtualInterfaceAllocation_authKey = Lens.lens (\NewTransitVirtualInterfaceAllocation' {authKey} -> authKey) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {authKey = a} :: NewTransitVirtualInterfaceAllocation)++-- | The IP address assigned to the customer interface.+newTransitVirtualInterfaceAllocation_customerAddress :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newTransitVirtualInterfaceAllocation_customerAddress = Lens.lens (\NewTransitVirtualInterfaceAllocation' {customerAddress} -> customerAddress) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {customerAddress = a} :: NewTransitVirtualInterfaceAllocation)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+newTransitVirtualInterfaceAllocation_mtu :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Int)+newTransitVirtualInterfaceAllocation_mtu = Lens.lens (\NewTransitVirtualInterfaceAllocation' {mtu} -> mtu) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {mtu = a} :: NewTransitVirtualInterfaceAllocation)++-- | The tags associated with the transitive virtual interface.+newTransitVirtualInterfaceAllocation_tags :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe (Prelude.NonEmpty Tag))+newTransitVirtualInterfaceAllocation_tags = Lens.lens (\NewTransitVirtualInterfaceAllocation' {tags} -> tags) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {tags = a} :: NewTransitVirtualInterfaceAllocation) Prelude.. Lens.mapping Lens.coerced++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+newTransitVirtualInterfaceAllocation_virtualInterfaceName :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Text)+newTransitVirtualInterfaceAllocation_virtualInterfaceName = Lens.lens (\NewTransitVirtualInterfaceAllocation' {virtualInterfaceName} -> virtualInterfaceName) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {virtualInterfaceName = a} :: NewTransitVirtualInterfaceAllocation)++-- | The ID of the VLAN.+newTransitVirtualInterfaceAllocation_vlan :: Lens.Lens' NewTransitVirtualInterfaceAllocation (Prelude.Maybe Prelude.Int)+newTransitVirtualInterfaceAllocation_vlan = Lens.lens (\NewTransitVirtualInterfaceAllocation' {vlan} -> vlan) (\s@NewTransitVirtualInterfaceAllocation' {} a -> s {vlan = a} :: NewTransitVirtualInterfaceAllocation)++instance+  Prelude.Hashable+    NewTransitVirtualInterfaceAllocation+  where+  hashWithSalt+    _salt+    NewTransitVirtualInterfaceAllocation' {..} =+      _salt+        `Prelude.hashWithSalt` addressFamily+        `Prelude.hashWithSalt` amazonAddress+        `Prelude.hashWithSalt` asn+        `Prelude.hashWithSalt` authKey+        `Prelude.hashWithSalt` customerAddress+        `Prelude.hashWithSalt` mtu+        `Prelude.hashWithSalt` tags+        `Prelude.hashWithSalt` virtualInterfaceName+        `Prelude.hashWithSalt` vlan++instance+  Prelude.NFData+    NewTransitVirtualInterfaceAllocation+  where+  rnf NewTransitVirtualInterfaceAllocation' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf asn+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf vlan++instance+  Data.ToJSON+    NewTransitVirtualInterfaceAllocation+  where+  toJSON NewTransitVirtualInterfaceAllocation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addressFamily" Data..=) Prelude.<$> addressFamily,+            ("amazonAddress" Data..=) Prelude.<$> amazonAddress,+            ("asn" Data..=) Prelude.<$> asn,+            ("authKey" Data..=) Prelude.<$> authKey,+            ("customerAddress" Data..=)+              Prelude.<$> customerAddress,+            ("mtu" Data..=) Prelude.<$> mtu,+            ("tags" Data..=) Prelude.<$> tags,+            ("virtualInterfaceName" Data..=)+              Prelude.<$> virtualInterfaceName,+            ("vlan" Data..=) Prelude.<$> vlan+          ]+      )
+ gen/Amazonka/DirectConnect/Types/NniPartnerType.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.NniPartnerType+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.NniPartnerType+  ( NniPartnerType+      ( ..,+        NniPartnerType_NonPartner,+        NniPartnerType_V1,+        NniPartnerType_V2+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype NniPartnerType = NniPartnerType'+  { fromNniPartnerType ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern NniPartnerType_NonPartner :: NniPartnerType+pattern NniPartnerType_NonPartner = NniPartnerType' "nonPartner"++pattern NniPartnerType_V1 :: NniPartnerType+pattern NniPartnerType_V1 = NniPartnerType' "v1"++pattern NniPartnerType_V2 :: NniPartnerType+pattern NniPartnerType_V2 = NniPartnerType' "v2"++{-# COMPLETE+  NniPartnerType_NonPartner,+  NniPartnerType_V1,+  NniPartnerType_V2,+  NniPartnerType'+  #-}
+ gen/Amazonka/DirectConnect/Types/ResourceTag.hs view
@@ -0,0 +1,85 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.ResourceTag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.ResourceTag where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.Tag+import qualified Amazonka.Prelude as Prelude++-- | Information about a tag associated with an Direct Connect resource.+--+-- /See:/ 'newResourceTag' smart constructor.+data ResourceTag = ResourceTag'+  { -- | The Amazon Resource Name (ARN) of the resource.+    resourceArn :: Prelude.Maybe Prelude.Text,+    -- | The tags.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag)+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ResourceTag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceArn', 'resourceTag_resourceArn' - The Amazon Resource Name (ARN) of the resource.+--+-- 'tags', 'resourceTag_tags' - The tags.+newResourceTag ::+  ResourceTag+newResourceTag =+  ResourceTag'+    { resourceArn = Prelude.Nothing,+      tags = Prelude.Nothing+    }++-- | The Amazon Resource Name (ARN) of the resource.+resourceTag_resourceArn :: Lens.Lens' ResourceTag (Prelude.Maybe Prelude.Text)+resourceTag_resourceArn = Lens.lens (\ResourceTag' {resourceArn} -> resourceArn) (\s@ResourceTag' {} a -> s {resourceArn = a} :: ResourceTag)++-- | The tags.+resourceTag_tags :: Lens.Lens' ResourceTag (Prelude.Maybe (Prelude.NonEmpty Tag))+resourceTag_tags = Lens.lens (\ResourceTag' {tags} -> tags) (\s@ResourceTag' {} a -> s {tags = a} :: ResourceTag) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON ResourceTag where+  parseJSON =+    Data.withObject+      "ResourceTag"+      ( \x ->+          ResourceTag'+            Prelude.<$> (x Data..:? "resourceArn")+            Prelude.<*> (x Data..:? "tags")+      )++instance Prelude.Hashable ResourceTag where+  hashWithSalt _salt ResourceTag' {..} =+    _salt+      `Prelude.hashWithSalt` resourceArn+      `Prelude.hashWithSalt` tags++instance Prelude.NFData ResourceTag where+  rnf ResourceTag' {..} =+    Prelude.rnf resourceArn+      `Prelude.seq` Prelude.rnf tags
+ gen/Amazonka/DirectConnect/Types/RouteFilterPrefix.hs view
@@ -0,0 +1,78 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.RouteFilterPrefix+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.RouteFilterPrefix where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about a route filter prefix that a customer can advertise+-- through Border Gateway Protocol (BGP) over a public virtual interface.+--+-- /See:/ 'newRouteFilterPrefix' smart constructor.+data RouteFilterPrefix = RouteFilterPrefix'+  { -- | The CIDR block for the advertised route. Separate multiple routes using+    -- commas. An IPv6 CIDR must use \/64 or shorter.+    cidr :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RouteFilterPrefix' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cidr', 'routeFilterPrefix_cidr' - The CIDR block for the advertised route. Separate multiple routes using+-- commas. An IPv6 CIDR must use \/64 or shorter.+newRouteFilterPrefix ::+  RouteFilterPrefix+newRouteFilterPrefix =+  RouteFilterPrefix' {cidr = Prelude.Nothing}++-- | The CIDR block for the advertised route. Separate multiple routes using+-- commas. An IPv6 CIDR must use \/64 or shorter.+routeFilterPrefix_cidr :: Lens.Lens' RouteFilterPrefix (Prelude.Maybe Prelude.Text)+routeFilterPrefix_cidr = Lens.lens (\RouteFilterPrefix' {cidr} -> cidr) (\s@RouteFilterPrefix' {} a -> s {cidr = a} :: RouteFilterPrefix)++instance Data.FromJSON RouteFilterPrefix where+  parseJSON =+    Data.withObject+      "RouteFilterPrefix"+      ( \x ->+          RouteFilterPrefix' Prelude.<$> (x Data..:? "cidr")+      )++instance Prelude.Hashable RouteFilterPrefix where+  hashWithSalt _salt RouteFilterPrefix' {..} =+    _salt `Prelude.hashWithSalt` cidr++instance Prelude.NFData RouteFilterPrefix where+  rnf RouteFilterPrefix' {..} = Prelude.rnf cidr++instance Data.ToJSON RouteFilterPrefix where+  toJSON RouteFilterPrefix' {..} =+    Data.object+      ( Prelude.catMaybes+          [("cidr" Data..=) Prelude.<$> cidr]+      )
+ gen/Amazonka/DirectConnect/Types/RouterType.hs view
@@ -0,0 +1,135 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.RouterType+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.RouterType where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about the virtual router.+--+-- /See:/ 'newRouterType' smart constructor.+data RouterType = RouterType'+  { -- | The virtual interface router platform.+    platform :: Prelude.Maybe Prelude.Text,+    -- | Identifies the router by a combination of vendor, platform, and software+    -- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+    routerTypeIdentifier :: Prelude.Maybe Prelude.Text,+    -- | The router software.+    software :: Prelude.Maybe Prelude.Text,+    -- | The vendor for the virtual interface\'s router.+    vendor :: Prelude.Maybe Prelude.Text,+    -- | The template for the virtual interface\'s router.+    xsltTemplateName :: Prelude.Maybe Prelude.Text,+    -- | The MAC Security (MACsec) template for the virtual interface\'s router.+    xsltTemplateNameForMacSec :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RouterType' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'platform', 'routerType_platform' - The virtual interface router platform.+--+-- 'routerTypeIdentifier', 'routerType_routerTypeIdentifier' - Identifies the router by a combination of vendor, platform, and software+-- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+--+-- 'software', 'routerType_software' - The router software.+--+-- 'vendor', 'routerType_vendor' - The vendor for the virtual interface\'s router.+--+-- 'xsltTemplateName', 'routerType_xsltTemplateName' - The template for the virtual interface\'s router.+--+-- 'xsltTemplateNameForMacSec', 'routerType_xsltTemplateNameForMacSec' - The MAC Security (MACsec) template for the virtual interface\'s router.+newRouterType ::+  RouterType+newRouterType =+  RouterType'+    { platform = Prelude.Nothing,+      routerTypeIdentifier = Prelude.Nothing,+      software = Prelude.Nothing,+      vendor = Prelude.Nothing,+      xsltTemplateName = Prelude.Nothing,+      xsltTemplateNameForMacSec = Prelude.Nothing+    }++-- | The virtual interface router platform.+routerType_platform :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_platform = Lens.lens (\RouterType' {platform} -> platform) (\s@RouterType' {} a -> s {platform = a} :: RouterType)++-- | Identifies the router by a combination of vendor, platform, and software+-- version. For example, @CiscoSystemsInc-2900SeriesRouters-IOS124@.+routerType_routerTypeIdentifier :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_routerTypeIdentifier = Lens.lens (\RouterType' {routerTypeIdentifier} -> routerTypeIdentifier) (\s@RouterType' {} a -> s {routerTypeIdentifier = a} :: RouterType)++-- | The router software.+routerType_software :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_software = Lens.lens (\RouterType' {software} -> software) (\s@RouterType' {} a -> s {software = a} :: RouterType)++-- | The vendor for the virtual interface\'s router.+routerType_vendor :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_vendor = Lens.lens (\RouterType' {vendor} -> vendor) (\s@RouterType' {} a -> s {vendor = a} :: RouterType)++-- | The template for the virtual interface\'s router.+routerType_xsltTemplateName :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_xsltTemplateName = Lens.lens (\RouterType' {xsltTemplateName} -> xsltTemplateName) (\s@RouterType' {} a -> s {xsltTemplateName = a} :: RouterType)++-- | The MAC Security (MACsec) template for the virtual interface\'s router.+routerType_xsltTemplateNameForMacSec :: Lens.Lens' RouterType (Prelude.Maybe Prelude.Text)+routerType_xsltTemplateNameForMacSec = Lens.lens (\RouterType' {xsltTemplateNameForMacSec} -> xsltTemplateNameForMacSec) (\s@RouterType' {} a -> s {xsltTemplateNameForMacSec = a} :: RouterType)++instance Data.FromJSON RouterType where+  parseJSON =+    Data.withObject+      "RouterType"+      ( \x ->+          RouterType'+            Prelude.<$> (x Data..:? "platform")+            Prelude.<*> (x Data..:? "routerTypeIdentifier")+            Prelude.<*> (x Data..:? "software")+            Prelude.<*> (x Data..:? "vendor")+            Prelude.<*> (x Data..:? "xsltTemplateName")+            Prelude.<*> (x Data..:? "xsltTemplateNameForMacSec")+      )++instance Prelude.Hashable RouterType where+  hashWithSalt _salt RouterType' {..} =+    _salt+      `Prelude.hashWithSalt` platform+      `Prelude.hashWithSalt` routerTypeIdentifier+      `Prelude.hashWithSalt` software+      `Prelude.hashWithSalt` vendor+      `Prelude.hashWithSalt` xsltTemplateName+      `Prelude.hashWithSalt` xsltTemplateNameForMacSec++instance Prelude.NFData RouterType where+  rnf RouterType' {..} =+    Prelude.rnf platform+      `Prelude.seq` Prelude.rnf routerTypeIdentifier+      `Prelude.seq` Prelude.rnf software+      `Prelude.seq` Prelude.rnf vendor+      `Prelude.seq` Prelude.rnf xsltTemplateName+      `Prelude.seq` Prelude.rnf xsltTemplateNameForMacSec
+ gen/Amazonka/DirectConnect/Types/Tag.hs view
@@ -0,0 +1,91 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.Tag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.Tag where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about a tag.+--+-- /See:/ 'newTag' smart constructor.+data Tag = Tag'+  { -- | The value.+    value :: Prelude.Maybe Prelude.Text,+    -- | The key.+    key :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Tag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'value', 'tag_value' - The value.+--+-- 'key', 'tag_key' - The key.+newTag ::+  -- | 'key'+  Prelude.Text ->+  Tag+newTag pKey_ =+  Tag' {value = Prelude.Nothing, key = pKey_}++-- | The value.+tag_value :: Lens.Lens' Tag (Prelude.Maybe Prelude.Text)+tag_value = Lens.lens (\Tag' {value} -> value) (\s@Tag' {} a -> s {value = a} :: Tag)++-- | The key.+tag_key :: Lens.Lens' Tag Prelude.Text+tag_key = Lens.lens (\Tag' {key} -> key) (\s@Tag' {} a -> s {key = a} :: Tag)++instance Data.FromJSON Tag where+  parseJSON =+    Data.withObject+      "Tag"+      ( \x ->+          Tag'+            Prelude.<$> (x Data..:? "value")+            Prelude.<*> (x Data..: "key")+      )++instance Prelude.Hashable Tag where+  hashWithSalt _salt Tag' {..} =+    _salt+      `Prelude.hashWithSalt` value+      `Prelude.hashWithSalt` key++instance Prelude.NFData Tag where+  rnf Tag' {..} =+    Prelude.rnf value `Prelude.seq` Prelude.rnf key++instance Data.ToJSON Tag where+  toJSON Tag' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("value" Data..=) Prelude.<$> value,+            Prelude.Just ("key" Data..= key)+          ]+      )
+ gen/Amazonka/DirectConnect/Types/VirtualGateway.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.VirtualGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.VirtualGateway where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about a virtual private gateway for a private virtual+-- interface.+--+-- /See:/ 'newVirtualGateway' smart constructor.+data VirtualGateway = VirtualGateway'+  { -- | The ID of the virtual private gateway.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The state of the virtual private gateway. The following are the possible+    -- values:+    --+    -- -   @pending@: Initial state after creating the virtual private gateway.+    --+    -- -   @available@: Ready for use by a private virtual interface.+    --+    -- -   @deleting@: Initial state after deleting the virtual private+    --     gateway.+    --+    -- -   @deleted@: The virtual private gateway is deleted. The private+    --     virtual interface is unable to send traffic over this gateway.+    virtualGatewayState :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VirtualGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'virtualGatewayId', 'virtualGateway_virtualGatewayId' - The ID of the virtual private gateway.+--+-- 'virtualGatewayState', 'virtualGateway_virtualGatewayState' - The state of the virtual private gateway. The following are the possible+-- values:+--+-- -   @pending@: Initial state after creating the virtual private gateway.+--+-- -   @available@: Ready for use by a private virtual interface.+--+-- -   @deleting@: Initial state after deleting the virtual private+--     gateway.+--+-- -   @deleted@: The virtual private gateway is deleted. The private+--     virtual interface is unable to send traffic over this gateway.+newVirtualGateway ::+  VirtualGateway+newVirtualGateway =+  VirtualGateway'+    { virtualGatewayId = Prelude.Nothing,+      virtualGatewayState = Prelude.Nothing+    }++-- | The ID of the virtual private gateway.+virtualGateway_virtualGatewayId :: Lens.Lens' VirtualGateway (Prelude.Maybe Prelude.Text)+virtualGateway_virtualGatewayId = Lens.lens (\VirtualGateway' {virtualGatewayId} -> virtualGatewayId) (\s@VirtualGateway' {} a -> s {virtualGatewayId = a} :: VirtualGateway)++-- | The state of the virtual private gateway. The following are the possible+-- values:+--+-- -   @pending@: Initial state after creating the virtual private gateway.+--+-- -   @available@: Ready for use by a private virtual interface.+--+-- -   @deleting@: Initial state after deleting the virtual private+--     gateway.+--+-- -   @deleted@: The virtual private gateway is deleted. The private+--     virtual interface is unable to send traffic over this gateway.+virtualGateway_virtualGatewayState :: Lens.Lens' VirtualGateway (Prelude.Maybe Prelude.Text)+virtualGateway_virtualGatewayState = Lens.lens (\VirtualGateway' {virtualGatewayState} -> virtualGatewayState) (\s@VirtualGateway' {} a -> s {virtualGatewayState = a} :: VirtualGateway)++instance Data.FromJSON VirtualGateway where+  parseJSON =+    Data.withObject+      "VirtualGateway"+      ( \x ->+          VirtualGateway'+            Prelude.<$> (x Data..:? "virtualGatewayId")+            Prelude.<*> (x Data..:? "virtualGatewayState")+      )++instance Prelude.Hashable VirtualGateway where+  hashWithSalt _salt VirtualGateway' {..} =+    _salt+      `Prelude.hashWithSalt` virtualGatewayId+      `Prelude.hashWithSalt` virtualGatewayState++instance Prelude.NFData VirtualGateway where+  rnf VirtualGateway' {..} =+    Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf virtualGatewayState
+ gen/Amazonka/DirectConnect/Types/VirtualInterface.hs view
@@ -0,0 +1,522 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.VirtualInterface+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.VirtualInterface where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types.AddressFamily+import Amazonka.DirectConnect.Types.BGPPeer+import Amazonka.DirectConnect.Types.RouteFilterPrefix+import Amazonka.DirectConnect.Types.Tag+import Amazonka.DirectConnect.Types.VirtualInterfaceState+import qualified Amazonka.Prelude as Prelude++-- | Information about a virtual interface.+--+-- /See:/ 'newVirtualInterface' smart constructor.+data VirtualInterface = VirtualInterface'+  { -- | The address family for the BGP peer.+    addressFamily :: Prelude.Maybe AddressFamily,+    -- | The IP address assigned to the Amazon interface.+    amazonAddress :: Prelude.Maybe Prelude.Text,+    -- | The autonomous system number (ASN) for the Amazon side of the+    -- connection.+    amazonSideAsn :: Prelude.Maybe Prelude.Integer,+    -- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+    -- configuration.+    --+    -- The valid values are 1-2147483647.+    asn :: Prelude.Maybe Prelude.Int,+    -- | The authentication key for BGP configuration. This string has a minimum+    -- length of 6 characters and and a maximun lenth of 80 characters.+    authKey :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the physical connection.+    awsDeviceV2 :: Prelude.Maybe Prelude.Text,+    -- | The Direct Connect endpoint that terminates the logical connection. This+    -- device might be different than the device that terminates the physical+    -- connection.+    awsLogicalDeviceId :: Prelude.Maybe Prelude.Text,+    -- | The BGP peers configured on this virtual interface.+    bgpPeers :: Prelude.Maybe [BGPPeer],+    -- | The ID of the connection.+    connectionId :: Prelude.Maybe Prelude.Text,+    -- | The IP address assigned to the customer interface.+    customerAddress :: Prelude.Maybe Prelude.Text,+    -- | The customer router configuration.+    customerRouterConfig :: Prelude.Maybe Prelude.Text,+    -- | The ID of the Direct Connect gateway.+    directConnectGatewayId :: Prelude.Maybe Prelude.Text,+    -- | Indicates whether jumbo frames (9001 MTU) are supported.+    jumboFrameCapable :: Prelude.Maybe Prelude.Bool,+    -- | The location of the connection.+    location :: Prelude.Maybe Prelude.Text,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The ID of the Amazon Web Services account that owns the virtual+    -- interface.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The Amazon Web Services Region where the virtual interface is located.+    region :: Prelude.Maybe Prelude.Text,+    -- | The routes to be advertised to the Amazon Web Services network in this+    -- Region. Applies to public virtual interfaces.+    routeFilterPrefixes :: Prelude.Maybe [RouteFilterPrefix],+    -- | Indicates whether SiteLink is enabled.+    siteLinkEnabled :: Prelude.Maybe Prelude.Bool,+    -- | The tags associated with the virtual interface.+    tags :: Prelude.Maybe (Prelude.NonEmpty Tag),+    -- | The ID of the virtual private gateway. Applies only to private virtual+    -- interfaces.+    virtualGatewayId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text,+    -- | The name of the virtual interface assigned by the customer network. The+    -- name has a maximum of 100 characters. The following are valid+    -- characters: a-z, 0-9 and a hyphen (-).+    virtualInterfaceName :: Prelude.Maybe Prelude.Text,+    -- | The state of the virtual interface. The following are the possible+    -- values:+    --+    -- -   @confirming@: The creation of the virtual interface is pending+    --     confirmation from the virtual interface owner. If the owner of the+    --     virtual interface is different from the owner of the connection on+    --     which it is provisioned, then the virtual interface will remain in+    --     this state until it is confirmed by the virtual interface owner.+    --+    -- -   @verifying@: This state only applies to public virtual interfaces.+    --     Each public virtual interface needs validation before the virtual+    --     interface can be created.+    --+    -- -   @pending@: A virtual interface is in this state from the time that+    --     it is created until the virtual interface is ready to forward+    --     traffic.+    --+    -- -   @available@: A virtual interface that is able to forward traffic.+    --+    -- -   @down@: A virtual interface that is BGP down.+    --+    -- -   @deleting@: A virtual interface is in this state immediately after+    --     calling DeleteVirtualInterface until it can no longer forward+    --     traffic.+    --+    -- -   @deleted@: A virtual interface that cannot forward traffic.+    --+    -- -   @rejected@: The virtual interface owner has declined creation of the+    --     virtual interface. If a virtual interface in the @Confirming@ state+    --     is deleted by the virtual interface owner, the virtual interface+    --     enters the @Rejected@ state.+    --+    -- -   @unknown@: The state of the virtual interface is not available.+    virtualInterfaceState :: Prelude.Maybe VirtualInterfaceState,+    -- | The type of virtual interface. The possible values are @private@ and+    -- @public@.+    virtualInterfaceType :: Prelude.Maybe Prelude.Text,+    -- | The ID of the VLAN.+    vlan :: Prelude.Maybe Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VirtualInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addressFamily', 'virtualInterface_addressFamily' - The address family for the BGP peer.+--+-- 'amazonAddress', 'virtualInterface_amazonAddress' - The IP address assigned to the Amazon interface.+--+-- 'amazonSideAsn', 'virtualInterface_amazonSideAsn' - The autonomous system number (ASN) for the Amazon side of the+-- connection.+--+-- 'asn', 'virtualInterface_asn' - The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+--+-- 'authKey', 'virtualInterface_authKey' - The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+--+-- 'awsDeviceV2', 'virtualInterface_awsDeviceV2' - The Direct Connect endpoint that terminates the physical connection.+--+-- 'awsLogicalDeviceId', 'virtualInterface_awsLogicalDeviceId' - The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+--+-- 'bgpPeers', 'virtualInterface_bgpPeers' - The BGP peers configured on this virtual interface.+--+-- 'connectionId', 'virtualInterface_connectionId' - The ID of the connection.+--+-- 'customerAddress', 'virtualInterface_customerAddress' - The IP address assigned to the customer interface.+--+-- 'customerRouterConfig', 'virtualInterface_customerRouterConfig' - The customer router configuration.+--+-- 'directConnectGatewayId', 'virtualInterface_directConnectGatewayId' - The ID of the Direct Connect gateway.+--+-- 'jumboFrameCapable', 'virtualInterface_jumboFrameCapable' - Indicates whether jumbo frames (9001 MTU) are supported.+--+-- 'location', 'virtualInterface_location' - The location of the connection.+--+-- 'mtu', 'virtualInterface_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'ownerAccount', 'virtualInterface_ownerAccount' - The ID of the Amazon Web Services account that owns the virtual+-- interface.+--+-- 'region', 'virtualInterface_region' - The Amazon Web Services Region where the virtual interface is located.+--+-- 'routeFilterPrefixes', 'virtualInterface_routeFilterPrefixes' - The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+--+-- 'siteLinkEnabled', 'virtualInterface_siteLinkEnabled' - Indicates whether SiteLink is enabled.+--+-- 'tags', 'virtualInterface_tags' - The tags associated with the virtual interface.+--+-- 'virtualGatewayId', 'virtualInterface_virtualGatewayId' - The ID of the virtual private gateway. Applies only to private virtual+-- interfaces.+--+-- 'virtualInterfaceId', 'virtualInterface_virtualInterfaceId' - The ID of the virtual interface.+--+-- 'virtualInterfaceName', 'virtualInterface_virtualInterfaceName' - The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+--+-- 'virtualInterfaceState', 'virtualInterface_virtualInterfaceState' - The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+--+-- 'virtualInterfaceType', 'virtualInterface_virtualInterfaceType' - The type of virtual interface. The possible values are @private@ and+-- @public@.+--+-- 'vlan', 'virtualInterface_vlan' - The ID of the VLAN.+newVirtualInterface ::+  VirtualInterface+newVirtualInterface =+  VirtualInterface'+    { addressFamily = Prelude.Nothing,+      amazonAddress = Prelude.Nothing,+      amazonSideAsn = Prelude.Nothing,+      asn = Prelude.Nothing,+      authKey = Prelude.Nothing,+      awsDeviceV2 = Prelude.Nothing,+      awsLogicalDeviceId = Prelude.Nothing,+      bgpPeers = Prelude.Nothing,+      connectionId = Prelude.Nothing,+      customerAddress = Prelude.Nothing,+      customerRouterConfig = Prelude.Nothing,+      directConnectGatewayId = Prelude.Nothing,+      jumboFrameCapable = Prelude.Nothing,+      location = Prelude.Nothing,+      mtu = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      region = Prelude.Nothing,+      routeFilterPrefixes = Prelude.Nothing,+      siteLinkEnabled = Prelude.Nothing,+      tags = Prelude.Nothing,+      virtualGatewayId = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing,+      virtualInterfaceName = Prelude.Nothing,+      virtualInterfaceState = Prelude.Nothing,+      virtualInterfaceType = Prelude.Nothing,+      vlan = Prelude.Nothing+    }++-- | The address family for the BGP peer.+virtualInterface_addressFamily :: Lens.Lens' VirtualInterface (Prelude.Maybe AddressFamily)+virtualInterface_addressFamily = Lens.lens (\VirtualInterface' {addressFamily} -> addressFamily) (\s@VirtualInterface' {} a -> s {addressFamily = a} :: VirtualInterface)++-- | The IP address assigned to the Amazon interface.+virtualInterface_amazonAddress :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_amazonAddress = Lens.lens (\VirtualInterface' {amazonAddress} -> amazonAddress) (\s@VirtualInterface' {} a -> s {amazonAddress = a} :: VirtualInterface)++-- | The autonomous system number (ASN) for the Amazon side of the+-- connection.+virtualInterface_amazonSideAsn :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Integer)+virtualInterface_amazonSideAsn = Lens.lens (\VirtualInterface' {amazonSideAsn} -> amazonSideAsn) (\s@VirtualInterface' {} a -> s {amazonSideAsn = a} :: VirtualInterface)++-- | The autonomous system (AS) number for Border Gateway Protocol (BGP)+-- configuration.+--+-- The valid values are 1-2147483647.+virtualInterface_asn :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Int)+virtualInterface_asn = Lens.lens (\VirtualInterface' {asn} -> asn) (\s@VirtualInterface' {} a -> s {asn = a} :: VirtualInterface)++-- | The authentication key for BGP configuration. This string has a minimum+-- length of 6 characters and and a maximun lenth of 80 characters.+virtualInterface_authKey :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_authKey = Lens.lens (\VirtualInterface' {authKey} -> authKey) (\s@VirtualInterface' {} a -> s {authKey = a} :: VirtualInterface)++-- | The Direct Connect endpoint that terminates the physical connection.+virtualInterface_awsDeviceV2 :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_awsDeviceV2 = Lens.lens (\VirtualInterface' {awsDeviceV2} -> awsDeviceV2) (\s@VirtualInterface' {} a -> s {awsDeviceV2 = a} :: VirtualInterface)++-- | The Direct Connect endpoint that terminates the logical connection. This+-- device might be different than the device that terminates the physical+-- connection.+virtualInterface_awsLogicalDeviceId :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_awsLogicalDeviceId = Lens.lens (\VirtualInterface' {awsLogicalDeviceId} -> awsLogicalDeviceId) (\s@VirtualInterface' {} a -> s {awsLogicalDeviceId = a} :: VirtualInterface)++-- | The BGP peers configured on this virtual interface.+virtualInterface_bgpPeers :: Lens.Lens' VirtualInterface (Prelude.Maybe [BGPPeer])+virtualInterface_bgpPeers = Lens.lens (\VirtualInterface' {bgpPeers} -> bgpPeers) (\s@VirtualInterface' {} a -> s {bgpPeers = a} :: VirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the connection.+virtualInterface_connectionId :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_connectionId = Lens.lens (\VirtualInterface' {connectionId} -> connectionId) (\s@VirtualInterface' {} a -> s {connectionId = a} :: VirtualInterface)++-- | The IP address assigned to the customer interface.+virtualInterface_customerAddress :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_customerAddress = Lens.lens (\VirtualInterface' {customerAddress} -> customerAddress) (\s@VirtualInterface' {} a -> s {customerAddress = a} :: VirtualInterface)++-- | The customer router configuration.+virtualInterface_customerRouterConfig :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_customerRouterConfig = Lens.lens (\VirtualInterface' {customerRouterConfig} -> customerRouterConfig) (\s@VirtualInterface' {} a -> s {customerRouterConfig = a} :: VirtualInterface)++-- | The ID of the Direct Connect gateway.+virtualInterface_directConnectGatewayId :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_directConnectGatewayId = Lens.lens (\VirtualInterface' {directConnectGatewayId} -> directConnectGatewayId) (\s@VirtualInterface' {} a -> s {directConnectGatewayId = a} :: VirtualInterface)++-- | Indicates whether jumbo frames (9001 MTU) are supported.+virtualInterface_jumboFrameCapable :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Bool)+virtualInterface_jumboFrameCapable = Lens.lens (\VirtualInterface' {jumboFrameCapable} -> jumboFrameCapable) (\s@VirtualInterface' {} a -> s {jumboFrameCapable = a} :: VirtualInterface)++-- | The location of the connection.+virtualInterface_location :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_location = Lens.lens (\VirtualInterface' {location} -> location) (\s@VirtualInterface' {} a -> s {location = a} :: VirtualInterface)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+virtualInterface_mtu :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Int)+virtualInterface_mtu = Lens.lens (\VirtualInterface' {mtu} -> mtu) (\s@VirtualInterface' {} a -> s {mtu = a} :: VirtualInterface)++-- | The ID of the Amazon Web Services account that owns the virtual+-- interface.+virtualInterface_ownerAccount :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_ownerAccount = Lens.lens (\VirtualInterface' {ownerAccount} -> ownerAccount) (\s@VirtualInterface' {} a -> s {ownerAccount = a} :: VirtualInterface)++-- | The Amazon Web Services Region where the virtual interface is located.+virtualInterface_region :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_region = Lens.lens (\VirtualInterface' {region} -> region) (\s@VirtualInterface' {} a -> s {region = a} :: VirtualInterface)++-- | The routes to be advertised to the Amazon Web Services network in this+-- Region. Applies to public virtual interfaces.+virtualInterface_routeFilterPrefixes :: Lens.Lens' VirtualInterface (Prelude.Maybe [RouteFilterPrefix])+virtualInterface_routeFilterPrefixes = Lens.lens (\VirtualInterface' {routeFilterPrefixes} -> routeFilterPrefixes) (\s@VirtualInterface' {} a -> s {routeFilterPrefixes = a} :: VirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | Indicates whether SiteLink is enabled.+virtualInterface_siteLinkEnabled :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Bool)+virtualInterface_siteLinkEnabled = Lens.lens (\VirtualInterface' {siteLinkEnabled} -> siteLinkEnabled) (\s@VirtualInterface' {} a -> s {siteLinkEnabled = a} :: VirtualInterface)++-- | The tags associated with the virtual interface.+virtualInterface_tags :: Lens.Lens' VirtualInterface (Prelude.Maybe (Prelude.NonEmpty Tag))+virtualInterface_tags = Lens.lens (\VirtualInterface' {tags} -> tags) (\s@VirtualInterface' {} a -> s {tags = a} :: VirtualInterface) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the virtual private gateway. Applies only to private virtual+-- interfaces.+virtualInterface_virtualGatewayId :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_virtualGatewayId = Lens.lens (\VirtualInterface' {virtualGatewayId} -> virtualGatewayId) (\s@VirtualInterface' {} a -> s {virtualGatewayId = a} :: VirtualInterface)++-- | The ID of the virtual interface.+virtualInterface_virtualInterfaceId :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_virtualInterfaceId = Lens.lens (\VirtualInterface' {virtualInterfaceId} -> virtualInterfaceId) (\s@VirtualInterface' {} a -> s {virtualInterfaceId = a} :: VirtualInterface)++-- | The name of the virtual interface assigned by the customer network. The+-- name has a maximum of 100 characters. The following are valid+-- characters: a-z, 0-9 and a hyphen (-).+virtualInterface_virtualInterfaceName :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_virtualInterfaceName = Lens.lens (\VirtualInterface' {virtualInterfaceName} -> virtualInterfaceName) (\s@VirtualInterface' {} a -> s {virtualInterfaceName = a} :: VirtualInterface)++-- | The state of the virtual interface. The following are the possible+-- values:+--+-- -   @confirming@: The creation of the virtual interface is pending+--     confirmation from the virtual interface owner. If the owner of the+--     virtual interface is different from the owner of the connection on+--     which it is provisioned, then the virtual interface will remain in+--     this state until it is confirmed by the virtual interface owner.+--+-- -   @verifying@: This state only applies to public virtual interfaces.+--     Each public virtual interface needs validation before the virtual+--     interface can be created.+--+-- -   @pending@: A virtual interface is in this state from the time that+--     it is created until the virtual interface is ready to forward+--     traffic.+--+-- -   @available@: A virtual interface that is able to forward traffic.+--+-- -   @down@: A virtual interface that is BGP down.+--+-- -   @deleting@: A virtual interface is in this state immediately after+--     calling DeleteVirtualInterface until it can no longer forward+--     traffic.+--+-- -   @deleted@: A virtual interface that cannot forward traffic.+--+-- -   @rejected@: The virtual interface owner has declined creation of the+--     virtual interface. If a virtual interface in the @Confirming@ state+--     is deleted by the virtual interface owner, the virtual interface+--     enters the @Rejected@ state.+--+-- -   @unknown@: The state of the virtual interface is not available.+virtualInterface_virtualInterfaceState :: Lens.Lens' VirtualInterface (Prelude.Maybe VirtualInterfaceState)+virtualInterface_virtualInterfaceState = Lens.lens (\VirtualInterface' {virtualInterfaceState} -> virtualInterfaceState) (\s@VirtualInterface' {} a -> s {virtualInterfaceState = a} :: VirtualInterface)++-- | The type of virtual interface. The possible values are @private@ and+-- @public@.+virtualInterface_virtualInterfaceType :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Text)+virtualInterface_virtualInterfaceType = Lens.lens (\VirtualInterface' {virtualInterfaceType} -> virtualInterfaceType) (\s@VirtualInterface' {} a -> s {virtualInterfaceType = a} :: VirtualInterface)++-- | The ID of the VLAN.+virtualInterface_vlan :: Lens.Lens' VirtualInterface (Prelude.Maybe Prelude.Int)+virtualInterface_vlan = Lens.lens (\VirtualInterface' {vlan} -> vlan) (\s@VirtualInterface' {} a -> s {vlan = a} :: VirtualInterface)++instance Data.FromJSON VirtualInterface where+  parseJSON =+    Data.withObject+      "VirtualInterface"+      ( \x ->+          VirtualInterface'+            Prelude.<$> (x Data..:? "addressFamily")+            Prelude.<*> (x Data..:? "amazonAddress")+            Prelude.<*> (x Data..:? "amazonSideAsn")+            Prelude.<*> (x Data..:? "asn")+            Prelude.<*> (x Data..:? "authKey")+            Prelude.<*> (x Data..:? "awsDeviceV2")+            Prelude.<*> (x Data..:? "awsLogicalDeviceId")+            Prelude.<*> (x Data..:? "bgpPeers" Data..!= Prelude.mempty)+            Prelude.<*> (x Data..:? "connectionId")+            Prelude.<*> (x Data..:? "customerAddress")+            Prelude.<*> (x Data..:? "customerRouterConfig")+            Prelude.<*> (x Data..:? "directConnectGatewayId")+            Prelude.<*> (x Data..:? "jumboFrameCapable")+            Prelude.<*> (x Data..:? "location")+            Prelude.<*> (x Data..:? "mtu")+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "region")+            Prelude.<*> ( x+                            Data..:? "routeFilterPrefixes"+                            Data..!= Prelude.mempty+                        )+            Prelude.<*> (x Data..:? "siteLinkEnabled")+            Prelude.<*> (x Data..:? "tags")+            Prelude.<*> (x Data..:? "virtualGatewayId")+            Prelude.<*> (x Data..:? "virtualInterfaceId")+            Prelude.<*> (x Data..:? "virtualInterfaceName")+            Prelude.<*> (x Data..:? "virtualInterfaceState")+            Prelude.<*> (x Data..:? "virtualInterfaceType")+            Prelude.<*> (x Data..:? "vlan")+      )++instance Prelude.Hashable VirtualInterface where+  hashWithSalt _salt VirtualInterface' {..} =+    _salt+      `Prelude.hashWithSalt` addressFamily+      `Prelude.hashWithSalt` amazonAddress+      `Prelude.hashWithSalt` amazonSideAsn+      `Prelude.hashWithSalt` asn+      `Prelude.hashWithSalt` authKey+      `Prelude.hashWithSalt` awsDeviceV2+      `Prelude.hashWithSalt` awsLogicalDeviceId+      `Prelude.hashWithSalt` bgpPeers+      `Prelude.hashWithSalt` connectionId+      `Prelude.hashWithSalt` customerAddress+      `Prelude.hashWithSalt` customerRouterConfig+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` jumboFrameCapable+      `Prelude.hashWithSalt` location+      `Prelude.hashWithSalt` mtu+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` region+      `Prelude.hashWithSalt` routeFilterPrefixes+      `Prelude.hashWithSalt` siteLinkEnabled+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` virtualGatewayId+      `Prelude.hashWithSalt` virtualInterfaceId+      `Prelude.hashWithSalt` virtualInterfaceName+      `Prelude.hashWithSalt` virtualInterfaceState+      `Prelude.hashWithSalt` virtualInterfaceType+      `Prelude.hashWithSalt` vlan++instance Prelude.NFData VirtualInterface where+  rnf VirtualInterface' {..} =+    Prelude.rnf addressFamily+      `Prelude.seq` Prelude.rnf amazonAddress+      `Prelude.seq` Prelude.rnf amazonSideAsn+      `Prelude.seq` Prelude.rnf asn+      `Prelude.seq` Prelude.rnf authKey+      `Prelude.seq` Prelude.rnf awsDeviceV2+      `Prelude.seq` Prelude.rnf awsLogicalDeviceId+      `Prelude.seq` Prelude.rnf bgpPeers+      `Prelude.seq` Prelude.rnf connectionId+      `Prelude.seq` Prelude.rnf customerAddress+      `Prelude.seq` Prelude.rnf customerRouterConfig+      `Prelude.seq` Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf jumboFrameCapable+      `Prelude.seq` Prelude.rnf location+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf region+      `Prelude.seq` Prelude.rnf routeFilterPrefixes+      `Prelude.seq` Prelude.rnf siteLinkEnabled+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf virtualGatewayId+      `Prelude.seq` Prelude.rnf+        virtualInterfaceId+      `Prelude.seq` Prelude.rnf+        virtualInterfaceName+      `Prelude.seq` Prelude.rnf+        virtualInterfaceState+      `Prelude.seq` Prelude.rnf+        virtualInterfaceType+      `Prelude.seq` Prelude.rnf vlan
+ gen/Amazonka/DirectConnect/Types/VirtualInterfaceState.hs view
@@ -0,0 +1,106 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.VirtualInterfaceState+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.VirtualInterfaceState+  ( VirtualInterfaceState+      ( ..,+        VirtualInterfaceState_Available,+        VirtualInterfaceState_Confirming,+        VirtualInterfaceState_Deleted,+        VirtualInterfaceState_Deleting,+        VirtualInterfaceState_Down,+        VirtualInterfaceState_Pending,+        VirtualInterfaceState_Rejected,+        VirtualInterfaceState_Unknown,+        VirtualInterfaceState_Verifying+      ),+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype VirtualInterfaceState = VirtualInterfaceState'+  { fromVirtualInterfaceState ::+      Data.Text+  }+  deriving stock+    ( Prelude.Show,+      Prelude.Read,+      Prelude.Eq,+      Prelude.Ord,+      Prelude.Generic+    )+  deriving newtype+    ( Prelude.Hashable,+      Prelude.NFData,+      Data.FromText,+      Data.ToText,+      Data.ToByteString,+      Data.ToLog,+      Data.ToHeader,+      Data.ToQuery,+      Data.FromJSON,+      Data.FromJSONKey,+      Data.ToJSON,+      Data.ToJSONKey,+      Data.FromXML,+      Data.ToXML+    )++pattern VirtualInterfaceState_Available :: VirtualInterfaceState+pattern VirtualInterfaceState_Available = VirtualInterfaceState' "available"++pattern VirtualInterfaceState_Confirming :: VirtualInterfaceState+pattern VirtualInterfaceState_Confirming = VirtualInterfaceState' "confirming"++pattern VirtualInterfaceState_Deleted :: VirtualInterfaceState+pattern VirtualInterfaceState_Deleted = VirtualInterfaceState' "deleted"++pattern VirtualInterfaceState_Deleting :: VirtualInterfaceState+pattern VirtualInterfaceState_Deleting = VirtualInterfaceState' "deleting"++pattern VirtualInterfaceState_Down :: VirtualInterfaceState+pattern VirtualInterfaceState_Down = VirtualInterfaceState' "down"++pattern VirtualInterfaceState_Pending :: VirtualInterfaceState+pattern VirtualInterfaceState_Pending = VirtualInterfaceState' "pending"++pattern VirtualInterfaceState_Rejected :: VirtualInterfaceState+pattern VirtualInterfaceState_Rejected = VirtualInterfaceState' "rejected"++pattern VirtualInterfaceState_Unknown :: VirtualInterfaceState+pattern VirtualInterfaceState_Unknown = VirtualInterfaceState' "unknown"++pattern VirtualInterfaceState_Verifying :: VirtualInterfaceState+pattern VirtualInterfaceState_Verifying = VirtualInterfaceState' "verifying"++{-# COMPLETE+  VirtualInterfaceState_Available,+  VirtualInterfaceState_Confirming,+  VirtualInterfaceState_Deleted,+  VirtualInterfaceState_Deleting,+  VirtualInterfaceState_Down,+  VirtualInterfaceState_Pending,+  VirtualInterfaceState_Rejected,+  VirtualInterfaceState_Unknown,+  VirtualInterfaceState_Verifying,+  VirtualInterfaceState'+  #-}
+ gen/Amazonka/DirectConnect/Types/VirtualInterfaceTestHistory.hs view
@@ -0,0 +1,160 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Types.VirtualInterfaceTestHistory where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | Information about the virtual interface failover test.+--+-- /See:/ 'newVirtualInterfaceTestHistory' smart constructor.+data VirtualInterfaceTestHistory = VirtualInterfaceTestHistory'+  { -- | The BGP peers that were put in the DOWN state as part of the virtual+    -- interface failover test.+    bgpPeers :: Prelude.Maybe [Prelude.Text],+    -- | The time that the virtual interface moves out of the DOWN state.+    endTime :: Prelude.Maybe Data.POSIX,+    -- | The owner ID of the tested virtual interface.+    ownerAccount :: Prelude.Maybe Prelude.Text,+    -- | The time that the virtual interface moves to the DOWN state.+    startTime :: Prelude.Maybe Data.POSIX,+    -- | The status of the virtual interface failover test.+    status :: Prelude.Maybe Prelude.Text,+    -- | The time that the virtual interface failover test ran in minutes.+    testDurationInMinutes :: Prelude.Maybe Prelude.Int,+    -- | The ID of the virtual interface failover test.+    testId :: Prelude.Maybe Prelude.Text,+    -- | The ID of the tested virtual interface.+    virtualInterfaceId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VirtualInterfaceTestHistory' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bgpPeers', 'virtualInterfaceTestHistory_bgpPeers' - The BGP peers that were put in the DOWN state as part of the virtual+-- interface failover test.+--+-- 'endTime', 'virtualInterfaceTestHistory_endTime' - The time that the virtual interface moves out of the DOWN state.+--+-- 'ownerAccount', 'virtualInterfaceTestHistory_ownerAccount' - The owner ID of the tested virtual interface.+--+-- 'startTime', 'virtualInterfaceTestHistory_startTime' - The time that the virtual interface moves to the DOWN state.+--+-- 'status', 'virtualInterfaceTestHistory_status' - The status of the virtual interface failover test.+--+-- 'testDurationInMinutes', 'virtualInterfaceTestHistory_testDurationInMinutes' - The time that the virtual interface failover test ran in minutes.+--+-- 'testId', 'virtualInterfaceTestHistory_testId' - The ID of the virtual interface failover test.+--+-- 'virtualInterfaceId', 'virtualInterfaceTestHistory_virtualInterfaceId' - The ID of the tested virtual interface.+newVirtualInterfaceTestHistory ::+  VirtualInterfaceTestHistory+newVirtualInterfaceTestHistory =+  VirtualInterfaceTestHistory'+    { bgpPeers =+        Prelude.Nothing,+      endTime = Prelude.Nothing,+      ownerAccount = Prelude.Nothing,+      startTime = Prelude.Nothing,+      status = Prelude.Nothing,+      testDurationInMinutes = Prelude.Nothing,+      testId = Prelude.Nothing,+      virtualInterfaceId = Prelude.Nothing+    }++-- | The BGP peers that were put in the DOWN state as part of the virtual+-- interface failover test.+virtualInterfaceTestHistory_bgpPeers :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe [Prelude.Text])+virtualInterfaceTestHistory_bgpPeers = Lens.lens (\VirtualInterfaceTestHistory' {bgpPeers} -> bgpPeers) (\s@VirtualInterfaceTestHistory' {} a -> s {bgpPeers = a} :: VirtualInterfaceTestHistory) Prelude.. Lens.mapping Lens.coerced++-- | The time that the virtual interface moves out of the DOWN state.+virtualInterfaceTestHistory_endTime :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.UTCTime)+virtualInterfaceTestHistory_endTime = Lens.lens (\VirtualInterfaceTestHistory' {endTime} -> endTime) (\s@VirtualInterfaceTestHistory' {} a -> s {endTime = a} :: VirtualInterfaceTestHistory) Prelude.. Lens.mapping Data._Time++-- | The owner ID of the tested virtual interface.+virtualInterfaceTestHistory_ownerAccount :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+virtualInterfaceTestHistory_ownerAccount = Lens.lens (\VirtualInterfaceTestHistory' {ownerAccount} -> ownerAccount) (\s@VirtualInterfaceTestHistory' {} a -> s {ownerAccount = a} :: VirtualInterfaceTestHistory)++-- | The time that the virtual interface moves to the DOWN state.+virtualInterfaceTestHistory_startTime :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.UTCTime)+virtualInterfaceTestHistory_startTime = Lens.lens (\VirtualInterfaceTestHistory' {startTime} -> startTime) (\s@VirtualInterfaceTestHistory' {} a -> s {startTime = a} :: VirtualInterfaceTestHistory) Prelude.. Lens.mapping Data._Time++-- | The status of the virtual interface failover test.+virtualInterfaceTestHistory_status :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+virtualInterfaceTestHistory_status = Lens.lens (\VirtualInterfaceTestHistory' {status} -> status) (\s@VirtualInterfaceTestHistory' {} a -> s {status = a} :: VirtualInterfaceTestHistory)++-- | The time that the virtual interface failover test ran in minutes.+virtualInterfaceTestHistory_testDurationInMinutes :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.Int)+virtualInterfaceTestHistory_testDurationInMinutes = Lens.lens (\VirtualInterfaceTestHistory' {testDurationInMinutes} -> testDurationInMinutes) (\s@VirtualInterfaceTestHistory' {} a -> s {testDurationInMinutes = a} :: VirtualInterfaceTestHistory)++-- | The ID of the virtual interface failover test.+virtualInterfaceTestHistory_testId :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+virtualInterfaceTestHistory_testId = Lens.lens (\VirtualInterfaceTestHistory' {testId} -> testId) (\s@VirtualInterfaceTestHistory' {} a -> s {testId = a} :: VirtualInterfaceTestHistory)++-- | The ID of the tested virtual interface.+virtualInterfaceTestHistory_virtualInterfaceId :: Lens.Lens' VirtualInterfaceTestHistory (Prelude.Maybe Prelude.Text)+virtualInterfaceTestHistory_virtualInterfaceId = Lens.lens (\VirtualInterfaceTestHistory' {virtualInterfaceId} -> virtualInterfaceId) (\s@VirtualInterfaceTestHistory' {} a -> s {virtualInterfaceId = a} :: VirtualInterfaceTestHistory)++instance Data.FromJSON VirtualInterfaceTestHistory where+  parseJSON =+    Data.withObject+      "VirtualInterfaceTestHistory"+      ( \x ->+          VirtualInterfaceTestHistory'+            Prelude.<$> (x Data..:? "bgpPeers" Data..!= Prelude.mempty)+            Prelude.<*> (x Data..:? "endTime")+            Prelude.<*> (x Data..:? "ownerAccount")+            Prelude.<*> (x Data..:? "startTime")+            Prelude.<*> (x Data..:? "status")+            Prelude.<*> (x Data..:? "testDurationInMinutes")+            Prelude.<*> (x Data..:? "testId")+            Prelude.<*> (x Data..:? "virtualInterfaceId")+      )++instance Prelude.Hashable VirtualInterfaceTestHistory where+  hashWithSalt _salt VirtualInterfaceTestHistory' {..} =+    _salt+      `Prelude.hashWithSalt` bgpPeers+      `Prelude.hashWithSalt` endTime+      `Prelude.hashWithSalt` ownerAccount+      `Prelude.hashWithSalt` startTime+      `Prelude.hashWithSalt` status+      `Prelude.hashWithSalt` testDurationInMinutes+      `Prelude.hashWithSalt` testId+      `Prelude.hashWithSalt` virtualInterfaceId++instance Prelude.NFData VirtualInterfaceTestHistory where+  rnf VirtualInterfaceTestHistory' {..} =+    Prelude.rnf bgpPeers+      `Prelude.seq` Prelude.rnf endTime+      `Prelude.seq` Prelude.rnf ownerAccount+      `Prelude.seq` Prelude.rnf startTime+      `Prelude.seq` Prelude.rnf status+      `Prelude.seq` Prelude.rnf testDurationInMinutes+      `Prelude.seq` Prelude.rnf testId+      `Prelude.seq` Prelude.rnf virtualInterfaceId
+ gen/Amazonka/DirectConnect/UntagResource.hs view
@@ -0,0 +1,171 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UntagResource+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Removes one or more tags from the specified Direct Connect resource.+module Amazonka.DirectConnect.UntagResource+  ( -- * Creating a Request+    UntagResource (..),+    newUntagResource,++    -- * Request Lenses+    untagResource_resourceArn,+    untagResource_tagKeys,++    -- * Destructuring the Response+    UntagResourceResponse (..),+    newUntagResourceResponse,++    -- * Response Lenses+    untagResourceResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUntagResource' smart constructor.+data UntagResource = UntagResource'+  { -- | The Amazon Resource Name (ARN) of the resource.+    resourceArn :: Prelude.Text,+    -- | The tag keys of the tags to remove.+    tagKeys :: [Prelude.Text]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UntagResource' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceArn', 'untagResource_resourceArn' - The Amazon Resource Name (ARN) of the resource.+--+-- 'tagKeys', 'untagResource_tagKeys' - The tag keys of the tags to remove.+newUntagResource ::+  -- | 'resourceArn'+  Prelude.Text ->+  UntagResource+newUntagResource pResourceArn_ =+  UntagResource'+    { resourceArn = pResourceArn_,+      tagKeys = Prelude.mempty+    }++-- | The Amazon Resource Name (ARN) of the resource.+untagResource_resourceArn :: Lens.Lens' UntagResource Prelude.Text+untagResource_resourceArn = Lens.lens (\UntagResource' {resourceArn} -> resourceArn) (\s@UntagResource' {} a -> s {resourceArn = a} :: UntagResource)++-- | The tag keys of the tags to remove.+untagResource_tagKeys :: Lens.Lens' UntagResource [Prelude.Text]+untagResource_tagKeys = Lens.lens (\UntagResource' {tagKeys} -> tagKeys) (\s@UntagResource' {} a -> s {tagKeys = a} :: UntagResource) Prelude.. Lens.coerced++instance Core.AWSRequest UntagResource where+  type+    AWSResponse UntagResource =+      UntagResourceResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveEmpty+      ( \s h x ->+          UntagResourceResponse'+            Prelude.<$> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable UntagResource where+  hashWithSalt _salt UntagResource' {..} =+    _salt+      `Prelude.hashWithSalt` resourceArn+      `Prelude.hashWithSalt` tagKeys++instance Prelude.NFData UntagResource where+  rnf UntagResource' {..} =+    Prelude.rnf resourceArn+      `Prelude.seq` Prelude.rnf tagKeys++instance Data.ToHeaders UntagResource where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.UntagResource" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON UntagResource where+  toJSON UntagResource' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just ("resourceArn" Data..= resourceArn),+            Prelude.Just ("tagKeys" Data..= tagKeys)+          ]+      )++instance Data.ToPath UntagResource where+  toPath = Prelude.const "/"++instance Data.ToQuery UntagResource where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUntagResourceResponse' smart constructor.+data UntagResourceResponse = UntagResourceResponse'+  { -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UntagResourceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'httpStatus', 'untagResourceResponse_httpStatus' - The response's http status code.+newUntagResourceResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  UntagResourceResponse+newUntagResourceResponse pHttpStatus_ =+  UntagResourceResponse' {httpStatus = pHttpStatus_}++-- | The response's http status code.+untagResourceResponse_httpStatus :: Lens.Lens' UntagResourceResponse Prelude.Int+untagResourceResponse_httpStatus = Lens.lens (\UntagResourceResponse' {httpStatus} -> httpStatus) (\s@UntagResourceResponse' {} a -> s {httpStatus = a} :: UntagResourceResponse)++instance Prelude.NFData UntagResourceResponse where+  rnf UntagResourceResponse' {..} =+    Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/UpdateConnection.hs view
@@ -0,0 +1,189 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UpdateConnection+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the Direct Connect dedicated connection configuration.+--+-- You can update the following parameters for a connection:+--+-- -   The connection name+--+-- -   The connection\'s MAC Security (MACsec) encryption mode.+module Amazonka.DirectConnect.UpdateConnection+  ( -- * Creating a Request+    UpdateConnection (..),+    newUpdateConnection,++    -- * Request Lenses+    updateConnection_connectionName,+    updateConnection_encryptionMode,+    updateConnection_connectionId,++    -- * Destructuring the Response+    Connection (..),+    newConnection,++    -- * Response Lenses+    connection_awsDevice,+    connection_awsDeviceV2,+    connection_awsLogicalDeviceId,+    connection_bandwidth,+    connection_connectionId,+    connection_connectionName,+    connection_connectionState,+    connection_encryptionMode,+    connection_hasLogicalRedundancy,+    connection_jumboFrameCapable,+    connection_lagId,+    connection_loaIssueTime,+    connection_location,+    connection_macSecCapable,+    connection_macSecKeys,+    connection_ownerAccount,+    connection_partnerName,+    connection_portEncryptionStatus,+    connection_providerName,+    connection_region,+    connection_tags,+    connection_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUpdateConnection' smart constructor.+data UpdateConnection = UpdateConnection'+  { -- | The name of the connection.+    connectionName :: Prelude.Maybe Prelude.Text,+    -- | The connection MAC Security (MACsec) encryption mode.+    --+    -- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+    encryptionMode :: Prelude.Maybe Prelude.Text,+    -- | The ID of the dedicated connection.+    --+    -- You can use DescribeConnections to retrieve the connection ID.+    connectionId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateConnection' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'connectionName', 'updateConnection_connectionName' - The name of the connection.+--+-- 'encryptionMode', 'updateConnection_encryptionMode' - The connection MAC Security (MACsec) encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+--+-- 'connectionId', 'updateConnection_connectionId' - The ID of the dedicated connection.+--+-- You can use DescribeConnections to retrieve the connection ID.+newUpdateConnection ::+  -- | 'connectionId'+  Prelude.Text ->+  UpdateConnection+newUpdateConnection pConnectionId_ =+  UpdateConnection'+    { connectionName = Prelude.Nothing,+      encryptionMode = Prelude.Nothing,+      connectionId = pConnectionId_+    }++-- | The name of the connection.+updateConnection_connectionName :: Lens.Lens' UpdateConnection (Prelude.Maybe Prelude.Text)+updateConnection_connectionName = Lens.lens (\UpdateConnection' {connectionName} -> connectionName) (\s@UpdateConnection' {} a -> s {connectionName = a} :: UpdateConnection)++-- | The connection MAC Security (MACsec) encryption mode.+--+-- The valid values are @no_encrypt@, @should_encrypt@, and @must_encrypt@.+updateConnection_encryptionMode :: Lens.Lens' UpdateConnection (Prelude.Maybe Prelude.Text)+updateConnection_encryptionMode = Lens.lens (\UpdateConnection' {encryptionMode} -> encryptionMode) (\s@UpdateConnection' {} a -> s {encryptionMode = a} :: UpdateConnection)++-- | The ID of the dedicated connection.+--+-- You can use DescribeConnections to retrieve the connection ID.+updateConnection_connectionId :: Lens.Lens' UpdateConnection Prelude.Text+updateConnection_connectionId = Lens.lens (\UpdateConnection' {connectionId} -> connectionId) (\s@UpdateConnection' {} a -> s {connectionId = a} :: UpdateConnection)++instance Core.AWSRequest UpdateConnection where+  type AWSResponse UpdateConnection = Connection+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable UpdateConnection where+  hashWithSalt _salt UpdateConnection' {..} =+    _salt+      `Prelude.hashWithSalt` connectionName+      `Prelude.hashWithSalt` encryptionMode+      `Prelude.hashWithSalt` connectionId++instance Prelude.NFData UpdateConnection where+  rnf UpdateConnection' {..} =+    Prelude.rnf connectionName+      `Prelude.seq` Prelude.rnf encryptionMode+      `Prelude.seq` Prelude.rnf connectionId++instance Data.ToHeaders UpdateConnection where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.UpdateConnection" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON UpdateConnection where+  toJSON UpdateConnection' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("connectionName" Data..=)+              Prelude.<$> connectionName,+            ("encryptionMode" Data..=)+              Prelude.<$> encryptionMode,+            Prelude.Just ("connectionId" Data..= connectionId)+          ]+      )++instance Data.ToPath UpdateConnection where+  toPath = Prelude.const "/"++instance Data.ToQuery UpdateConnection where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/UpdateDirectConnectGateway.hs view
@@ -0,0 +1,200 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UpdateDirectConnectGateway+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the name of a current Direct Connect gateway.+module Amazonka.DirectConnect.UpdateDirectConnectGateway+  ( -- * Creating a Request+    UpdateDirectConnectGateway (..),+    newUpdateDirectConnectGateway,++    -- * Request Lenses+    updateDirectConnectGateway_directConnectGatewayId,+    updateDirectConnectGateway_newDirectConnectGatewayName,++    -- * Destructuring the Response+    UpdateDirectConnectGatewayResponse (..),+    newUpdateDirectConnectGatewayResponse,++    -- * Response Lenses+    updateDirectConnectGatewayResponse_directConnectGateway,+    updateDirectConnectGatewayResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUpdateDirectConnectGateway' smart constructor.+data UpdateDirectConnectGateway = UpdateDirectConnectGateway'+  { -- | The ID of the Direct Connect gateway to update.+    directConnectGatewayId :: Prelude.Text,+    -- | The new name for the Direct Connect gateway.+    newDirectConnectGatewayName' :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateDirectConnectGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayId', 'updateDirectConnectGateway_directConnectGatewayId' - The ID of the Direct Connect gateway to update.+--+-- 'newDirectConnectGatewayName'', 'updateDirectConnectGateway_newDirectConnectGatewayName' - The new name for the Direct Connect gateway.+newUpdateDirectConnectGateway ::+  -- | 'directConnectGatewayId'+  Prelude.Text ->+  -- | 'newDirectConnectGatewayName''+  Prelude.Text ->+  UpdateDirectConnectGateway+newUpdateDirectConnectGateway+  pDirectConnectGatewayId_+  pNewDirectConnectGatewayName_ =+    UpdateDirectConnectGateway'+      { directConnectGatewayId =+          pDirectConnectGatewayId_,+        newDirectConnectGatewayName' =+          pNewDirectConnectGatewayName_+      }++-- | The ID of the Direct Connect gateway to update.+updateDirectConnectGateway_directConnectGatewayId :: Lens.Lens' UpdateDirectConnectGateway Prelude.Text+updateDirectConnectGateway_directConnectGatewayId = Lens.lens (\UpdateDirectConnectGateway' {directConnectGatewayId} -> directConnectGatewayId) (\s@UpdateDirectConnectGateway' {} a -> s {directConnectGatewayId = a} :: UpdateDirectConnectGateway)++-- | The new name for the Direct Connect gateway.+updateDirectConnectGateway_newDirectConnectGatewayName :: Lens.Lens' UpdateDirectConnectGateway Prelude.Text+updateDirectConnectGateway_newDirectConnectGatewayName = Lens.lens (\UpdateDirectConnectGateway' {newDirectConnectGatewayName'} -> newDirectConnectGatewayName') (\s@UpdateDirectConnectGateway' {} a -> s {newDirectConnectGatewayName' = a} :: UpdateDirectConnectGateway)++instance Core.AWSRequest UpdateDirectConnectGateway where+  type+    AWSResponse UpdateDirectConnectGateway =+      UpdateDirectConnectGatewayResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          UpdateDirectConnectGatewayResponse'+            Prelude.<$> (x Data..?> "directConnectGateway")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable UpdateDirectConnectGateway where+  hashWithSalt _salt UpdateDirectConnectGateway' {..} =+    _salt+      `Prelude.hashWithSalt` directConnectGatewayId+      `Prelude.hashWithSalt` newDirectConnectGatewayName'++instance Prelude.NFData UpdateDirectConnectGateway where+  rnf UpdateDirectConnectGateway' {..} =+    Prelude.rnf directConnectGatewayId+      `Prelude.seq` Prelude.rnf newDirectConnectGatewayName'++instance Data.ToHeaders UpdateDirectConnectGateway where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.UpdateDirectConnectGateway" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON UpdateDirectConnectGateway where+  toJSON UpdateDirectConnectGateway' {..} =+    Data.object+      ( Prelude.catMaybes+          [ Prelude.Just+              ( "directConnectGatewayId"+                  Data..= directConnectGatewayId+              ),+            Prelude.Just+              ( "newDirectConnectGatewayName"+                  Data..= newDirectConnectGatewayName'+              )+          ]+      )++instance Data.ToPath UpdateDirectConnectGateway where+  toPath = Prelude.const "/"++instance Data.ToQuery UpdateDirectConnectGateway where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateDirectConnectGatewayResponse' smart constructor.+data UpdateDirectConnectGatewayResponse = UpdateDirectConnectGatewayResponse'+  { directConnectGateway :: Prelude.Maybe DirectConnectGateway,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateDirectConnectGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGateway', 'updateDirectConnectGatewayResponse_directConnectGateway' - Undocumented member.+--+-- 'httpStatus', 'updateDirectConnectGatewayResponse_httpStatus' - The response's http status code.+newUpdateDirectConnectGatewayResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  UpdateDirectConnectGatewayResponse+newUpdateDirectConnectGatewayResponse pHttpStatus_ =+  UpdateDirectConnectGatewayResponse'+    { directConnectGateway =+        Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Undocumented member.+updateDirectConnectGatewayResponse_directConnectGateway :: Lens.Lens' UpdateDirectConnectGatewayResponse (Prelude.Maybe DirectConnectGateway)+updateDirectConnectGatewayResponse_directConnectGateway = Lens.lens (\UpdateDirectConnectGatewayResponse' {directConnectGateway} -> directConnectGateway) (\s@UpdateDirectConnectGatewayResponse' {} a -> s {directConnectGateway = a} :: UpdateDirectConnectGatewayResponse)++-- | The response's http status code.+updateDirectConnectGatewayResponse_httpStatus :: Lens.Lens' UpdateDirectConnectGatewayResponse Prelude.Int+updateDirectConnectGatewayResponse_httpStatus = Lens.lens (\UpdateDirectConnectGatewayResponse' {httpStatus} -> httpStatus) (\s@UpdateDirectConnectGatewayResponse' {} a -> s {httpStatus = a} :: UpdateDirectConnectGatewayResponse)++instance+  Prelude.NFData+    UpdateDirectConnectGatewayResponse+  where+  rnf UpdateDirectConnectGatewayResponse' {..} =+    Prelude.rnf directConnectGateway+      `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/UpdateDirectConnectGatewayAssociation.hs view
@@ -0,0 +1,239 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the specified attributes of the Direct Connect gateway+-- association.+--+-- Add or remove prefixes from the association.+module Amazonka.DirectConnect.UpdateDirectConnectGatewayAssociation+  ( -- * Creating a Request+    UpdateDirectConnectGatewayAssociation (..),+    newUpdateDirectConnectGatewayAssociation,++    -- * Request Lenses+    updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway,+    updateDirectConnectGatewayAssociation_associationId,+    updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway,++    -- * Destructuring the Response+    UpdateDirectConnectGatewayAssociationResponse (..),+    newUpdateDirectConnectGatewayAssociationResponse,++    -- * Response Lenses+    updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation,+    updateDirectConnectGatewayAssociationResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUpdateDirectConnectGatewayAssociation' smart constructor.+data UpdateDirectConnectGatewayAssociation = UpdateDirectConnectGatewayAssociation'+  { -- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+    addAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix],+    -- | The ID of the Direct Connect gateway association.+    associationId :: Prelude.Maybe Prelude.Text,+    -- | The Amazon VPC prefixes to no longer advertise to the Direct Connect+    -- gateway.+    removeAllowedPrefixesToDirectConnectGateway :: Prelude.Maybe [RouteFilterPrefix]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateDirectConnectGatewayAssociation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'addAllowedPrefixesToDirectConnectGateway', 'updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to advertise to the Direct Connect gateway.+--+-- 'associationId', 'updateDirectConnectGatewayAssociation_associationId' - The ID of the Direct Connect gateway association.+--+-- 'removeAllowedPrefixesToDirectConnectGateway', 'updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway' - The Amazon VPC prefixes to no longer advertise to the Direct Connect+-- gateway.+newUpdateDirectConnectGatewayAssociation ::+  UpdateDirectConnectGatewayAssociation+newUpdateDirectConnectGatewayAssociation =+  UpdateDirectConnectGatewayAssociation'+    { addAllowedPrefixesToDirectConnectGateway =+        Prelude.Nothing,+      associationId = Prelude.Nothing,+      removeAllowedPrefixesToDirectConnectGateway =+        Prelude.Nothing+    }++-- | The Amazon VPC prefixes to advertise to the Direct Connect gateway.+updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway :: Lens.Lens' UpdateDirectConnectGatewayAssociation (Prelude.Maybe [RouteFilterPrefix])+updateDirectConnectGatewayAssociation_addAllowedPrefixesToDirectConnectGateway = Lens.lens (\UpdateDirectConnectGatewayAssociation' {addAllowedPrefixesToDirectConnectGateway} -> addAllowedPrefixesToDirectConnectGateway) (\s@UpdateDirectConnectGatewayAssociation' {} a -> s {addAllowedPrefixesToDirectConnectGateway = a} :: UpdateDirectConnectGatewayAssociation) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the Direct Connect gateway association.+updateDirectConnectGatewayAssociation_associationId :: Lens.Lens' UpdateDirectConnectGatewayAssociation (Prelude.Maybe Prelude.Text)+updateDirectConnectGatewayAssociation_associationId = Lens.lens (\UpdateDirectConnectGatewayAssociation' {associationId} -> associationId) (\s@UpdateDirectConnectGatewayAssociation' {} a -> s {associationId = a} :: UpdateDirectConnectGatewayAssociation)++-- | The Amazon VPC prefixes to no longer advertise to the Direct Connect+-- gateway.+updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway :: Lens.Lens' UpdateDirectConnectGatewayAssociation (Prelude.Maybe [RouteFilterPrefix])+updateDirectConnectGatewayAssociation_removeAllowedPrefixesToDirectConnectGateway = Lens.lens (\UpdateDirectConnectGatewayAssociation' {removeAllowedPrefixesToDirectConnectGateway} -> removeAllowedPrefixesToDirectConnectGateway) (\s@UpdateDirectConnectGatewayAssociation' {} a -> s {removeAllowedPrefixesToDirectConnectGateway = a} :: UpdateDirectConnectGatewayAssociation) Prelude.. Lens.mapping Lens.coerced++instance+  Core.AWSRequest+    UpdateDirectConnectGatewayAssociation+  where+  type+    AWSResponse+      UpdateDirectConnectGatewayAssociation =+      UpdateDirectConnectGatewayAssociationResponse+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          UpdateDirectConnectGatewayAssociationResponse'+            Prelude.<$> (x Data..?> "directConnectGatewayAssociation")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    UpdateDirectConnectGatewayAssociation+  where+  hashWithSalt+    _salt+    UpdateDirectConnectGatewayAssociation' {..} =+      _salt+        `Prelude.hashWithSalt` addAllowedPrefixesToDirectConnectGateway+        `Prelude.hashWithSalt` associationId+        `Prelude.hashWithSalt` removeAllowedPrefixesToDirectConnectGateway++instance+  Prelude.NFData+    UpdateDirectConnectGatewayAssociation+  where+  rnf UpdateDirectConnectGatewayAssociation' {..} =+    Prelude.rnf+      addAllowedPrefixesToDirectConnectGateway+      `Prelude.seq` Prelude.rnf associationId+      `Prelude.seq` Prelude.rnf+        removeAllowedPrefixesToDirectConnectGateway++instance+  Data.ToHeaders+    UpdateDirectConnectGatewayAssociation+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.UpdateDirectConnectGatewayAssociation" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance+  Data.ToJSON+    UpdateDirectConnectGatewayAssociation+  where+  toJSON UpdateDirectConnectGatewayAssociation' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("addAllowedPrefixesToDirectConnectGateway" Data..=)+              Prelude.<$> addAllowedPrefixesToDirectConnectGateway,+            ("associationId" Data..=) Prelude.<$> associationId,+            ( "removeAllowedPrefixesToDirectConnectGateway"+                Data..=+            )+              Prelude.<$> removeAllowedPrefixesToDirectConnectGateway+          ]+      )++instance+  Data.ToPath+    UpdateDirectConnectGatewayAssociation+  where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    UpdateDirectConnectGatewayAssociation+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateDirectConnectGatewayAssociationResponse' smart constructor.+data UpdateDirectConnectGatewayAssociationResponse = UpdateDirectConnectGatewayAssociationResponse'+  { directConnectGatewayAssociation :: Prelude.Maybe DirectConnectGatewayAssociation,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateDirectConnectGatewayAssociationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directConnectGatewayAssociation', 'updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation' - Undocumented member.+--+-- 'httpStatus', 'updateDirectConnectGatewayAssociationResponse_httpStatus' - The response's http status code.+newUpdateDirectConnectGatewayAssociationResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  UpdateDirectConnectGatewayAssociationResponse+newUpdateDirectConnectGatewayAssociationResponse+  pHttpStatus_ =+    UpdateDirectConnectGatewayAssociationResponse'+      { directConnectGatewayAssociation =+          Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | Undocumented member.+updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation :: Lens.Lens' UpdateDirectConnectGatewayAssociationResponse (Prelude.Maybe DirectConnectGatewayAssociation)+updateDirectConnectGatewayAssociationResponse_directConnectGatewayAssociation = Lens.lens (\UpdateDirectConnectGatewayAssociationResponse' {directConnectGatewayAssociation} -> directConnectGatewayAssociation) (\s@UpdateDirectConnectGatewayAssociationResponse' {} a -> s {directConnectGatewayAssociation = a} :: UpdateDirectConnectGatewayAssociationResponse)++-- | The response's http status code.+updateDirectConnectGatewayAssociationResponse_httpStatus :: Lens.Lens' UpdateDirectConnectGatewayAssociationResponse Prelude.Int+updateDirectConnectGatewayAssociationResponse_httpStatus = Lens.lens (\UpdateDirectConnectGatewayAssociationResponse' {httpStatus} -> httpStatus) (\s@UpdateDirectConnectGatewayAssociationResponse' {} a -> s {httpStatus = a} :: UpdateDirectConnectGatewayAssociationResponse)++instance+  Prelude.NFData+    UpdateDirectConnectGatewayAssociationResponse+  where+  rnf+    UpdateDirectConnectGatewayAssociationResponse' {..} =+      Prelude.rnf directConnectGatewayAssociation+        `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/DirectConnect/UpdateLag.hs view
@@ -0,0 +1,210 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UpdateLag+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the attributes of the specified link aggregation group (LAG).+--+-- You can update the following LAG attributes:+--+-- -   The name of the LAG.+--+-- -   The value for the minimum number of connections that must be+--     operational for the LAG itself to be operational.+--+-- -   The LAG\'s MACsec encryption mode.+--+--     Amazon Web Services assigns this value to each connection which is+--     part of the LAG.+--+-- -   The tags+--+-- If you adjust the threshold value for the minimum number of operational+-- connections, ensure that the new value does not cause the LAG to fall+-- below the threshold and become non-operational.+module Amazonka.DirectConnect.UpdateLag+  ( -- * Creating a Request+    UpdateLag (..),+    newUpdateLag,++    -- * Request Lenses+    updateLag_encryptionMode,+    updateLag_lagName,+    updateLag_minimumLinks,+    updateLag_lagId,++    -- * Destructuring the Response+    Lag (..),+    newLag,++    -- * Response Lenses+    lag_allowsHostedConnections,+    lag_awsDevice,+    lag_awsDeviceV2,+    lag_awsLogicalDeviceId,+    lag_connections,+    lag_connectionsBandwidth,+    lag_encryptionMode,+    lag_hasLogicalRedundancy,+    lag_jumboFrameCapable,+    lag_lagId,+    lag_lagName,+    lag_lagState,+    lag_location,+    lag_macSecCapable,+    lag_macSecKeys,+    lag_minimumLinks,+    lag_numberOfConnections,+    lag_ownerAccount,+    lag_providerName,+    lag_region,+    lag_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUpdateLag' smart constructor.+data UpdateLag = UpdateLag'+  { -- | The LAG MAC Security (MACsec) encryption mode.+    --+    -- Amazon Web Services applies the value to all connections which are part+    -- of the LAG.+    encryptionMode :: Prelude.Maybe Prelude.Text,+    -- | The name of the LAG.+    lagName :: Prelude.Maybe Prelude.Text,+    -- | The minimum number of physical connections that must be operational for+    -- the LAG itself to be operational.+    minimumLinks :: Prelude.Maybe Prelude.Int,+    -- | The ID of the LAG.+    lagId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateLag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'encryptionMode', 'updateLag_encryptionMode' - The LAG MAC Security (MACsec) encryption mode.+--+-- Amazon Web Services applies the value to all connections which are part+-- of the LAG.+--+-- 'lagName', 'updateLag_lagName' - The name of the LAG.+--+-- 'minimumLinks', 'updateLag_minimumLinks' - The minimum number of physical connections that must be operational for+-- the LAG itself to be operational.+--+-- 'lagId', 'updateLag_lagId' - The ID of the LAG.+newUpdateLag ::+  -- | 'lagId'+  Prelude.Text ->+  UpdateLag+newUpdateLag pLagId_ =+  UpdateLag'+    { encryptionMode = Prelude.Nothing,+      lagName = Prelude.Nothing,+      minimumLinks = Prelude.Nothing,+      lagId = pLagId_+    }++-- | The LAG MAC Security (MACsec) encryption mode.+--+-- Amazon Web Services applies the value to all connections which are part+-- of the LAG.+updateLag_encryptionMode :: Lens.Lens' UpdateLag (Prelude.Maybe Prelude.Text)+updateLag_encryptionMode = Lens.lens (\UpdateLag' {encryptionMode} -> encryptionMode) (\s@UpdateLag' {} a -> s {encryptionMode = a} :: UpdateLag)++-- | The name of the LAG.+updateLag_lagName :: Lens.Lens' UpdateLag (Prelude.Maybe Prelude.Text)+updateLag_lagName = Lens.lens (\UpdateLag' {lagName} -> lagName) (\s@UpdateLag' {} a -> s {lagName = a} :: UpdateLag)++-- | The minimum number of physical connections that must be operational for+-- the LAG itself to be operational.+updateLag_minimumLinks :: Lens.Lens' UpdateLag (Prelude.Maybe Prelude.Int)+updateLag_minimumLinks = Lens.lens (\UpdateLag' {minimumLinks} -> minimumLinks) (\s@UpdateLag' {} a -> s {minimumLinks = a} :: UpdateLag)++-- | The ID of the LAG.+updateLag_lagId :: Lens.Lens' UpdateLag Prelude.Text+updateLag_lagId = Lens.lens (\UpdateLag' {lagId} -> lagId) (\s@UpdateLag' {} a -> s {lagId = a} :: UpdateLag)++instance Core.AWSRequest UpdateLag where+  type AWSResponse UpdateLag = Lag+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable UpdateLag where+  hashWithSalt _salt UpdateLag' {..} =+    _salt+      `Prelude.hashWithSalt` encryptionMode+      `Prelude.hashWithSalt` lagName+      `Prelude.hashWithSalt` minimumLinks+      `Prelude.hashWithSalt` lagId++instance Prelude.NFData UpdateLag where+  rnf UpdateLag' {..} =+    Prelude.rnf encryptionMode+      `Prelude.seq` Prelude.rnf lagName+      `Prelude.seq` Prelude.rnf minimumLinks+      `Prelude.seq` Prelude.rnf lagId++instance Data.ToHeaders UpdateLag where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ("OvertureService.UpdateLag" :: Prelude.ByteString),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON UpdateLag where+  toJSON UpdateLag' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("encryptionMode" Data..=)+              Prelude.<$> encryptionMode,+            ("lagName" Data..=) Prelude.<$> lagName,+            ("minimumLinks" Data..=) Prelude.<$> minimumLinks,+            Prelude.Just ("lagId" Data..= lagId)+          ]+      )++instance Data.ToPath UpdateLag where+  toPath = Prelude.const "/"++instance Data.ToQuery UpdateLag where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/UpdateVirtualInterfaceAttributes.hs view
@@ -0,0 +1,222 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the specified attributes of the specified virtual private+-- interface.+--+-- Setting the MTU of a virtual interface to 9001 (jumbo frames) can cause+-- an update to the underlying physical connection if it wasn\'t updated to+-- support jumbo frames. Updating the connection disrupts network+-- connectivity for all virtual interfaces associated with the connection+-- for up to 30 seconds. To check whether your connection supports jumbo+-- frames, call DescribeConnections. To check whether your virtual q+-- interface supports jumbo frames, call DescribeVirtualInterfaces.+module Amazonka.DirectConnect.UpdateVirtualInterfaceAttributes+  ( -- * Creating a Request+    UpdateVirtualInterfaceAttributes (..),+    newUpdateVirtualInterfaceAttributes,++    -- * Request Lenses+    updateVirtualInterfaceAttributes_enableSiteLink,+    updateVirtualInterfaceAttributes_mtu,+    updateVirtualInterfaceAttributes_virtualInterfaceName,+    updateVirtualInterfaceAttributes_virtualInterfaceId,++    -- * Destructuring the Response+    VirtualInterface (..),+    newVirtualInterface,++    -- * Response Lenses+    virtualInterface_addressFamily,+    virtualInterface_amazonAddress,+    virtualInterface_amazonSideAsn,+    virtualInterface_asn,+    virtualInterface_authKey,+    virtualInterface_awsDeviceV2,+    virtualInterface_awsLogicalDeviceId,+    virtualInterface_bgpPeers,+    virtualInterface_connectionId,+    virtualInterface_customerAddress,+    virtualInterface_customerRouterConfig,+    virtualInterface_directConnectGatewayId,+    virtualInterface_jumboFrameCapable,+    virtualInterface_location,+    virtualInterface_mtu,+    virtualInterface_ownerAccount,+    virtualInterface_region,+    virtualInterface_routeFilterPrefixes,+    virtualInterface_siteLinkEnabled,+    virtualInterface_tags,+    virtualInterface_virtualGatewayId,+    virtualInterface_virtualInterfaceId,+    virtualInterface_virtualInterfaceName,+    virtualInterface_virtualInterfaceState,+    virtualInterface_virtualInterfaceType,+    virtualInterface_vlan,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newUpdateVirtualInterfaceAttributes' smart constructor.+data UpdateVirtualInterfaceAttributes = UpdateVirtualInterfaceAttributes'+  { -- | Indicates whether to enable or disable SiteLink.+    enableSiteLink :: Prelude.Maybe Prelude.Bool,+    -- | The maximum transmission unit (MTU), in bytes. The supported values are+    -- 1500 and 9001. The default value is 1500.+    mtu :: Prelude.Maybe Prelude.Int,+    -- | The name of the virtual private interface.+    virtualInterfaceName :: Prelude.Maybe Prelude.Text,+    -- | The ID of the virtual private interface.+    virtualInterfaceId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateVirtualInterfaceAttributes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'enableSiteLink', 'updateVirtualInterfaceAttributes_enableSiteLink' - Indicates whether to enable or disable SiteLink.+--+-- 'mtu', 'updateVirtualInterfaceAttributes_mtu' - The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+--+-- 'virtualInterfaceName', 'updateVirtualInterfaceAttributes_virtualInterfaceName' - The name of the virtual private interface.+--+-- 'virtualInterfaceId', 'updateVirtualInterfaceAttributes_virtualInterfaceId' - The ID of the virtual private interface.+newUpdateVirtualInterfaceAttributes ::+  -- | 'virtualInterfaceId'+  Prelude.Text ->+  UpdateVirtualInterfaceAttributes+newUpdateVirtualInterfaceAttributes+  pVirtualInterfaceId_ =+    UpdateVirtualInterfaceAttributes'+      { enableSiteLink =+          Prelude.Nothing,+        mtu = Prelude.Nothing,+        virtualInterfaceName = Prelude.Nothing,+        virtualInterfaceId = pVirtualInterfaceId_+      }++-- | Indicates whether to enable or disable SiteLink.+updateVirtualInterfaceAttributes_enableSiteLink :: Lens.Lens' UpdateVirtualInterfaceAttributes (Prelude.Maybe Prelude.Bool)+updateVirtualInterfaceAttributes_enableSiteLink = Lens.lens (\UpdateVirtualInterfaceAttributes' {enableSiteLink} -> enableSiteLink) (\s@UpdateVirtualInterfaceAttributes' {} a -> s {enableSiteLink = a} :: UpdateVirtualInterfaceAttributes)++-- | The maximum transmission unit (MTU), in bytes. The supported values are+-- 1500 and 9001. The default value is 1500.+updateVirtualInterfaceAttributes_mtu :: Lens.Lens' UpdateVirtualInterfaceAttributes (Prelude.Maybe Prelude.Int)+updateVirtualInterfaceAttributes_mtu = Lens.lens (\UpdateVirtualInterfaceAttributes' {mtu} -> mtu) (\s@UpdateVirtualInterfaceAttributes' {} a -> s {mtu = a} :: UpdateVirtualInterfaceAttributes)++-- | The name of the virtual private interface.+updateVirtualInterfaceAttributes_virtualInterfaceName :: Lens.Lens' UpdateVirtualInterfaceAttributes (Prelude.Maybe Prelude.Text)+updateVirtualInterfaceAttributes_virtualInterfaceName = Lens.lens (\UpdateVirtualInterfaceAttributes' {virtualInterfaceName} -> virtualInterfaceName) (\s@UpdateVirtualInterfaceAttributes' {} a -> s {virtualInterfaceName = a} :: UpdateVirtualInterfaceAttributes)++-- | The ID of the virtual private interface.+updateVirtualInterfaceAttributes_virtualInterfaceId :: Lens.Lens' UpdateVirtualInterfaceAttributes Prelude.Text+updateVirtualInterfaceAttributes_virtualInterfaceId = Lens.lens (\UpdateVirtualInterfaceAttributes' {virtualInterfaceId} -> virtualInterfaceId) (\s@UpdateVirtualInterfaceAttributes' {} a -> s {virtualInterfaceId = a} :: UpdateVirtualInterfaceAttributes)++instance+  Core.AWSRequest+    UpdateVirtualInterfaceAttributes+  where+  type+    AWSResponse UpdateVirtualInterfaceAttributes =+      VirtualInterface+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    UpdateVirtualInterfaceAttributes+  where+  hashWithSalt+    _salt+    UpdateVirtualInterfaceAttributes' {..} =+      _salt+        `Prelude.hashWithSalt` enableSiteLink+        `Prelude.hashWithSalt` mtu+        `Prelude.hashWithSalt` virtualInterfaceName+        `Prelude.hashWithSalt` virtualInterfaceId++instance+  Prelude.NFData+    UpdateVirtualInterfaceAttributes+  where+  rnf UpdateVirtualInterfaceAttributes' {..} =+    Prelude.rnf enableSiteLink+      `Prelude.seq` Prelude.rnf mtu+      `Prelude.seq` Prelude.rnf virtualInterfaceName+      `Prelude.seq` Prelude.rnf virtualInterfaceId++instance+  Data.ToHeaders+    UpdateVirtualInterfaceAttributes+  where+  toHeaders =+    Prelude.const+      ( Prelude.mconcat+          [ "X-Amz-Target"+              Data.=# ( "OvertureService.UpdateVirtualInterfaceAttributes" ::+                          Prelude.ByteString+                      ),+            "Content-Type"+              Data.=# ( "application/x-amz-json-1.1" ::+                          Prelude.ByteString+                      )+          ]+      )++instance Data.ToJSON UpdateVirtualInterfaceAttributes where+  toJSON UpdateVirtualInterfaceAttributes' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("enableSiteLink" Data..=)+              Prelude.<$> enableSiteLink,+            ("mtu" Data..=) Prelude.<$> mtu,+            ("virtualInterfaceName" Data..=)+              Prelude.<$> virtualInterfaceName,+            Prelude.Just+              ("virtualInterfaceId" Data..= virtualInterfaceId)+          ]+      )++instance Data.ToPath UpdateVirtualInterfaceAttributes where+  toPath = Prelude.const "/"++instance+  Data.ToQuery+    UpdateVirtualInterfaceAttributes+  where+  toQuery = Prelude.const Prelude.mempty
+ gen/Amazonka/DirectConnect/Waiters.hs view
@@ -0,0 +1,24 @@+{-# LANGUAGE DisambiguateRecordFields #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.DirectConnect.Waiters+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.DirectConnect.Waiters where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.DirectConnect.Lens+import Amazonka.DirectConnect.Types+import qualified Amazonka.Prelude as Prelude
− gen/Network/AWS/DirectConnect.hs
@@ -1,470 +0,0 @@-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ AWS Direct Connect links your internal network to an AWS Direct Connect location over a standard 1 gigabit or 10 gigabit Ethernet fiber-optic cable. One end of the cable is connected to your router, the other to an AWS Direct Connect router. With this connection in place, you can create virtual interfaces directly to the AWS cloud (for example, to Amazon Elastic Compute Cloud (Amazon EC2) and Amazon Simple Storage Service (Amazon S3)) and to Amazon Virtual Private Cloud (Amazon VPC), bypassing Internet service providers in your network path. An AWS Direct Connect location provides access to AWS in the region it is associated with, as well as access to other US regions. For example, you can provision a single connection to any AWS Direct Connect location in the US and use it to access public AWS services in all US Regions and AWS GovCloud (US).-------module Network.AWS.DirectConnect-    (-    -- * Service Configuration-      directConnect--    -- * Errors-    -- $errors--    -- ** DirectConnectClientException-    , _DirectConnectClientException--    -- ** DuplicateTagKeysException-    , _DuplicateTagKeysException--    -- ** TooManyTagsException-    , _TooManyTagsException--    -- ** DirectConnectServerException-    , _DirectConnectServerException--    -- * Waiters-    -- $waiters--    -- * Operations-    -- $operations--    -- ** DescribeDirectConnectGatewayAssociations-    , module Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations--    -- ** DescribeInterconnects-    , module Network.AWS.DirectConnect.DescribeInterconnects--    -- ** DescribeTags-    , module Network.AWS.DirectConnect.DescribeTags--    -- ** DescribeLoa-    , module Network.AWS.DirectConnect.DescribeLoa--    -- ** DeleteConnection-    , module Network.AWS.DirectConnect.DeleteConnection--    -- ** AssociateConnectionWithLag-    , module Network.AWS.DirectConnect.AssociateConnectionWithLag--    -- ** CreateConnection-    , module Network.AWS.DirectConnect.CreateConnection--    -- ** DescribeDirectConnectGateways-    , module Network.AWS.DirectConnect.DescribeDirectConnectGateways--    -- ** AssociateVirtualInterface-    , module Network.AWS.DirectConnect.AssociateVirtualInterface--    -- ** DescribeConnections-    , module Network.AWS.DirectConnect.DescribeConnections--    -- ** DeleteInterconnect-    , module Network.AWS.DirectConnect.DeleteInterconnect--    -- ** ConfirmPrivateVirtualInterface-    , module Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface--    -- ** DeleteDirectConnectGatewayAssociation-    , module Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation--    -- ** DescribeLocations-    , module Network.AWS.DirectConnect.DescribeLocations--    -- ** CreateDirectConnectGatewayAssociation-    , module Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation--    -- ** CreatePublicVirtualInterface-    , module Network.AWS.DirectConnect.CreatePublicVirtualInterface--    -- ** AllocatePrivateVirtualInterface-    , module Network.AWS.DirectConnect.AllocatePrivateVirtualInterface--    -- ** DescribeLags-    , module Network.AWS.DirectConnect.DescribeLags--    -- ** ConfirmConnection-    , module Network.AWS.DirectConnect.ConfirmConnection--    -- ** DescribeDirectConnectGatewayAttachments-    , module Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments--    -- ** ConfirmPublicVirtualInterface-    , module Network.AWS.DirectConnect.ConfirmPublicVirtualInterface--    -- ** DescribeVirtualGateways-    , module Network.AWS.DirectConnect.DescribeVirtualGateways--    -- ** CreateDirectConnectGateway-    , module Network.AWS.DirectConnect.CreateDirectConnectGateway--    -- ** DeleteDirectConnectGateway-    , module Network.AWS.DirectConnect.DeleteDirectConnectGateway--    -- ** DescribeVirtualInterfaces-    , module Network.AWS.DirectConnect.DescribeVirtualInterfaces--    -- ** AllocateHostedConnection-    , module Network.AWS.DirectConnect.AllocateHostedConnection--    -- ** DeleteVirtualInterface-    , module Network.AWS.DirectConnect.DeleteVirtualInterface--    -- ** CreatePrivateVirtualInterface-    , module Network.AWS.DirectConnect.CreatePrivateVirtualInterface--    -- ** AllocatePublicVirtualInterface-    , module Network.AWS.DirectConnect.AllocatePublicVirtualInterface--    -- ** DisassociateConnectionFromLag-    , module Network.AWS.DirectConnect.DisassociateConnectionFromLag--    -- ** TagResource-    , module Network.AWS.DirectConnect.TagResource--    -- ** DeleteLag-    , module Network.AWS.DirectConnect.DeleteLag--    -- ** UpdateLag-    , module Network.AWS.DirectConnect.UpdateLag--    -- ** UntagResource-    , module Network.AWS.DirectConnect.UntagResource--    -- ** CreateBGPPeer-    , module Network.AWS.DirectConnect.CreateBGPPeer--    -- ** AssociateHostedConnection-    , module Network.AWS.DirectConnect.AssociateHostedConnection--    -- ** CreateInterconnect-    , module Network.AWS.DirectConnect.CreateInterconnect--    -- ** DeleteBGPPeer-    , module Network.AWS.DirectConnect.DeleteBGPPeer--    -- ** CreateLag-    , module Network.AWS.DirectConnect.CreateLag--    -- ** DescribeHostedConnections-    , module Network.AWS.DirectConnect.DescribeHostedConnections--    -- * Types--    -- ** AddressFamily-    , AddressFamily (..)--    -- ** BGPPeerState-    , BGPPeerState (..)--    -- ** BGPStatus-    , BGPStatus (..)--    -- ** ConnectionState-    , ConnectionState (..)--    -- ** DirectConnectGatewayAssociationState-    , DirectConnectGatewayAssociationState (..)--    -- ** DirectConnectGatewayAttachmentState-    , DirectConnectGatewayAttachmentState (..)--    -- ** DirectConnectGatewayState-    , DirectConnectGatewayState (..)--    -- ** InterconnectState-    , InterconnectState (..)--    -- ** LagState-    , LagState (..)--    -- ** LoaContentType-    , LoaContentType (..)--    -- ** VirtualInterfaceState-    , VirtualInterfaceState (..)--    -- ** BGPPeer-    , BGPPeer-    , bgpPeer-    , bpCustomerAddress-    , bpAmazonAddress-    , bpAddressFamily-    , bpBgpStatus-    , bpAsn-    , bpAuthKey-    , bpBgpPeerState--    -- ** Connection-    , Connection-    , connection-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState--    -- ** Connections-    , Connections-    , connections-    , cConnections--    -- ** DirectConnectGateway-    , DirectConnectGateway-    , directConnectGateway-    , dcgDirectConnectGatewayId-    , dcgStateChangeError-    , dcgAmazonSideASN-    , dcgDirectConnectGatewayName-    , dcgDirectConnectGatewayState-    , dcgOwnerAccount--    -- ** DirectConnectGatewayAssociation-    , DirectConnectGatewayAssociation-    , directConnectGatewayAssociation-    , dcgaVirtualGatewayId-    , dcgaDirectConnectGatewayId-    , dcgaVirtualGatewayOwnerAccount-    , dcgaStateChangeError-    , dcgaVirtualGatewayRegion-    , dcgaAssociationState--    -- ** DirectConnectGatewayAttachment-    , DirectConnectGatewayAttachment-    , directConnectGatewayAttachment-    , dDirectConnectGatewayId-    , dAttachmentState-    , dStateChangeError-    , dVirtualInterfaceRegion-    , dVirtualInterfaceOwnerAccount-    , dVirtualInterfaceId--    -- ** Interconnect-    , Interconnect-    , interconnect-    , iLagId-    , iInterconnectId-    , iLocation-    , iInterconnectName-    , iAwsDevice-    , iLoaIssueTime-    , iBandwidth-    , iInterconnectState-    , iRegion--    -- ** Lag-    , Lag-    , lag-    , lagLagId-    , lagConnectionsBandwidth-    , lagMinimumLinks-    , lagLagName-    , lagLocation-    , lagConnections-    , lagAwsDevice-    , lagAllowsHostedConnections-    , lagNumberOfConnections-    , lagLagState-    , lagOwnerAccount-    , lagRegion--    -- ** Location-    , Location-    , location-    , lLocationName-    , lLocationCode--    -- ** NewBGPPeer-    , NewBGPPeer-    , newBGPPeer-    , nbpCustomerAddress-    , nbpAmazonAddress-    , nbpAddressFamily-    , nbpAsn-    , nbpAuthKey--    -- ** NewPrivateVirtualInterface-    , NewPrivateVirtualInterface-    , newPrivateVirtualInterface-    , nVirtualGatewayId-    , nCustomerAddress-    , nAmazonAddress-    , nAddressFamily-    , nDirectConnectGatewayId-    , nAuthKey-    , nVirtualInterfaceName-    , nVlan-    , nAsn--    -- ** NewPrivateVirtualInterfaceAllocation-    , NewPrivateVirtualInterfaceAllocation-    , newPrivateVirtualInterfaceAllocation-    , npviaCustomerAddress-    , npviaAmazonAddress-    , npviaAddressFamily-    , npviaAuthKey-    , npviaVirtualInterfaceName-    , npviaVlan-    , npviaAsn--    -- ** NewPublicVirtualInterface-    , NewPublicVirtualInterface-    , newPublicVirtualInterface-    , npviRouteFilterPrefixes-    , npviCustomerAddress-    , npviAmazonAddress-    , npviAddressFamily-    , npviAuthKey-    , npviVirtualInterfaceName-    , npviVlan-    , npviAsn--    -- ** NewPublicVirtualInterfaceAllocation-    , NewPublicVirtualInterfaceAllocation-    , newPublicVirtualInterfaceAllocation-    , newRouteFilterPrefixes-    , newCustomerAddress-    , newAmazonAddress-    , newAddressFamily-    , newAuthKey-    , newVirtualInterfaceName-    , newVlan-    , newAsn--    -- ** ResourceTag-    , ResourceTag-    , resourceTag-    , rtResourceARN-    , rtTags--    -- ** RouteFilterPrefix-    , RouteFilterPrefix-    , routeFilterPrefix-    , rfpCidr--    -- ** Tag-    , Tag-    , tag-    , tagValue-    , tagKey--    -- ** VirtualGateway-    , VirtualGateway-    , virtualGateway-    , vgVirtualGatewayId-    , vgVirtualGatewayState--    -- ** VirtualInterface-    , VirtualInterface-    , virtualInterface-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.AllocateHostedConnection-import Network.AWS.DirectConnect.AllocatePrivateVirtualInterface-import Network.AWS.DirectConnect.AllocatePublicVirtualInterface-import Network.AWS.DirectConnect.AssociateConnectionWithLag-import Network.AWS.DirectConnect.AssociateHostedConnection-import Network.AWS.DirectConnect.AssociateVirtualInterface-import Network.AWS.DirectConnect.ConfirmConnection-import Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface-import Network.AWS.DirectConnect.ConfirmPublicVirtualInterface-import Network.AWS.DirectConnect.CreateBGPPeer-import Network.AWS.DirectConnect.CreateConnection-import Network.AWS.DirectConnect.CreateDirectConnectGateway-import Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation-import Network.AWS.DirectConnect.CreateInterconnect-import Network.AWS.DirectConnect.CreateLag-import Network.AWS.DirectConnect.CreatePrivateVirtualInterface-import Network.AWS.DirectConnect.CreatePublicVirtualInterface-import Network.AWS.DirectConnect.DeleteBGPPeer-import Network.AWS.DirectConnect.DeleteConnection-import Network.AWS.DirectConnect.DeleteDirectConnectGateway-import Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation-import Network.AWS.DirectConnect.DeleteInterconnect-import Network.AWS.DirectConnect.DeleteLag-import Network.AWS.DirectConnect.DeleteVirtualInterface-import Network.AWS.DirectConnect.DescribeConnections-import Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations-import Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments-import Network.AWS.DirectConnect.DescribeDirectConnectGateways-import Network.AWS.DirectConnect.DescribeHostedConnections-import Network.AWS.DirectConnect.DescribeInterconnects-import Network.AWS.DirectConnect.DescribeLags-import Network.AWS.DirectConnect.DescribeLoa-import Network.AWS.DirectConnect.DescribeLocations-import Network.AWS.DirectConnect.DescribeTags-import Network.AWS.DirectConnect.DescribeVirtualGateways-import Network.AWS.DirectConnect.DescribeVirtualInterfaces-import Network.AWS.DirectConnect.DisassociateConnectionFromLag-import Network.AWS.DirectConnect.TagResource-import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.UntagResource-import Network.AWS.DirectConnect.UpdateLag-import Network.AWS.DirectConnect.Waiters--{- $errors-Error matchers are designed for use with the functions provided by-<http://hackage.haskell.org/package/lens/docs/Control-Exception-Lens.html Control.Exception.Lens>.-This allows catching (and rethrowing) service specific errors returned-by 'DirectConnect'.--}--{- $operations-Some AWS operations return results that are incomplete and require subsequent-requests in order to obtain the entire result set. The process of sending-subsequent requests to continue where a previous request left off is called-pagination. For example, the 'ListObjects' operation of Amazon S3 returns up to-1000 objects at a time, and you must send subsequent requests with the-appropriate Marker in order to retrieve the next page of results.--Operations that have an 'AWSPager' instance can transparently perform subsequent-requests, correctly setting Markers and other request facets to iterate through-the entire result set of a truncated API operation. Operations which support-this have an additional note in the documentation.--Many operations have the ability to filter results on the server side. See the-individual operation parameters for details.--}--{- $waiters-Waiters poll by repeatedly sending a request until some remote success condition-configured by the 'Wait' specification is fulfilled. The 'Wait' specification-determines how many attempts should be made, in addition to delay and retry strategies.--}
− gen/Network/AWS/DirectConnect/AllocateHostedConnection.hs
@@ -1,160 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AllocateHostedConnection--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a hosted connection on an interconnect or a link aggregation group (LAG).--------- Allocates a VLAN number and a specified amount of bandwidth for use by a hosted connection on the given interconnect or LAG.----module Network.AWS.DirectConnect.AllocateHostedConnection-    (-    -- * Creating a Request-      allocateHostedConnection-    , AllocateHostedConnection-    -- * Request Lenses-    , ahcConnectionId-    , ahcOwnerAccount-    , ahcBandwidth-    , ahcConnectionName-    , ahcVlan--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to theHostedConnection operation.------------ /See:/ 'allocateHostedConnection' smart constructor.-data AllocateHostedConnection = AllocateHostedConnection'-  { _ahcConnectionId   :: !Text-  , _ahcOwnerAccount   :: !Text-  , _ahcBandwidth      :: !Text-  , _ahcConnectionName :: !Text-  , _ahcVlan           :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AllocateHostedConnection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ahcConnectionId' - The ID of the interconnect or LAG on which the connection will be provisioned. Example: dxcon-456abc78 or dxlag-abc123 Default: None------ * 'ahcOwnerAccount' - The numeric account ID of the customer for whom the connection will be provisioned. Example: 123443215678 Default: None------ * 'ahcBandwidth' - The bandwidth of the connection. Example: @500Mbps@  Default: None Values: 50Mbps, 100Mbps, 200Mbps, 300Mbps, 400Mbps, or 500Mbps------ * 'ahcConnectionName' - The name of the provisioned connection. Example: "@500M Connection to AWS@ " Default: None------ * 'ahcVlan' - The dedicated VLAN provisioned to the hosted connection. Example: 101 Default: None-allocateHostedConnection-    :: Text -- ^ 'ahcConnectionId'-    -> Text -- ^ 'ahcOwnerAccount'-    -> Text -- ^ 'ahcBandwidth'-    -> Text -- ^ 'ahcConnectionName'-    -> Int -- ^ 'ahcVlan'-    -> AllocateHostedConnection-allocateHostedConnection pConnectionId_ pOwnerAccount_ pBandwidth_ pConnectionName_ pVlan_ =-  AllocateHostedConnection'-    { _ahcConnectionId = pConnectionId_-    , _ahcOwnerAccount = pOwnerAccount_-    , _ahcBandwidth = pBandwidth_-    , _ahcConnectionName = pConnectionName_-    , _ahcVlan = pVlan_-    }----- | The ID of the interconnect or LAG on which the connection will be provisioned. Example: dxcon-456abc78 or dxlag-abc123 Default: None-ahcConnectionId :: Lens' AllocateHostedConnection Text-ahcConnectionId = lens _ahcConnectionId (\ s a -> s{_ahcConnectionId = a})---- | The numeric account ID of the customer for whom the connection will be provisioned. Example: 123443215678 Default: None-ahcOwnerAccount :: Lens' AllocateHostedConnection Text-ahcOwnerAccount = lens _ahcOwnerAccount (\ s a -> s{_ahcOwnerAccount = a})---- | The bandwidth of the connection. Example: @500Mbps@  Default: None Values: 50Mbps, 100Mbps, 200Mbps, 300Mbps, 400Mbps, or 500Mbps-ahcBandwidth :: Lens' AllocateHostedConnection Text-ahcBandwidth = lens _ahcBandwidth (\ s a -> s{_ahcBandwidth = a})---- | The name of the provisioned connection. Example: "@500M Connection to AWS@ " Default: None-ahcConnectionName :: Lens' AllocateHostedConnection Text-ahcConnectionName = lens _ahcConnectionName (\ s a -> s{_ahcConnectionName = a})---- | The dedicated VLAN provisioned to the hosted connection. Example: 101 Default: None-ahcVlan :: Lens' AllocateHostedConnection Int-ahcVlan = lens _ahcVlan (\ s a -> s{_ahcVlan = a})--instance AWSRequest AllocateHostedConnection where-        type Rs AllocateHostedConnection = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AllocateHostedConnection where--instance NFData AllocateHostedConnection where--instance ToHeaders AllocateHostedConnection where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AllocateHostedConnection" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AllocateHostedConnection where-        toJSON AllocateHostedConnection'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _ahcConnectionId),-                  Just ("ownerAccount" .= _ahcOwnerAccount),-                  Just ("bandwidth" .= _ahcBandwidth),-                  Just ("connectionName" .= _ahcConnectionName),-                  Just ("vlan" .= _ahcVlan)])--instance ToPath AllocateHostedConnection where-        toPath = const "/"--instance ToQuery AllocateHostedConnection where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/AllocatePrivateVirtualInterface.hs
@@ -1,153 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AllocatePrivateVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Provisions a private virtual interface to be owned by another AWS customer.--------- Virtual interfaces created using this action must be confirmed by the virtual interface owner by using the 'ConfirmPrivateVirtualInterface' action. Until then, the virtual interface will be in 'Confirming' state, and will not be available for handling traffic.----module Network.AWS.DirectConnect.AllocatePrivateVirtualInterface-    (-    -- * Creating a Request-      allocatePrivateVirtualInterface-    , AllocatePrivateVirtualInterface-    -- * Request Lenses-    , apviConnectionId-    , apviOwnerAccount-    , apviNewPrivateVirtualInterfaceAllocation--    -- * Destructuring the Response-    , virtualInterface-    , VirtualInterface-    -- * Response Lenses-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the AllocatePrivateVirtualInterface operation.------------ /See:/ 'allocatePrivateVirtualInterface' smart constructor.-data AllocatePrivateVirtualInterface = AllocatePrivateVirtualInterface'-  { _apviConnectionId :: !Text-  , _apviOwnerAccount :: !Text-  , _apviNewPrivateVirtualInterfaceAllocation :: !NewPrivateVirtualInterfaceAllocation-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AllocatePrivateVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'apviConnectionId' - The connection ID on which the private virtual interface is provisioned. Default: None------ * 'apviOwnerAccount' - The AWS account that will own the new private virtual interface. Default: None------ * 'apviNewPrivateVirtualInterfaceAllocation' - Detailed information for the private virtual interface to be provisioned. Default: None-allocatePrivateVirtualInterface-    :: Text -- ^ 'apviConnectionId'-    -> Text -- ^ 'apviOwnerAccount'-    -> NewPrivateVirtualInterfaceAllocation -- ^ 'apviNewPrivateVirtualInterfaceAllocation'-    -> AllocatePrivateVirtualInterface-allocatePrivateVirtualInterface pConnectionId_ pOwnerAccount_ pNewPrivateVirtualInterfaceAllocation_ =-  AllocatePrivateVirtualInterface'-    { _apviConnectionId = pConnectionId_-    , _apviOwnerAccount = pOwnerAccount_-    , _apviNewPrivateVirtualInterfaceAllocation =-        pNewPrivateVirtualInterfaceAllocation_-    }----- | The connection ID on which the private virtual interface is provisioned. Default: None-apviConnectionId :: Lens' AllocatePrivateVirtualInterface Text-apviConnectionId = lens _apviConnectionId (\ s a -> s{_apviConnectionId = a})---- | The AWS account that will own the new private virtual interface. Default: None-apviOwnerAccount :: Lens' AllocatePrivateVirtualInterface Text-apviOwnerAccount = lens _apviOwnerAccount (\ s a -> s{_apviOwnerAccount = a})---- | Detailed information for the private virtual interface to be provisioned. Default: None-apviNewPrivateVirtualInterfaceAllocation :: Lens' AllocatePrivateVirtualInterface NewPrivateVirtualInterfaceAllocation-apviNewPrivateVirtualInterfaceAllocation = lens _apviNewPrivateVirtualInterfaceAllocation (\ s a -> s{_apviNewPrivateVirtualInterfaceAllocation = a})--instance AWSRequest AllocatePrivateVirtualInterface-         where-        type Rs AllocatePrivateVirtualInterface =-             VirtualInterface-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AllocatePrivateVirtualInterface-         where--instance NFData AllocatePrivateVirtualInterface where--instance ToHeaders AllocatePrivateVirtualInterface-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AllocatePrivateVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AllocatePrivateVirtualInterface where-        toJSON AllocatePrivateVirtualInterface'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _apviConnectionId),-                  Just ("ownerAccount" .= _apviOwnerAccount),-                  Just-                    ("newPrivateVirtualInterfaceAllocation" .=-                       _apviNewPrivateVirtualInterfaceAllocation)])--instance ToPath AllocatePrivateVirtualInterface where-        toPath = const "/"--instance ToQuery AllocatePrivateVirtualInterface-         where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/AllocatePublicVirtualInterface.hs
@@ -1,156 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AllocatePublicVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Provisions a public virtual interface to be owned by a different customer.--------- The owner of a connection calls this function to provision a public virtual interface which will be owned by another AWS customer.------ Virtual interfaces created using this function must be confirmed by the virtual interface owner by calling ConfirmPublicVirtualInterface. Until this step has been completed, the virtual interface will be in 'Confirming' state, and will not be available for handling traffic.------ When creating an IPv6 public virtual interface (addressFamily is 'ipv6'), the customer and amazon address fields should be left blank to use auto-assigned IPv6 space. Custom IPv6 Addresses are currently not supported.----module Network.AWS.DirectConnect.AllocatePublicVirtualInterface-    (-    -- * Creating a Request-      allocatePublicVirtualInterface-    , AllocatePublicVirtualInterface-    -- * Request Lenses-    , aConnectionId-    , aOwnerAccount-    , aNewPublicVirtualInterfaceAllocation--    -- * Destructuring the Response-    , virtualInterface-    , VirtualInterface-    -- * Response Lenses-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the AllocatePublicVirtualInterface operation.------------ /See:/ 'allocatePublicVirtualInterface' smart constructor.-data AllocatePublicVirtualInterface = AllocatePublicVirtualInterface'-  { _aConnectionId :: !Text-  , _aOwnerAccount :: !Text-  , _aNewPublicVirtualInterfaceAllocation :: !NewPublicVirtualInterfaceAllocation-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AllocatePublicVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aConnectionId' - The connection ID on which the public virtual interface is provisioned. Default: None------ * 'aOwnerAccount' - The AWS account that will own the new public virtual interface. Default: None------ * 'aNewPublicVirtualInterfaceAllocation' - Detailed information for the public virtual interface to be provisioned. Default: None-allocatePublicVirtualInterface-    :: Text -- ^ 'aConnectionId'-    -> Text -- ^ 'aOwnerAccount'-    -> NewPublicVirtualInterfaceAllocation -- ^ 'aNewPublicVirtualInterfaceAllocation'-    -> AllocatePublicVirtualInterface-allocatePublicVirtualInterface pConnectionId_ pOwnerAccount_ pNewPublicVirtualInterfaceAllocation_ =-  AllocatePublicVirtualInterface'-    { _aConnectionId = pConnectionId_-    , _aOwnerAccount = pOwnerAccount_-    , _aNewPublicVirtualInterfaceAllocation =-        pNewPublicVirtualInterfaceAllocation_-    }----- | The connection ID on which the public virtual interface is provisioned. Default: None-aConnectionId :: Lens' AllocatePublicVirtualInterface Text-aConnectionId = lens _aConnectionId (\ s a -> s{_aConnectionId = a})---- | The AWS account that will own the new public virtual interface. Default: None-aOwnerAccount :: Lens' AllocatePublicVirtualInterface Text-aOwnerAccount = lens _aOwnerAccount (\ s a -> s{_aOwnerAccount = a})---- | Detailed information for the public virtual interface to be provisioned. Default: None-aNewPublicVirtualInterfaceAllocation :: Lens' AllocatePublicVirtualInterface NewPublicVirtualInterfaceAllocation-aNewPublicVirtualInterfaceAllocation = lens _aNewPublicVirtualInterfaceAllocation (\ s a -> s{_aNewPublicVirtualInterfaceAllocation = a})--instance AWSRequest AllocatePublicVirtualInterface-         where-        type Rs AllocatePublicVirtualInterface =-             VirtualInterface-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AllocatePublicVirtualInterface-         where--instance NFData AllocatePublicVirtualInterface where--instance ToHeaders AllocatePublicVirtualInterface-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AllocatePublicVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AllocatePublicVirtualInterface where-        toJSON AllocatePublicVirtualInterface'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _aConnectionId),-                  Just ("ownerAccount" .= _aOwnerAccount),-                  Just-                    ("newPublicVirtualInterfaceAllocation" .=-                       _aNewPublicVirtualInterfaceAllocation)])--instance ToPath AllocatePublicVirtualInterface where-        toPath = const "/"--instance ToQuery AllocatePublicVirtualInterface where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/AssociateConnectionWithLag.hs
@@ -1,127 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AssociateConnectionWithLag--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Associates an existing connection with a link aggregation group (LAG). The connection is interrupted and re-established as a member of the LAG (connectivity to AWS will be interrupted). The connection must be hosted on the same AWS Direct Connect endpoint as the LAG, and its bandwidth must match the bandwidth for the LAG. You can reassociate a connection that's currently associated with a different LAG; however, if removing the connection will cause the original LAG to fall below its setting for minimum number of operational connections, the request fails.--------- Any virtual interfaces that are directly associated with the connection are automatically re-associated with the LAG. If the connection was originally associated with a different LAG, the virtual interfaces remain associated with the original LAG.------ For interconnects, any hosted connections are automatically re-associated with the LAG. If the interconnect was originally associated with a different LAG, the hosted connections remain associated with the original LAG.----module Network.AWS.DirectConnect.AssociateConnectionWithLag-    (-    -- * Creating a Request-      associateConnectionWithLag-    , AssociateConnectionWithLag-    -- * Request Lenses-    , acwlConnectionId-    , acwlLagId--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the AssociateConnectionWithLag operation.------------ /See:/ 'associateConnectionWithLag' smart constructor.-data AssociateConnectionWithLag = AssociateConnectionWithLag'-  { _acwlConnectionId :: !Text-  , _acwlLagId        :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AssociateConnectionWithLag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'acwlConnectionId' - The ID of the connection. Example: dxcon-abc123 Default: None------ * 'acwlLagId' - The ID of the LAG with which to associate the connection. Example: dxlag-abc123 Default: None-associateConnectionWithLag-    :: Text -- ^ 'acwlConnectionId'-    -> Text -- ^ 'acwlLagId'-    -> AssociateConnectionWithLag-associateConnectionWithLag pConnectionId_ pLagId_ =-  AssociateConnectionWithLag'-    {_acwlConnectionId = pConnectionId_, _acwlLagId = pLagId_}----- | The ID of the connection. Example: dxcon-abc123 Default: None-acwlConnectionId :: Lens' AssociateConnectionWithLag Text-acwlConnectionId = lens _acwlConnectionId (\ s a -> s{_acwlConnectionId = a})---- | The ID of the LAG with which to associate the connection. Example: dxlag-abc123 Default: None-acwlLagId :: Lens' AssociateConnectionWithLag Text-acwlLagId = lens _acwlLagId (\ s a -> s{_acwlLagId = a})--instance AWSRequest AssociateConnectionWithLag where-        type Rs AssociateConnectionWithLag = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AssociateConnectionWithLag where--instance NFData AssociateConnectionWithLag where--instance ToHeaders AssociateConnectionWithLag where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AssociateConnectionWithLag" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AssociateConnectionWithLag where-        toJSON AssociateConnectionWithLag'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _acwlConnectionId),-                  Just ("lagId" .= _acwlLagId)])--instance ToPath AssociateConnectionWithLag where-        toPath = const "/"--instance ToQuery AssociateConnectionWithLag where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/AssociateHostedConnection.hs
@@ -1,126 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AssociateHostedConnection--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Associates a hosted connection and its virtual interfaces with a link aggregation group (LAG) or interconnect. If the target interconnect or LAG has an existing hosted connection with a conflicting VLAN number or IP address, the operation fails. This action temporarily interrupts the hosted connection's connectivity to AWS as it is being migrated.-------module Network.AWS.DirectConnect.AssociateHostedConnection-    (-    -- * Creating a Request-      associateHostedConnection-    , AssociateHostedConnection-    -- * Request Lenses-    , assConnectionId-    , assParentConnectionId--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the AssociateHostedConnection operation.------------ /See:/ 'associateHostedConnection' smart constructor.-data AssociateHostedConnection = AssociateHostedConnection'-  { _assConnectionId       :: !Text-  , _assParentConnectionId :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AssociateHostedConnection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'assConnectionId' - The ID of the hosted connection. Example: dxcon-abc123 Default: None------ * 'assParentConnectionId' - The ID of the interconnect or the LAG. Example: dxcon-abc123 or dxlag-abc123 Default: None-associateHostedConnection-    :: Text -- ^ 'assConnectionId'-    -> Text -- ^ 'assParentConnectionId'-    -> AssociateHostedConnection-associateHostedConnection pConnectionId_ pParentConnectionId_ =-  AssociateHostedConnection'-    { _assConnectionId = pConnectionId_-    , _assParentConnectionId = pParentConnectionId_-    }----- | The ID of the hosted connection. Example: dxcon-abc123 Default: None-assConnectionId :: Lens' AssociateHostedConnection Text-assConnectionId = lens _assConnectionId (\ s a -> s{_assConnectionId = a})---- | The ID of the interconnect or the LAG. Example: dxcon-abc123 or dxlag-abc123 Default: None-assParentConnectionId :: Lens' AssociateHostedConnection Text-assParentConnectionId = lens _assParentConnectionId (\ s a -> s{_assParentConnectionId = a})--instance AWSRequest AssociateHostedConnection where-        type Rs AssociateHostedConnection = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AssociateHostedConnection where--instance NFData AssociateHostedConnection where--instance ToHeaders AssociateHostedConnection where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AssociateHostedConnection" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AssociateHostedConnection where-        toJSON AssociateHostedConnection'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _assConnectionId),-                  Just-                    ("parentConnectionId" .= _assParentConnectionId)])--instance ToPath AssociateHostedConnection where-        toPath = const "/"--instance ToQuery AssociateHostedConnection where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/AssociateVirtualInterface.hs
@@ -1,137 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.AssociateVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Associates a virtual interface with a specified link aggregation group (LAG) or connection. Connectivity to AWS is temporarily interrupted as the virtual interface is being migrated. If the target connection or LAG has an associated virtual interface with a conflicting VLAN number or a conflicting IP address, the operation fails.--------- Virtual interfaces associated with a hosted connection cannot be associated with a LAG; hosted connections must be migrated along with their virtual interfaces using 'AssociateHostedConnection' .------ In order to reassociate a virtual interface to a new connection or LAG, the requester must own either the virtual interface itself or the connection to which the virtual interface is currently associated. Additionally, the requester must own the connection or LAG to which the virtual interface will be newly associated.----module Network.AWS.DirectConnect.AssociateVirtualInterface-    (-    -- * Creating a Request-      associateVirtualInterface-    , AssociateVirtualInterface-    -- * Request Lenses-    , aviVirtualInterfaceId-    , aviConnectionId--    -- * Destructuring the Response-    , virtualInterface-    , VirtualInterface-    -- * Response Lenses-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the AssociateVirtualInterface operation.------------ /See:/ 'associateVirtualInterface' smart constructor.-data AssociateVirtualInterface = AssociateVirtualInterface'-  { _aviVirtualInterfaceId :: !Text-  , _aviConnectionId       :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AssociateVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aviVirtualInterfaceId' - The ID of the virtual interface. Example: dxvif-123dfg56 Default: None------ * 'aviConnectionId' - The ID of the LAG or connection with which to associate the virtual interface. Example: dxlag-abc123 or dxcon-abc123 Default: None-associateVirtualInterface-    :: Text -- ^ 'aviVirtualInterfaceId'-    -> Text -- ^ 'aviConnectionId'-    -> AssociateVirtualInterface-associateVirtualInterface pVirtualInterfaceId_ pConnectionId_ =-  AssociateVirtualInterface'-    { _aviVirtualInterfaceId = pVirtualInterfaceId_-    , _aviConnectionId = pConnectionId_-    }----- | The ID of the virtual interface. Example: dxvif-123dfg56 Default: None-aviVirtualInterfaceId :: Lens' AssociateVirtualInterface Text-aviVirtualInterfaceId = lens _aviVirtualInterfaceId (\ s a -> s{_aviVirtualInterfaceId = a})---- | The ID of the LAG or connection with which to associate the virtual interface. Example: dxlag-abc123 or dxcon-abc123 Default: None-aviConnectionId :: Lens' AssociateVirtualInterface Text-aviConnectionId = lens _aviConnectionId (\ s a -> s{_aviConnectionId = a})--instance AWSRequest AssociateVirtualInterface where-        type Rs AssociateVirtualInterface = VirtualInterface-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable AssociateVirtualInterface where--instance NFData AssociateVirtualInterface where--instance ToHeaders AssociateVirtualInterface where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.AssociateVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AssociateVirtualInterface where-        toJSON AssociateVirtualInterface'{..}-          = object-              (catMaybes-                 [Just-                    ("virtualInterfaceId" .= _aviVirtualInterfaceId),-                  Just ("connectionId" .= _aviConnectionId)])--instance ToPath AssociateVirtualInterface where-        toPath = const "/"--instance ToQuery AssociateVirtualInterface where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/ConfirmConnection.hs
@@ -1,143 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.ConfirmConnection--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Confirm the creation of a hosted connection on an interconnect.--------- Upon creation, the hosted connection is initially in the 'Ordering' state, and will remain in this state until the owner calls ConfirmConnection to confirm creation of the hosted connection.----module Network.AWS.DirectConnect.ConfirmConnection-    (-    -- * Creating a Request-      confirmConnection-    , ConfirmConnection-    -- * Request Lenses-    , ccConnectionId--    -- * Destructuring the Response-    , confirmConnectionResponse-    , ConfirmConnectionResponse-    -- * Response Lenses-    , ccrsConnectionState-    , ccrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the ConfirmConnection operation.------------ /See:/ 'confirmConnection' smart constructor.-newtype ConfirmConnection = ConfirmConnection'-  { _ccConnectionId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmConnection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccConnectionId' - Undocumented member.-confirmConnection-    :: Text -- ^ 'ccConnectionId'-    -> ConfirmConnection-confirmConnection pConnectionId_ =-  ConfirmConnection' {_ccConnectionId = pConnectionId_}----- | Undocumented member.-ccConnectionId :: Lens' ConfirmConnection Text-ccConnectionId = lens _ccConnectionId (\ s a -> s{_ccConnectionId = a})--instance AWSRequest ConfirmConnection where-        type Rs ConfirmConnection = ConfirmConnectionResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 ConfirmConnectionResponse' <$>-                   (x .?> "connectionState") <*> (pure (fromEnum s)))--instance Hashable ConfirmConnection where--instance NFData ConfirmConnection where--instance ToHeaders ConfirmConnection where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.ConfirmConnection" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ConfirmConnection where-        toJSON ConfirmConnection'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _ccConnectionId)])--instance ToPath ConfirmConnection where-        toPath = const "/"--instance ToQuery ConfirmConnection where-        toQuery = const mempty---- | The response received when ConfirmConnection is called.------------ /See:/ 'confirmConnectionResponse' smart constructor.-data ConfirmConnectionResponse = ConfirmConnectionResponse'-  { _ccrsConnectionState :: !(Maybe ConnectionState)-  , _ccrsResponseStatus  :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmConnectionResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccrsConnectionState' - Undocumented member.------ * 'ccrsResponseStatus' - -- | The response status code.-confirmConnectionResponse-    :: Int -- ^ 'ccrsResponseStatus'-    -> ConfirmConnectionResponse-confirmConnectionResponse pResponseStatus_ =-  ConfirmConnectionResponse'-    {_ccrsConnectionState = Nothing, _ccrsResponseStatus = pResponseStatus_}----- | Undocumented member.-ccrsConnectionState :: Lens' ConfirmConnectionResponse (Maybe ConnectionState)-ccrsConnectionState = lens _ccrsConnectionState (\ s a -> s{_ccrsConnectionState = a})---- | -- | The response status code.-ccrsResponseStatus :: Lens' ConfirmConnectionResponse Int-ccrsResponseStatus = lens _ccrsResponseStatus (\ s a -> s{_ccrsResponseStatus = a})--instance NFData ConfirmConnectionResponse where
− gen/Network/AWS/DirectConnect/ConfirmPrivateVirtualInterface.hs
@@ -1,177 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Accept ownership of a private virtual interface created by another customer.--------- After the virtual interface owner calls this function, the virtual interface will be created and attached to the given virtual private gateway or direct connect gateway, and will be available for handling traffic.----module Network.AWS.DirectConnect.ConfirmPrivateVirtualInterface-    (-    -- * Creating a Request-      confirmPrivateVirtualInterface-    , ConfirmPrivateVirtualInterface-    -- * Request Lenses-    , cpviVirtualGatewayId-    , cpviDirectConnectGatewayId-    , cpviVirtualInterfaceId--    -- * Destructuring the Response-    , confirmPrivateVirtualInterfaceResponse-    , ConfirmPrivateVirtualInterfaceResponse-    -- * Response Lenses-    , cpvirsVirtualInterfaceState-    , cpvirsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the ConfirmPrivateVirtualInterface operation.------------ /See:/ 'confirmPrivateVirtualInterface' smart constructor.-data ConfirmPrivateVirtualInterface = ConfirmPrivateVirtualInterface'-  { _cpviVirtualGatewayId       :: !(Maybe Text)-  , _cpviDirectConnectGatewayId :: !(Maybe Text)-  , _cpviVirtualInterfaceId     :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmPrivateVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cpviVirtualGatewayId' - ID of the virtual private gateway that will be attached to the virtual interface. A virtual private gateway can be managed via the Amazon Virtual Private Cloud (VPC) console or the <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-CreateVpnGateway.html EC2 CreateVpnGateway> action. Default: None------ * 'cpviDirectConnectGatewayId' - ID of the direct connect gateway that will be attached to the virtual interface. A direct connect gateway can be managed via the AWS Direct Connect console or the 'CreateDirectConnectGateway' action. Default: None------ * 'cpviVirtualInterfaceId' - Undocumented member.-confirmPrivateVirtualInterface-    :: Text -- ^ 'cpviVirtualInterfaceId'-    -> ConfirmPrivateVirtualInterface-confirmPrivateVirtualInterface pVirtualInterfaceId_ =-  ConfirmPrivateVirtualInterface'-    { _cpviVirtualGatewayId = Nothing-    , _cpviDirectConnectGatewayId = Nothing-    , _cpviVirtualInterfaceId = pVirtualInterfaceId_-    }----- | ID of the virtual private gateway that will be attached to the virtual interface. A virtual private gateway can be managed via the Amazon Virtual Private Cloud (VPC) console or the <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-CreateVpnGateway.html EC2 CreateVpnGateway> action. Default: None-cpviVirtualGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)-cpviVirtualGatewayId = lens _cpviVirtualGatewayId (\ s a -> s{_cpviVirtualGatewayId = a})---- | ID of the direct connect gateway that will be attached to the virtual interface. A direct connect gateway can be managed via the AWS Direct Connect console or the 'CreateDirectConnectGateway' action. Default: None-cpviDirectConnectGatewayId :: Lens' ConfirmPrivateVirtualInterface (Maybe Text)-cpviDirectConnectGatewayId = lens _cpviDirectConnectGatewayId (\ s a -> s{_cpviDirectConnectGatewayId = a})---- | Undocumented member.-cpviVirtualInterfaceId :: Lens' ConfirmPrivateVirtualInterface Text-cpviVirtualInterfaceId = lens _cpviVirtualInterfaceId (\ s a -> s{_cpviVirtualInterfaceId = a})--instance AWSRequest ConfirmPrivateVirtualInterface-         where-        type Rs ConfirmPrivateVirtualInterface =-             ConfirmPrivateVirtualInterfaceResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 ConfirmPrivateVirtualInterfaceResponse' <$>-                   (x .?> "virtualInterfaceState") <*>-                     (pure (fromEnum s)))--instance Hashable ConfirmPrivateVirtualInterface-         where--instance NFData ConfirmPrivateVirtualInterface where--instance ToHeaders ConfirmPrivateVirtualInterface-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.ConfirmPrivateVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ConfirmPrivateVirtualInterface where-        toJSON ConfirmPrivateVirtualInterface'{..}-          = object-              (catMaybes-                 [("virtualGatewayId" .=) <$> _cpviVirtualGatewayId,-                  ("directConnectGatewayId" .=) <$>-                    _cpviDirectConnectGatewayId,-                  Just-                    ("virtualInterfaceId" .= _cpviVirtualInterfaceId)])--instance ToPath ConfirmPrivateVirtualInterface where-        toPath = const "/"--instance ToQuery ConfirmPrivateVirtualInterface where-        toQuery = const mempty---- | The response received when ConfirmPrivateVirtualInterface is called.------------ /See:/ 'confirmPrivateVirtualInterfaceResponse' smart constructor.-data ConfirmPrivateVirtualInterfaceResponse = ConfirmPrivateVirtualInterfaceResponse'-  { _cpvirsVirtualInterfaceState :: !(Maybe VirtualInterfaceState)-  , _cpvirsResponseStatus        :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmPrivateVirtualInterfaceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cpvirsVirtualInterfaceState' - Undocumented member.------ * 'cpvirsResponseStatus' - -- | The response status code.-confirmPrivateVirtualInterfaceResponse-    :: Int -- ^ 'cpvirsResponseStatus'-    -> ConfirmPrivateVirtualInterfaceResponse-confirmPrivateVirtualInterfaceResponse pResponseStatus_ =-  ConfirmPrivateVirtualInterfaceResponse'-    { _cpvirsVirtualInterfaceState = Nothing-    , _cpvirsResponseStatus = pResponseStatus_-    }----- | Undocumented member.-cpvirsVirtualInterfaceState :: Lens' ConfirmPrivateVirtualInterfaceResponse (Maybe VirtualInterfaceState)-cpvirsVirtualInterfaceState = lens _cpvirsVirtualInterfaceState (\ s a -> s{_cpvirsVirtualInterfaceState = a})---- | -- | The response status code.-cpvirsResponseStatus :: Lens' ConfirmPrivateVirtualInterfaceResponse Int-cpvirsResponseStatus = lens _cpvirsResponseStatus (\ s a -> s{_cpvirsResponseStatus = a})--instance NFData-           ConfirmPrivateVirtualInterfaceResponse-         where
− gen/Network/AWS/DirectConnect/ConfirmPublicVirtualInterface.hs
@@ -1,150 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.ConfirmPublicVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Accept ownership of a public virtual interface created by another customer.--------- After the virtual interface owner calls this function, the specified virtual interface will be created and made available for handling traffic.----module Network.AWS.DirectConnect.ConfirmPublicVirtualInterface-    (-    -- * Creating a Request-      confirmPublicVirtualInterface-    , ConfirmPublicVirtualInterface-    -- * Request Lenses-    , cVirtualInterfaceId--    -- * Destructuring the Response-    , confirmPublicVirtualInterfaceResponse-    , ConfirmPublicVirtualInterfaceResponse-    -- * Response Lenses-    , crsVirtualInterfaceState-    , crsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the ConfirmPublicVirtualInterface operation.------------ /See:/ 'confirmPublicVirtualInterface' smart constructor.-newtype ConfirmPublicVirtualInterface = ConfirmPublicVirtualInterface'-  { _cVirtualInterfaceId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmPublicVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cVirtualInterfaceId' - Undocumented member.-confirmPublicVirtualInterface-    :: Text -- ^ 'cVirtualInterfaceId'-    -> ConfirmPublicVirtualInterface-confirmPublicVirtualInterface pVirtualInterfaceId_ =-  ConfirmPublicVirtualInterface' {_cVirtualInterfaceId = pVirtualInterfaceId_}----- | Undocumented member.-cVirtualInterfaceId :: Lens' ConfirmPublicVirtualInterface Text-cVirtualInterfaceId = lens _cVirtualInterfaceId (\ s a -> s{_cVirtualInterfaceId = a})--instance AWSRequest ConfirmPublicVirtualInterface-         where-        type Rs ConfirmPublicVirtualInterface =-             ConfirmPublicVirtualInterfaceResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 ConfirmPublicVirtualInterfaceResponse' <$>-                   (x .?> "virtualInterfaceState") <*>-                     (pure (fromEnum s)))--instance Hashable ConfirmPublicVirtualInterface where--instance NFData ConfirmPublicVirtualInterface where--instance ToHeaders ConfirmPublicVirtualInterface-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.ConfirmPublicVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ConfirmPublicVirtualInterface where-        toJSON ConfirmPublicVirtualInterface'{..}-          = object-              (catMaybes-                 [Just-                    ("virtualInterfaceId" .= _cVirtualInterfaceId)])--instance ToPath ConfirmPublicVirtualInterface where-        toPath = const "/"--instance ToQuery ConfirmPublicVirtualInterface where-        toQuery = const mempty---- | The response received when ConfirmPublicVirtualInterface is called.------------ /See:/ 'confirmPublicVirtualInterfaceResponse' smart constructor.-data ConfirmPublicVirtualInterfaceResponse = ConfirmPublicVirtualInterfaceResponse'-  { _crsVirtualInterfaceState :: !(Maybe VirtualInterfaceState)-  , _crsResponseStatus        :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ConfirmPublicVirtualInterfaceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crsVirtualInterfaceState' - Undocumented member.------ * 'crsResponseStatus' - -- | The response status code.-confirmPublicVirtualInterfaceResponse-    :: Int -- ^ 'crsResponseStatus'-    -> ConfirmPublicVirtualInterfaceResponse-confirmPublicVirtualInterfaceResponse pResponseStatus_ =-  ConfirmPublicVirtualInterfaceResponse'-    {_crsVirtualInterfaceState = Nothing, _crsResponseStatus = pResponseStatus_}----- | Undocumented member.-crsVirtualInterfaceState :: Lens' ConfirmPublicVirtualInterfaceResponse (Maybe VirtualInterfaceState)-crsVirtualInterfaceState = lens _crsVirtualInterfaceState (\ s a -> s{_crsVirtualInterfaceState = a})---- | -- | The response status code.-crsResponseStatus :: Lens' ConfirmPublicVirtualInterfaceResponse Int-crsResponseStatus = lens _crsResponseStatus (\ s a -> s{_crsResponseStatus = a})--instance NFData ConfirmPublicVirtualInterfaceResponse-         where
− gen/Network/AWS/DirectConnect/CreateBGPPeer.hs
@@ -1,156 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateBGPPeer--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new BGP peer on a specified virtual interface. The BGP peer cannot be in the same address family (IPv4/IPv6) of an existing BGP peer on the virtual interface.--------- You must create a BGP peer for the corresponding address family in order to access AWS resources that also use that address family.------ When creating a IPv6 BGP peer, the Amazon address and customer address fields must be left blank. IPv6 addresses are automatically assigned from Amazon's pool of IPv6 addresses; you cannot specify custom IPv6 addresses.------ For a public virtual interface, the Autonomous System Number (ASN) must be private or already whitelisted for the virtual interface.----module Network.AWS.DirectConnect.CreateBGPPeer-    (-    -- * Creating a Request-      createBGPPeer-    , CreateBGPPeer-    -- * Request Lenses-    , cbpNewBGPPeer-    , cbpVirtualInterfaceId--    -- * Destructuring the Response-    , createBGPPeerResponse-    , CreateBGPPeerResponse-    -- * Response Lenses-    , cbprsVirtualInterface-    , cbprsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateBGPPeer operation.------------ /See:/ 'createBGPPeer' smart constructor.-data CreateBGPPeer = CreateBGPPeer'-  { _cbpNewBGPPeer         :: !(Maybe NewBGPPeer)-  , _cbpVirtualInterfaceId :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateBGPPeer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cbpNewBGPPeer' - Detailed information for the BGP peer to be created. Default: None------ * 'cbpVirtualInterfaceId' - The ID of the virtual interface on which the BGP peer will be provisioned. Example: dxvif-456abc78 Default: None-createBGPPeer-    :: CreateBGPPeer-createBGPPeer =-  CreateBGPPeer' {_cbpNewBGPPeer = Nothing, _cbpVirtualInterfaceId = Nothing}----- | Detailed information for the BGP peer to be created. Default: None-cbpNewBGPPeer :: Lens' CreateBGPPeer (Maybe NewBGPPeer)-cbpNewBGPPeer = lens _cbpNewBGPPeer (\ s a -> s{_cbpNewBGPPeer = a})---- | The ID of the virtual interface on which the BGP peer will be provisioned. Example: dxvif-456abc78 Default: None-cbpVirtualInterfaceId :: Lens' CreateBGPPeer (Maybe Text)-cbpVirtualInterfaceId = lens _cbpVirtualInterfaceId (\ s a -> s{_cbpVirtualInterfaceId = a})--instance AWSRequest CreateBGPPeer where-        type Rs CreateBGPPeer = CreateBGPPeerResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 CreateBGPPeerResponse' <$>-                   (x .?> "virtualInterface") <*> (pure (fromEnum s)))--instance Hashable CreateBGPPeer where--instance NFData CreateBGPPeer where--instance ToHeaders CreateBGPPeer where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateBGPPeer" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateBGPPeer where-        toJSON CreateBGPPeer'{..}-          = object-              (catMaybes-                 [("newBGPPeer" .=) <$> _cbpNewBGPPeer,-                  ("virtualInterfaceId" .=) <$>-                    _cbpVirtualInterfaceId])--instance ToPath CreateBGPPeer where-        toPath = const "/"--instance ToQuery CreateBGPPeer where-        toQuery = const mempty---- | The response received when CreateBGPPeer is called.------------ /See:/ 'createBGPPeerResponse' smart constructor.-data CreateBGPPeerResponse = CreateBGPPeerResponse'-  { _cbprsVirtualInterface :: !(Maybe VirtualInterface)-  , _cbprsResponseStatus   :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateBGPPeerResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cbprsVirtualInterface' - Undocumented member.------ * 'cbprsResponseStatus' - -- | The response status code.-createBGPPeerResponse-    :: Int -- ^ 'cbprsResponseStatus'-    -> CreateBGPPeerResponse-createBGPPeerResponse pResponseStatus_ =-  CreateBGPPeerResponse'-    {_cbprsVirtualInterface = Nothing, _cbprsResponseStatus = pResponseStatus_}----- | Undocumented member.-cbprsVirtualInterface :: Lens' CreateBGPPeerResponse (Maybe VirtualInterface)-cbprsVirtualInterface = lens _cbprsVirtualInterface (\ s a -> s{_cbprsVirtualInterface = a})---- | -- | The response status code.-cbprsResponseStatus :: Lens' CreateBGPPeerResponse Int-cbprsResponseStatus = lens _cbprsResponseStatus (\ s a -> s{_cbprsResponseStatus = a})--instance NFData CreateBGPPeerResponse where
− gen/Network/AWS/DirectConnect/CreateConnection.hs
@@ -1,151 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateConnection--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new connection between the customer network and a specific AWS Direct Connect location.--------- A connection links your internal network to an AWS Direct Connect location over a standard 1 gigabit or 10 gigabit Ethernet fiber-optic cable. One end of the cable is connected to your router, the other to an AWS Direct Connect router. An AWS Direct Connect location provides access to Amazon Web Services in the region it is associated with. You can establish connections with AWS Direct Connect locations in multiple regions, but a connection in one region does not provide connectivity to other regions.------ To find the locations for your region, use 'DescribeLocations' .------ You can automatically add the new connection to a link aggregation group (LAG) by specifying a LAG ID in the request. This ensures that the new connection is allocated on the same AWS Direct Connect endpoint that hosts the specified LAG. If there are no available ports on the endpoint, the request fails and no connection will be created.----module Network.AWS.DirectConnect.CreateConnection-    (-    -- * Creating a Request-      createConnection-    , CreateConnection-    -- * Request Lenses-    , ccLagId-    , ccLocation-    , ccBandwidth-    , ccConnectionName--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateConnection operation.------------ /See:/ 'createConnection' smart constructor.-data CreateConnection = CreateConnection'-  { _ccLagId          :: !(Maybe Text)-  , _ccLocation       :: !Text-  , _ccBandwidth      :: !Text-  , _ccConnectionName :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateConnection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccLagId' - Undocumented member.------ * 'ccLocation' - Undocumented member.------ * 'ccBandwidth' - Undocumented member.------ * 'ccConnectionName' - Undocumented member.-createConnection-    :: Text -- ^ 'ccLocation'-    -> Text -- ^ 'ccBandwidth'-    -> Text -- ^ 'ccConnectionName'-    -> CreateConnection-createConnection pLocation_ pBandwidth_ pConnectionName_ =-  CreateConnection'-    { _ccLagId = Nothing-    , _ccLocation = pLocation_-    , _ccBandwidth = pBandwidth_-    , _ccConnectionName = pConnectionName_-    }----- | Undocumented member.-ccLagId :: Lens' CreateConnection (Maybe Text)-ccLagId = lens _ccLagId (\ s a -> s{_ccLagId = a})---- | Undocumented member.-ccLocation :: Lens' CreateConnection Text-ccLocation = lens _ccLocation (\ s a -> s{_ccLocation = a})---- | Undocumented member.-ccBandwidth :: Lens' CreateConnection Text-ccBandwidth = lens _ccBandwidth (\ s a -> s{_ccBandwidth = a})---- | Undocumented member.-ccConnectionName :: Lens' CreateConnection Text-ccConnectionName = lens _ccConnectionName (\ s a -> s{_ccConnectionName = a})--instance AWSRequest CreateConnection where-        type Rs CreateConnection = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable CreateConnection where--instance NFData CreateConnection where--instance ToHeaders CreateConnection where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateConnection" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateConnection where-        toJSON CreateConnection'{..}-          = object-              (catMaybes-                 [("lagId" .=) <$> _ccLagId,-                  Just ("location" .= _ccLocation),-                  Just ("bandwidth" .= _ccBandwidth),-                  Just ("connectionName" .= _ccConnectionName)])--instance ToPath CreateConnection where-        toPath = const "/"--instance ToQuery CreateConnection where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/CreateDirectConnectGateway.hs
@@ -1,161 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateDirectConnectGateway--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new direct connect gateway. A direct connect gateway is an intermediate object that enables you to connect a set of virtual interfaces and virtual private gateways. direct connect gateways are global and visible in any AWS region after they are created. The virtual interfaces and virtual private gateways that are connected through a direct connect gateway can be in different regions. This enables you to connect to a VPC in any region, regardless of the region in which the virtual interfaces are located, and pass traffic between them.-------module Network.AWS.DirectConnect.CreateDirectConnectGateway-    (-    -- * Creating a Request-      createDirectConnectGateway-    , CreateDirectConnectGateway-    -- * Request Lenses-    , cdcgAmazonSideASN-    , cdcgDirectConnectGatewayName--    -- * Destructuring the Response-    , createDirectConnectGatewayResponse-    , CreateDirectConnectGatewayResponse-    -- * Response Lenses-    , cdcgrsDirectConnectGateway-    , cdcgrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateDirectConnectGateway operation.------------ /See:/ 'createDirectConnectGateway' smart constructor.-data CreateDirectConnectGateway = CreateDirectConnectGateway'-  { _cdcgAmazonSideASN            :: !(Maybe Integer)-  , _cdcgDirectConnectGatewayName :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateDirectConnectGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdcgAmazonSideASN' - The autonomous system number (ASN) for Border Gateway Protocol (BGP) to be configured on the Amazon side of the connection. The ASN must be in the private range of 64,512 to 65,534 or 4,200,000,000 to 4,294,967,294  Example: 65200 Default: 64512------ * 'cdcgDirectConnectGatewayName' - The name of the direct connect gateway. Example: "My direct connect gateway" Default: None-createDirectConnectGateway-    :: Text -- ^ 'cdcgDirectConnectGatewayName'-    -> CreateDirectConnectGateway-createDirectConnectGateway pDirectConnectGatewayName_ =-  CreateDirectConnectGateway'-    { _cdcgAmazonSideASN = Nothing-    , _cdcgDirectConnectGatewayName = pDirectConnectGatewayName_-    }----- | The autonomous system number (ASN) for Border Gateway Protocol (BGP) to be configured on the Amazon side of the connection. The ASN must be in the private range of 64,512 to 65,534 or 4,200,000,000 to 4,294,967,294  Example: 65200 Default: 64512-cdcgAmazonSideASN :: Lens' CreateDirectConnectGateway (Maybe Integer)-cdcgAmazonSideASN = lens _cdcgAmazonSideASN (\ s a -> s{_cdcgAmazonSideASN = a})---- | The name of the direct connect gateway. Example: "My direct connect gateway" Default: None-cdcgDirectConnectGatewayName :: Lens' CreateDirectConnectGateway Text-cdcgDirectConnectGatewayName = lens _cdcgDirectConnectGatewayName (\ s a -> s{_cdcgDirectConnectGatewayName = a})--instance AWSRequest CreateDirectConnectGateway where-        type Rs CreateDirectConnectGateway =-             CreateDirectConnectGatewayResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 CreateDirectConnectGatewayResponse' <$>-                   (x .?> "directConnectGateway") <*>-                     (pure (fromEnum s)))--instance Hashable CreateDirectConnectGateway where--instance NFData CreateDirectConnectGateway where--instance ToHeaders CreateDirectConnectGateway where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateDirectConnectGateway" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateDirectConnectGateway where-        toJSON CreateDirectConnectGateway'{..}-          = object-              (catMaybes-                 [("amazonSideAsn" .=) <$> _cdcgAmazonSideASN,-                  Just-                    ("directConnectGatewayName" .=-                       _cdcgDirectConnectGatewayName)])--instance ToPath CreateDirectConnectGateway where-        toPath = const "/"--instance ToQuery CreateDirectConnectGateway where-        toQuery = const mempty---- | Container for the response from the CreateDirectConnectGateway API call------------ /See:/ 'createDirectConnectGatewayResponse' smart constructor.-data CreateDirectConnectGatewayResponse = CreateDirectConnectGatewayResponse'-  { _cdcgrsDirectConnectGateway :: !(Maybe DirectConnectGateway)-  , _cdcgrsResponseStatus       :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateDirectConnectGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdcgrsDirectConnectGateway' - The direct connect gateway to be created.------ * 'cdcgrsResponseStatus' - -- | The response status code.-createDirectConnectGatewayResponse-    :: Int -- ^ 'cdcgrsResponseStatus'-    -> CreateDirectConnectGatewayResponse-createDirectConnectGatewayResponse pResponseStatus_ =-  CreateDirectConnectGatewayResponse'-    { _cdcgrsDirectConnectGateway = Nothing-    , _cdcgrsResponseStatus = pResponseStatus_-    }----- | The direct connect gateway to be created.-cdcgrsDirectConnectGateway :: Lens' CreateDirectConnectGatewayResponse (Maybe DirectConnectGateway)-cdcgrsDirectConnectGateway = lens _cdcgrsDirectConnectGateway (\ s a -> s{_cdcgrsDirectConnectGateway = a})---- | -- | The response status code.-cdcgrsResponseStatus :: Lens' CreateDirectConnectGatewayResponse Int-cdcgrsResponseStatus = lens _cdcgrsResponseStatus (\ s a -> s{_cdcgrsResponseStatus = a})--instance NFData CreateDirectConnectGatewayResponse-         where
− gen/Network/AWS/DirectConnect/CreateDirectConnectGatewayAssociation.hs
@@ -1,174 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates an association between a direct connect gateway and a virtual private gateway (VGW). The VGW must be attached to a VPC and must not be associated with another direct connect gateway.-------module Network.AWS.DirectConnect.CreateDirectConnectGatewayAssociation-    (-    -- * Creating a Request-      createDirectConnectGatewayAssociation-    , CreateDirectConnectGatewayAssociation-    -- * Request Lenses-    , cdcgaDirectConnectGatewayId-    , cdcgaVirtualGatewayId--    -- * Destructuring the Response-    , createDirectConnectGatewayAssociationResponse-    , CreateDirectConnectGatewayAssociationResponse-    -- * Response Lenses-    , cdcgarsDirectConnectGatewayAssociation-    , cdcgarsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateDirectConnectGatewayAssociation operation.------------ /See:/ 'createDirectConnectGatewayAssociation' smart constructor.-data CreateDirectConnectGatewayAssociation = CreateDirectConnectGatewayAssociation'-  { _cdcgaDirectConnectGatewayId :: !Text-  , _cdcgaVirtualGatewayId       :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateDirectConnectGatewayAssociation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdcgaDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None------ * 'cdcgaVirtualGatewayId' - The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None-createDirectConnectGatewayAssociation-    :: Text -- ^ 'cdcgaDirectConnectGatewayId'-    -> Text -- ^ 'cdcgaVirtualGatewayId'-    -> CreateDirectConnectGatewayAssociation-createDirectConnectGatewayAssociation pDirectConnectGatewayId_ pVirtualGatewayId_ =-  CreateDirectConnectGatewayAssociation'-    { _cdcgaDirectConnectGatewayId = pDirectConnectGatewayId_-    , _cdcgaVirtualGatewayId = pVirtualGatewayId_-    }----- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-cdcgaDirectConnectGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text-cdcgaDirectConnectGatewayId = lens _cdcgaDirectConnectGatewayId (\ s a -> s{_cdcgaDirectConnectGatewayId = a})---- | The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None-cdcgaVirtualGatewayId :: Lens' CreateDirectConnectGatewayAssociation Text-cdcgaVirtualGatewayId = lens _cdcgaVirtualGatewayId (\ s a -> s{_cdcgaVirtualGatewayId = a})--instance AWSRequest-           CreateDirectConnectGatewayAssociation-         where-        type Rs CreateDirectConnectGatewayAssociation =-             CreateDirectConnectGatewayAssociationResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 CreateDirectConnectGatewayAssociationResponse' <$>-                   (x .?> "directConnectGatewayAssociation") <*>-                     (pure (fromEnum s)))--instance Hashable-           CreateDirectConnectGatewayAssociation-         where--instance NFData CreateDirectConnectGatewayAssociation-         where--instance ToHeaders-           CreateDirectConnectGatewayAssociation-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateDirectConnectGatewayAssociation"-                       :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateDirectConnectGatewayAssociation-         where-        toJSON CreateDirectConnectGatewayAssociation'{..}-          = object-              (catMaybes-                 [Just-                    ("directConnectGatewayId" .=-                       _cdcgaDirectConnectGatewayId),-                  Just ("virtualGatewayId" .= _cdcgaVirtualGatewayId)])--instance ToPath CreateDirectConnectGatewayAssociation-         where-        toPath = const "/"--instance ToQuery-           CreateDirectConnectGatewayAssociation-         where-        toQuery = const mempty---- | Container for the response from the CreateDirectConnectGatewayAssociation API call------------ /See:/ 'createDirectConnectGatewayAssociationResponse' smart constructor.-data CreateDirectConnectGatewayAssociationResponse = CreateDirectConnectGatewayAssociationResponse'-  { _cdcgarsDirectConnectGatewayAssociation :: !(Maybe DirectConnectGatewayAssociation)-  , _cdcgarsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateDirectConnectGatewayAssociationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cdcgarsDirectConnectGatewayAssociation' - The direct connect gateway association to be created.------ * 'cdcgarsResponseStatus' - -- | The response status code.-createDirectConnectGatewayAssociationResponse-    :: Int -- ^ 'cdcgarsResponseStatus'-    -> CreateDirectConnectGatewayAssociationResponse-createDirectConnectGatewayAssociationResponse pResponseStatus_ =-  CreateDirectConnectGatewayAssociationResponse'-    { _cdcgarsDirectConnectGatewayAssociation = Nothing-    , _cdcgarsResponseStatus = pResponseStatus_-    }----- | The direct connect gateway association to be created.-cdcgarsDirectConnectGatewayAssociation :: Lens' CreateDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)-cdcgarsDirectConnectGatewayAssociation = lens _cdcgarsDirectConnectGatewayAssociation (\ s a -> s{_cdcgarsDirectConnectGatewayAssociation = a})---- | -- | The response status code.-cdcgarsResponseStatus :: Lens' CreateDirectConnectGatewayAssociationResponse Int-cdcgarsResponseStatus = lens _cdcgarsResponseStatus (\ s a -> s{_cdcgarsResponseStatus = a})--instance NFData-           CreateDirectConnectGatewayAssociationResponse-         where
− gen/Network/AWS/DirectConnect/CreateInterconnect.hs
@@ -1,148 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateInterconnect--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new interconnect between a AWS Direct Connect partner's network and a specific AWS Direct Connect location.--------- An interconnect is a connection which is capable of hosting other connections. The AWS Direct Connect partner can use an interconnect to provide sub-1Gbps AWS Direct Connect service to tier 2 customers who do not have their own connections. Like a standard connection, an interconnect links the AWS Direct Connect partner's network to an AWS Direct Connect location over a standard 1 Gbps or 10 Gbps Ethernet fiber-optic cable. One end is connected to the partner's router, the other to an AWS Direct Connect router.------ You can automatically add the new interconnect to a link aggregation group (LAG) by specifying a LAG ID in the request. This ensures that the new interconnect is allocated on the same AWS Direct Connect endpoint that hosts the specified LAG. If there are no available ports on the endpoint, the request fails and no interconnect will be created.------ For each end customer, the AWS Direct Connect partner provisions a connection on their interconnect by calling AllocateConnectionOnInterconnect. The end customer can then connect to AWS resources by creating a virtual interface on their connection, using the VLAN assigned to them by the AWS Direct Connect partner.----module Network.AWS.DirectConnect.CreateInterconnect-    (-    -- * Creating a Request-      createInterconnect-    , CreateInterconnect-    -- * Request Lenses-    , ciLagId-    , ciInterconnectName-    , ciBandwidth-    , ciLocation--    -- * Destructuring the Response-    , interconnect-    , Interconnect-    -- * Response Lenses-    , iLagId-    , iInterconnectId-    , iLocation-    , iInterconnectName-    , iAwsDevice-    , iLoaIssueTime-    , iBandwidth-    , iInterconnectState-    , iRegion-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateInterconnect operation.------------ /See:/ 'createInterconnect' smart constructor.-data CreateInterconnect = CreateInterconnect'-  { _ciLagId            :: !(Maybe Text)-  , _ciInterconnectName :: !Text-  , _ciBandwidth        :: !Text-  , _ciLocation         :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateInterconnect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ciLagId' - Undocumented member.------ * 'ciInterconnectName' - The name of the interconnect. Example: "/1G Interconnect to AWS/ " Default: None------ * 'ciBandwidth' - The port bandwidth Example: 1Gbps Default: None Available values: 1Gbps,10Gbps------ * 'ciLocation' - Where the interconnect is located Example: EqSV5 Default: None-createInterconnect-    :: Text -- ^ 'ciInterconnectName'-    -> Text -- ^ 'ciBandwidth'-    -> Text -- ^ 'ciLocation'-    -> CreateInterconnect-createInterconnect pInterconnectName_ pBandwidth_ pLocation_ =-  CreateInterconnect'-    { _ciLagId = Nothing-    , _ciInterconnectName = pInterconnectName_-    , _ciBandwidth = pBandwidth_-    , _ciLocation = pLocation_-    }----- | Undocumented member.-ciLagId :: Lens' CreateInterconnect (Maybe Text)-ciLagId = lens _ciLagId (\ s a -> s{_ciLagId = a})---- | The name of the interconnect. Example: "/1G Interconnect to AWS/ " Default: None-ciInterconnectName :: Lens' CreateInterconnect Text-ciInterconnectName = lens _ciInterconnectName (\ s a -> s{_ciInterconnectName = a})---- | The port bandwidth Example: 1Gbps Default: None Available values: 1Gbps,10Gbps-ciBandwidth :: Lens' CreateInterconnect Text-ciBandwidth = lens _ciBandwidth (\ s a -> s{_ciBandwidth = a})---- | Where the interconnect is located Example: EqSV5 Default: None-ciLocation :: Lens' CreateInterconnect Text-ciLocation = lens _ciLocation (\ s a -> s{_ciLocation = a})--instance AWSRequest CreateInterconnect where-        type Rs CreateInterconnect = Interconnect-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable CreateInterconnect where--instance NFData CreateInterconnect where--instance ToHeaders CreateInterconnect where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateInterconnect" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateInterconnect where-        toJSON CreateInterconnect'{..}-          = object-              (catMaybes-                 [("lagId" .=) <$> _ciLagId,-                  Just ("interconnectName" .= _ciInterconnectName),-                  Just ("bandwidth" .= _ciBandwidth),-                  Just ("location" .= _ciLocation)])--instance ToPath CreateInterconnect where-        toPath = const "/"--instance ToQuery CreateInterconnect where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/CreateLag.hs
@@ -1,166 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreateLag--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new link aggregation group (LAG) with the specified number of bundled physical connections between the customer network and a specific AWS Direct Connect location. A LAG is a logical interface that uses the Link Aggregation Control Protocol (LACP) to aggregate multiple 1 gigabit or 10 gigabit interfaces, allowing you to treat them as a single interface.--------- All connections in a LAG must use the same bandwidth (for example, 10 Gbps), and must terminate at the same AWS Direct Connect endpoint.------ You can have up to 10 connections per LAG. Regardless of this limit, if you request more connections for the LAG than AWS Direct Connect can allocate on a single endpoint, no LAG is created.------ You can specify an existing physical connection or interconnect to include in the LAG (which counts towards the total number of connections). Doing so interrupts the current physical connection or hosted connections, and re-establishes them as a member of the LAG. The LAG will be created on the same AWS Direct Connect endpoint to which the connection terminates. Any virtual interfaces associated with the connection are automatically disassociated and re-associated with the LAG. The connection ID does not change.------ If the AWS account used to create a LAG is a registered AWS Direct Connect partner, the LAG is automatically enabled to host sub-connections. For a LAG owned by a partner, any associated virtual interfaces cannot be directly configured.----module Network.AWS.DirectConnect.CreateLag-    (-    -- * Creating a Request-      createLag-    , CreateLag-    -- * Request Lenses-    , clConnectionId-    , clNumberOfConnections-    , clLocation-    , clConnectionsBandwidth-    , clLagName--    -- * Destructuring the Response-    , lag-    , Lag-    -- * Response Lenses-    , lagLagId-    , lagConnectionsBandwidth-    , lagMinimumLinks-    , lagLagName-    , lagLocation-    , lagConnections-    , lagAwsDevice-    , lagAllowsHostedConnections-    , lagNumberOfConnections-    , lagLagState-    , lagOwnerAccount-    , lagRegion-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreateLag operation.------------ /See:/ 'createLag' smart constructor.-data CreateLag = CreateLag'-  { _clConnectionId         :: !(Maybe Text)-  , _clNumberOfConnections  :: !Int-  , _clLocation             :: !Text-  , _clConnectionsBandwidth :: !Text-  , _clLagName              :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateLag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'clConnectionId' - The ID of an existing connection to migrate to the LAG. Default: None------ * 'clNumberOfConnections' - The number of physical connections initially provisioned and bundled by the LAG. Default: None------ * 'clLocation' - The AWS Direct Connect location in which the LAG should be allocated. Example: EqSV5 Default: None------ * 'clConnectionsBandwidth' - The bandwidth of the individual physical connections bundled by the LAG. Default: None Available values: 1Gbps, 10Gbps------ * 'clLagName' - The name of the LAG. Example: "@3x10G LAG to AWS@ " Default: None-createLag-    :: Int -- ^ 'clNumberOfConnections'-    -> Text -- ^ 'clLocation'-    -> Text -- ^ 'clConnectionsBandwidth'-    -> Text -- ^ 'clLagName'-    -> CreateLag-createLag pNumberOfConnections_ pLocation_ pConnectionsBandwidth_ pLagName_ =-  CreateLag'-    { _clConnectionId = Nothing-    , _clNumberOfConnections = pNumberOfConnections_-    , _clLocation = pLocation_-    , _clConnectionsBandwidth = pConnectionsBandwidth_-    , _clLagName = pLagName_-    }----- | The ID of an existing connection to migrate to the LAG. Default: None-clConnectionId :: Lens' CreateLag (Maybe Text)-clConnectionId = lens _clConnectionId (\ s a -> s{_clConnectionId = a})---- | The number of physical connections initially provisioned and bundled by the LAG. Default: None-clNumberOfConnections :: Lens' CreateLag Int-clNumberOfConnections = lens _clNumberOfConnections (\ s a -> s{_clNumberOfConnections = a})---- | The AWS Direct Connect location in which the LAG should be allocated. Example: EqSV5 Default: None-clLocation :: Lens' CreateLag Text-clLocation = lens _clLocation (\ s a -> s{_clLocation = a})---- | The bandwidth of the individual physical connections bundled by the LAG. Default: None Available values: 1Gbps, 10Gbps-clConnectionsBandwidth :: Lens' CreateLag Text-clConnectionsBandwidth = lens _clConnectionsBandwidth (\ s a -> s{_clConnectionsBandwidth = a})---- | The name of the LAG. Example: "@3x10G LAG to AWS@ " Default: None-clLagName :: Lens' CreateLag Text-clLagName = lens _clLagName (\ s a -> s{_clLagName = a})--instance AWSRequest CreateLag where-        type Rs CreateLag = Lag-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable CreateLag where--instance NFData CreateLag where--instance ToHeaders CreateLag where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreateLag" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateLag where-        toJSON CreateLag'{..}-          = object-              (catMaybes-                 [("connectionId" .=) <$> _clConnectionId,-                  Just-                    ("numberOfConnections" .= _clNumberOfConnections),-                  Just ("location" .= _clLocation),-                  Just-                    ("connectionsBandwidth" .= _clConnectionsBandwidth),-                  Just ("lagName" .= _clLagName)])--instance ToPath CreateLag where-        toPath = const "/"--instance ToQuery CreateLag where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/CreatePrivateVirtualInterface.hs
@@ -1,137 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreatePrivateVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new private virtual interface. A virtual interface is the VLAN that transports AWS Direct Connect traffic. A private virtual interface supports sending traffic to a single virtual private cloud (VPC).-------module Network.AWS.DirectConnect.CreatePrivateVirtualInterface-    (-    -- * Creating a Request-      createPrivateVirtualInterface-    , CreatePrivateVirtualInterface-    -- * Request Lenses-    , creConnectionId-    , creNewPrivateVirtualInterface--    -- * Destructuring the Response-    , virtualInterface-    , VirtualInterface-    -- * Response Lenses-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreatePrivateVirtualInterface operation.------------ /See:/ 'createPrivateVirtualInterface' smart constructor.-data CreatePrivateVirtualInterface = CreatePrivateVirtualInterface'-  { _creConnectionId               :: !Text-  , _creNewPrivateVirtualInterface :: !NewPrivateVirtualInterface-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreatePrivateVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'creConnectionId' - Undocumented member.------ * 'creNewPrivateVirtualInterface' - Detailed information for the private virtual interface to be created. Default: None-createPrivateVirtualInterface-    :: Text -- ^ 'creConnectionId'-    -> NewPrivateVirtualInterface -- ^ 'creNewPrivateVirtualInterface'-    -> CreatePrivateVirtualInterface-createPrivateVirtualInterface pConnectionId_ pNewPrivateVirtualInterface_ =-  CreatePrivateVirtualInterface'-    { _creConnectionId = pConnectionId_-    , _creNewPrivateVirtualInterface = pNewPrivateVirtualInterface_-    }----- | Undocumented member.-creConnectionId :: Lens' CreatePrivateVirtualInterface Text-creConnectionId = lens _creConnectionId (\ s a -> s{_creConnectionId = a})---- | Detailed information for the private virtual interface to be created. Default: None-creNewPrivateVirtualInterface :: Lens' CreatePrivateVirtualInterface NewPrivateVirtualInterface-creNewPrivateVirtualInterface = lens _creNewPrivateVirtualInterface (\ s a -> s{_creNewPrivateVirtualInterface = a})--instance AWSRequest CreatePrivateVirtualInterface-         where-        type Rs CreatePrivateVirtualInterface =-             VirtualInterface-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable CreatePrivateVirtualInterface where--instance NFData CreatePrivateVirtualInterface where--instance ToHeaders CreatePrivateVirtualInterface-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreatePrivateVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreatePrivateVirtualInterface where-        toJSON CreatePrivateVirtualInterface'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _creConnectionId),-                  Just-                    ("newPrivateVirtualInterface" .=-                       _creNewPrivateVirtualInterface)])--instance ToPath CreatePrivateVirtualInterface where-        toPath = const "/"--instance ToQuery CreatePrivateVirtualInterface where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/CreatePublicVirtualInterface.hs
@@ -1,138 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.CreatePublicVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a new public virtual interface. A virtual interface is the VLAN that transports AWS Direct Connect traffic. A public virtual interface supports sending traffic to public services of AWS such as Amazon Simple Storage Service (Amazon S3).--------- When creating an IPv6 public virtual interface (addressFamily is 'ipv6'), the customer and amazon address fields should be left blank to use auto-assigned IPv6 space. Custom IPv6 Addresses are currently not supported.----module Network.AWS.DirectConnect.CreatePublicVirtualInterface-    (-    -- * Creating a Request-      createPublicVirtualInterface-    , CreatePublicVirtualInterface-    -- * Request Lenses-    , cpviConnectionId-    , cpviNewPublicVirtualInterface--    -- * Destructuring the Response-    , virtualInterface-    , VirtualInterface-    -- * Response Lenses-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the CreatePublicVirtualInterface operation.------------ /See:/ 'createPublicVirtualInterface' smart constructor.-data CreatePublicVirtualInterface = CreatePublicVirtualInterface'-  { _cpviConnectionId              :: !Text-  , _cpviNewPublicVirtualInterface :: !NewPublicVirtualInterface-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreatePublicVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cpviConnectionId' - Undocumented member.------ * 'cpviNewPublicVirtualInterface' - Detailed information for the public virtual interface to be created. Default: None-createPublicVirtualInterface-    :: Text -- ^ 'cpviConnectionId'-    -> NewPublicVirtualInterface -- ^ 'cpviNewPublicVirtualInterface'-    -> CreatePublicVirtualInterface-createPublicVirtualInterface pConnectionId_ pNewPublicVirtualInterface_ =-  CreatePublicVirtualInterface'-    { _cpviConnectionId = pConnectionId_-    , _cpviNewPublicVirtualInterface = pNewPublicVirtualInterface_-    }----- | Undocumented member.-cpviConnectionId :: Lens' CreatePublicVirtualInterface Text-cpviConnectionId = lens _cpviConnectionId (\ s a -> s{_cpviConnectionId = a})---- | Detailed information for the public virtual interface to be created. Default: None-cpviNewPublicVirtualInterface :: Lens' CreatePublicVirtualInterface NewPublicVirtualInterface-cpviNewPublicVirtualInterface = lens _cpviNewPublicVirtualInterface (\ s a -> s{_cpviNewPublicVirtualInterface = a})--instance AWSRequest CreatePublicVirtualInterface-         where-        type Rs CreatePublicVirtualInterface =-             VirtualInterface-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable CreatePublicVirtualInterface where--instance NFData CreatePublicVirtualInterface where--instance ToHeaders CreatePublicVirtualInterface where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.CreatePublicVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreatePublicVirtualInterface where-        toJSON CreatePublicVirtualInterface'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _cpviConnectionId),-                  Just-                    ("newPublicVirtualInterface" .=-                       _cpviNewPublicVirtualInterface)])--instance ToPath CreatePublicVirtualInterface where-        toPath = const "/"--instance ToQuery CreatePublicVirtualInterface where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/DeleteBGPPeer.hs
@@ -1,163 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteBGPPeer--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a BGP peer on the specified virtual interface that matches the specified customer address and ASN. You cannot delete the last BGP peer from a virtual interface.-------module Network.AWS.DirectConnect.DeleteBGPPeer-    (-    -- * Creating a Request-      deleteBGPPeer-    , DeleteBGPPeer-    -- * Request Lenses-    , dbpCustomerAddress-    , dbpAsn-    , dbpVirtualInterfaceId--    -- * Destructuring the Response-    , deleteBGPPeerResponse-    , DeleteBGPPeerResponse-    -- * Response Lenses-    , dbprsVirtualInterface-    , dbprsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteBGPPeer operation.------------ /See:/ 'deleteBGPPeer' smart constructor.-data DeleteBGPPeer = DeleteBGPPeer'-  { _dbpCustomerAddress    :: !(Maybe Text)-  , _dbpAsn                :: !(Maybe Int)-  , _dbpVirtualInterfaceId :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteBGPPeer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dbpCustomerAddress' - Undocumented member.------ * 'dbpAsn' - Undocumented member.------ * 'dbpVirtualInterfaceId' - The ID of the virtual interface from which the BGP peer will be deleted. Example: dxvif-456abc78 Default: None-deleteBGPPeer-    :: DeleteBGPPeer-deleteBGPPeer =-  DeleteBGPPeer'-    { _dbpCustomerAddress = Nothing-    , _dbpAsn = Nothing-    , _dbpVirtualInterfaceId = Nothing-    }----- | Undocumented member.-dbpCustomerAddress :: Lens' DeleteBGPPeer (Maybe Text)-dbpCustomerAddress = lens _dbpCustomerAddress (\ s a -> s{_dbpCustomerAddress = a})---- | Undocumented member.-dbpAsn :: Lens' DeleteBGPPeer (Maybe Int)-dbpAsn = lens _dbpAsn (\ s a -> s{_dbpAsn = a})---- | The ID of the virtual interface from which the BGP peer will be deleted. Example: dxvif-456abc78 Default: None-dbpVirtualInterfaceId :: Lens' DeleteBGPPeer (Maybe Text)-dbpVirtualInterfaceId = lens _dbpVirtualInterfaceId (\ s a -> s{_dbpVirtualInterfaceId = a})--instance AWSRequest DeleteBGPPeer where-        type Rs DeleteBGPPeer = DeleteBGPPeerResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DeleteBGPPeerResponse' <$>-                   (x .?> "virtualInterface") <*> (pure (fromEnum s)))--instance Hashable DeleteBGPPeer where--instance NFData DeleteBGPPeer where--instance ToHeaders DeleteBGPPeer where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteBGPPeer" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteBGPPeer where-        toJSON DeleteBGPPeer'{..}-          = object-              (catMaybes-                 [("customerAddress" .=) <$> _dbpCustomerAddress,-                  ("asn" .=) <$> _dbpAsn,-                  ("virtualInterfaceId" .=) <$>-                    _dbpVirtualInterfaceId])--instance ToPath DeleteBGPPeer where-        toPath = const "/"--instance ToQuery DeleteBGPPeer where-        toQuery = const mempty---- | The response received when DeleteBGPPeer is called.------------ /See:/ 'deleteBGPPeerResponse' smart constructor.-data DeleteBGPPeerResponse = DeleteBGPPeerResponse'-  { _dbprsVirtualInterface :: !(Maybe VirtualInterface)-  , _dbprsResponseStatus   :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteBGPPeerResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dbprsVirtualInterface' - Undocumented member.------ * 'dbprsResponseStatus' - -- | The response status code.-deleteBGPPeerResponse-    :: Int -- ^ 'dbprsResponseStatus'-    -> DeleteBGPPeerResponse-deleteBGPPeerResponse pResponseStatus_ =-  DeleteBGPPeerResponse'-    {_dbprsVirtualInterface = Nothing, _dbprsResponseStatus = pResponseStatus_}----- | Undocumented member.-dbprsVirtualInterface :: Lens' DeleteBGPPeerResponse (Maybe VirtualInterface)-dbprsVirtualInterface = lens _dbprsVirtualInterface (\ s a -> s{_dbprsVirtualInterface = a})---- | -- | The response status code.-dbprsResponseStatus :: Lens' DeleteBGPPeerResponse Int-dbprsResponseStatus = lens _dbprsResponseStatus (\ s a -> s{_dbprsResponseStatus = a})--instance NFData DeleteBGPPeerResponse where
− gen/Network/AWS/DirectConnect/DeleteConnection.hs
@@ -1,113 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteConnection--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the connection.--------- Deleting a connection only stops the AWS Direct Connect port hour and data transfer charges. You need to cancel separately with the providers any services or charges for cross-connects or network circuits that connect you to the AWS Direct Connect location.----module Network.AWS.DirectConnect.DeleteConnection-    (-    -- * Creating a Request-      deleteConnection-    , DeleteConnection-    -- * Request Lenses-    , dcConnectionId--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteConnection operation.------------ /See:/ 'deleteConnection' smart constructor.-newtype DeleteConnection = DeleteConnection'-  { _dcConnectionId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteConnection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcConnectionId' - Undocumented member.-deleteConnection-    :: Text -- ^ 'dcConnectionId'-    -> DeleteConnection-deleteConnection pConnectionId_ =-  DeleteConnection' {_dcConnectionId = pConnectionId_}----- | Undocumented member.-dcConnectionId :: Lens' DeleteConnection Text-dcConnectionId = lens _dcConnectionId (\ s a -> s{_dcConnectionId = a})--instance AWSRequest DeleteConnection where-        type Rs DeleteConnection = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable DeleteConnection where--instance NFData DeleteConnection where--instance ToHeaders DeleteConnection where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteConnection" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteConnection where-        toJSON DeleteConnection'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _dcConnectionId)])--instance ToPath DeleteConnection where-        toPath = const "/"--instance ToQuery DeleteConnection where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/DeleteDirectConnectGateway.hs
@@ -1,150 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteDirectConnectGateway--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a direct connect gateway. You must first delete all virtual interfaces that are attached to the direct connect gateway and disassociate all virtual private gateways that are associated with the direct connect gateway.-------module Network.AWS.DirectConnect.DeleteDirectConnectGateway-    (-    -- * Creating a Request-      deleteDirectConnectGateway-    , DeleteDirectConnectGateway-    -- * Request Lenses-    , ddcgdDirectConnectGatewayId--    -- * Destructuring the Response-    , deleteDirectConnectGatewayResponse-    , DeleteDirectConnectGatewayResponse-    -- * Response Lenses-    , ddcgdrsDirectConnectGateway-    , ddcgdrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteDirectConnectGateway operation.------------ /See:/ 'deleteDirectConnectGateway' smart constructor.-newtype DeleteDirectConnectGateway = DeleteDirectConnectGateway'-  { _ddcgdDirectConnectGatewayId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteDirectConnectGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgdDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-deleteDirectConnectGateway-    :: Text -- ^ 'ddcgdDirectConnectGatewayId'-    -> DeleteDirectConnectGateway-deleteDirectConnectGateway pDirectConnectGatewayId_ =-  DeleteDirectConnectGateway'-    {_ddcgdDirectConnectGatewayId = pDirectConnectGatewayId_}----- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-ddcgdDirectConnectGatewayId :: Lens' DeleteDirectConnectGateway Text-ddcgdDirectConnectGatewayId = lens _ddcgdDirectConnectGatewayId (\ s a -> s{_ddcgdDirectConnectGatewayId = a})--instance AWSRequest DeleteDirectConnectGateway where-        type Rs DeleteDirectConnectGateway =-             DeleteDirectConnectGatewayResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DeleteDirectConnectGatewayResponse' <$>-                   (x .?> "directConnectGateway") <*>-                     (pure (fromEnum s)))--instance Hashable DeleteDirectConnectGateway where--instance NFData DeleteDirectConnectGateway where--instance ToHeaders DeleteDirectConnectGateway where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteDirectConnectGateway" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteDirectConnectGateway where-        toJSON DeleteDirectConnectGateway'{..}-          = object-              (catMaybes-                 [Just-                    ("directConnectGatewayId" .=-                       _ddcgdDirectConnectGatewayId)])--instance ToPath DeleteDirectConnectGateway where-        toPath = const "/"--instance ToQuery DeleteDirectConnectGateway where-        toQuery = const mempty---- | Container for the response from the DeleteDirectConnectGateway API call------------ /See:/ 'deleteDirectConnectGatewayResponse' smart constructor.-data DeleteDirectConnectGatewayResponse = DeleteDirectConnectGatewayResponse'-  { _ddcgdrsDirectConnectGateway :: !(Maybe DirectConnectGateway)-  , _ddcgdrsResponseStatus       :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteDirectConnectGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgdrsDirectConnectGateway' - The direct connect gateway to be deleted.------ * 'ddcgdrsResponseStatus' - -- | The response status code.-deleteDirectConnectGatewayResponse-    :: Int -- ^ 'ddcgdrsResponseStatus'-    -> DeleteDirectConnectGatewayResponse-deleteDirectConnectGatewayResponse pResponseStatus_ =-  DeleteDirectConnectGatewayResponse'-    { _ddcgdrsDirectConnectGateway = Nothing-    , _ddcgdrsResponseStatus = pResponseStatus_-    }----- | The direct connect gateway to be deleted.-ddcgdrsDirectConnectGateway :: Lens' DeleteDirectConnectGatewayResponse (Maybe DirectConnectGateway)-ddcgdrsDirectConnectGateway = lens _ddcgdrsDirectConnectGateway (\ s a -> s{_ddcgdrsDirectConnectGateway = a})---- | -- | The response status code.-ddcgdrsResponseStatus :: Lens' DeleteDirectConnectGatewayResponse Int-ddcgdrsResponseStatus = lens _ddcgdrsResponseStatus (\ s a -> s{_ddcgdrsResponseStatus = a})--instance NFData DeleteDirectConnectGatewayResponse-         where
− gen/Network/AWS/DirectConnect/DeleteDirectConnectGatewayAssociation.hs
@@ -1,174 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the association between a direct connect gateway and a virtual private gateway.-------module Network.AWS.DirectConnect.DeleteDirectConnectGatewayAssociation-    (-    -- * Creating a Request-      deleteDirectConnectGatewayAssociation-    , DeleteDirectConnectGatewayAssociation-    -- * Request Lenses-    , delDirectConnectGatewayId-    , delVirtualGatewayId--    -- * Destructuring the Response-    , deleteDirectConnectGatewayAssociationResponse-    , DeleteDirectConnectGatewayAssociationResponse-    -- * Response Lenses-    , delrsDirectConnectGatewayAssociation-    , delrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteDirectConnectGatewayAssociation operation.------------ /See:/ 'deleteDirectConnectGatewayAssociation' smart constructor.-data DeleteDirectConnectGatewayAssociation = DeleteDirectConnectGatewayAssociation'-  { _delDirectConnectGatewayId :: !Text-  , _delVirtualGatewayId       :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteDirectConnectGatewayAssociation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'delDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None------ * 'delVirtualGatewayId' - The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None-deleteDirectConnectGatewayAssociation-    :: Text -- ^ 'delDirectConnectGatewayId'-    -> Text -- ^ 'delVirtualGatewayId'-    -> DeleteDirectConnectGatewayAssociation-deleteDirectConnectGatewayAssociation pDirectConnectGatewayId_ pVirtualGatewayId_ =-  DeleteDirectConnectGatewayAssociation'-    { _delDirectConnectGatewayId = pDirectConnectGatewayId_-    , _delVirtualGatewayId = pVirtualGatewayId_-    }----- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-delDirectConnectGatewayId :: Lens' DeleteDirectConnectGatewayAssociation Text-delDirectConnectGatewayId = lens _delDirectConnectGatewayId (\ s a -> s{_delDirectConnectGatewayId = a})---- | The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None-delVirtualGatewayId :: Lens' DeleteDirectConnectGatewayAssociation Text-delVirtualGatewayId = lens _delVirtualGatewayId (\ s a -> s{_delVirtualGatewayId = a})--instance AWSRequest-           DeleteDirectConnectGatewayAssociation-         where-        type Rs DeleteDirectConnectGatewayAssociation =-             DeleteDirectConnectGatewayAssociationResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DeleteDirectConnectGatewayAssociationResponse' <$>-                   (x .?> "directConnectGatewayAssociation") <*>-                     (pure (fromEnum s)))--instance Hashable-           DeleteDirectConnectGatewayAssociation-         where--instance NFData DeleteDirectConnectGatewayAssociation-         where--instance ToHeaders-           DeleteDirectConnectGatewayAssociation-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteDirectConnectGatewayAssociation"-                       :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteDirectConnectGatewayAssociation-         where-        toJSON DeleteDirectConnectGatewayAssociation'{..}-          = object-              (catMaybes-                 [Just-                    ("directConnectGatewayId" .=-                       _delDirectConnectGatewayId),-                  Just ("virtualGatewayId" .= _delVirtualGatewayId)])--instance ToPath DeleteDirectConnectGatewayAssociation-         where-        toPath = const "/"--instance ToQuery-           DeleteDirectConnectGatewayAssociation-         where-        toQuery = const mempty---- | Container for the response from the DeleteDirectConnectGatewayAssociation API call------------ /See:/ 'deleteDirectConnectGatewayAssociationResponse' smart constructor.-data DeleteDirectConnectGatewayAssociationResponse = DeleteDirectConnectGatewayAssociationResponse'-  { _delrsDirectConnectGatewayAssociation :: !(Maybe DirectConnectGatewayAssociation)-  , _delrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteDirectConnectGatewayAssociationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'delrsDirectConnectGatewayAssociation' - The direct connect gateway association to be deleted.------ * 'delrsResponseStatus' - -- | The response status code.-deleteDirectConnectGatewayAssociationResponse-    :: Int -- ^ 'delrsResponseStatus'-    -> DeleteDirectConnectGatewayAssociationResponse-deleteDirectConnectGatewayAssociationResponse pResponseStatus_ =-  DeleteDirectConnectGatewayAssociationResponse'-    { _delrsDirectConnectGatewayAssociation = Nothing-    , _delrsResponseStatus = pResponseStatus_-    }----- | The direct connect gateway association to be deleted.-delrsDirectConnectGatewayAssociation :: Lens' DeleteDirectConnectGatewayAssociationResponse (Maybe DirectConnectGatewayAssociation)-delrsDirectConnectGatewayAssociation = lens _delrsDirectConnectGatewayAssociation (\ s a -> s{_delrsDirectConnectGatewayAssociation = a})---- | -- | The response status code.-delrsResponseStatus :: Lens' DeleteDirectConnectGatewayAssociationResponse Int-delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a})--instance NFData-           DeleteDirectConnectGatewayAssociationResponse-         where
− gen/Network/AWS/DirectConnect/DeleteInterconnect.hs
@@ -1,142 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteInterconnect--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the specified interconnect.-------module Network.AWS.DirectConnect.DeleteInterconnect-    (-    -- * Creating a Request-      deleteInterconnect-    , DeleteInterconnect-    -- * Request Lenses-    , dInterconnectId--    -- * Destructuring the Response-    , deleteInterconnectResponse-    , DeleteInterconnectResponse-    -- * Response Lenses-    , drsInterconnectState-    , drsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteInterconnect operation.------------ /See:/ 'deleteInterconnect' smart constructor.-newtype DeleteInterconnect = DeleteInterconnect'-  { _dInterconnectId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteInterconnect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dInterconnectId' - Undocumented member.-deleteInterconnect-    :: Text -- ^ 'dInterconnectId'-    -> DeleteInterconnect-deleteInterconnect pInterconnectId_ =-  DeleteInterconnect' {_dInterconnectId = pInterconnectId_}----- | Undocumented member.-dInterconnectId :: Lens' DeleteInterconnect Text-dInterconnectId = lens _dInterconnectId (\ s a -> s{_dInterconnectId = a})--instance AWSRequest DeleteInterconnect where-        type Rs DeleteInterconnect =-             DeleteInterconnectResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DeleteInterconnectResponse' <$>-                   (x .?> "interconnectState") <*> (pure (fromEnum s)))--instance Hashable DeleteInterconnect where--instance NFData DeleteInterconnect where--instance ToHeaders DeleteInterconnect where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteInterconnect" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteInterconnect where-        toJSON DeleteInterconnect'{..}-          = object-              (catMaybes-                 [Just ("interconnectId" .= _dInterconnectId)])--instance ToPath DeleteInterconnect where-        toPath = const "/"--instance ToQuery DeleteInterconnect where-        toQuery = const mempty---- | The response received when DeleteInterconnect is called.------------ /See:/ 'deleteInterconnectResponse' smart constructor.-data DeleteInterconnectResponse = DeleteInterconnectResponse'-  { _drsInterconnectState :: !(Maybe InterconnectState)-  , _drsResponseStatus    :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteInterconnectResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'drsInterconnectState' - Undocumented member.------ * 'drsResponseStatus' - -- | The response status code.-deleteInterconnectResponse-    :: Int -- ^ 'drsResponseStatus'-    -> DeleteInterconnectResponse-deleteInterconnectResponse pResponseStatus_ =-  DeleteInterconnectResponse'-    {_drsInterconnectState = Nothing, _drsResponseStatus = pResponseStatus_}----- | Undocumented member.-drsInterconnectState :: Lens' DeleteInterconnectResponse (Maybe InterconnectState)-drsInterconnectState = lens _drsInterconnectState (\ s a -> s{_drsInterconnectState = a})---- | -- | The response status code.-drsResponseStatus :: Lens' DeleteInterconnectResponse Int-drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a})--instance NFData DeleteInterconnectResponse where
− gen/Network/AWS/DirectConnect/DeleteLag.hs
@@ -1,108 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteLag--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a link aggregation group (LAG). You cannot delete a LAG if it has active virtual interfaces or hosted connections.-------module Network.AWS.DirectConnect.DeleteLag-    (-    -- * Creating a Request-      deleteLag-    , DeleteLag-    -- * Request Lenses-    , dLagId--    -- * Destructuring the Response-    , lag-    , Lag-    -- * Response Lenses-    , lagLagId-    , lagConnectionsBandwidth-    , lagMinimumLinks-    , lagLagName-    , lagLocation-    , lagConnections-    , lagAwsDevice-    , lagAllowsHostedConnections-    , lagNumberOfConnections-    , lagLagState-    , lagOwnerAccount-    , lagRegion-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteLag operation.------------ /See:/ 'deleteLag' smart constructor.-newtype DeleteLag = DeleteLag'-  { _dLagId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteLag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dLagId' - The ID of the LAG to delete. Example: dxlag-abc123 Default: None-deleteLag-    :: Text -- ^ 'dLagId'-    -> DeleteLag-deleteLag pLagId_ = DeleteLag' {_dLagId = pLagId_}----- | The ID of the LAG to delete. Example: dxlag-abc123 Default: None-dLagId :: Lens' DeleteLag Text-dLagId = lens _dLagId (\ s a -> s{_dLagId = a})--instance AWSRequest DeleteLag where-        type Rs DeleteLag = Lag-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable DeleteLag where--instance NFData DeleteLag where--instance ToHeaders DeleteLag where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteLag" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteLag where-        toJSON DeleteLag'{..}-          = object (catMaybes [Just ("lagId" .= _dLagId)])--instance ToPath DeleteLag where-        toPath = const "/"--instance ToQuery DeleteLag where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/DeleteVirtualInterface.hs
@@ -1,147 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DeleteVirtualInterface--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a virtual interface.-------module Network.AWS.DirectConnect.DeleteVirtualInterface-    (-    -- * Creating a Request-      deleteVirtualInterface-    , DeleteVirtualInterface-    -- * Request Lenses-    , delVirtualInterfaceId--    -- * Destructuring the Response-    , deleteVirtualInterfaceResponse-    , DeleteVirtualInterfaceResponse-    -- * Response Lenses-    , dvirsVirtualInterfaceState-    , dvirsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DeleteVirtualInterface operation.------------ /See:/ 'deleteVirtualInterface' smart constructor.-newtype DeleteVirtualInterface = DeleteVirtualInterface'-  { _delVirtualInterfaceId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'delVirtualInterfaceId' - Undocumented member.-deleteVirtualInterface-    :: Text -- ^ 'delVirtualInterfaceId'-    -> DeleteVirtualInterface-deleteVirtualInterface pVirtualInterfaceId_ =-  DeleteVirtualInterface' {_delVirtualInterfaceId = pVirtualInterfaceId_}----- | Undocumented member.-delVirtualInterfaceId :: Lens' DeleteVirtualInterface Text-delVirtualInterfaceId = lens _delVirtualInterfaceId (\ s a -> s{_delVirtualInterfaceId = a})--instance AWSRequest DeleteVirtualInterface where-        type Rs DeleteVirtualInterface =-             DeleteVirtualInterfaceResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DeleteVirtualInterfaceResponse' <$>-                   (x .?> "virtualInterfaceState") <*>-                     (pure (fromEnum s)))--instance Hashable DeleteVirtualInterface where--instance NFData DeleteVirtualInterface where--instance ToHeaders DeleteVirtualInterface where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DeleteVirtualInterface" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteVirtualInterface where-        toJSON DeleteVirtualInterface'{..}-          = object-              (catMaybes-                 [Just-                    ("virtualInterfaceId" .= _delVirtualInterfaceId)])--instance ToPath DeleteVirtualInterface where-        toPath = const "/"--instance ToQuery DeleteVirtualInterface where-        toQuery = const mempty---- | The response received when DeleteVirtualInterface is called.------------ /See:/ 'deleteVirtualInterfaceResponse' smart constructor.-data DeleteVirtualInterfaceResponse = DeleteVirtualInterfaceResponse'-  { _dvirsVirtualInterfaceState :: !(Maybe VirtualInterfaceState)-  , _dvirsResponseStatus        :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteVirtualInterfaceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvirsVirtualInterfaceState' - Undocumented member.------ * 'dvirsResponseStatus' - -- | The response status code.-deleteVirtualInterfaceResponse-    :: Int -- ^ 'dvirsResponseStatus'-    -> DeleteVirtualInterfaceResponse-deleteVirtualInterfaceResponse pResponseStatus_ =-  DeleteVirtualInterfaceResponse'-    { _dvirsVirtualInterfaceState = Nothing-    , _dvirsResponseStatus = pResponseStatus_-    }----- | Undocumented member.-dvirsVirtualInterfaceState :: Lens' DeleteVirtualInterfaceResponse (Maybe VirtualInterfaceState)-dvirsVirtualInterfaceState = lens _dvirsVirtualInterfaceState (\ s a -> s{_dvirsVirtualInterfaceState = a})---- | -- | The response status code.-dvirsResponseStatus :: Lens' DeleteVirtualInterfaceResponse Int-dvirsResponseStatus = lens _dvirsResponseStatus (\ s a -> s{_dvirsResponseStatus = a})--instance NFData DeleteVirtualInterfaceResponse where
− gen/Network/AWS/DirectConnect/DescribeConnections.hs
@@ -1,100 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeConnections--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Displays all connections in this region.--------- If a connection ID is provided, the call returns only that particular connection.----module Network.AWS.DirectConnect.DescribeConnections-    (-    -- * Creating a Request-      describeConnections-    , DescribeConnections-    -- * Request Lenses-    , dConnectionId--    -- * Destructuring the Response-    , connections-    , Connections-    -- * Response Lenses-    , cConnections-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeConnections operation.------------ /See:/ 'describeConnections' smart constructor.-newtype DescribeConnections = DescribeConnections'-  { _dConnectionId :: Maybe Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeConnections' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dConnectionId' - Undocumented member.-describeConnections-    :: DescribeConnections-describeConnections = DescribeConnections' {_dConnectionId = Nothing}----- | Undocumented member.-dConnectionId :: Lens' DescribeConnections (Maybe Text)-dConnectionId = lens _dConnectionId (\ s a -> s{_dConnectionId = a})--instance AWSRequest DescribeConnections where-        type Rs DescribeConnections = Connections-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable DescribeConnections where--instance NFData DescribeConnections where--instance ToHeaders DescribeConnections where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeConnections" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeConnections where-        toJSON DescribeConnections'{..}-          = object-              (catMaybes [("connectionId" .=) <$> _dConnectionId])--instance ToPath DescribeConnections where-        toPath = const "/"--instance ToQuery DescribeConnections where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/DescribeDirectConnectGatewayAssociations.hs
@@ -1,204 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of all direct connect gateway and virtual private gateway (VGW) associations. Either a direct connect gateway ID or a VGW ID must be provided in the request. If a direct connect gateway ID is provided, the response returns all VGWs associated with the direct connect gateway. If a VGW ID is provided, the response returns all direct connect gateways associated with the VGW. If both are provided, the response only returns the association that matches both the direct connect gateway and the VGW.-------module Network.AWS.DirectConnect.DescribeDirectConnectGatewayAssociations-    (-    -- * Creating a Request-      describeDirectConnectGatewayAssociations-    , DescribeDirectConnectGatewayAssociations-    -- * Request Lenses-    , ddcgaVirtualGatewayId-    , ddcgaDirectConnectGatewayId-    , ddcgaNextToken-    , ddcgaMaxResults--    -- * Destructuring the Response-    , describeDirectConnectGatewayAssociationsResponse-    , DescribeDirectConnectGatewayAssociationsResponse-    -- * Response Lenses-    , ddcgarsNextToken-    , ddcgarsDirectConnectGatewayAssociations-    , ddcgarsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeDirectConnectGatewayAssociations operation.------------ /See:/ 'describeDirectConnectGatewayAssociations' smart constructor.-data DescribeDirectConnectGatewayAssociations = DescribeDirectConnectGatewayAssociations'-  { _ddcgaVirtualGatewayId       :: !(Maybe Text)-  , _ddcgaDirectConnectGatewayId :: !(Maybe Text)-  , _ddcgaNextToken              :: !(Maybe Text)-  , _ddcgaMaxResults             :: !(Maybe Int)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGatewayAssociations' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgaVirtualGatewayId' - The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None------ * 'ddcgaDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None------ * 'ddcgaNextToken' - The token provided in the previous describe result to retrieve the next page of the result. Default: None------ * 'ddcgaMaxResults' - The maximum number of direct connect gateway associations to return per page. Example: 15 Default: None-describeDirectConnectGatewayAssociations-    :: DescribeDirectConnectGatewayAssociations-describeDirectConnectGatewayAssociations =-  DescribeDirectConnectGatewayAssociations'-    { _ddcgaVirtualGatewayId = Nothing-    , _ddcgaDirectConnectGatewayId = Nothing-    , _ddcgaNextToken = Nothing-    , _ddcgaMaxResults = Nothing-    }----- | The ID of the virtual private gateway. Example: "vgw-abc123ef" Default: None-ddcgaVirtualGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)-ddcgaVirtualGatewayId = lens _ddcgaVirtualGatewayId (\ s a -> s{_ddcgaVirtualGatewayId = a})---- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-ddcgaDirectConnectGatewayId :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)-ddcgaDirectConnectGatewayId = lens _ddcgaDirectConnectGatewayId (\ s a -> s{_ddcgaDirectConnectGatewayId = a})---- | The token provided in the previous describe result to retrieve the next page of the result. Default: None-ddcgaNextToken :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Text)-ddcgaNextToken = lens _ddcgaNextToken (\ s a -> s{_ddcgaNextToken = a})---- | The maximum number of direct connect gateway associations to return per page. Example: 15 Default: None-ddcgaMaxResults :: Lens' DescribeDirectConnectGatewayAssociations (Maybe Int)-ddcgaMaxResults = lens _ddcgaMaxResults (\ s a -> s{_ddcgaMaxResults = a})--instance AWSRequest-           DescribeDirectConnectGatewayAssociations-         where-        type Rs DescribeDirectConnectGatewayAssociations =-             DescribeDirectConnectGatewayAssociationsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeDirectConnectGatewayAssociationsResponse' <$>-                   (x .?> "nextToken") <*>-                     (x .?> "directConnectGatewayAssociations" .!@ mempty)-                     <*> (pure (fromEnum s)))--instance Hashable-           DescribeDirectConnectGatewayAssociations-         where--instance NFData-           DescribeDirectConnectGatewayAssociations-         where--instance ToHeaders-           DescribeDirectConnectGatewayAssociations-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeDirectConnectGatewayAssociations"-                       :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON-           DescribeDirectConnectGatewayAssociations-         where-        toJSON DescribeDirectConnectGatewayAssociations'{..}-          = object-              (catMaybes-                 [("virtualGatewayId" .=) <$> _ddcgaVirtualGatewayId,-                  ("directConnectGatewayId" .=) <$>-                    _ddcgaDirectConnectGatewayId,-                  ("nextToken" .=) <$> _ddcgaNextToken,-                  ("maxResults" .=) <$> _ddcgaMaxResults])--instance ToPath-           DescribeDirectConnectGatewayAssociations-         where-        toPath = const "/"--instance ToQuery-           DescribeDirectConnectGatewayAssociations-         where-        toQuery = const mempty---- | Container for the response from the DescribeDirectConnectGatewayAssociations API call------------ /See:/ 'describeDirectConnectGatewayAssociationsResponse' smart constructor.-data DescribeDirectConnectGatewayAssociationsResponse = DescribeDirectConnectGatewayAssociationsResponse'-  { _ddcgarsNextToken :: !(Maybe Text)-  , _ddcgarsDirectConnectGatewayAssociations :: !(Maybe [DirectConnectGatewayAssociation])-  , _ddcgarsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGatewayAssociationsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgarsNextToken' - Undocumented member.------ * 'ddcgarsDirectConnectGatewayAssociations' - Information about the direct connect gateway associations.------ * 'ddcgarsResponseStatus' - -- | The response status code.-describeDirectConnectGatewayAssociationsResponse-    :: Int -- ^ 'ddcgarsResponseStatus'-    -> DescribeDirectConnectGatewayAssociationsResponse-describeDirectConnectGatewayAssociationsResponse pResponseStatus_ =-  DescribeDirectConnectGatewayAssociationsResponse'-    { _ddcgarsNextToken = Nothing-    , _ddcgarsDirectConnectGatewayAssociations = Nothing-    , _ddcgarsResponseStatus = pResponseStatus_-    }----- | Undocumented member.-ddcgarsNextToken :: Lens' DescribeDirectConnectGatewayAssociationsResponse (Maybe Text)-ddcgarsNextToken = lens _ddcgarsNextToken (\ s a -> s{_ddcgarsNextToken = a})---- | Information about the direct connect gateway associations.-ddcgarsDirectConnectGatewayAssociations :: Lens' DescribeDirectConnectGatewayAssociationsResponse [DirectConnectGatewayAssociation]-ddcgarsDirectConnectGatewayAssociations = lens _ddcgarsDirectConnectGatewayAssociations (\ s a -> s{_ddcgarsDirectConnectGatewayAssociations = a}) . _Default . _Coerce---- | -- | The response status code.-ddcgarsResponseStatus :: Lens' DescribeDirectConnectGatewayAssociationsResponse Int-ddcgarsResponseStatus = lens _ddcgarsResponseStatus (\ s a -> s{_ddcgarsResponseStatus = a})--instance NFData-           DescribeDirectConnectGatewayAssociationsResponse-         where
− gen/Network/AWS/DirectConnect/DescribeDirectConnectGatewayAttachments.hs
@@ -1,205 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of all direct connect gateway and virtual interface (VIF) attachments. Either a direct connect gateway ID or a VIF ID must be provided in the request. If a direct connect gateway ID is provided, the response returns all VIFs attached to the direct connect gateway. If a VIF ID is provided, the response returns all direct connect gateways attached to the VIF. If both are provided, the response only returns the attachment that matches both the direct connect gateway and the VIF.-------module Network.AWS.DirectConnect.DescribeDirectConnectGatewayAttachments-    (-    -- * Creating a Request-      describeDirectConnectGatewayAttachments-    , DescribeDirectConnectGatewayAttachments-    -- * Request Lenses-    , ddcgasDirectConnectGatewayId-    , ddcgasNextToken-    , ddcgasMaxResults-    , ddcgasVirtualInterfaceId--    -- * Destructuring the Response-    , describeDirectConnectGatewayAttachmentsResponse-    , DescribeDirectConnectGatewayAttachmentsResponse-    -- * Response Lenses-    , ddcgasrsNextToken-    , ddcgasrsDirectConnectGatewayAttachments-    , ddcgasrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeDirectConnectGatewayAttachments operation.------------ /See:/ 'describeDirectConnectGatewayAttachments' smart constructor.-data DescribeDirectConnectGatewayAttachments = DescribeDirectConnectGatewayAttachments'-  { _ddcgasDirectConnectGatewayId :: !(Maybe Text)-  , _ddcgasNextToken              :: !(Maybe Text)-  , _ddcgasMaxResults             :: !(Maybe Int)-  , _ddcgasVirtualInterfaceId     :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGatewayAttachments' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgasDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None------ * 'ddcgasNextToken' - The token provided in the previous describe result to retrieve the next page of the result. Default: None------ * 'ddcgasMaxResults' - The maximum number of direct connect gateway attachments to return per page. Example: 15 Default: None------ * 'ddcgasVirtualInterfaceId' - The ID of the virtual interface. Example: "dxvif-abc123ef" Default: None-describeDirectConnectGatewayAttachments-    :: DescribeDirectConnectGatewayAttachments-describeDirectConnectGatewayAttachments =-  DescribeDirectConnectGatewayAttachments'-    { _ddcgasDirectConnectGatewayId = Nothing-    , _ddcgasNextToken = Nothing-    , _ddcgasMaxResults = Nothing-    , _ddcgasVirtualInterfaceId = Nothing-    }----- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-ddcgasDirectConnectGatewayId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)-ddcgasDirectConnectGatewayId = lens _ddcgasDirectConnectGatewayId (\ s a -> s{_ddcgasDirectConnectGatewayId = a})---- | The token provided in the previous describe result to retrieve the next page of the result. Default: None-ddcgasNextToken :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)-ddcgasNextToken = lens _ddcgasNextToken (\ s a -> s{_ddcgasNextToken = a})---- | The maximum number of direct connect gateway attachments to return per page. Example: 15 Default: None-ddcgasMaxResults :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Int)-ddcgasMaxResults = lens _ddcgasMaxResults (\ s a -> s{_ddcgasMaxResults = a})---- | The ID of the virtual interface. Example: "dxvif-abc123ef" Default: None-ddcgasVirtualInterfaceId :: Lens' DescribeDirectConnectGatewayAttachments (Maybe Text)-ddcgasVirtualInterfaceId = lens _ddcgasVirtualInterfaceId (\ s a -> s{_ddcgasVirtualInterfaceId = a})--instance AWSRequest-           DescribeDirectConnectGatewayAttachments-         where-        type Rs DescribeDirectConnectGatewayAttachments =-             DescribeDirectConnectGatewayAttachmentsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeDirectConnectGatewayAttachmentsResponse' <$>-                   (x .?> "nextToken") <*>-                     (x .?> "directConnectGatewayAttachments" .!@ mempty)-                     <*> (pure (fromEnum s)))--instance Hashable-           DescribeDirectConnectGatewayAttachments-         where--instance NFData-           DescribeDirectConnectGatewayAttachments-         where--instance ToHeaders-           DescribeDirectConnectGatewayAttachments-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeDirectConnectGatewayAttachments"-                       :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON-           DescribeDirectConnectGatewayAttachments-         where-        toJSON DescribeDirectConnectGatewayAttachments'{..}-          = object-              (catMaybes-                 [("directConnectGatewayId" .=) <$>-                    _ddcgasDirectConnectGatewayId,-                  ("nextToken" .=) <$> _ddcgasNextToken,-                  ("maxResults" .=) <$> _ddcgasMaxResults,-                  ("virtualInterfaceId" .=) <$>-                    _ddcgasVirtualInterfaceId])--instance ToPath-           DescribeDirectConnectGatewayAttachments-         where-        toPath = const "/"--instance ToQuery-           DescribeDirectConnectGatewayAttachments-         where-        toQuery = const mempty---- | Container for the response from the DescribeDirectConnectGatewayAttachments API call------------ /See:/ 'describeDirectConnectGatewayAttachmentsResponse' smart constructor.-data DescribeDirectConnectGatewayAttachmentsResponse = DescribeDirectConnectGatewayAttachmentsResponse'-  { _ddcgasrsNextToken :: !(Maybe Text)-  , _ddcgasrsDirectConnectGatewayAttachments :: !(Maybe [DirectConnectGatewayAttachment])-  , _ddcgasrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGatewayAttachmentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgasrsNextToken' - Undocumented member.------ * 'ddcgasrsDirectConnectGatewayAttachments' - Information about the direct connect gateway attachments.------ * 'ddcgasrsResponseStatus' - -- | The response status code.-describeDirectConnectGatewayAttachmentsResponse-    :: Int -- ^ 'ddcgasrsResponseStatus'-    -> DescribeDirectConnectGatewayAttachmentsResponse-describeDirectConnectGatewayAttachmentsResponse pResponseStatus_ =-  DescribeDirectConnectGatewayAttachmentsResponse'-    { _ddcgasrsNextToken = Nothing-    , _ddcgasrsDirectConnectGatewayAttachments = Nothing-    , _ddcgasrsResponseStatus = pResponseStatus_-    }----- | Undocumented member.-ddcgasrsNextToken :: Lens' DescribeDirectConnectGatewayAttachmentsResponse (Maybe Text)-ddcgasrsNextToken = lens _ddcgasrsNextToken (\ s a -> s{_ddcgasrsNextToken = a})---- | Information about the direct connect gateway attachments.-ddcgasrsDirectConnectGatewayAttachments :: Lens' DescribeDirectConnectGatewayAttachmentsResponse [DirectConnectGatewayAttachment]-ddcgasrsDirectConnectGatewayAttachments = lens _ddcgasrsDirectConnectGatewayAttachments (\ s a -> s{_ddcgasrsDirectConnectGatewayAttachments = a}) . _Default . _Coerce---- | -- | The response status code.-ddcgasrsResponseStatus :: Lens' DescribeDirectConnectGatewayAttachmentsResponse Int-ddcgasrsResponseStatus = lens _ddcgasrsResponseStatus (\ s a -> s{_ddcgasrsResponseStatus = a})--instance NFData-           DescribeDirectConnectGatewayAttachmentsResponse-         where
− gen/Network/AWS/DirectConnect/DescribeDirectConnectGateways.hs
@@ -1,181 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeDirectConnectGateways--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of direct connect gateways in your account. Deleted direct connect gateways are not returned. You can provide a direct connect gateway ID in the request to return information about the specific direct connect gateway only. Otherwise, if a direct connect gateway ID is not provided, information about all of your direct connect gateways is returned.-------module Network.AWS.DirectConnect.DescribeDirectConnectGateways-    (-    -- * Creating a Request-      describeDirectConnectGateways-    , DescribeDirectConnectGateways-    -- * Request Lenses-    , ddcgDirectConnectGatewayId-    , ddcgNextToken-    , ddcgMaxResults--    -- * Destructuring the Response-    , describeDirectConnectGatewaysResponse-    , DescribeDirectConnectGatewaysResponse-    -- * Response Lenses-    , ddcgrsDirectConnectGateways-    , ddcgrsNextToken-    , ddcgrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeDirectConnectGateways operation.------------ /See:/ 'describeDirectConnectGateways' smart constructor.-data DescribeDirectConnectGateways = DescribeDirectConnectGateways'-  { _ddcgDirectConnectGatewayId :: !(Maybe Text)-  , _ddcgNextToken              :: !(Maybe Text)-  , _ddcgMaxResults             :: !(Maybe Int)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGateways' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgDirectConnectGatewayId' - The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None------ * 'ddcgNextToken' - The token provided in the previous describe result to retrieve the next page of the result. Default: None------ * 'ddcgMaxResults' - The maximum number of direct connect gateways to return per page. Example: 15 Default: None-describeDirectConnectGateways-    :: DescribeDirectConnectGateways-describeDirectConnectGateways =-  DescribeDirectConnectGateways'-    { _ddcgDirectConnectGatewayId = Nothing-    , _ddcgNextToken = Nothing-    , _ddcgMaxResults = Nothing-    }----- | The ID of the direct connect gateway. Example: "abcd1234-dcba-5678-be23-cdef9876ab45" Default: None-ddcgDirectConnectGatewayId :: Lens' DescribeDirectConnectGateways (Maybe Text)-ddcgDirectConnectGatewayId = lens _ddcgDirectConnectGatewayId (\ s a -> s{_ddcgDirectConnectGatewayId = a})---- | The token provided in the previous describe result to retrieve the next page of the result. Default: None-ddcgNextToken :: Lens' DescribeDirectConnectGateways (Maybe Text)-ddcgNextToken = lens _ddcgNextToken (\ s a -> s{_ddcgNextToken = a})---- | The maximum number of direct connect gateways to return per page. Example: 15 Default: None-ddcgMaxResults :: Lens' DescribeDirectConnectGateways (Maybe Int)-ddcgMaxResults = lens _ddcgMaxResults (\ s a -> s{_ddcgMaxResults = a})--instance AWSRequest DescribeDirectConnectGateways-         where-        type Rs DescribeDirectConnectGateways =-             DescribeDirectConnectGatewaysResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeDirectConnectGatewaysResponse' <$>-                   (x .?> "directConnectGateways" .!@ mempty) <*>-                     (x .?> "nextToken")-                     <*> (pure (fromEnum s)))--instance Hashable DescribeDirectConnectGateways where--instance NFData DescribeDirectConnectGateways where--instance ToHeaders DescribeDirectConnectGateways-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeDirectConnectGateways" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeDirectConnectGateways where-        toJSON DescribeDirectConnectGateways'{..}-          = object-              (catMaybes-                 [("directConnectGatewayId" .=) <$>-                    _ddcgDirectConnectGatewayId,-                  ("nextToken" .=) <$> _ddcgNextToken,-                  ("maxResults" .=) <$> _ddcgMaxResults])--instance ToPath DescribeDirectConnectGateways where-        toPath = const "/"--instance ToQuery DescribeDirectConnectGateways where-        toQuery = const mempty---- | Container for the response from the DescribeDirectConnectGateways API call------------ /See:/ 'describeDirectConnectGatewaysResponse' smart constructor.-data DescribeDirectConnectGatewaysResponse = DescribeDirectConnectGatewaysResponse'-  { _ddcgrsDirectConnectGateways :: !(Maybe [DirectConnectGateway])-  , _ddcgrsNextToken             :: !(Maybe Text)-  , _ddcgrsResponseStatus        :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeDirectConnectGatewaysResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddcgrsDirectConnectGateways' - Information about the direct connect gateways.------ * 'ddcgrsNextToken' - Undocumented member.------ * 'ddcgrsResponseStatus' - -- | The response status code.-describeDirectConnectGatewaysResponse-    :: Int -- ^ 'ddcgrsResponseStatus'-    -> DescribeDirectConnectGatewaysResponse-describeDirectConnectGatewaysResponse pResponseStatus_ =-  DescribeDirectConnectGatewaysResponse'-    { _ddcgrsDirectConnectGateways = Nothing-    , _ddcgrsNextToken = Nothing-    , _ddcgrsResponseStatus = pResponseStatus_-    }----- | Information about the direct connect gateways.-ddcgrsDirectConnectGateways :: Lens' DescribeDirectConnectGatewaysResponse [DirectConnectGateway]-ddcgrsDirectConnectGateways = lens _ddcgrsDirectConnectGateways (\ s a -> s{_ddcgrsDirectConnectGateways = a}) . _Default . _Coerce---- | Undocumented member.-ddcgrsNextToken :: Lens' DescribeDirectConnectGatewaysResponse (Maybe Text)-ddcgrsNextToken = lens _ddcgrsNextToken (\ s a -> s{_ddcgrsNextToken = a})---- | -- | The response status code.-ddcgrsResponseStatus :: Lens' DescribeDirectConnectGatewaysResponse Int-ddcgrsResponseStatus = lens _ddcgrsResponseStatus (\ s a -> s{_ddcgrsResponseStatus = a})--instance NFData DescribeDirectConnectGatewaysResponse-         where
− gen/Network/AWS/DirectConnect/DescribeHostedConnections.hs
@@ -1,101 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeHostedConnections--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of hosted connections that have been provisioned on the given interconnect or link aggregation group (LAG).-------module Network.AWS.DirectConnect.DescribeHostedConnections-    (-    -- * Creating a Request-      describeHostedConnections-    , DescribeHostedConnections-    -- * Request Lenses-    , dhcConnectionId--    -- * Destructuring the Response-    , connections-    , Connections-    -- * Response Lenses-    , cConnections-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeHostedConnections operation.------------ /See:/ 'describeHostedConnections' smart constructor.-newtype DescribeHostedConnections = DescribeHostedConnections'-  { _dhcConnectionId :: Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeHostedConnections' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dhcConnectionId' - The ID of the interconnect or LAG on which the hosted connections are provisioned. Example: dxcon-abc123 or dxlag-abc123 Default: None-describeHostedConnections-    :: Text -- ^ 'dhcConnectionId'-    -> DescribeHostedConnections-describeHostedConnections pConnectionId_ =-  DescribeHostedConnections' {_dhcConnectionId = pConnectionId_}----- | The ID of the interconnect or LAG on which the hosted connections are provisioned. Example: dxcon-abc123 or dxlag-abc123 Default: None-dhcConnectionId :: Lens' DescribeHostedConnections Text-dhcConnectionId = lens _dhcConnectionId (\ s a -> s{_dhcConnectionId = a})--instance AWSRequest DescribeHostedConnections where-        type Rs DescribeHostedConnections = Connections-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable DescribeHostedConnections where--instance NFData DescribeHostedConnections where--instance ToHeaders DescribeHostedConnections where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeHostedConnections" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeHostedConnections where-        toJSON DescribeHostedConnections'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _dhcConnectionId)])--instance ToPath DescribeHostedConnections where-        toPath = const "/"--instance ToQuery DescribeHostedConnections where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/DescribeInterconnects.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeInterconnects--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of interconnects owned by the AWS account.--------- If an interconnect ID is provided, it will only return this particular interconnect.----module Network.AWS.DirectConnect.DescribeInterconnects-    (-    -- * Creating a Request-      describeInterconnects-    , DescribeInterconnects-    -- * Request Lenses-    , diInterconnectId--    -- * Destructuring the Response-    , describeInterconnectsResponse-    , DescribeInterconnectsResponse-    -- * Response Lenses-    , dirsInterconnects-    , dirsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeInterconnects operation.------------ /See:/ 'describeInterconnects' smart constructor.-newtype DescribeInterconnects = DescribeInterconnects'-  { _diInterconnectId :: Maybe Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeInterconnects' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'diInterconnectId' - Undocumented member.-describeInterconnects-    :: DescribeInterconnects-describeInterconnects = DescribeInterconnects' {_diInterconnectId = Nothing}----- | Undocumented member.-diInterconnectId :: Lens' DescribeInterconnects (Maybe Text)-diInterconnectId = lens _diInterconnectId (\ s a -> s{_diInterconnectId = a})--instance AWSRequest DescribeInterconnects where-        type Rs DescribeInterconnects =-             DescribeInterconnectsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeInterconnectsResponse' <$>-                   (x .?> "interconnects" .!@ mempty) <*>-                     (pure (fromEnum s)))--instance Hashable DescribeInterconnects where--instance NFData DescribeInterconnects where--instance ToHeaders DescribeInterconnects where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeInterconnects" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeInterconnects where-        toJSON DescribeInterconnects'{..}-          = object-              (catMaybes-                 [("interconnectId" .=) <$> _diInterconnectId])--instance ToPath DescribeInterconnects where-        toPath = const "/"--instance ToQuery DescribeInterconnects where-        toQuery = const mempty---- | A structure containing a list of interconnects.------------ /See:/ 'describeInterconnectsResponse' smart constructor.-data DescribeInterconnectsResponse = DescribeInterconnectsResponse'-  { _dirsInterconnects  :: !(Maybe [Interconnect])-  , _dirsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeInterconnectsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dirsInterconnects' - A list of interconnects.------ * 'dirsResponseStatus' - -- | The response status code.-describeInterconnectsResponse-    :: Int -- ^ 'dirsResponseStatus'-    -> DescribeInterconnectsResponse-describeInterconnectsResponse pResponseStatus_ =-  DescribeInterconnectsResponse'-    {_dirsInterconnects = Nothing, _dirsResponseStatus = pResponseStatus_}----- | A list of interconnects.-dirsInterconnects :: Lens' DescribeInterconnectsResponse [Interconnect]-dirsInterconnects = lens _dirsInterconnects (\ s a -> s{_dirsInterconnects = a}) . _Default . _Coerce---- | -- | The response status code.-dirsResponseStatus :: Lens' DescribeInterconnectsResponse Int-dirsResponseStatus = lens _dirsResponseStatus (\ s a -> s{_dirsResponseStatus = a})--instance NFData DescribeInterconnectsResponse where
− gen/Network/AWS/DirectConnect/DescribeLags.hs
@@ -1,139 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeLags--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Describes the link aggregation groups (LAGs) in your account.--------- If a LAG ID is provided, only information about the specified LAG is returned.----module Network.AWS.DirectConnect.DescribeLags-    (-    -- * Creating a Request-      describeLags-    , DescribeLags-    -- * Request Lenses-    , dlLagId--    -- * Destructuring the Response-    , describeLagsResponse-    , DescribeLagsResponse-    -- * Response Lenses-    , desrsLags-    , desrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeLags operation.------------ /See:/ 'describeLags' smart constructor.-newtype DescribeLags = DescribeLags'-  { _dlLagId :: Maybe Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLags' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlLagId' - The ID of the LAG. Example: dxlag-abc123 Default: None-describeLags-    :: DescribeLags-describeLags = DescribeLags' {_dlLagId = Nothing}----- | The ID of the LAG. Example: dxlag-abc123 Default: None-dlLagId :: Lens' DescribeLags (Maybe Text)-dlLagId = lens _dlLagId (\ s a -> s{_dlLagId = a})--instance AWSRequest DescribeLags where-        type Rs DescribeLags = DescribeLagsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeLagsResponse' <$>-                   (x .?> "lags" .!@ mempty) <*> (pure (fromEnum s)))--instance Hashable DescribeLags where--instance NFData DescribeLags where--instance ToHeaders DescribeLags where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeLags" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeLags where-        toJSON DescribeLags'{..}-          = object (catMaybes [("lagId" .=) <$> _dlLagId])--instance ToPath DescribeLags where-        toPath = const "/"--instance ToQuery DescribeLags where-        toQuery = const mempty---- | A structure containing a list of LAGs.------------ /See:/ 'describeLagsResponse' smart constructor.-data DescribeLagsResponse = DescribeLagsResponse'-  { _desrsLags           :: !(Maybe [Lag])-  , _desrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLagsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'desrsLags' - A list of LAGs.------ * 'desrsResponseStatus' - -- | The response status code.-describeLagsResponse-    :: Int -- ^ 'desrsResponseStatus'-    -> DescribeLagsResponse-describeLagsResponse pResponseStatus_ =-  DescribeLagsResponse'-    {_desrsLags = Nothing, _desrsResponseStatus = pResponseStatus_}----- | A list of LAGs.-desrsLags :: Lens' DescribeLagsResponse [Lag]-desrsLags = lens _desrsLags (\ s a -> s{_desrsLags = a}) . _Default . _Coerce---- | -- | The response status code.-desrsResponseStatus :: Lens' DescribeLagsResponse Int-desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a})--instance NFData DescribeLagsResponse where
− gen/Network/AWS/DirectConnect/DescribeLoa.hs
@@ -1,177 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeLoa--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the LOA-CFA for a connection, interconnect, or link aggregation group (LAG).--------- The Letter of Authorization - Connecting Facility Assignment (LOA-CFA) is a document that is used when establishing your cross connect to AWS at the colocation facility. For more information, see <http://docs.aws.amazon.com/directconnect/latest/UserGuide/Colocation.html Requesting Cross Connects at AWS Direct Connect Locations> in the AWS Direct Connect user guide.----module Network.AWS.DirectConnect.DescribeLoa-    (-    -- * Creating a Request-      describeLoa-    , DescribeLoa-    -- * Request Lenses-    , dlLoaContentType-    , dlProviderName-    , dlConnectionId--    -- * Destructuring the Response-    , describeLoaResponse-    , DescribeLoaResponse-    -- * Response Lenses-    , dlrsLoaContent-    , dlrsLoaContentType-    , dlrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeLoa operation.------------ /See:/ 'describeLoa' smart constructor.-data DescribeLoa = DescribeLoa'-  { _dlLoaContentType :: !(Maybe LoaContentType)-  , _dlProviderName   :: !(Maybe Text)-  , _dlConnectionId   :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLoa' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlLoaContentType' - A standard media type indicating the content type of the LOA-CFA document. Currently, the only supported value is "application/pdf". Default: application/pdf------ * 'dlProviderName' - The name of the service provider who establishes connectivity on your behalf. If you supply this parameter, the LOA-CFA lists the provider name alongside your company name as the requester of the cross connect. Default: None------ * 'dlConnectionId' - The ID of a connection, LAG, or interconnect for which to get the LOA-CFA information. Example: dxcon-abc123 or dxlag-abc123 Default: None-describeLoa-    :: Text -- ^ 'dlConnectionId'-    -> DescribeLoa-describeLoa pConnectionId_ =-  DescribeLoa'-    { _dlLoaContentType = Nothing-    , _dlProviderName = Nothing-    , _dlConnectionId = pConnectionId_-    }----- | A standard media type indicating the content type of the LOA-CFA document. Currently, the only supported value is "application/pdf". Default: application/pdf-dlLoaContentType :: Lens' DescribeLoa (Maybe LoaContentType)-dlLoaContentType = lens _dlLoaContentType (\ s a -> s{_dlLoaContentType = a})---- | The name of the service provider who establishes connectivity on your behalf. If you supply this parameter, the LOA-CFA lists the provider name alongside your company name as the requester of the cross connect. Default: None-dlProviderName :: Lens' DescribeLoa (Maybe Text)-dlProviderName = lens _dlProviderName (\ s a -> s{_dlProviderName = a})---- | The ID of a connection, LAG, or interconnect for which to get the LOA-CFA information. Example: dxcon-abc123 or dxlag-abc123 Default: None-dlConnectionId :: Lens' DescribeLoa Text-dlConnectionId = lens _dlConnectionId (\ s a -> s{_dlConnectionId = a})--instance AWSRequest DescribeLoa where-        type Rs DescribeLoa = DescribeLoaResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeLoaResponse' <$>-                   (x .?> "loaContent") <*> (x .?> "loaContentType") <*>-                     (pure (fromEnum s)))--instance Hashable DescribeLoa where--instance NFData DescribeLoa where--instance ToHeaders DescribeLoa where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeLoa" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeLoa where-        toJSON DescribeLoa'{..}-          = object-              (catMaybes-                 [("loaContentType" .=) <$> _dlLoaContentType,-                  ("providerName" .=) <$> _dlProviderName,-                  Just ("connectionId" .= _dlConnectionId)])--instance ToPath DescribeLoa where-        toPath = const "/"--instance ToQuery DescribeLoa where-        toQuery = const mempty---- | A structure containing the Letter of Authorization - Connecting Facility Assignment (LOA-CFA) for a connection.------------ /See:/ 'describeLoaResponse' smart constructor.-data DescribeLoaResponse = DescribeLoaResponse'-  { _dlrsLoaContent     :: !(Maybe Base64)-  , _dlrsLoaContentType :: !(Maybe LoaContentType)-  , _dlrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLoaResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlrsLoaContent' - Undocumented member.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data.------ * 'dlrsLoaContentType' - Undocumented member.------ * 'dlrsResponseStatus' - -- | The response status code.-describeLoaResponse-    :: Int -- ^ 'dlrsResponseStatus'-    -> DescribeLoaResponse-describeLoaResponse pResponseStatus_ =-  DescribeLoaResponse'-    { _dlrsLoaContent = Nothing-    , _dlrsLoaContentType = Nothing-    , _dlrsResponseStatus = pResponseStatus_-    }----- | Undocumented member.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data.-dlrsLoaContent :: Lens' DescribeLoaResponse (Maybe ByteString)-dlrsLoaContent = lens _dlrsLoaContent (\ s a -> s{_dlrsLoaContent = a}) . mapping _Base64---- | Undocumented member.-dlrsLoaContentType :: Lens' DescribeLoaResponse (Maybe LoaContentType)-dlrsLoaContentType = lens _dlrsLoaContentType (\ s a -> s{_dlrsLoaContentType = a})---- | -- | The response status code.-dlrsResponseStatus :: Lens' DescribeLoaResponse Int-dlrsResponseStatus = lens _dlrsResponseStatus (\ s a -> s{_dlrsResponseStatus = a})--instance NFData DescribeLoaResponse where
− gen/Network/AWS/DirectConnect/DescribeLocations.hs
@@ -1,124 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeLocations--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the list of AWS Direct Connect locations in the current AWS region. These are the locations that may be selected when calling 'CreateConnection' or 'CreateInterconnect' .-------module Network.AWS.DirectConnect.DescribeLocations-    (-    -- * Creating a Request-      describeLocations-    , DescribeLocations--    -- * Destructuring the Response-    , describeLocationsResponse-    , DescribeLocationsResponse-    -- * Response Lenses-    , dlsrsLocations-    , dlsrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | /See:/ 'describeLocations' smart constructor.-data DescribeLocations =-  DescribeLocations'-  deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLocations' with the minimum fields required to make a request.----describeLocations-    :: DescribeLocations-describeLocations = DescribeLocations'---instance AWSRequest DescribeLocations where-        type Rs DescribeLocations = DescribeLocationsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeLocationsResponse' <$>-                   (x .?> "locations" .!@ mempty) <*>-                     (pure (fromEnum s)))--instance Hashable DescribeLocations where--instance NFData DescribeLocations where--instance ToHeaders DescribeLocations where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeLocations" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeLocations where-        toJSON = const (Object mempty)--instance ToPath DescribeLocations where-        toPath = const "/"--instance ToQuery DescribeLocations where-        toQuery = const mempty---- | A location is a network facility where AWS Direct Connect routers are available to be connected. Generally, these are colocation hubs where many network providers have equipment, and where cross connects can be delivered. Locations include a name and facility code, and must be provided when creating a connection.------------ /See:/ 'describeLocationsResponse' smart constructor.-data DescribeLocationsResponse = DescribeLocationsResponse'-  { _dlsrsLocations      :: !(Maybe [Location])-  , _dlsrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeLocationsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlsrsLocations' - A list of colocation hubs where network providers have equipment. Most regions have multiple locations available.------ * 'dlsrsResponseStatus' - -- | The response status code.-describeLocationsResponse-    :: Int -- ^ 'dlsrsResponseStatus'-    -> DescribeLocationsResponse-describeLocationsResponse pResponseStatus_ =-  DescribeLocationsResponse'-    {_dlsrsLocations = Nothing, _dlsrsResponseStatus = pResponseStatus_}----- | A list of colocation hubs where network providers have equipment. Most regions have multiple locations available.-dlsrsLocations :: Lens' DescribeLocationsResponse [Location]-dlsrsLocations = lens _dlsrsLocations (\ s a -> s{_dlsrsLocations = a}) . _Default . _Coerce---- | -- | The response status code.-dlsrsResponseStatus :: Lens' DescribeLocationsResponse Int-dlsrsResponseStatus = lens _dlsrsResponseStatus (\ s a -> s{_dlsrsResponseStatus = a})--instance NFData DescribeLocationsResponse where
− gen/Network/AWS/DirectConnect/DescribeTags.hs
@@ -1,140 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeTags--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Describes the tags associated with the specified Direct Connect resources.-------module Network.AWS.DirectConnect.DescribeTags-    (-    -- * Creating a Request-      describeTags-    , DescribeTags-    -- * Request Lenses-    , dtResourceARNs--    -- * Destructuring the Response-    , describeTagsResponse-    , DescribeTagsResponse-    -- * Response Lenses-    , dtrsResourceTags-    , dtrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeTags operation.------------ /See:/ 'describeTags' smart constructor.-newtype DescribeTags = DescribeTags'-  { _dtResourceARNs :: [Text]-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTags' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtResourceARNs' - The Amazon Resource Names (ARNs) of the Direct Connect resources.-describeTags-    :: DescribeTags-describeTags = DescribeTags' {_dtResourceARNs = mempty}----- | The Amazon Resource Names (ARNs) of the Direct Connect resources.-dtResourceARNs :: Lens' DescribeTags [Text]-dtResourceARNs = lens _dtResourceARNs (\ s a -> s{_dtResourceARNs = a}) . _Coerce--instance AWSRequest DescribeTags where-        type Rs DescribeTags = DescribeTagsResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeTagsResponse' <$>-                   (x .?> "resourceTags" .!@ mempty) <*>-                     (pure (fromEnum s)))--instance Hashable DescribeTags where--instance NFData DescribeTags where--instance ToHeaders DescribeTags where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeTags" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeTags where-        toJSON DescribeTags'{..}-          = object-              (catMaybes-                 [Just ("resourceArns" .= _dtResourceARNs)])--instance ToPath DescribeTags where-        toPath = const "/"--instance ToQuery DescribeTags where-        toQuery = const mempty---- | The response received when DescribeTags is called.------------ /See:/ 'describeTagsResponse' smart constructor.-data DescribeTagsResponse = DescribeTagsResponse'-  { _dtrsResourceTags   :: !(Maybe [ResourceTag])-  , _dtrsResponseStatus :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTagsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtrsResourceTags' - Information about the tags.------ * 'dtrsResponseStatus' - -- | The response status code.-describeTagsResponse-    :: Int -- ^ 'dtrsResponseStatus'-    -> DescribeTagsResponse-describeTagsResponse pResponseStatus_ =-  DescribeTagsResponse'-    {_dtrsResourceTags = Nothing, _dtrsResponseStatus = pResponseStatus_}----- | Information about the tags.-dtrsResourceTags :: Lens' DescribeTagsResponse [ResourceTag]-dtrsResourceTags = lens _dtrsResourceTags (\ s a -> s{_dtrsResourceTags = a}) . _Default . _Coerce---- | -- | The response status code.-dtrsResponseStatus :: Lens' DescribeTagsResponse Int-dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a})--instance NFData DescribeTagsResponse where
− gen/Network/AWS/DirectConnect/DescribeVirtualGateways.hs
@@ -1,128 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeVirtualGateways--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of virtual private gateways owned by the AWS account.--------- You can create one or more AWS Direct Connect private virtual interfaces linking to a virtual private gateway. A virtual private gateway can be managed via Amazon Virtual Private Cloud (VPC) console or the <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-CreateVpnGateway.html EC2 CreateVpnGateway> action.----module Network.AWS.DirectConnect.DescribeVirtualGateways-    (-    -- * Creating a Request-      describeVirtualGateways-    , DescribeVirtualGateways--    -- * Destructuring the Response-    , describeVirtualGatewaysResponse-    , DescribeVirtualGatewaysResponse-    -- * Response Lenses-    , dvgrsVirtualGateways-    , dvgrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | /See:/ 'describeVirtualGateways' smart constructor.-data DescribeVirtualGateways =-  DescribeVirtualGateways'-  deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVirtualGateways' with the minimum fields required to make a request.----describeVirtualGateways-    :: DescribeVirtualGateways-describeVirtualGateways = DescribeVirtualGateways'---instance AWSRequest DescribeVirtualGateways where-        type Rs DescribeVirtualGateways =-             DescribeVirtualGatewaysResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeVirtualGatewaysResponse' <$>-                   (x .?> "virtualGateways" .!@ mempty) <*>-                     (pure (fromEnum s)))--instance Hashable DescribeVirtualGateways where--instance NFData DescribeVirtualGateways where--instance ToHeaders DescribeVirtualGateways where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeVirtualGateways" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeVirtualGateways where-        toJSON = const (Object mempty)--instance ToPath DescribeVirtualGateways where-        toPath = const "/"--instance ToQuery DescribeVirtualGateways where-        toQuery = const mempty---- | A structure containing a list of virtual private gateways.------------ /See:/ 'describeVirtualGatewaysResponse' smart constructor.-data DescribeVirtualGatewaysResponse = DescribeVirtualGatewaysResponse'-  { _dvgrsVirtualGateways :: !(Maybe [VirtualGateway])-  , _dvgrsResponseStatus  :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVirtualGatewaysResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvgrsVirtualGateways' - A list of virtual private gateways.------ * 'dvgrsResponseStatus' - -- | The response status code.-describeVirtualGatewaysResponse-    :: Int -- ^ 'dvgrsResponseStatus'-    -> DescribeVirtualGatewaysResponse-describeVirtualGatewaysResponse pResponseStatus_ =-  DescribeVirtualGatewaysResponse'-    {_dvgrsVirtualGateways = Nothing, _dvgrsResponseStatus = pResponseStatus_}----- | A list of virtual private gateways.-dvgrsVirtualGateways :: Lens' DescribeVirtualGatewaysResponse [VirtualGateway]-dvgrsVirtualGateways = lens _dvgrsVirtualGateways (\ s a -> s{_dvgrsVirtualGateways = a}) . _Default . _Coerce---- | -- | The response status code.-dvgrsResponseStatus :: Lens' DescribeVirtualGatewaysResponse Int-dvgrsResponseStatus = lens _dvgrsResponseStatus (\ s a -> s{_dvgrsResponseStatus = a})--instance NFData DescribeVirtualGatewaysResponse where
− gen/Network/AWS/DirectConnect/DescribeVirtualInterfaces.hs
@@ -1,159 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DescribeVirtualInterfaces--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Displays all virtual interfaces for an AWS account. Virtual interfaces deleted fewer than 15 minutes before you make the request are also returned. If you specify a connection ID, only the virtual interfaces associated with the connection are returned. If you specify a virtual interface ID, then only a single virtual interface is returned.--------- A virtual interface (VLAN) transmits the traffic between the AWS Direct Connect location and the customer.----module Network.AWS.DirectConnect.DescribeVirtualInterfaces-    (-    -- * Creating a Request-      describeVirtualInterfaces-    , DescribeVirtualInterfaces-    -- * Request Lenses-    , dviConnectionId-    , dviVirtualInterfaceId--    -- * Destructuring the Response-    , describeVirtualInterfacesResponse-    , DescribeVirtualInterfacesResponse-    -- * Response Lenses-    , dvisrsVirtualInterfaces-    , dvisrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DescribeVirtualInterfaces operation.------------ /See:/ 'describeVirtualInterfaces' smart constructor.-data DescribeVirtualInterfaces = DescribeVirtualInterfaces'-  { _dviConnectionId       :: !(Maybe Text)-  , _dviVirtualInterfaceId :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVirtualInterfaces' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dviConnectionId' - Undocumented member.------ * 'dviVirtualInterfaceId' - Undocumented member.-describeVirtualInterfaces-    :: DescribeVirtualInterfaces-describeVirtualInterfaces =-  DescribeVirtualInterfaces'-    {_dviConnectionId = Nothing, _dviVirtualInterfaceId = Nothing}----- | Undocumented member.-dviConnectionId :: Lens' DescribeVirtualInterfaces (Maybe Text)-dviConnectionId = lens _dviConnectionId (\ s a -> s{_dviConnectionId = a})---- | Undocumented member.-dviVirtualInterfaceId :: Lens' DescribeVirtualInterfaces (Maybe Text)-dviVirtualInterfaceId = lens _dviVirtualInterfaceId (\ s a -> s{_dviVirtualInterfaceId = a})--instance AWSRequest DescribeVirtualInterfaces where-        type Rs DescribeVirtualInterfaces =-             DescribeVirtualInterfacesResponse-        request = postJSON directConnect-        response-          = receiveJSON-              (\ s h x ->-                 DescribeVirtualInterfacesResponse' <$>-                   (x .?> "virtualInterfaces" .!@ mempty) <*>-                     (pure (fromEnum s)))--instance Hashable DescribeVirtualInterfaces where--instance NFData DescribeVirtualInterfaces where--instance ToHeaders DescribeVirtualInterfaces where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DescribeVirtualInterfaces" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeVirtualInterfaces where-        toJSON DescribeVirtualInterfaces'{..}-          = object-              (catMaybes-                 [("connectionId" .=) <$> _dviConnectionId,-                  ("virtualInterfaceId" .=) <$>-                    _dviVirtualInterfaceId])--instance ToPath DescribeVirtualInterfaces where-        toPath = const "/"--instance ToQuery DescribeVirtualInterfaces where-        toQuery = const mempty---- | A structure containing a list of virtual interfaces.------------ /See:/ 'describeVirtualInterfacesResponse' smart constructor.-data DescribeVirtualInterfacesResponse = DescribeVirtualInterfacesResponse'-  { _dvisrsVirtualInterfaces :: !(Maybe [VirtualInterface])-  , _dvisrsResponseStatus    :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVirtualInterfacesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvisrsVirtualInterfaces' - A list of virtual interfaces.------ * 'dvisrsResponseStatus' - -- | The response status code.-describeVirtualInterfacesResponse-    :: Int -- ^ 'dvisrsResponseStatus'-    -> DescribeVirtualInterfacesResponse-describeVirtualInterfacesResponse pResponseStatus_ =-  DescribeVirtualInterfacesResponse'-    { _dvisrsVirtualInterfaces = Nothing-    , _dvisrsResponseStatus = pResponseStatus_-    }----- | A list of virtual interfaces.-dvisrsVirtualInterfaces :: Lens' DescribeVirtualInterfacesResponse [VirtualInterface]-dvisrsVirtualInterfaces = lens _dvisrsVirtualInterfaces (\ s a -> s{_dvisrsVirtualInterfaces = a}) . _Default . _Coerce---- | -- | The response status code.-dvisrsResponseStatus :: Lens' DescribeVirtualInterfacesResponse Int-dvisrsResponseStatus = lens _dvisrsResponseStatus (\ s a -> s{_dvisrsResponseStatus = a})--instance NFData DescribeVirtualInterfacesResponse-         where
− gen/Network/AWS/DirectConnect/DisassociateConnectionFromLag.hs
@@ -1,127 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.DisassociateConnectionFromLag--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Disassociates a connection from a link aggregation group (LAG). The connection is interrupted and re-established as a standalone connection (the connection is not deleted; to delete the connection, use the 'DeleteConnection' request). If the LAG has associated virtual interfaces or hosted connections, they remain associated with the LAG. A disassociated connection owned by an AWS Direct Connect partner is automatically converted to an interconnect.--------- If disassociating the connection will cause the LAG to fall below its setting for minimum number of operational connections, the request fails, except when it's the last member of the LAG. If all connections are disassociated, the LAG continues to exist as an empty LAG with no physical connections.----module Network.AWS.DirectConnect.DisassociateConnectionFromLag-    (-    -- * Creating a Request-      disassociateConnectionFromLag-    , DisassociateConnectionFromLag-    -- * Request Lenses-    , dcflConnectionId-    , dcflLagId--    -- * Destructuring the Response-    , connection-    , Connection-    -- * Response Lenses-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the DisassociateConnectionFromLag operation.------------ /See:/ 'disassociateConnectionFromLag' smart constructor.-data DisassociateConnectionFromLag = DisassociateConnectionFromLag'-  { _dcflConnectionId :: !Text-  , _dcflLagId        :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DisassociateConnectionFromLag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcflConnectionId' - The ID of the connection to disassociate from the LAG. Example: dxcon-abc123 Default: None------ * 'dcflLagId' - The ID of the LAG. Example: dxlag-abc123 Default: None-disassociateConnectionFromLag-    :: Text -- ^ 'dcflConnectionId'-    -> Text -- ^ 'dcflLagId'-    -> DisassociateConnectionFromLag-disassociateConnectionFromLag pConnectionId_ pLagId_ =-  DisassociateConnectionFromLag'-    {_dcflConnectionId = pConnectionId_, _dcflLagId = pLagId_}----- | The ID of the connection to disassociate from the LAG. Example: dxcon-abc123 Default: None-dcflConnectionId :: Lens' DisassociateConnectionFromLag Text-dcflConnectionId = lens _dcflConnectionId (\ s a -> s{_dcflConnectionId = a})---- | The ID of the LAG. Example: dxlag-abc123 Default: None-dcflLagId :: Lens' DisassociateConnectionFromLag Text-dcflLagId = lens _dcflLagId (\ s a -> s{_dcflLagId = a})--instance AWSRequest DisassociateConnectionFromLag-         where-        type Rs DisassociateConnectionFromLag = Connection-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable DisassociateConnectionFromLag where--instance NFData DisassociateConnectionFromLag where--instance ToHeaders DisassociateConnectionFromLag-         where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.DisassociateConnectionFromLag" ::-                       ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DisassociateConnectionFromLag where-        toJSON DisassociateConnectionFromLag'{..}-          = object-              (catMaybes-                 [Just ("connectionId" .= _dcflConnectionId),-                  Just ("lagId" .= _dcflLagId)])--instance ToPath DisassociateConnectionFromLag where-        toPath = const "/"--instance ToQuery DisassociateConnectionFromLag where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/TagResource.hs
@@ -1,143 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.TagResource--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Adds the specified tags to the specified Direct Connect resource. Each Direct Connect resource can have a maximum of 50 tags.--------- Each tag consists of a key and an optional value. If a tag with the same key is already associated with the Direct Connect resource, this action updates its value.----module Network.AWS.DirectConnect.TagResource-    (-    -- * Creating a Request-      tagResource-    , TagResource-    -- * Request Lenses-    , trResourceARN-    , trTags--    -- * Destructuring the Response-    , tagResourceResponse-    , TagResourceResponse-    -- * Response Lenses-    , trrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the TagResource operation.------------ /See:/ 'tagResource' smart constructor.-data TagResource = TagResource'-  { _trResourceARN :: !Text-  , _trTags        :: !(List1 Tag)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'TagResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'trResourceARN' - The Amazon Resource Name (ARN) of the Direct Connect resource. Example: arn:aws:directconnect:us-east-1:123456789012:dxcon/dxcon-fg5678gh------ * 'trTags' - The list of tags to add.-tagResource-    :: Text -- ^ 'trResourceARN'-    -> NonEmpty Tag -- ^ 'trTags'-    -> TagResource-tagResource pResourceARN_ pTags_ =-  TagResource' {_trResourceARN = pResourceARN_, _trTags = _List1 # pTags_}----- | The Amazon Resource Name (ARN) of the Direct Connect resource. Example: arn:aws:directconnect:us-east-1:123456789012:dxcon/dxcon-fg5678gh-trResourceARN :: Lens' TagResource Text-trResourceARN = lens _trResourceARN (\ s a -> s{_trResourceARN = a})---- | The list of tags to add.-trTags :: Lens' TagResource (NonEmpty Tag)-trTags = lens _trTags (\ s a -> s{_trTags = a}) . _List1--instance AWSRequest TagResource where-        type Rs TagResource = TagResourceResponse-        request = postJSON directConnect-        response-          = receiveEmpty-              (\ s h x ->-                 TagResourceResponse' <$> (pure (fromEnum s)))--instance Hashable TagResource where--instance NFData TagResource where--instance ToHeaders TagResource where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.TagResource" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON TagResource where-        toJSON TagResource'{..}-          = object-              (catMaybes-                 [Just ("resourceArn" .= _trResourceARN),-                  Just ("tags" .= _trTags)])--instance ToPath TagResource where-        toPath = const "/"--instance ToQuery TagResource where-        toQuery = const mempty---- | The response received when TagResource is called.------------ /See:/ 'tagResourceResponse' smart constructor.-newtype TagResourceResponse = TagResourceResponse'-  { _trrsResponseStatus :: Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'TagResourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'trrsResponseStatus' - -- | The response status code.-tagResourceResponse-    :: Int -- ^ 'trrsResponseStatus'-    -> TagResourceResponse-tagResourceResponse pResponseStatus_ =-  TagResourceResponse' {_trrsResponseStatus = pResponseStatus_}----- | -- | The response status code.-trrsResponseStatus :: Lens' TagResourceResponse Int-trrsResponseStatus = lens _trrsResponseStatus (\ s a -> s{_trrsResponseStatus = a})--instance NFData TagResourceResponse where
− gen/Network/AWS/DirectConnect/Types.hs
@@ -1,332 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.Types--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.DirectConnect.Types-    (-    -- * Service Configuration-      directConnect--    -- * Errors-    , _DirectConnectClientException-    , _DuplicateTagKeysException-    , _TooManyTagsException-    , _DirectConnectServerException--    -- * AddressFamily-    , AddressFamily (..)--    -- * BGPPeerState-    , BGPPeerState (..)--    -- * BGPStatus-    , BGPStatus (..)--    -- * ConnectionState-    , ConnectionState (..)--    -- * DirectConnectGatewayAssociationState-    , DirectConnectGatewayAssociationState (..)--    -- * DirectConnectGatewayAttachmentState-    , DirectConnectGatewayAttachmentState (..)--    -- * DirectConnectGatewayState-    , DirectConnectGatewayState (..)--    -- * InterconnectState-    , InterconnectState (..)--    -- * LagState-    , LagState (..)--    -- * LoaContentType-    , LoaContentType (..)--    -- * VirtualInterfaceState-    , VirtualInterfaceState (..)--    -- * BGPPeer-    , BGPPeer-    , bgpPeer-    , bpCustomerAddress-    , bpAmazonAddress-    , bpAddressFamily-    , bpBgpStatus-    , bpAsn-    , bpAuthKey-    , bpBgpPeerState--    -- * Connection-    , Connection-    , connection-    , cLagId-    , cVlan-    , cLocation-    , cAwsDevice-    , cConnectionId-    , cLoaIssueTime-    , cPartnerName-    , cConnectionName-    , cBandwidth-    , cOwnerAccount-    , cRegion-    , cConnectionState--    -- * Connections-    , Connections-    , connections-    , cConnections--    -- * DirectConnectGateway-    , DirectConnectGateway-    , directConnectGateway-    , dcgDirectConnectGatewayId-    , dcgStateChangeError-    , dcgAmazonSideASN-    , dcgDirectConnectGatewayName-    , dcgDirectConnectGatewayState-    , dcgOwnerAccount--    -- * DirectConnectGatewayAssociation-    , DirectConnectGatewayAssociation-    , directConnectGatewayAssociation-    , dcgaVirtualGatewayId-    , dcgaDirectConnectGatewayId-    , dcgaVirtualGatewayOwnerAccount-    , dcgaStateChangeError-    , dcgaVirtualGatewayRegion-    , dcgaAssociationState--    -- * DirectConnectGatewayAttachment-    , DirectConnectGatewayAttachment-    , directConnectGatewayAttachment-    , dDirectConnectGatewayId-    , dAttachmentState-    , dStateChangeError-    , dVirtualInterfaceRegion-    , dVirtualInterfaceOwnerAccount-    , dVirtualInterfaceId--    -- * Interconnect-    , Interconnect-    , interconnect-    , iLagId-    , iInterconnectId-    , iLocation-    , iInterconnectName-    , iAwsDevice-    , iLoaIssueTime-    , iBandwidth-    , iInterconnectState-    , iRegion--    -- * Lag-    , Lag-    , lag-    , lagLagId-    , lagConnectionsBandwidth-    , lagMinimumLinks-    , lagLagName-    , lagLocation-    , lagConnections-    , lagAwsDevice-    , lagAllowsHostedConnections-    , lagNumberOfConnections-    , lagLagState-    , lagOwnerAccount-    , lagRegion--    -- * Location-    , Location-    , location-    , lLocationName-    , lLocationCode--    -- * NewBGPPeer-    , NewBGPPeer-    , newBGPPeer-    , nbpCustomerAddress-    , nbpAmazonAddress-    , nbpAddressFamily-    , nbpAsn-    , nbpAuthKey--    -- * NewPrivateVirtualInterface-    , NewPrivateVirtualInterface-    , newPrivateVirtualInterface-    , nVirtualGatewayId-    , nCustomerAddress-    , nAmazonAddress-    , nAddressFamily-    , nDirectConnectGatewayId-    , nAuthKey-    , nVirtualInterfaceName-    , nVlan-    , nAsn--    -- * NewPrivateVirtualInterfaceAllocation-    , NewPrivateVirtualInterfaceAllocation-    , newPrivateVirtualInterfaceAllocation-    , npviaCustomerAddress-    , npviaAmazonAddress-    , npviaAddressFamily-    , npviaAuthKey-    , npviaVirtualInterfaceName-    , npviaVlan-    , npviaAsn--    -- * NewPublicVirtualInterface-    , NewPublicVirtualInterface-    , newPublicVirtualInterface-    , npviRouteFilterPrefixes-    , npviCustomerAddress-    , npviAmazonAddress-    , npviAddressFamily-    , npviAuthKey-    , npviVirtualInterfaceName-    , npviVlan-    , npviAsn--    -- * NewPublicVirtualInterfaceAllocation-    , NewPublicVirtualInterfaceAllocation-    , newPublicVirtualInterfaceAllocation-    , newRouteFilterPrefixes-    , newCustomerAddress-    , newAmazonAddress-    , newAddressFamily-    , newAuthKey-    , newVirtualInterfaceName-    , newVlan-    , newAsn--    -- * ResourceTag-    , ResourceTag-    , resourceTag-    , rtResourceARN-    , rtTags--    -- * RouteFilterPrefix-    , RouteFilterPrefix-    , routeFilterPrefix-    , rfpCidr--    -- * Tag-    , Tag-    , tag-    , tagValue-    , tagKey--    -- * VirtualGateway-    , VirtualGateway-    , virtualGateway-    , vgVirtualGatewayId-    , vgVirtualGatewayState--    -- * VirtualInterface-    , VirtualInterface-    , virtualInterface-    , viBgpPeers-    , viVirtualGatewayId-    , viRouteFilterPrefixes-    , viCustomerAddress-    , viVlan-    , viLocation-    , viAmazonAddress-    , viAddressFamily-    , viVirtualInterfaceState-    , viConnectionId-    , viDirectConnectGatewayId-    , viAmazonSideASN-    , viVirtualInterfaceType-    , viAsn-    , viAuthKey-    , viCustomerRouterConfig-    , viOwnerAccount-    , viVirtualInterfaceName-    , viVirtualInterfaceId-    ) where--import Network.AWS.DirectConnect.Types.Product-import Network.AWS.DirectConnect.Types.Sum-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Sign.V4---- | API version @2012-10-25@ of the Amazon Direct Connect SDK configuration.-directConnect :: Service-directConnect =-  Service-    { _svcAbbrev = "DirectConnect"-    , _svcSigner = v4-    , _svcPrefix = "directconnect"-    , _svcVersion = "2012-10-25"-    , _svcEndpoint = defaultEndpoint directConnect-    , _svcTimeout = Just 70-    , _svcCheck = statusSuccess-    , _svcError = parseJSONError "DirectConnect"-    , _svcRetry = retry-    }-  where-    retry =-      Exponential-        { _retryBase = 5.0e-2-        , _retryGrowth = 2-        , _retryAttempts = 5-        , _retryCheck = check-        }-    check e-      | has (hasCode "ThrottledException" . hasStatus 400) e =-        Just "throttled_exception"-      | has (hasStatus 429) e = Just "too_many_requests"-      | has (hasCode "ThrottlingException" . hasStatus 400) e =-        Just "throttling_exception"-      | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"-      | has (hasStatus 504) e = Just "gateway_timeout"-      | has (hasCode "RequestThrottledException" . hasStatus 400) e =-        Just "request_throttled_exception"-      | has (hasStatus 502) e = Just "bad_gateway"-      | has (hasStatus 503) e = Just "service_unavailable"-      | has (hasStatus 500) e = Just "general_server_error"-      | has (hasStatus 509) e = Just "limit_exceeded"-      | otherwise = Nothing----- | The API was called with invalid parameters. The error message will contain additional details about the cause.-------_DirectConnectClientException :: AsError a => Getting (First ServiceError) a ServiceError-_DirectConnectClientException =-  _MatchServiceError directConnect "DirectConnectClientException"----- | A tag key was specified more than once.-------_DuplicateTagKeysException :: AsError a => Getting (First ServiceError) a ServiceError-_DuplicateTagKeysException =-  _MatchServiceError directConnect "DuplicateTagKeysException"----- | You have reached the limit on the number of tags that can be assigned to a Direct Connect resource.-------_TooManyTagsException :: AsError a => Getting (First ServiceError) a ServiceError-_TooManyTagsException = _MatchServiceError directConnect "TooManyTagsException"----- | A server-side error occurred during the API call. The error message will contain additional details about the cause.-------_DirectConnectServerException :: AsError a => Getting (First ServiceError) a ServiceError-_DirectConnectServerException =-  _MatchServiceError directConnect "DirectConnectServerException"-
− gen/Network/AWS/DirectConnect/Types/Product.hs
@@ -1,1700 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.Types.Product--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.DirectConnect.Types.Product where--import Network.AWS.DirectConnect.Types.Sum-import Network.AWS.Lens-import Network.AWS.Prelude---- | A structure containing information about a BGP peer.------------ /See:/ 'bgpPeer' smart constructor.-data BGPPeer = BGPPeer'-  { _bpCustomerAddress :: !(Maybe Text)-  , _bpAmazonAddress   :: !(Maybe Text)-  , _bpAddressFamily   :: !(Maybe AddressFamily)-  , _bpBgpStatus       :: !(Maybe BGPStatus)-  , _bpAsn             :: !(Maybe Int)-  , _bpAuthKey         :: !(Maybe Text)-  , _bpBgpPeerState    :: !(Maybe BGPPeerState)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'BGPPeer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bpCustomerAddress' - Undocumented member.------ * 'bpAmazonAddress' - Undocumented member.------ * 'bpAddressFamily' - Undocumented member.------ * 'bpBgpStatus' - Undocumented member.------ * 'bpAsn' - Undocumented member.------ * 'bpAuthKey' - Undocumented member.------ * 'bpBgpPeerState' - Undocumented member.-bgpPeer-    :: BGPPeer-bgpPeer =-  BGPPeer'-    { _bpCustomerAddress = Nothing-    , _bpAmazonAddress = Nothing-    , _bpAddressFamily = Nothing-    , _bpBgpStatus = Nothing-    , _bpAsn = Nothing-    , _bpAuthKey = Nothing-    , _bpBgpPeerState = Nothing-    }----- | Undocumented member.-bpCustomerAddress :: Lens' BGPPeer (Maybe Text)-bpCustomerAddress = lens _bpCustomerAddress (\ s a -> s{_bpCustomerAddress = a})---- | Undocumented member.-bpAmazonAddress :: Lens' BGPPeer (Maybe Text)-bpAmazonAddress = lens _bpAmazonAddress (\ s a -> s{_bpAmazonAddress = a})---- | Undocumented member.-bpAddressFamily :: Lens' BGPPeer (Maybe AddressFamily)-bpAddressFamily = lens _bpAddressFamily (\ s a -> s{_bpAddressFamily = a})---- | Undocumented member.-bpBgpStatus :: Lens' BGPPeer (Maybe BGPStatus)-bpBgpStatus = lens _bpBgpStatus (\ s a -> s{_bpBgpStatus = a})---- | Undocumented member.-bpAsn :: Lens' BGPPeer (Maybe Int)-bpAsn = lens _bpAsn (\ s a -> s{_bpAsn = a})---- | Undocumented member.-bpAuthKey :: Lens' BGPPeer (Maybe Text)-bpAuthKey = lens _bpAuthKey (\ s a -> s{_bpAuthKey = a})---- | Undocumented member.-bpBgpPeerState :: Lens' BGPPeer (Maybe BGPPeerState)-bpBgpPeerState = lens _bpBgpPeerState (\ s a -> s{_bpBgpPeerState = a})--instance FromJSON BGPPeer where-        parseJSON-          = withObject "BGPPeer"-              (\ x ->-                 BGPPeer' <$>-                   (x .:? "customerAddress") <*> (x .:? "amazonAddress")-                     <*> (x .:? "addressFamily")-                     <*> (x .:? "bgpStatus")-                     <*> (x .:? "asn")-                     <*> (x .:? "authKey")-                     <*> (x .:? "bgpPeerState"))--instance Hashable BGPPeer where--instance NFData BGPPeer where---- | A connection represents the physical network connection between the AWS Direct Connect location and the customer.------------ /See:/ 'connection' smart constructor.-data Connection = Connection'-  { _cLagId           :: !(Maybe Text)-  , _cVlan            :: !(Maybe Int)-  , _cLocation        :: !(Maybe Text)-  , _cAwsDevice       :: !(Maybe Text)-  , _cConnectionId    :: !(Maybe Text)-  , _cLoaIssueTime    :: !(Maybe POSIX)-  , _cPartnerName     :: !(Maybe Text)-  , _cConnectionName  :: !(Maybe Text)-  , _cBandwidth       :: !(Maybe Text)-  , _cOwnerAccount    :: !(Maybe Text)-  , _cRegion          :: !(Maybe Text)-  , _cConnectionState :: !(Maybe ConnectionState)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Connection' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cLagId' - Undocumented member.------ * 'cVlan' - Undocumented member.------ * 'cLocation' - Undocumented member.------ * 'cAwsDevice' - The Direct Connection endpoint which the physical connection terminates on.------ * 'cConnectionId' - Undocumented member.------ * 'cLoaIssueTime' - The time of the most recent call to 'DescribeLoa' for this connection.------ * 'cPartnerName' - The name of the AWS Direct Connect service provider associated with the connection.------ * 'cConnectionName' - Undocumented member.------ * 'cBandwidth' - Bandwidth of the connection. Example: 1Gbps (for regular connections), or 500Mbps (for hosted connections) Default: None------ * 'cOwnerAccount' - The AWS account that will own the new connection.------ * 'cRegion' - Undocumented member.------ * 'cConnectionState' - Undocumented member.-connection-    :: Connection-connection =-  Connection'-    { _cLagId = Nothing-    , _cVlan = Nothing-    , _cLocation = Nothing-    , _cAwsDevice = Nothing-    , _cConnectionId = Nothing-    , _cLoaIssueTime = Nothing-    , _cPartnerName = Nothing-    , _cConnectionName = Nothing-    , _cBandwidth = Nothing-    , _cOwnerAccount = Nothing-    , _cRegion = Nothing-    , _cConnectionState = Nothing-    }----- | Undocumented member.-cLagId :: Lens' Connection (Maybe Text)-cLagId = lens _cLagId (\ s a -> s{_cLagId = a})---- | Undocumented member.-cVlan :: Lens' Connection (Maybe Int)-cVlan = lens _cVlan (\ s a -> s{_cVlan = a})---- | Undocumented member.-cLocation :: Lens' Connection (Maybe Text)-cLocation = lens _cLocation (\ s a -> s{_cLocation = a})---- | The Direct Connection endpoint which the physical connection terminates on.-cAwsDevice :: Lens' Connection (Maybe Text)-cAwsDevice = lens _cAwsDevice (\ s a -> s{_cAwsDevice = a})---- | Undocumented member.-cConnectionId :: Lens' Connection (Maybe Text)-cConnectionId = lens _cConnectionId (\ s a -> s{_cConnectionId = a})---- | The time of the most recent call to 'DescribeLoa' for this connection.-cLoaIssueTime :: Lens' Connection (Maybe UTCTime)-cLoaIssueTime = lens _cLoaIssueTime (\ s a -> s{_cLoaIssueTime = a}) . mapping _Time---- | The name of the AWS Direct Connect service provider associated with the connection.-cPartnerName :: Lens' Connection (Maybe Text)-cPartnerName = lens _cPartnerName (\ s a -> s{_cPartnerName = a})---- | Undocumented member.-cConnectionName :: Lens' Connection (Maybe Text)-cConnectionName = lens _cConnectionName (\ s a -> s{_cConnectionName = a})---- | Bandwidth of the connection. Example: 1Gbps (for regular connections), or 500Mbps (for hosted connections) Default: None-cBandwidth :: Lens' Connection (Maybe Text)-cBandwidth = lens _cBandwidth (\ s a -> s{_cBandwidth = a})---- | The AWS account that will own the new connection.-cOwnerAccount :: Lens' Connection (Maybe Text)-cOwnerAccount = lens _cOwnerAccount (\ s a -> s{_cOwnerAccount = a})---- | Undocumented member.-cRegion :: Lens' Connection (Maybe Text)-cRegion = lens _cRegion (\ s a -> s{_cRegion = a})---- | Undocumented member.-cConnectionState :: Lens' Connection (Maybe ConnectionState)-cConnectionState = lens _cConnectionState (\ s a -> s{_cConnectionState = a})--instance FromJSON Connection where-        parseJSON-          = withObject "Connection"-              (\ x ->-                 Connection' <$>-                   (x .:? "lagId") <*> (x .:? "vlan") <*>-                     (x .:? "location")-                     <*> (x .:? "awsDevice")-                     <*> (x .:? "connectionId")-                     <*> (x .:? "loaIssueTime")-                     <*> (x .:? "partnerName")-                     <*> (x .:? "connectionName")-                     <*> (x .:? "bandwidth")-                     <*> (x .:? "ownerAccount")-                     <*> (x .:? "region")-                     <*> (x .:? "connectionState"))--instance Hashable Connection where--instance NFData Connection where---- | A structure containing a list of connections.------------ /See:/ 'connections' smart constructor.-newtype Connections = Connections'-  { _cConnections :: Maybe [Connection]-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Connections' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cConnections' - A list of connections.-connections-    :: Connections-connections = Connections' {_cConnections = Nothing}----- | A list of connections.-cConnections :: Lens' Connections [Connection]-cConnections = lens _cConnections (\ s a -> s{_cConnections = a}) . _Default . _Coerce--instance FromJSON Connections where-        parseJSON-          = withObject "Connections"-              (\ x ->-                 Connections' <$> (x .:? "connections" .!= mempty))--instance Hashable Connections where--instance NFData Connections where---- | A direct connect gateway is an intermediate object that enables you to connect virtual interfaces and virtual private gateways.------------ /See:/ 'directConnectGateway' smart constructor.-data DirectConnectGateway = DirectConnectGateway'-  { _dcgDirectConnectGatewayId    :: !(Maybe Text)-  , _dcgStateChangeError          :: !(Maybe Text)-  , _dcgAmazonSideASN             :: !(Maybe Integer)-  , _dcgDirectConnectGatewayName  :: !(Maybe Text)-  , _dcgDirectConnectGatewayState :: !(Maybe DirectConnectGatewayState)-  , _dcgOwnerAccount              :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DirectConnectGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcgDirectConnectGatewayId' - Undocumented member.------ * 'dcgStateChangeError' - Undocumented member.------ * 'dcgAmazonSideASN' - The autonomous system number (ASN) for the Amazon side of the connection.------ * 'dcgDirectConnectGatewayName' - Undocumented member.------ * 'dcgDirectConnectGatewayState' - Undocumented member.------ * 'dcgOwnerAccount' - The AWS account ID of the owner of the direct connect gateway.-directConnectGateway-    :: DirectConnectGateway-directConnectGateway =-  DirectConnectGateway'-    { _dcgDirectConnectGatewayId = Nothing-    , _dcgStateChangeError = Nothing-    , _dcgAmazonSideASN = Nothing-    , _dcgDirectConnectGatewayName = Nothing-    , _dcgDirectConnectGatewayState = Nothing-    , _dcgOwnerAccount = Nothing-    }----- | Undocumented member.-dcgDirectConnectGatewayId :: Lens' DirectConnectGateway (Maybe Text)-dcgDirectConnectGatewayId = lens _dcgDirectConnectGatewayId (\ s a -> s{_dcgDirectConnectGatewayId = a})---- | Undocumented member.-dcgStateChangeError :: Lens' DirectConnectGateway (Maybe Text)-dcgStateChangeError = lens _dcgStateChangeError (\ s a -> s{_dcgStateChangeError = a})---- | The autonomous system number (ASN) for the Amazon side of the connection.-dcgAmazonSideASN :: Lens' DirectConnectGateway (Maybe Integer)-dcgAmazonSideASN = lens _dcgAmazonSideASN (\ s a -> s{_dcgAmazonSideASN = a})---- | Undocumented member.-dcgDirectConnectGatewayName :: Lens' DirectConnectGateway (Maybe Text)-dcgDirectConnectGatewayName = lens _dcgDirectConnectGatewayName (\ s a -> s{_dcgDirectConnectGatewayName = a})---- | Undocumented member.-dcgDirectConnectGatewayState :: Lens' DirectConnectGateway (Maybe DirectConnectGatewayState)-dcgDirectConnectGatewayState = lens _dcgDirectConnectGatewayState (\ s a -> s{_dcgDirectConnectGatewayState = a})---- | The AWS account ID of the owner of the direct connect gateway.-dcgOwnerAccount :: Lens' DirectConnectGateway (Maybe Text)-dcgOwnerAccount = lens _dcgOwnerAccount (\ s a -> s{_dcgOwnerAccount = a})--instance FromJSON DirectConnectGateway where-        parseJSON-          = withObject "DirectConnectGateway"-              (\ x ->-                 DirectConnectGateway' <$>-                   (x .:? "directConnectGatewayId") <*>-                     (x .:? "stateChangeError")-                     <*> (x .:? "amazonSideAsn")-                     <*> (x .:? "directConnectGatewayName")-                     <*> (x .:? "directConnectGatewayState")-                     <*> (x .:? "ownerAccount"))--instance Hashable DirectConnectGateway where--instance NFData DirectConnectGateway where---- | The association between a direct connect gateway and virtual private gateway.------------ /See:/ 'directConnectGatewayAssociation' smart constructor.-data DirectConnectGatewayAssociation = DirectConnectGatewayAssociation'-  { _dcgaVirtualGatewayId :: !(Maybe Text)-  , _dcgaDirectConnectGatewayId :: !(Maybe Text)-  , _dcgaVirtualGatewayOwnerAccount :: !(Maybe Text)-  , _dcgaStateChangeError :: !(Maybe Text)-  , _dcgaVirtualGatewayRegion :: !(Maybe Text)-  , _dcgaAssociationState :: !(Maybe DirectConnectGatewayAssociationState)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DirectConnectGatewayAssociation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcgaVirtualGatewayId' - Undocumented member.------ * 'dcgaDirectConnectGatewayId' - Undocumented member.------ * 'dcgaVirtualGatewayOwnerAccount' - The AWS account ID of the owner of the virtual private gateway.------ * 'dcgaStateChangeError' - Undocumented member.------ * 'dcgaVirtualGatewayRegion' - Undocumented member.------ * 'dcgaAssociationState' - Undocumented member.-directConnectGatewayAssociation-    :: DirectConnectGatewayAssociation-directConnectGatewayAssociation =-  DirectConnectGatewayAssociation'-    { _dcgaVirtualGatewayId = Nothing-    , _dcgaDirectConnectGatewayId = Nothing-    , _dcgaVirtualGatewayOwnerAccount = Nothing-    , _dcgaStateChangeError = Nothing-    , _dcgaVirtualGatewayRegion = Nothing-    , _dcgaAssociationState = Nothing-    }----- | Undocumented member.-dcgaVirtualGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)-dcgaVirtualGatewayId = lens _dcgaVirtualGatewayId (\ s a -> s{_dcgaVirtualGatewayId = a})---- | Undocumented member.-dcgaDirectConnectGatewayId :: Lens' DirectConnectGatewayAssociation (Maybe Text)-dcgaDirectConnectGatewayId = lens _dcgaDirectConnectGatewayId (\ s a -> s{_dcgaDirectConnectGatewayId = a})---- | The AWS account ID of the owner of the virtual private gateway.-dcgaVirtualGatewayOwnerAccount :: Lens' DirectConnectGatewayAssociation (Maybe Text)-dcgaVirtualGatewayOwnerAccount = lens _dcgaVirtualGatewayOwnerAccount (\ s a -> s{_dcgaVirtualGatewayOwnerAccount = a})---- | Undocumented member.-dcgaStateChangeError :: Lens' DirectConnectGatewayAssociation (Maybe Text)-dcgaStateChangeError = lens _dcgaStateChangeError (\ s a -> s{_dcgaStateChangeError = a})---- | Undocumented member.-dcgaVirtualGatewayRegion :: Lens' DirectConnectGatewayAssociation (Maybe Text)-dcgaVirtualGatewayRegion = lens _dcgaVirtualGatewayRegion (\ s a -> s{_dcgaVirtualGatewayRegion = a})---- | Undocumented member.-dcgaAssociationState :: Lens' DirectConnectGatewayAssociation (Maybe DirectConnectGatewayAssociationState)-dcgaAssociationState = lens _dcgaAssociationState (\ s a -> s{_dcgaAssociationState = a})--instance FromJSON DirectConnectGatewayAssociation-         where-        parseJSON-          = withObject "DirectConnectGatewayAssociation"-              (\ x ->-                 DirectConnectGatewayAssociation' <$>-                   (x .:? "virtualGatewayId") <*>-                     (x .:? "directConnectGatewayId")-                     <*> (x .:? "virtualGatewayOwnerAccount")-                     <*> (x .:? "stateChangeError")-                     <*> (x .:? "virtualGatewayRegion")-                     <*> (x .:? "associationState"))--instance Hashable DirectConnectGatewayAssociation-         where--instance NFData DirectConnectGatewayAssociation where---- | The association between a direct connect gateway and virtual interface.------------ /See:/ 'directConnectGatewayAttachment' smart constructor.-data DirectConnectGatewayAttachment = DirectConnectGatewayAttachment'-  { _dDirectConnectGatewayId :: !(Maybe Text)-  , _dAttachmentState :: !(Maybe DirectConnectGatewayAttachmentState)-  , _dStateChangeError :: !(Maybe Text)-  , _dVirtualInterfaceRegion :: !(Maybe Text)-  , _dVirtualInterfaceOwnerAccount :: !(Maybe Text)-  , _dVirtualInterfaceId :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DirectConnectGatewayAttachment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dDirectConnectGatewayId' - Undocumented member.------ * 'dAttachmentState' - Undocumented member.------ * 'dStateChangeError' - Undocumented member.------ * 'dVirtualInterfaceRegion' - Undocumented member.------ * 'dVirtualInterfaceOwnerAccount' - The AWS account ID of the owner of the virtual interface.------ * 'dVirtualInterfaceId' - Undocumented member.-directConnectGatewayAttachment-    :: DirectConnectGatewayAttachment-directConnectGatewayAttachment =-  DirectConnectGatewayAttachment'-    { _dDirectConnectGatewayId = Nothing-    , _dAttachmentState = Nothing-    , _dStateChangeError = Nothing-    , _dVirtualInterfaceRegion = Nothing-    , _dVirtualInterfaceOwnerAccount = Nothing-    , _dVirtualInterfaceId = Nothing-    }----- | Undocumented member.-dDirectConnectGatewayId :: Lens' DirectConnectGatewayAttachment (Maybe Text)-dDirectConnectGatewayId = lens _dDirectConnectGatewayId (\ s a -> s{_dDirectConnectGatewayId = a})---- | Undocumented member.-dAttachmentState :: Lens' DirectConnectGatewayAttachment (Maybe DirectConnectGatewayAttachmentState)-dAttachmentState = lens _dAttachmentState (\ s a -> s{_dAttachmentState = a})---- | Undocumented member.-dStateChangeError :: Lens' DirectConnectGatewayAttachment (Maybe Text)-dStateChangeError = lens _dStateChangeError (\ s a -> s{_dStateChangeError = a})---- | Undocumented member.-dVirtualInterfaceRegion :: Lens' DirectConnectGatewayAttachment (Maybe Text)-dVirtualInterfaceRegion = lens _dVirtualInterfaceRegion (\ s a -> s{_dVirtualInterfaceRegion = a})---- | The AWS account ID of the owner of the virtual interface.-dVirtualInterfaceOwnerAccount :: Lens' DirectConnectGatewayAttachment (Maybe Text)-dVirtualInterfaceOwnerAccount = lens _dVirtualInterfaceOwnerAccount (\ s a -> s{_dVirtualInterfaceOwnerAccount = a})---- | Undocumented member.-dVirtualInterfaceId :: Lens' DirectConnectGatewayAttachment (Maybe Text)-dVirtualInterfaceId = lens _dVirtualInterfaceId (\ s a -> s{_dVirtualInterfaceId = a})--instance FromJSON DirectConnectGatewayAttachment-         where-        parseJSON-          = withObject "DirectConnectGatewayAttachment"-              (\ x ->-                 DirectConnectGatewayAttachment' <$>-                   (x .:? "directConnectGatewayId") <*>-                     (x .:? "attachmentState")-                     <*> (x .:? "stateChangeError")-                     <*> (x .:? "virtualInterfaceRegion")-                     <*> (x .:? "virtualInterfaceOwnerAccount")-                     <*> (x .:? "virtualInterfaceId"))--instance Hashable DirectConnectGatewayAttachment-         where--instance NFData DirectConnectGatewayAttachment where---- | An interconnect is a connection that can host other connections.--------- Like a standard AWS Direct Connect connection, an interconnect represents the physical connection between an AWS Direct Connect partner's network and a specific Direct Connect location. An AWS Direct Connect partner who owns an interconnect can provision hosted connections on the interconnect for their end customers, thereby providing the end customers with connectivity to AWS services.------ The resources of the interconnect, including bandwidth and VLAN numbers, are shared by all of the hosted connections on the interconnect, and the owner of the interconnect determines how these resources are assigned.--------- /See:/ 'interconnect' smart constructor.-data Interconnect = Interconnect'-  { _iLagId             :: !(Maybe Text)-  , _iInterconnectId    :: !(Maybe Text)-  , _iLocation          :: !(Maybe Text)-  , _iInterconnectName  :: !(Maybe Text)-  , _iAwsDevice         :: !(Maybe Text)-  , _iLoaIssueTime      :: !(Maybe POSIX)-  , _iBandwidth         :: !(Maybe Text)-  , _iInterconnectState :: !(Maybe InterconnectState)-  , _iRegion            :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Interconnect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iLagId' - Undocumented member.------ * 'iInterconnectId' - Undocumented member.------ * 'iLocation' - Undocumented member.------ * 'iInterconnectName' - Undocumented member.------ * 'iAwsDevice' - The Direct Connection endpoint which the physical connection terminates on.------ * 'iLoaIssueTime' - The time of the most recent call to DescribeInterconnectLoa for this Interconnect.------ * 'iBandwidth' - Undocumented member.------ * 'iInterconnectState' - Undocumented member.------ * 'iRegion' - Undocumented member.-interconnect-    :: Interconnect-interconnect =-  Interconnect'-    { _iLagId = Nothing-    , _iInterconnectId = Nothing-    , _iLocation = Nothing-    , _iInterconnectName = Nothing-    , _iAwsDevice = Nothing-    , _iLoaIssueTime = Nothing-    , _iBandwidth = Nothing-    , _iInterconnectState = Nothing-    , _iRegion = Nothing-    }----- | Undocumented member.-iLagId :: Lens' Interconnect (Maybe Text)-iLagId = lens _iLagId (\ s a -> s{_iLagId = a})---- | Undocumented member.-iInterconnectId :: Lens' Interconnect (Maybe Text)-iInterconnectId = lens _iInterconnectId (\ s a -> s{_iInterconnectId = a})---- | Undocumented member.-iLocation :: Lens' Interconnect (Maybe Text)-iLocation = lens _iLocation (\ s a -> s{_iLocation = a})---- | Undocumented member.-iInterconnectName :: Lens' Interconnect (Maybe Text)-iInterconnectName = lens _iInterconnectName (\ s a -> s{_iInterconnectName = a})---- | The Direct Connection endpoint which the physical connection terminates on.-iAwsDevice :: Lens' Interconnect (Maybe Text)-iAwsDevice = lens _iAwsDevice (\ s a -> s{_iAwsDevice = a})---- | The time of the most recent call to DescribeInterconnectLoa for this Interconnect.-iLoaIssueTime :: Lens' Interconnect (Maybe UTCTime)-iLoaIssueTime = lens _iLoaIssueTime (\ s a -> s{_iLoaIssueTime = a}) . mapping _Time---- | Undocumented member.-iBandwidth :: Lens' Interconnect (Maybe Text)-iBandwidth = lens _iBandwidth (\ s a -> s{_iBandwidth = a})---- | Undocumented member.-iInterconnectState :: Lens' Interconnect (Maybe InterconnectState)-iInterconnectState = lens _iInterconnectState (\ s a -> s{_iInterconnectState = a})---- | Undocumented member.-iRegion :: Lens' Interconnect (Maybe Text)-iRegion = lens _iRegion (\ s a -> s{_iRegion = a})--instance FromJSON Interconnect where-        parseJSON-          = withObject "Interconnect"-              (\ x ->-                 Interconnect' <$>-                   (x .:? "lagId") <*> (x .:? "interconnectId") <*>-                     (x .:? "location")-                     <*> (x .:? "interconnectName")-                     <*> (x .:? "awsDevice")-                     <*> (x .:? "loaIssueTime")-                     <*> (x .:? "bandwidth")-                     <*> (x .:? "interconnectState")-                     <*> (x .:? "region"))--instance Hashable Interconnect where--instance NFData Interconnect where---- | Describes a link aggregation group (LAG). A LAG is a connection that uses the Link Aggregation Control Protocol (LACP) to logically aggregate a bundle of physical connections. Like an interconnect, it can host other connections. All connections in a LAG must terminate on the same physical AWS Direct Connect endpoint, and must be the same bandwidth.------------ /See:/ 'lag' smart constructor.-data Lag = Lag'-  { _lagLagId                   :: !(Maybe Text)-  , _lagConnectionsBandwidth    :: !(Maybe Text)-  , _lagMinimumLinks            :: !(Maybe Int)-  , _lagLagName                 :: !(Maybe Text)-  , _lagLocation                :: !(Maybe Text)-  , _lagConnections             :: !(Maybe [Connection])-  , _lagAwsDevice               :: !(Maybe Text)-  , _lagAllowsHostedConnections :: !(Maybe Bool)-  , _lagNumberOfConnections     :: !(Maybe Int)-  , _lagLagState                :: !(Maybe LagState)-  , _lagOwnerAccount            :: !(Maybe Text)-  , _lagRegion                  :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Lag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lagLagId' - Undocumented member.------ * 'lagConnectionsBandwidth' - The individual bandwidth of the physical connections bundled by the LAG. Available values: 1Gbps, 10Gbps------ * 'lagMinimumLinks' - The minimum number of physical connections that must be operational for the LAG itself to be operational. If the number of operational connections drops below this setting, the LAG state changes to @down@ . This value can help to ensure that a LAG is not overutilized if a significant number of its bundled connections go down.------ * 'lagLagName' - The name of the LAG.------ * 'lagLocation' - Undocumented member.------ * 'lagConnections' - A list of connections bundled by this LAG.------ * 'lagAwsDevice' - The AWS Direct Connection endpoint that hosts the LAG.------ * 'lagAllowsHostedConnections' - Indicates whether the LAG can host other connections.------ * 'lagNumberOfConnections' - The number of physical connections bundled by the LAG, up to a maximum of 10.------ * 'lagLagState' - Undocumented member.------ * 'lagOwnerAccount' - The owner of the LAG.------ * 'lagRegion' - Undocumented member.-lag-    :: Lag-lag =-  Lag'-    { _lagLagId = Nothing-    , _lagConnectionsBandwidth = Nothing-    , _lagMinimumLinks = Nothing-    , _lagLagName = Nothing-    , _lagLocation = Nothing-    , _lagConnections = Nothing-    , _lagAwsDevice = Nothing-    , _lagAllowsHostedConnections = Nothing-    , _lagNumberOfConnections = Nothing-    , _lagLagState = Nothing-    , _lagOwnerAccount = Nothing-    , _lagRegion = Nothing-    }----- | Undocumented member.-lagLagId :: Lens' Lag (Maybe Text)-lagLagId = lens _lagLagId (\ s a -> s{_lagLagId = a})---- | The individual bandwidth of the physical connections bundled by the LAG. Available values: 1Gbps, 10Gbps-lagConnectionsBandwidth :: Lens' Lag (Maybe Text)-lagConnectionsBandwidth = lens _lagConnectionsBandwidth (\ s a -> s{_lagConnectionsBandwidth = a})---- | The minimum number of physical connections that must be operational for the LAG itself to be operational. If the number of operational connections drops below this setting, the LAG state changes to @down@ . This value can help to ensure that a LAG is not overutilized if a significant number of its bundled connections go down.-lagMinimumLinks :: Lens' Lag (Maybe Int)-lagMinimumLinks = lens _lagMinimumLinks (\ s a -> s{_lagMinimumLinks = a})---- | The name of the LAG.-lagLagName :: Lens' Lag (Maybe Text)-lagLagName = lens _lagLagName (\ s a -> s{_lagLagName = a})---- | Undocumented member.-lagLocation :: Lens' Lag (Maybe Text)-lagLocation = lens _lagLocation (\ s a -> s{_lagLocation = a})---- | A list of connections bundled by this LAG.-lagConnections :: Lens' Lag [Connection]-lagConnections = lens _lagConnections (\ s a -> s{_lagConnections = a}) . _Default . _Coerce---- | The AWS Direct Connection endpoint that hosts the LAG.-lagAwsDevice :: Lens' Lag (Maybe Text)-lagAwsDevice = lens _lagAwsDevice (\ s a -> s{_lagAwsDevice = a})---- | Indicates whether the LAG can host other connections.-lagAllowsHostedConnections :: Lens' Lag (Maybe Bool)-lagAllowsHostedConnections = lens _lagAllowsHostedConnections (\ s a -> s{_lagAllowsHostedConnections = a})---- | The number of physical connections bundled by the LAG, up to a maximum of 10.-lagNumberOfConnections :: Lens' Lag (Maybe Int)-lagNumberOfConnections = lens _lagNumberOfConnections (\ s a -> s{_lagNumberOfConnections = a})---- | Undocumented member.-lagLagState :: Lens' Lag (Maybe LagState)-lagLagState = lens _lagLagState (\ s a -> s{_lagLagState = a})---- | The owner of the LAG.-lagOwnerAccount :: Lens' Lag (Maybe Text)-lagOwnerAccount = lens _lagOwnerAccount (\ s a -> s{_lagOwnerAccount = a})---- | Undocumented member.-lagRegion :: Lens' Lag (Maybe Text)-lagRegion = lens _lagRegion (\ s a -> s{_lagRegion = a})--instance FromJSON Lag where-        parseJSON-          = withObject "Lag"-              (\ x ->-                 Lag' <$>-                   (x .:? "lagId") <*> (x .:? "connectionsBandwidth")-                     <*> (x .:? "minimumLinks")-                     <*> (x .:? "lagName")-                     <*> (x .:? "location")-                     <*> (x .:? "connections" .!= mempty)-                     <*> (x .:? "awsDevice")-                     <*> (x .:? "allowsHostedConnections")-                     <*> (x .:? "numberOfConnections")-                     <*> (x .:? "lagState")-                     <*> (x .:? "ownerAccount")-                     <*> (x .:? "region"))--instance Hashable Lag where--instance NFData Lag where---- | An AWS Direct Connect location where connections and interconnects can be requested.------------ /See:/ 'location' smart constructor.-data Location = Location'-  { _lLocationName :: !(Maybe Text)-  , _lLocationCode :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Location' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lLocationName' - The name of the AWS Direct Connect location. The name includes the colocation partner name and the physical site of the lit building.------ * 'lLocationCode' - The code used to indicate the AWS Direct Connect location.-location-    :: Location-location = Location' {_lLocationName = Nothing, _lLocationCode = Nothing}----- | The name of the AWS Direct Connect location. The name includes the colocation partner name and the physical site of the lit building.-lLocationName :: Lens' Location (Maybe Text)-lLocationName = lens _lLocationName (\ s a -> s{_lLocationName = a})---- | The code used to indicate the AWS Direct Connect location.-lLocationCode :: Lens' Location (Maybe Text)-lLocationCode = lens _lLocationCode (\ s a -> s{_lLocationCode = a})--instance FromJSON Location where-        parseJSON-          = withObject "Location"-              (\ x ->-                 Location' <$>-                   (x .:? "locationName") <*> (x .:? "locationCode"))--instance Hashable Location where--instance NFData Location where---- | A structure containing information about a new BGP peer.------------ /See:/ 'newBGPPeer' smart constructor.-data NewBGPPeer = NewBGPPeer'-  { _nbpCustomerAddress :: !(Maybe Text)-  , _nbpAmazonAddress   :: !(Maybe Text)-  , _nbpAddressFamily   :: !(Maybe AddressFamily)-  , _nbpAsn             :: !(Maybe Int)-  , _nbpAuthKey         :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NewBGPPeer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nbpCustomerAddress' - Undocumented member.------ * 'nbpAmazonAddress' - Undocumented member.------ * 'nbpAddressFamily' - Undocumented member.------ * 'nbpAsn' - Undocumented member.------ * 'nbpAuthKey' - Undocumented member.-newBGPPeer-    :: NewBGPPeer-newBGPPeer =-  NewBGPPeer'-    { _nbpCustomerAddress = Nothing-    , _nbpAmazonAddress = Nothing-    , _nbpAddressFamily = Nothing-    , _nbpAsn = Nothing-    , _nbpAuthKey = Nothing-    }----- | Undocumented member.-nbpCustomerAddress :: Lens' NewBGPPeer (Maybe Text)-nbpCustomerAddress = lens _nbpCustomerAddress (\ s a -> s{_nbpCustomerAddress = a})---- | Undocumented member.-nbpAmazonAddress :: Lens' NewBGPPeer (Maybe Text)-nbpAmazonAddress = lens _nbpAmazonAddress (\ s a -> s{_nbpAmazonAddress = a})---- | Undocumented member.-nbpAddressFamily :: Lens' NewBGPPeer (Maybe AddressFamily)-nbpAddressFamily = lens _nbpAddressFamily (\ s a -> s{_nbpAddressFamily = a})---- | Undocumented member.-nbpAsn :: Lens' NewBGPPeer (Maybe Int)-nbpAsn = lens _nbpAsn (\ s a -> s{_nbpAsn = a})---- | Undocumented member.-nbpAuthKey :: Lens' NewBGPPeer (Maybe Text)-nbpAuthKey = lens _nbpAuthKey (\ s a -> s{_nbpAuthKey = a})--instance Hashable NewBGPPeer where--instance NFData NewBGPPeer where--instance ToJSON NewBGPPeer where-        toJSON NewBGPPeer'{..}-          = object-              (catMaybes-                 [("customerAddress" .=) <$> _nbpCustomerAddress,-                  ("amazonAddress" .=) <$> _nbpAmazonAddress,-                  ("addressFamily" .=) <$> _nbpAddressFamily,-                  ("asn" .=) <$> _nbpAsn,-                  ("authKey" .=) <$> _nbpAuthKey])---- | A structure containing information about a new private virtual interface.------------ /See:/ 'newPrivateVirtualInterface' smart constructor.-data NewPrivateVirtualInterface = NewPrivateVirtualInterface'-  { _nVirtualGatewayId       :: !(Maybe Text)-  , _nCustomerAddress        :: !(Maybe Text)-  , _nAmazonAddress          :: !(Maybe Text)-  , _nAddressFamily          :: !(Maybe AddressFamily)-  , _nDirectConnectGatewayId :: !(Maybe Text)-  , _nAuthKey                :: !(Maybe Text)-  , _nVirtualInterfaceName   :: !Text-  , _nVlan                   :: !Int-  , _nAsn                    :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NewPrivateVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nVirtualGatewayId' - Undocumented member.------ * 'nCustomerAddress' - Undocumented member.------ * 'nAmazonAddress' - Undocumented member.------ * 'nAddressFamily' - Undocumented member.------ * 'nDirectConnectGatewayId' - Undocumented member.------ * 'nAuthKey' - Undocumented member.------ * 'nVirtualInterfaceName' - Undocumented member.------ * 'nVlan' - Undocumented member.------ * 'nAsn' - Undocumented member.-newPrivateVirtualInterface-    :: Text -- ^ 'nVirtualInterfaceName'-    -> Int -- ^ 'nVlan'-    -> Int -- ^ 'nAsn'-    -> NewPrivateVirtualInterface-newPrivateVirtualInterface pVirtualInterfaceName_ pVlan_ pAsn_ =-  NewPrivateVirtualInterface'-    { _nVirtualGatewayId = Nothing-    , _nCustomerAddress = Nothing-    , _nAmazonAddress = Nothing-    , _nAddressFamily = Nothing-    , _nDirectConnectGatewayId = Nothing-    , _nAuthKey = Nothing-    , _nVirtualInterfaceName = pVirtualInterfaceName_-    , _nVlan = pVlan_-    , _nAsn = pAsn_-    }----- | Undocumented member.-nVirtualGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)-nVirtualGatewayId = lens _nVirtualGatewayId (\ s a -> s{_nVirtualGatewayId = a})---- | Undocumented member.-nCustomerAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)-nCustomerAddress = lens _nCustomerAddress (\ s a -> s{_nCustomerAddress = a})---- | Undocumented member.-nAmazonAddress :: Lens' NewPrivateVirtualInterface (Maybe Text)-nAmazonAddress = lens _nAmazonAddress (\ s a -> s{_nAmazonAddress = a})---- | Undocumented member.-nAddressFamily :: Lens' NewPrivateVirtualInterface (Maybe AddressFamily)-nAddressFamily = lens _nAddressFamily (\ s a -> s{_nAddressFamily = a})---- | Undocumented member.-nDirectConnectGatewayId :: Lens' NewPrivateVirtualInterface (Maybe Text)-nDirectConnectGatewayId = lens _nDirectConnectGatewayId (\ s a -> s{_nDirectConnectGatewayId = a})---- | Undocumented member.-nAuthKey :: Lens' NewPrivateVirtualInterface (Maybe Text)-nAuthKey = lens _nAuthKey (\ s a -> s{_nAuthKey = a})---- | Undocumented member.-nVirtualInterfaceName :: Lens' NewPrivateVirtualInterface Text-nVirtualInterfaceName = lens _nVirtualInterfaceName (\ s a -> s{_nVirtualInterfaceName = a})---- | Undocumented member.-nVlan :: Lens' NewPrivateVirtualInterface Int-nVlan = lens _nVlan (\ s a -> s{_nVlan = a})---- | Undocumented member.-nAsn :: Lens' NewPrivateVirtualInterface Int-nAsn = lens _nAsn (\ s a -> s{_nAsn = a})--instance Hashable NewPrivateVirtualInterface where--instance NFData NewPrivateVirtualInterface where--instance ToJSON NewPrivateVirtualInterface where-        toJSON NewPrivateVirtualInterface'{..}-          = object-              (catMaybes-                 [("virtualGatewayId" .=) <$> _nVirtualGatewayId,-                  ("customerAddress" .=) <$> _nCustomerAddress,-                  ("amazonAddress" .=) <$> _nAmazonAddress,-                  ("addressFamily" .=) <$> _nAddressFamily,-                  ("directConnectGatewayId" .=) <$>-                    _nDirectConnectGatewayId,-                  ("authKey" .=) <$> _nAuthKey,-                  Just-                    ("virtualInterfaceName" .= _nVirtualInterfaceName),-                  Just ("vlan" .= _nVlan), Just ("asn" .= _nAsn)])---- | A structure containing information about a private virtual interface that will be provisioned on a connection.------------ /See:/ 'newPrivateVirtualInterfaceAllocation' smart constructor.-data NewPrivateVirtualInterfaceAllocation = NewPrivateVirtualInterfaceAllocation'-  { _npviaCustomerAddress      :: !(Maybe Text)-  , _npviaAmazonAddress        :: !(Maybe Text)-  , _npviaAddressFamily        :: !(Maybe AddressFamily)-  , _npviaAuthKey              :: !(Maybe Text)-  , _npviaVirtualInterfaceName :: !Text-  , _npviaVlan                 :: !Int-  , _npviaAsn                  :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NewPrivateVirtualInterfaceAllocation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'npviaCustomerAddress' - Undocumented member.------ * 'npviaAmazonAddress' - Undocumented member.------ * 'npviaAddressFamily' - Undocumented member.------ * 'npviaAuthKey' - Undocumented member.------ * 'npviaVirtualInterfaceName' - Undocumented member.------ * 'npviaVlan' - Undocumented member.------ * 'npviaAsn' - Undocumented member.-newPrivateVirtualInterfaceAllocation-    :: Text -- ^ 'npviaVirtualInterfaceName'-    -> Int -- ^ 'npviaVlan'-    -> Int -- ^ 'npviaAsn'-    -> NewPrivateVirtualInterfaceAllocation-newPrivateVirtualInterfaceAllocation pVirtualInterfaceName_ pVlan_ pAsn_ =-  NewPrivateVirtualInterfaceAllocation'-    { _npviaCustomerAddress = Nothing-    , _npviaAmazonAddress = Nothing-    , _npviaAddressFamily = Nothing-    , _npviaAuthKey = Nothing-    , _npviaVirtualInterfaceName = pVirtualInterfaceName_-    , _npviaVlan = pVlan_-    , _npviaAsn = pAsn_-    }----- | Undocumented member.-npviaCustomerAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)-npviaCustomerAddress = lens _npviaCustomerAddress (\ s a -> s{_npviaCustomerAddress = a})---- | Undocumented member.-npviaAmazonAddress :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)-npviaAmazonAddress = lens _npviaAmazonAddress (\ s a -> s{_npviaAmazonAddress = a})---- | Undocumented member.-npviaAddressFamily :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe AddressFamily)-npviaAddressFamily = lens _npviaAddressFamily (\ s a -> s{_npviaAddressFamily = a})---- | Undocumented member.-npviaAuthKey :: Lens' NewPrivateVirtualInterfaceAllocation (Maybe Text)-npviaAuthKey = lens _npviaAuthKey (\ s a -> s{_npviaAuthKey = a})---- | Undocumented member.-npviaVirtualInterfaceName :: Lens' NewPrivateVirtualInterfaceAllocation Text-npviaVirtualInterfaceName = lens _npviaVirtualInterfaceName (\ s a -> s{_npviaVirtualInterfaceName = a})---- | Undocumented member.-npviaVlan :: Lens' NewPrivateVirtualInterfaceAllocation Int-npviaVlan = lens _npviaVlan (\ s a -> s{_npviaVlan = a})---- | Undocumented member.-npviaAsn :: Lens' NewPrivateVirtualInterfaceAllocation Int-npviaAsn = lens _npviaAsn (\ s a -> s{_npviaAsn = a})--instance Hashable-           NewPrivateVirtualInterfaceAllocation-         where--instance NFData NewPrivateVirtualInterfaceAllocation-         where--instance ToJSON NewPrivateVirtualInterfaceAllocation-         where-        toJSON NewPrivateVirtualInterfaceAllocation'{..}-          = object-              (catMaybes-                 [("customerAddress" .=) <$> _npviaCustomerAddress,-                  ("amazonAddress" .=) <$> _npviaAmazonAddress,-                  ("addressFamily" .=) <$> _npviaAddressFamily,-                  ("authKey" .=) <$> _npviaAuthKey,-                  Just-                    ("virtualInterfaceName" .=-                       _npviaVirtualInterfaceName),-                  Just ("vlan" .= _npviaVlan),-                  Just ("asn" .= _npviaAsn)])---- | A structure containing information about a new public virtual interface.------------ /See:/ 'newPublicVirtualInterface' smart constructor.-data NewPublicVirtualInterface = NewPublicVirtualInterface'-  { _npviRouteFilterPrefixes  :: !(Maybe [RouteFilterPrefix])-  , _npviCustomerAddress      :: !(Maybe Text)-  , _npviAmazonAddress        :: !(Maybe Text)-  , _npviAddressFamily        :: !(Maybe AddressFamily)-  , _npviAuthKey              :: !(Maybe Text)-  , _npviVirtualInterfaceName :: !Text-  , _npviVlan                 :: !Int-  , _npviAsn                  :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NewPublicVirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'npviRouteFilterPrefixes' - Undocumented member.------ * 'npviCustomerAddress' - Undocumented member.------ * 'npviAmazonAddress' - Undocumented member.------ * 'npviAddressFamily' - Undocumented member.------ * 'npviAuthKey' - Undocumented member.------ * 'npviVirtualInterfaceName' - Undocumented member.------ * 'npviVlan' - Undocumented member.------ * 'npviAsn' - Undocumented member.-newPublicVirtualInterface-    :: Text -- ^ 'npviVirtualInterfaceName'-    -> Int -- ^ 'npviVlan'-    -> Int -- ^ 'npviAsn'-    -> NewPublicVirtualInterface-newPublicVirtualInterface pVirtualInterfaceName_ pVlan_ pAsn_ =-  NewPublicVirtualInterface'-    { _npviRouteFilterPrefixes = Nothing-    , _npviCustomerAddress = Nothing-    , _npviAmazonAddress = Nothing-    , _npviAddressFamily = Nothing-    , _npviAuthKey = Nothing-    , _npviVirtualInterfaceName = pVirtualInterfaceName_-    , _npviVlan = pVlan_-    , _npviAsn = pAsn_-    }----- | Undocumented member.-npviRouteFilterPrefixes :: Lens' NewPublicVirtualInterface [RouteFilterPrefix]-npviRouteFilterPrefixes = lens _npviRouteFilterPrefixes (\ s a -> s{_npviRouteFilterPrefixes = a}) . _Default . _Coerce---- | Undocumented member.-npviCustomerAddress :: Lens' NewPublicVirtualInterface (Maybe Text)-npviCustomerAddress = lens _npviCustomerAddress (\ s a -> s{_npviCustomerAddress = a})---- | Undocumented member.-npviAmazonAddress :: Lens' NewPublicVirtualInterface (Maybe Text)-npviAmazonAddress = lens _npviAmazonAddress (\ s a -> s{_npviAmazonAddress = a})---- | Undocumented member.-npviAddressFamily :: Lens' NewPublicVirtualInterface (Maybe AddressFamily)-npviAddressFamily = lens _npviAddressFamily (\ s a -> s{_npviAddressFamily = a})---- | Undocumented member.-npviAuthKey :: Lens' NewPublicVirtualInterface (Maybe Text)-npviAuthKey = lens _npviAuthKey (\ s a -> s{_npviAuthKey = a})---- | Undocumented member.-npviVirtualInterfaceName :: Lens' NewPublicVirtualInterface Text-npviVirtualInterfaceName = lens _npviVirtualInterfaceName (\ s a -> s{_npviVirtualInterfaceName = a})---- | Undocumented member.-npviVlan :: Lens' NewPublicVirtualInterface Int-npviVlan = lens _npviVlan (\ s a -> s{_npviVlan = a})---- | Undocumented member.-npviAsn :: Lens' NewPublicVirtualInterface Int-npviAsn = lens _npviAsn (\ s a -> s{_npviAsn = a})--instance Hashable NewPublicVirtualInterface where--instance NFData NewPublicVirtualInterface where--instance ToJSON NewPublicVirtualInterface where-        toJSON NewPublicVirtualInterface'{..}-          = object-              (catMaybes-                 [("routeFilterPrefixes" .=) <$>-                    _npviRouteFilterPrefixes,-                  ("customerAddress" .=) <$> _npviCustomerAddress,-                  ("amazonAddress" .=) <$> _npviAmazonAddress,-                  ("addressFamily" .=) <$> _npviAddressFamily,-                  ("authKey" .=) <$> _npviAuthKey,-                  Just-                    ("virtualInterfaceName" .=-                       _npviVirtualInterfaceName),-                  Just ("vlan" .= _npviVlan),-                  Just ("asn" .= _npviAsn)])---- | A structure containing information about a public virtual interface that will be provisioned on a connection.------------ /See:/ 'newPublicVirtualInterfaceAllocation' smart constructor.-data NewPublicVirtualInterfaceAllocation = NewPublicVirtualInterfaceAllocation'-  { _newRouteFilterPrefixes  :: !(Maybe [RouteFilterPrefix])-  , _newCustomerAddress      :: !(Maybe Text)-  , _newAmazonAddress        :: !(Maybe Text)-  , _newAddressFamily        :: !(Maybe AddressFamily)-  , _newAuthKey              :: !(Maybe Text)-  , _newVirtualInterfaceName :: !Text-  , _newVlan                 :: !Int-  , _newAsn                  :: !Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NewPublicVirtualInterfaceAllocation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'newRouteFilterPrefixes' - Undocumented member.------ * 'newCustomerAddress' - Undocumented member.------ * 'newAmazonAddress' - Undocumented member.------ * 'newAddressFamily' - Undocumented member.------ * 'newAuthKey' - Undocumented member.------ * 'newVirtualInterfaceName' - Undocumented member.------ * 'newVlan' - Undocumented member.------ * 'newAsn' - Undocumented member.-newPublicVirtualInterfaceAllocation-    :: Text -- ^ 'newVirtualInterfaceName'-    -> Int -- ^ 'newVlan'-    -> Int -- ^ 'newAsn'-    -> NewPublicVirtualInterfaceAllocation-newPublicVirtualInterfaceAllocation pVirtualInterfaceName_ pVlan_ pAsn_ =-  NewPublicVirtualInterfaceAllocation'-    { _newRouteFilterPrefixes = Nothing-    , _newCustomerAddress = Nothing-    , _newAmazonAddress = Nothing-    , _newAddressFamily = Nothing-    , _newAuthKey = Nothing-    , _newVirtualInterfaceName = pVirtualInterfaceName_-    , _newVlan = pVlan_-    , _newAsn = pAsn_-    }----- | Undocumented member.-newRouteFilterPrefixes :: Lens' NewPublicVirtualInterfaceAllocation [RouteFilterPrefix]-newRouteFilterPrefixes = lens _newRouteFilterPrefixes (\ s a -> s{_newRouteFilterPrefixes = a}) . _Default . _Coerce---- | Undocumented member.-newCustomerAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)-newCustomerAddress = lens _newCustomerAddress (\ s a -> s{_newCustomerAddress = a})---- | Undocumented member.-newAmazonAddress :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)-newAmazonAddress = lens _newAmazonAddress (\ s a -> s{_newAmazonAddress = a})---- | Undocumented member.-newAddressFamily :: Lens' NewPublicVirtualInterfaceAllocation (Maybe AddressFamily)-newAddressFamily = lens _newAddressFamily (\ s a -> s{_newAddressFamily = a})---- | Undocumented member.-newAuthKey :: Lens' NewPublicVirtualInterfaceAllocation (Maybe Text)-newAuthKey = lens _newAuthKey (\ s a -> s{_newAuthKey = a})---- | Undocumented member.-newVirtualInterfaceName :: Lens' NewPublicVirtualInterfaceAllocation Text-newVirtualInterfaceName = lens _newVirtualInterfaceName (\ s a -> s{_newVirtualInterfaceName = a})---- | Undocumented member.-newVlan :: Lens' NewPublicVirtualInterfaceAllocation Int-newVlan = lens _newVlan (\ s a -> s{_newVlan = a})---- | Undocumented member.-newAsn :: Lens' NewPublicVirtualInterfaceAllocation Int-newAsn = lens _newAsn (\ s a -> s{_newAsn = a})--instance Hashable NewPublicVirtualInterfaceAllocation-         where--instance NFData NewPublicVirtualInterfaceAllocation-         where--instance ToJSON NewPublicVirtualInterfaceAllocation-         where-        toJSON NewPublicVirtualInterfaceAllocation'{..}-          = object-              (catMaybes-                 [("routeFilterPrefixes" .=) <$>-                    _newRouteFilterPrefixes,-                  ("customerAddress" .=) <$> _newCustomerAddress,-                  ("amazonAddress" .=) <$> _newAmazonAddress,-                  ("addressFamily" .=) <$> _newAddressFamily,-                  ("authKey" .=) <$> _newAuthKey,-                  Just-                    ("virtualInterfaceName" .= _newVirtualInterfaceName),-                  Just ("vlan" .= _newVlan), Just ("asn" .= _newAsn)])---- | The tags associated with a Direct Connect resource.------------ /See:/ 'resourceTag' smart constructor.-data ResourceTag = ResourceTag'-  { _rtResourceARN :: !(Maybe Text)-  , _rtTags        :: !(Maybe (List1 Tag))-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ResourceTag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtResourceARN' - The Amazon Resource Name (ARN) of the Direct Connect resource.------ * 'rtTags' - The tags.-resourceTag-    :: ResourceTag-resourceTag = ResourceTag' {_rtResourceARN = Nothing, _rtTags = Nothing}----- | The Amazon Resource Name (ARN) of the Direct Connect resource.-rtResourceARN :: Lens' ResourceTag (Maybe Text)-rtResourceARN = lens _rtResourceARN (\ s a -> s{_rtResourceARN = a})---- | The tags.-rtTags :: Lens' ResourceTag (Maybe (NonEmpty Tag))-rtTags = lens _rtTags (\ s a -> s{_rtTags = a}) . mapping _List1--instance FromJSON ResourceTag where-        parseJSON-          = withObject "ResourceTag"-              (\ x ->-                 ResourceTag' <$>-                   (x .:? "resourceArn") <*> (x .:? "tags"))--instance Hashable ResourceTag where--instance NFData ResourceTag where---- | A route filter prefix that the customer can advertise through Border Gateway Protocol (BGP) over a public virtual interface.------------ /See:/ 'routeFilterPrefix' smart constructor.-newtype RouteFilterPrefix = RouteFilterPrefix'-  { _rfpCidr :: Maybe Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RouteFilterPrefix' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rfpCidr' - CIDR notation for the advertised route. Multiple routes are separated by commas. IPv6 CIDRs must be at least a /64 or shorter Example: 10.10.10.0/24,10.10.11.0/24,2001:db8::/64-routeFilterPrefix-    :: RouteFilterPrefix-routeFilterPrefix = RouteFilterPrefix' {_rfpCidr = Nothing}----- | CIDR notation for the advertised route. Multiple routes are separated by commas. IPv6 CIDRs must be at least a /64 or shorter Example: 10.10.10.0/24,10.10.11.0/24,2001:db8::/64-rfpCidr :: Lens' RouteFilterPrefix (Maybe Text)-rfpCidr = lens _rfpCidr (\ s a -> s{_rfpCidr = a})--instance FromJSON RouteFilterPrefix where-        parseJSON-          = withObject "RouteFilterPrefix"-              (\ x -> RouteFilterPrefix' <$> (x .:? "cidr"))--instance Hashable RouteFilterPrefix where--instance NFData RouteFilterPrefix where--instance ToJSON RouteFilterPrefix where-        toJSON RouteFilterPrefix'{..}-          = object (catMaybes [("cidr" .=) <$> _rfpCidr])---- | Information about a tag.------------ /See:/ 'tag' smart constructor.-data Tag = Tag'-  { _tagValue :: !(Maybe Text)-  , _tagKey   :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Tag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tagValue' - The value of the tag.------ * 'tagKey' - The key of the tag.-tag-    :: Text -- ^ 'tagKey'-    -> Tag-tag pKey_ = Tag' {_tagValue = Nothing, _tagKey = pKey_}----- | The value of the tag.-tagValue :: Lens' Tag (Maybe Text)-tagValue = lens _tagValue (\ s a -> s{_tagValue = a})---- | The key of the tag.-tagKey :: Lens' Tag Text-tagKey = lens _tagKey (\ s a -> s{_tagKey = a})--instance FromJSON Tag where-        parseJSON-          = withObject "Tag"-              (\ x -> Tag' <$> (x .:? "value") <*> (x .: "key"))--instance Hashable Tag where--instance NFData Tag where--instance ToJSON Tag where-        toJSON Tag'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _tagValue,-                  Just ("key" .= _tagKey)])---- | You can create one or more AWS Direct Connect private virtual interfaces linking to your virtual private gateway.--------- Virtual private gateways can be managed using the Amazon Virtual Private Cloud (Amazon VPC) console or the <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-CreateVpnGateway.html Amazon EC2 CreateVpnGateway action> .--------- /See:/ 'virtualGateway' smart constructor.-data VirtualGateway = VirtualGateway'-  { _vgVirtualGatewayId    :: !(Maybe Text)-  , _vgVirtualGatewayState :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VirtualGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vgVirtualGatewayId' - Undocumented member.------ * 'vgVirtualGatewayState' - Undocumented member.-virtualGateway-    :: VirtualGateway-virtualGateway =-  VirtualGateway'-    {_vgVirtualGatewayId = Nothing, _vgVirtualGatewayState = Nothing}----- | Undocumented member.-vgVirtualGatewayId :: Lens' VirtualGateway (Maybe Text)-vgVirtualGatewayId = lens _vgVirtualGatewayId (\ s a -> s{_vgVirtualGatewayId = a})---- | Undocumented member.-vgVirtualGatewayState :: Lens' VirtualGateway (Maybe Text)-vgVirtualGatewayState = lens _vgVirtualGatewayState (\ s a -> s{_vgVirtualGatewayState = a})--instance FromJSON VirtualGateway where-        parseJSON-          = withObject "VirtualGateway"-              (\ x ->-                 VirtualGateway' <$>-                   (x .:? "virtualGatewayId") <*>-                     (x .:? "virtualGatewayState"))--instance Hashable VirtualGateway where--instance NFData VirtualGateway where---- | A virtual interface (VLAN) transmits the traffic between the AWS Direct Connect location and the customer.------------ /See:/ 'virtualInterface' smart constructor.-data VirtualInterface = VirtualInterface'-  { _viBgpPeers               :: !(Maybe [BGPPeer])-  , _viVirtualGatewayId       :: !(Maybe Text)-  , _viRouteFilterPrefixes    :: !(Maybe [RouteFilterPrefix])-  , _viCustomerAddress        :: !(Maybe Text)-  , _viVlan                   :: !(Maybe Int)-  , _viLocation               :: !(Maybe Text)-  , _viAmazonAddress          :: !(Maybe Text)-  , _viAddressFamily          :: !(Maybe AddressFamily)-  , _viVirtualInterfaceState  :: !(Maybe VirtualInterfaceState)-  , _viConnectionId           :: !(Maybe Text)-  , _viDirectConnectGatewayId :: !(Maybe Text)-  , _viAmazonSideASN          :: !(Maybe Integer)-  , _viVirtualInterfaceType   :: !(Maybe Text)-  , _viAsn                    :: !(Maybe Int)-  , _viAuthKey                :: !(Maybe Text)-  , _viCustomerRouterConfig   :: !(Maybe Text)-  , _viOwnerAccount           :: !(Maybe Text)-  , _viVirtualInterfaceName   :: !(Maybe Text)-  , _viVirtualInterfaceId     :: !(Maybe Text)-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VirtualInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'viBgpPeers' - Undocumented member.------ * 'viVirtualGatewayId' - Undocumented member.------ * 'viRouteFilterPrefixes' - Undocumented member.------ * 'viCustomerAddress' - Undocumented member.------ * 'viVlan' - Undocumented member.------ * 'viLocation' - Undocumented member.------ * 'viAmazonAddress' - Undocumented member.------ * 'viAddressFamily' - Undocumented member.------ * 'viVirtualInterfaceState' - Undocumented member.------ * 'viConnectionId' - Undocumented member.------ * 'viDirectConnectGatewayId' - Undocumented member.------ * 'viAmazonSideASN' - The autonomous system number (ASN) for the Amazon side of the connection.------ * 'viVirtualInterfaceType' - Undocumented member.------ * 'viAsn' - Undocumented member.------ * 'viAuthKey' - Undocumented member.------ * 'viCustomerRouterConfig' - Information for generating the customer router configuration.------ * 'viOwnerAccount' - The AWS account that will own the new virtual interface.------ * 'viVirtualInterfaceName' - Undocumented member.------ * 'viVirtualInterfaceId' - Undocumented member.-virtualInterface-    :: VirtualInterface-virtualInterface =-  VirtualInterface'-    { _viBgpPeers = Nothing-    , _viVirtualGatewayId = Nothing-    , _viRouteFilterPrefixes = Nothing-    , _viCustomerAddress = Nothing-    , _viVlan = Nothing-    , _viLocation = Nothing-    , _viAmazonAddress = Nothing-    , _viAddressFamily = Nothing-    , _viVirtualInterfaceState = Nothing-    , _viConnectionId = Nothing-    , _viDirectConnectGatewayId = Nothing-    , _viAmazonSideASN = Nothing-    , _viVirtualInterfaceType = Nothing-    , _viAsn = Nothing-    , _viAuthKey = Nothing-    , _viCustomerRouterConfig = Nothing-    , _viOwnerAccount = Nothing-    , _viVirtualInterfaceName = Nothing-    , _viVirtualInterfaceId = Nothing-    }----- | Undocumented member.-viBgpPeers :: Lens' VirtualInterface [BGPPeer]-viBgpPeers = lens _viBgpPeers (\ s a -> s{_viBgpPeers = a}) . _Default . _Coerce---- | Undocumented member.-viVirtualGatewayId :: Lens' VirtualInterface (Maybe Text)-viVirtualGatewayId = lens _viVirtualGatewayId (\ s a -> s{_viVirtualGatewayId = a})---- | Undocumented member.-viRouteFilterPrefixes :: Lens' VirtualInterface [RouteFilterPrefix]-viRouteFilterPrefixes = lens _viRouteFilterPrefixes (\ s a -> s{_viRouteFilterPrefixes = a}) . _Default . _Coerce---- | Undocumented member.-viCustomerAddress :: Lens' VirtualInterface (Maybe Text)-viCustomerAddress = lens _viCustomerAddress (\ s a -> s{_viCustomerAddress = a})---- | Undocumented member.-viVlan :: Lens' VirtualInterface (Maybe Int)-viVlan = lens _viVlan (\ s a -> s{_viVlan = a})---- | Undocumented member.-viLocation :: Lens' VirtualInterface (Maybe Text)-viLocation = lens _viLocation (\ s a -> s{_viLocation = a})---- | Undocumented member.-viAmazonAddress :: Lens' VirtualInterface (Maybe Text)-viAmazonAddress = lens _viAmazonAddress (\ s a -> s{_viAmazonAddress = a})---- | Undocumented member.-viAddressFamily :: Lens' VirtualInterface (Maybe AddressFamily)-viAddressFamily = lens _viAddressFamily (\ s a -> s{_viAddressFamily = a})---- | Undocumented member.-viVirtualInterfaceState :: Lens' VirtualInterface (Maybe VirtualInterfaceState)-viVirtualInterfaceState = lens _viVirtualInterfaceState (\ s a -> s{_viVirtualInterfaceState = a})---- | Undocumented member.-viConnectionId :: Lens' VirtualInterface (Maybe Text)-viConnectionId = lens _viConnectionId (\ s a -> s{_viConnectionId = a})---- | Undocumented member.-viDirectConnectGatewayId :: Lens' VirtualInterface (Maybe Text)-viDirectConnectGatewayId = lens _viDirectConnectGatewayId (\ s a -> s{_viDirectConnectGatewayId = a})---- | The autonomous system number (ASN) for the Amazon side of the connection.-viAmazonSideASN :: Lens' VirtualInterface (Maybe Integer)-viAmazonSideASN = lens _viAmazonSideASN (\ s a -> s{_viAmazonSideASN = a})---- | Undocumented member.-viVirtualInterfaceType :: Lens' VirtualInterface (Maybe Text)-viVirtualInterfaceType = lens _viVirtualInterfaceType (\ s a -> s{_viVirtualInterfaceType = a})---- | Undocumented member.-viAsn :: Lens' VirtualInterface (Maybe Int)-viAsn = lens _viAsn (\ s a -> s{_viAsn = a})---- | Undocumented member.-viAuthKey :: Lens' VirtualInterface (Maybe Text)-viAuthKey = lens _viAuthKey (\ s a -> s{_viAuthKey = a})---- | Information for generating the customer router configuration.-viCustomerRouterConfig :: Lens' VirtualInterface (Maybe Text)-viCustomerRouterConfig = lens _viCustomerRouterConfig (\ s a -> s{_viCustomerRouterConfig = a})---- | The AWS account that will own the new virtual interface.-viOwnerAccount :: Lens' VirtualInterface (Maybe Text)-viOwnerAccount = lens _viOwnerAccount (\ s a -> s{_viOwnerAccount = a})---- | Undocumented member.-viVirtualInterfaceName :: Lens' VirtualInterface (Maybe Text)-viVirtualInterfaceName = lens _viVirtualInterfaceName (\ s a -> s{_viVirtualInterfaceName = a})---- | Undocumented member.-viVirtualInterfaceId :: Lens' VirtualInterface (Maybe Text)-viVirtualInterfaceId = lens _viVirtualInterfaceId (\ s a -> s{_viVirtualInterfaceId = a})--instance FromJSON VirtualInterface where-        parseJSON-          = withObject "VirtualInterface"-              (\ x ->-                 VirtualInterface' <$>-                   (x .:? "bgpPeers" .!= mempty) <*>-                     (x .:? "virtualGatewayId")-                     <*> (x .:? "routeFilterPrefixes" .!= mempty)-                     <*> (x .:? "customerAddress")-                     <*> (x .:? "vlan")-                     <*> (x .:? "location")-                     <*> (x .:? "amazonAddress")-                     <*> (x .:? "addressFamily")-                     <*> (x .:? "virtualInterfaceState")-                     <*> (x .:? "connectionId")-                     <*> (x .:? "directConnectGatewayId")-                     <*> (x .:? "amazonSideAsn")-                     <*> (x .:? "virtualInterfaceType")-                     <*> (x .:? "asn")-                     <*> (x .:? "authKey")-                     <*> (x .:? "customerRouterConfig")-                     <*> (x .:? "ownerAccount")-                     <*> (x .:? "virtualInterfaceName")-                     <*> (x .:? "virtualInterfaceId"))--instance Hashable VirtualInterface where--instance NFData VirtualInterface where
− gen/Network/AWS/DirectConnect/Types/Sum.hs
@@ -1,560 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.Types.Sum--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.DirectConnect.Types.Sum where--import Network.AWS.Prelude---- | Indicates the address family for the BGP peer.---------     * __ipv4__ : IPv4 address family------     * __ipv6__ : IPv6 address family----------data AddressFamily-  = IPV4-  | IPV6-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText AddressFamily where-    parser = takeLowerText >>= \case-        "ipv4" -> pure IPV4-        "ipv6" -> pure IPV6-        e -> fromTextError $ "Failure parsing AddressFamily from value: '" <> e-           <> "'. Accepted values: ipv4, ipv6"--instance ToText AddressFamily where-    toText = \case-        IPV4 -> "ipv4"-        IPV6 -> "ipv6"--instance Hashable     AddressFamily-instance NFData       AddressFamily-instance ToByteString AddressFamily-instance ToQuery      AddressFamily-instance ToHeader     AddressFamily--instance ToJSON AddressFamily where-    toJSON = toJSONText--instance FromJSON AddressFamily where-    parseJSON = parseJSONText "AddressFamily"---- | The state of the BGP peer.---------     * __Verifying__ : The BGP peering addresses or ASN require validation before the BGP peer can be created. This state only applies to BGP peers on a public virtual interface.------     * __Pending__ : The BGP peer has been created, and is in this state until it is ready to be established.------     * __Available__ : The BGP peer can be established.------     * __Deleting__ : The BGP peer is in the process of being deleted.------     * __Deleted__ : The BGP peer has been deleted and cannot be established.----------data BGPPeerState-  = Available-  | Deleted-  | Deleting-  | Pending-  | Verifying-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText BGPPeerState where-    parser = takeLowerText >>= \case-        "available" -> pure Available-        "deleted" -> pure Deleted-        "deleting" -> pure Deleting-        "pending" -> pure Pending-        "verifying" -> pure Verifying-        e -> fromTextError $ "Failure parsing BGPPeerState from value: '" <> e-           <> "'. Accepted values: available, deleted, deleting, pending, verifying"--instance ToText BGPPeerState where-    toText = \case-        Available -> "available"-        Deleted -> "deleted"-        Deleting -> "deleting"-        Pending -> "pending"-        Verifying -> "verifying"--instance Hashable     BGPPeerState-instance NFData       BGPPeerState-instance ToByteString BGPPeerState-instance ToQuery      BGPPeerState-instance ToHeader     BGPPeerState--instance FromJSON BGPPeerState where-    parseJSON = parseJSONText "BGPPeerState"---- | The Up/Down state of the BGP peer.---------     * __Up__ : The BGP peer is established.------     * __Down__ : The BGP peer is down.----------data BGPStatus-  = Down-  | UP-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText BGPStatus where-    parser = takeLowerText >>= \case-        "down" -> pure Down-        "up" -> pure UP-        e -> fromTextError $ "Failure parsing BGPStatus from value: '" <> e-           <> "'. Accepted values: down, up"--instance ToText BGPStatus where-    toText = \case-        Down -> "down"-        UP -> "up"--instance Hashable     BGPStatus-instance NFData       BGPStatus-instance ToByteString BGPStatus-instance ToQuery      BGPStatus-instance ToHeader     BGPStatus--instance FromJSON BGPStatus where-    parseJSON = parseJSONText "BGPStatus"---- | State of the connection.---------     * __Ordering__ : The initial state of a hosted connection provisioned on an interconnect. The connection stays in the ordering state until the owner of the hosted connection confirms or declines the connection order.------     * __Requested__ : The initial state of a standard connection. The connection stays in the requested state until the Letter of Authorization (LOA) is sent to the customer.------     * __Pending__ : The connection has been approved, and is being initialized.------     * __Available__ : The network link is up, and the connection is ready for use.------     * __Down__ : The network link is down.------     * __Deleting__ : The connection is in the process of being deleted.------     * __Deleted__ : The connection has been deleted.------     * __Rejected__ : A hosted connection in the 'Ordering' state will enter the 'Rejected' state if it is deleted by the end customer.----------data ConnectionState-  = CSAvailable-  | CSDeleted-  | CSDeleting-  | CSDown-  | CSOrdering-  | CSPending-  | CSRejected-  | CSRequested-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText ConnectionState where-    parser = takeLowerText >>= \case-        "available" -> pure CSAvailable-        "deleted" -> pure CSDeleted-        "deleting" -> pure CSDeleting-        "down" -> pure CSDown-        "ordering" -> pure CSOrdering-        "pending" -> pure CSPending-        "rejected" -> pure CSRejected-        "requested" -> pure CSRequested-        e -> fromTextError $ "Failure parsing ConnectionState from value: '" <> e-           <> "'. Accepted values: available, deleted, deleting, down, ordering, pending, rejected, requested"--instance ToText ConnectionState where-    toText = \case-        CSAvailable -> "available"-        CSDeleted -> "deleted"-        CSDeleting -> "deleting"-        CSDown -> "down"-        CSOrdering -> "ordering"-        CSPending -> "pending"-        CSRejected -> "rejected"-        CSRequested -> "requested"--instance Hashable     ConnectionState-instance NFData       ConnectionState-instance ToByteString ConnectionState-instance ToQuery      ConnectionState-instance ToHeader     ConnectionState--instance FromJSON ConnectionState where-    parseJSON = parseJSONText "ConnectionState"---- | State of the direct connect gateway association.---------     * __Associating__ : The initial state after calling 'CreateDirectConnectGatewayAssociation' .------     * __Associated__ : The direct connect gateway and virtual private gateway are successfully associated and ready to pass traffic.------     * __Disassociating__ : The initial state after calling 'DeleteDirectConnectGatewayAssociation' .------     * __Disassociated__ : The virtual private gateway is successfully disassociated from the direct connect gateway. Traffic flow between the direct connect gateway and virtual private gateway stops.----------data DirectConnectGatewayAssociationState-  = Associated-  | Associating-  | Disassociated-  | Disassociating-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText DirectConnectGatewayAssociationState where-    parser = takeLowerText >>= \case-        "associated" -> pure Associated-        "associating" -> pure Associating-        "disassociated" -> pure Disassociated-        "disassociating" -> pure Disassociating-        e -> fromTextError $ "Failure parsing DirectConnectGatewayAssociationState from value: '" <> e-           <> "'. Accepted values: associated, associating, disassociated, disassociating"--instance ToText DirectConnectGatewayAssociationState where-    toText = \case-        Associated -> "associated"-        Associating -> "associating"-        Disassociated -> "disassociated"-        Disassociating -> "disassociating"--instance Hashable     DirectConnectGatewayAssociationState-instance NFData       DirectConnectGatewayAssociationState-instance ToByteString DirectConnectGatewayAssociationState-instance ToQuery      DirectConnectGatewayAssociationState-instance ToHeader     DirectConnectGatewayAssociationState--instance FromJSON DirectConnectGatewayAssociationState where-    parseJSON = parseJSONText "DirectConnectGatewayAssociationState"---- | State of the direct connect gateway attachment.---------     * __Attaching__ : The initial state after a virtual interface is created using the direct connect gateway.------     * __Attached__ : The direct connect gateway and virtual interface are successfully attached and ready to pass traffic.------     * __Detaching__ : The initial state after calling 'DeleteVirtualInterface' on a virtual interface that is attached to a direct connect gateway.------     * __Detached__ : The virtual interface is successfully detached from the direct connect gateway. Traffic flow between the direct connect gateway and virtual interface stops.----------data DirectConnectGatewayAttachmentState-  = Attached-  | Attaching-  | Detached-  | Detaching-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText DirectConnectGatewayAttachmentState where-    parser = takeLowerText >>= \case-        "attached" -> pure Attached-        "attaching" -> pure Attaching-        "detached" -> pure Detached-        "detaching" -> pure Detaching-        e -> fromTextError $ "Failure parsing DirectConnectGatewayAttachmentState from value: '" <> e-           <> "'. Accepted values: attached, attaching, detached, detaching"--instance ToText DirectConnectGatewayAttachmentState where-    toText = \case-        Attached -> "attached"-        Attaching -> "attaching"-        Detached -> "detached"-        Detaching -> "detaching"--instance Hashable     DirectConnectGatewayAttachmentState-instance NFData       DirectConnectGatewayAttachmentState-instance ToByteString DirectConnectGatewayAttachmentState-instance ToQuery      DirectConnectGatewayAttachmentState-instance ToHeader     DirectConnectGatewayAttachmentState--instance FromJSON DirectConnectGatewayAttachmentState where-    parseJSON = parseJSONText "DirectConnectGatewayAttachmentState"---- | State of the direct connect gateway.---------     * __Pending__ : The initial state after calling 'CreateDirectConnectGateway' .------     * __Available__ : The direct connect gateway is ready for use.------     * __Deleting__ : The initial state after calling 'DeleteDirectConnectGateway' .------     * __Deleted__ : The direct connect gateway is deleted and cannot pass traffic.----------data DirectConnectGatewayState-  = DCGSAvailable-  | DCGSDeleted-  | DCGSDeleting-  | DCGSPending-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText DirectConnectGatewayState where-    parser = takeLowerText >>= \case-        "available" -> pure DCGSAvailable-        "deleted" -> pure DCGSDeleted-        "deleting" -> pure DCGSDeleting-        "pending" -> pure DCGSPending-        e -> fromTextError $ "Failure parsing DirectConnectGatewayState from value: '" <> e-           <> "'. Accepted values: available, deleted, deleting, pending"--instance ToText DirectConnectGatewayState where-    toText = \case-        DCGSAvailable -> "available"-        DCGSDeleted -> "deleted"-        DCGSDeleting -> "deleting"-        DCGSPending -> "pending"--instance Hashable     DirectConnectGatewayState-instance NFData       DirectConnectGatewayState-instance ToByteString DirectConnectGatewayState-instance ToQuery      DirectConnectGatewayState-instance ToHeader     DirectConnectGatewayState--instance FromJSON DirectConnectGatewayState where-    parseJSON = parseJSONText "DirectConnectGatewayState"---- | State of the interconnect.---------     * __Requested__ : The initial state of an interconnect. The interconnect stays in the requested state until the Letter of Authorization (LOA) is sent to the customer.------     * __Pending__ : The interconnect has been approved, and is being initialized.------     * __Available__ : The network link is up, and the interconnect is ready for use.------     * __Down__ : The network link is down.------     * __Deleting__ : The interconnect is in the process of being deleted.------     * __Deleted__ : The interconnect has been deleted.----------data InterconnectState-  = ISAvailable-  | ISDeleted-  | ISDeleting-  | ISDown-  | ISPending-  | ISRequested-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText InterconnectState where-    parser = takeLowerText >>= \case-        "available" -> pure ISAvailable-        "deleted" -> pure ISDeleted-        "deleting" -> pure ISDeleting-        "down" -> pure ISDown-        "pending" -> pure ISPending-        "requested" -> pure ISRequested-        e -> fromTextError $ "Failure parsing InterconnectState from value: '" <> e-           <> "'. Accepted values: available, deleted, deleting, down, pending, requested"--instance ToText InterconnectState where-    toText = \case-        ISAvailable -> "available"-        ISDeleted -> "deleted"-        ISDeleting -> "deleting"-        ISDown -> "down"-        ISPending -> "pending"-        ISRequested -> "requested"--instance Hashable     InterconnectState-instance NFData       InterconnectState-instance ToByteString InterconnectState-instance ToQuery      InterconnectState-instance ToHeader     InterconnectState--instance FromJSON InterconnectState where-    parseJSON = parseJSONText "InterconnectState"---- | The state of the LAG.---------     * __Requested__ : The initial state of a LAG. The LAG stays in the requested state until the Letter of Authorization (LOA) is available.------     * __Pending__ : The LAG has been approved, and is being initialized.------     * __Available__ : The network link is established, and the LAG is ready for use.------     * __Down__ : The network link is down.------     * __Deleting__ : The LAG is in the process of being deleted.------     * __Deleted__ : The LAG has been deleted.----------data LagState-  = LSAvailable-  | LSDeleted-  | LSDeleting-  | LSDown-  | LSPending-  | LSRequested-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText LagState where-    parser = takeLowerText >>= \case-        "available" -> pure LSAvailable-        "deleted" -> pure LSDeleted-        "deleting" -> pure LSDeleting-        "down" -> pure LSDown-        "pending" -> pure LSPending-        "requested" -> pure LSRequested-        e -> fromTextError $ "Failure parsing LagState from value: '" <> e-           <> "'. Accepted values: available, deleted, deleting, down, pending, requested"--instance ToText LagState where-    toText = \case-        LSAvailable -> "available"-        LSDeleted -> "deleted"-        LSDeleting -> "deleting"-        LSDown -> "down"-        LSPending -> "pending"-        LSRequested -> "requested"--instance Hashable     LagState-instance NFData       LagState-instance ToByteString LagState-instance ToQuery      LagState-instance ToHeader     LagState--instance FromJSON LagState where-    parseJSON = parseJSONText "LagState"---- | A standard media type indicating the content type of the LOA-CFA document. Currently, the only supported value is "application/pdf".--------- Default: application/pdf----data LoaContentType =-  ApplicationPdf-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText LoaContentType where-    parser = takeLowerText >>= \case-        "application/pdf" -> pure ApplicationPdf-        e -> fromTextError $ "Failure parsing LoaContentType from value: '" <> e-           <> "'. Accepted values: application/pdf"--instance ToText LoaContentType where-    toText = \case-        ApplicationPdf -> "application/pdf"--instance Hashable     LoaContentType-instance NFData       LoaContentType-instance ToByteString LoaContentType-instance ToQuery      LoaContentType-instance ToHeader     LoaContentType--instance ToJSON LoaContentType where-    toJSON = toJSONText--instance FromJSON LoaContentType where-    parseJSON = parseJSONText "LoaContentType"---- | State of the virtual interface.---------     * __Confirming__ : The creation of the virtual interface is pending confirmation from the virtual interface owner. If the owner of the virtual interface is different from the owner of the connection on which it is provisioned, then the virtual interface will remain in this state until it is confirmed by the virtual interface owner.------     * __Verifying__ : This state only applies to public virtual interfaces. Each public virtual interface needs validation before the virtual interface can be created.------     * __Pending__ : A virtual interface is in this state from the time that it is created until the virtual interface is ready to forward traffic.------     * __Available__ : A virtual interface that is able to forward traffic.------     * __Down__ : A virtual interface that is BGP down.------     * __Deleting__ : A virtual interface is in this state immediately after calling 'DeleteVirtualInterface' until it can no longer forward traffic.------     * __Deleted__ : A virtual interface that cannot forward traffic.------     * __Rejected__ : The virtual interface owner has declined creation of the virtual interface. If a virtual interface in the 'Confirming' state is deleted by the virtual interface owner, the virtual interface will enter the 'Rejected' state.----------data VirtualInterfaceState-  = VISAvailable-  | VISConfirming-  | VISDeleted-  | VISDeleting-  | VISDown-  | VISPending-  | VISRejected-  | VISVerifying-  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText VirtualInterfaceState where-    parser = takeLowerText >>= \case-        "available" -> pure VISAvailable-        "confirming" -> pure VISConfirming-        "deleted" -> pure VISDeleted-        "deleting" -> pure VISDeleting-        "down" -> pure VISDown-        "pending" -> pure VISPending-        "rejected" -> pure VISRejected-        "verifying" -> pure VISVerifying-        e -> fromTextError $ "Failure parsing VirtualInterfaceState from value: '" <> e-           <> "'. Accepted values: available, confirming, deleted, deleting, down, pending, rejected, verifying"--instance ToText VirtualInterfaceState where-    toText = \case-        VISAvailable -> "available"-        VISConfirming -> "confirming"-        VISDeleted -> "deleted"-        VISDeleting -> "deleting"-        VISDown -> "down"-        VISPending -> "pending"-        VISRejected -> "rejected"-        VISVerifying -> "verifying"--instance Hashable     VirtualInterfaceState-instance NFData       VirtualInterfaceState-instance ToByteString VirtualInterfaceState-instance ToQuery      VirtualInterfaceState-instance ToHeader     VirtualInterfaceState--instance FromJSON VirtualInterfaceState where-    parseJSON = parseJSONText "VirtualInterfaceState"
− gen/Network/AWS/DirectConnect/UntagResource.hs
@@ -1,140 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.UntagResource--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Removes one or more tags from the specified Direct Connect resource.-------module Network.AWS.DirectConnect.UntagResource-    (-    -- * Creating a Request-      untagResource-    , UntagResource-    -- * Request Lenses-    , urResourceARN-    , urTagKeys--    -- * Destructuring the Response-    , untagResourceResponse-    , UntagResourceResponse-    -- * Response Lenses-    , urrsResponseStatus-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the UntagResource operation.------------ /See:/ 'untagResource' smart constructor.-data UntagResource = UntagResource'-  { _urResourceARN :: !Text-  , _urTagKeys     :: ![Text]-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UntagResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urResourceARN' - The Amazon Resource Name (ARN) of the Direct Connect resource.------ * 'urTagKeys' - The list of tag keys to remove.-untagResource-    :: Text -- ^ 'urResourceARN'-    -> UntagResource-untagResource pResourceARN_ =-  UntagResource' {_urResourceARN = pResourceARN_, _urTagKeys = mempty}----- | The Amazon Resource Name (ARN) of the Direct Connect resource.-urResourceARN :: Lens' UntagResource Text-urResourceARN = lens _urResourceARN (\ s a -> s{_urResourceARN = a})---- | The list of tag keys to remove.-urTagKeys :: Lens' UntagResource [Text]-urTagKeys = lens _urTagKeys (\ s a -> s{_urTagKeys = a}) . _Coerce--instance AWSRequest UntagResource where-        type Rs UntagResource = UntagResourceResponse-        request = postJSON directConnect-        response-          = receiveEmpty-              (\ s h x ->-                 UntagResourceResponse' <$> (pure (fromEnum s)))--instance Hashable UntagResource where--instance NFData UntagResource where--instance ToHeaders UntagResource where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.UntagResource" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UntagResource where-        toJSON UntagResource'{..}-          = object-              (catMaybes-                 [Just ("resourceArn" .= _urResourceARN),-                  Just ("tagKeys" .= _urTagKeys)])--instance ToPath UntagResource where-        toPath = const "/"--instance ToQuery UntagResource where-        toQuery = const mempty---- | The response received when UntagResource is called.------------ /See:/ 'untagResourceResponse' smart constructor.-newtype UntagResourceResponse = UntagResourceResponse'-  { _urrsResponseStatus :: Int-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UntagResourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'urrsResponseStatus' - -- | The response status code.-untagResourceResponse-    :: Int -- ^ 'urrsResponseStatus'-    -> UntagResourceResponse-untagResourceResponse pResponseStatus_ =-  UntagResourceResponse' {_urrsResponseStatus = pResponseStatus_}----- | -- | The response status code.-urrsResponseStatus :: Lens' UntagResourceResponse Int-urrsResponseStatus = lens _urrsResponseStatus (\ s a -> s{_urrsResponseStatus = a})--instance NFData UntagResourceResponse where
− gen/Network/AWS/DirectConnect/UpdateLag.hs
@@ -1,140 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.UpdateLag--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the attributes of a link aggregation group (LAG).--------- You can update the following attributes:------     * The name of the LAG.------     * The value for the minimum number of connections that must be operational for the LAG itself to be operational.------------ When you create a LAG, the default value for the minimum number of operational connections is zero (0). If you update this value, and the number of operational connections falls below the specified value, the LAG will automatically go down to avoid overutilization of the remaining connections. Adjusting this value should be done with care as it could force the LAG down if the value is set higher than the current number of operational connections.----module Network.AWS.DirectConnect.UpdateLag-    (-    -- * Creating a Request-      updateLag-    , UpdateLag-    -- * Request Lenses-    , ulMinimumLinks-    , ulLagName-    , ulLagId--    -- * Destructuring the Response-    , lag-    , Lag-    -- * Response Lenses-    , lagLagId-    , lagConnectionsBandwidth-    , lagMinimumLinks-    , lagLagName-    , lagLocation-    , lagConnections-    , lagAwsDevice-    , lagAllowsHostedConnections-    , lagNumberOfConnections-    , lagLagState-    , lagOwnerAccount-    , lagRegion-    ) where--import Network.AWS.DirectConnect.Types-import Network.AWS.DirectConnect.Types.Product-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response---- | Container for the parameters to the UpdateLag operation.------------ /See:/ 'updateLag' smart constructor.-data UpdateLag = UpdateLag'-  { _ulMinimumLinks :: !(Maybe Int)-  , _ulLagName      :: !(Maybe Text)-  , _ulLagId        :: !Text-  } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateLag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ulMinimumLinks' - The minimum number of physical connections that must be operational for the LAG itself to be operational. Default: None------ * 'ulLagName' - The name for the LAG. Example: "@3x10G LAG to AWS@ " Default: None------ * 'ulLagId' - The ID of the LAG to update. Example: dxlag-abc123 Default: None-updateLag-    :: Text -- ^ 'ulLagId'-    -> UpdateLag-updateLag pLagId_ =-  UpdateLag'-    {_ulMinimumLinks = Nothing, _ulLagName = Nothing, _ulLagId = pLagId_}----- | The minimum number of physical connections that must be operational for the LAG itself to be operational. Default: None-ulMinimumLinks :: Lens' UpdateLag (Maybe Int)-ulMinimumLinks = lens _ulMinimumLinks (\ s a -> s{_ulMinimumLinks = a})---- | The name for the LAG. Example: "@3x10G LAG to AWS@ " Default: None-ulLagName :: Lens' UpdateLag (Maybe Text)-ulLagName = lens _ulLagName (\ s a -> s{_ulLagName = a})---- | The ID of the LAG to update. Example: dxlag-abc123 Default: None-ulLagId :: Lens' UpdateLag Text-ulLagId = lens _ulLagId (\ s a -> s{_ulLagId = a})--instance AWSRequest UpdateLag where-        type Rs UpdateLag = Lag-        request = postJSON directConnect-        response = receiveJSON (\ s h x -> eitherParseJSON x)--instance Hashable UpdateLag where--instance NFData UpdateLag where--instance ToHeaders UpdateLag where-        toHeaders-          = const-              (mconcat-                 ["X-Amz-Target" =#-                    ("OvertureService.UpdateLag" :: ByteString),-                  "Content-Type" =#-                    ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateLag where-        toJSON UpdateLag'{..}-          = object-              (catMaybes-                 [("minimumLinks" .=) <$> _ulMinimumLinks,-                  ("lagName" .=) <$> _ulLagName,-                  Just ("lagId" .= _ulLagId)])--instance ToPath UpdateLag where-        toPath = const "/"--instance ToQuery UpdateLag where-        toQuery = const mempty
− gen/Network/AWS/DirectConnect/Waiters.hs
@@ -1,21 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE TypeFamilies      #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Network.AWS.DirectConnect.Waiters--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.DirectConnect.Waiters where--import Network.AWS.DirectConnect.Types-import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Waiter
test/Main.hs view
@@ -2,20 +2,22 @@  -- | -- Module      : Main--- Copyright   : (c) 2013-2018 Brendan Hay+-- Copyright   : (c) 2013-2023 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Maintainer  : Brendan Hay -- Stability   : auto-generated -- Portability : non-portable (GHC extensions)--- module Main (main) where +import Test.Amazonka.DirectConnect+import Test.Amazonka.DirectConnect.Internal import Test.Tasty-import Test.AWS.DirectConnect-import Test.AWS.DirectConnect.Internal  main :: IO ()-main = defaultMain $ testGroup "DirectConnect"-    [ testGroup "tests"    tests-    , testGroup "fixtures" fixtures-    ]+main =+  defaultMain $+    testGroup+      "DirectConnect"+      [ testGroup "tests" tests,+        testGroup "fixtures" fixtures+      ]
− test/Test/AWS/DirectConnect.hs
@@ -1,26 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}---- Module      : Test.AWS.DirectConnect--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : This Source Code Form is subject to the terms of---               the Mozilla Public License, v. 2.0.---               A copy of the MPL can be found in the LICENSE file or---               you can obtain it at http://mozilla.org/MPL/2.0/.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : experimental--- Portability : non-portable (GHC extensions)--module Test.AWS.DirectConnect-    ( tests-    , fixtures-    ) where--import           Network.AWS.DirectConnect-import           Test.AWS.Gen.DirectConnect-import           Test.Tasty--tests :: [TestTree]-tests = []--fixtures :: [TestTree]-fixtures = []
− test/Test/AWS/DirectConnect/Internal.hs
@@ -1,16 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Module      : Test.AWS.DirectConnect.Internal--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : This Source Code Form is subject to the terms of---               the Mozilla Public License, v. 2.0.---               A copy of the MPL can be found in the LICENSE file or---               you can obtain it at http://mozilla.org/MPL/2.0/.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : experimental--- Portability : non-portable (GHC extensions)--module Test.AWS.DirectConnect.Internal where--import Test.AWS.Prelude
− test/Test/AWS/Gen/DirectConnect.hs
@@ -1,759 +0,0 @@-{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-orphans        #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module      : Test.AWS.Gen.DirectConnect--- Copyright   : (c) 2013-2018 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Test.AWS.Gen.DirectConnect where--import Data.Proxy-import Network.AWS.DirectConnect-import Test.AWS.DirectConnect.Internal-import Test.AWS.Fixture-import Test.AWS.Prelude-import Test.Tasty---- Auto-generated: the actual test selection needs to be manually placed into--- the top-level so that real test data can be incrementally added.------ This commented snippet is what the entire set should look like:---- fixtures :: TestTree--- fixtures =---     [ testGroup "request"---         [ requestDescribeDirectConnectGatewayAssociations $---             describeDirectConnectGatewayAssociations------         , requestDescribeInterconnects $---             describeInterconnects------         , requestDescribeTags $---             describeTags------         , requestDescribeLoa $---             describeLoa------         , requestDeleteConnection $---             deleteConnection------         , requestAssociateConnectionWithLag $---             associateConnectionWithLag------         , requestCreateConnection $---             createConnection------         , requestDescribeDirectConnectGateways $---             describeDirectConnectGateways------         , requestAssociateVirtualInterface $---             associateVirtualInterface------         , requestDescribeConnections $---             describeConnections------         , requestDeleteInterconnect $---             deleteInterconnect------         , requestConfirmPrivateVirtualInterface $---             confirmPrivateVirtualInterface------         , requestDeleteDirectConnectGatewayAssociation $---             deleteDirectConnectGatewayAssociation------         , requestDescribeLocations $---             describeLocations------         , requestCreateDirectConnectGatewayAssociation $---             createDirectConnectGatewayAssociation------         , requestCreatePublicVirtualInterface $---             createPublicVirtualInterface------         , requestAllocatePrivateVirtualInterface $---             allocatePrivateVirtualInterface------         , requestDescribeLags $---             describeLags------         , requestConfirmConnection $---             confirmConnection------         , requestDescribeDirectConnectGatewayAttachments $---             describeDirectConnectGatewayAttachments------         , requestConfirmPublicVirtualInterface $---             confirmPublicVirtualInterface------         , requestDescribeVirtualGateways $---             describeVirtualGateways------         , requestCreateDirectConnectGateway $---             createDirectConnectGateway------         , requestDeleteDirectConnectGateway $---             deleteDirectConnectGateway------         , requestDescribeVirtualInterfaces $---             describeVirtualInterfaces------         , requestAllocateHostedConnection $---             allocateHostedConnection------         , requestDeleteVirtualInterface $---             deleteVirtualInterface------         , requestCreatePrivateVirtualInterface $---             createPrivateVirtualInterface------         , requestAllocatePublicVirtualInterface $---             allocatePublicVirtualInterface------         , requestDisassociateConnectionFromLag $---             disassociateConnectionFromLag------         , requestTagResource $---             tagResource------         , requestDeleteLag $---             deleteLag------         , requestUpdateLag $---             updateLag------         , requestUntagResource $---             untagResource------         , requestCreateBGPPeer $---             createBGPPeer------         , requestAssociateHostedConnection $---             associateHostedConnection------         , requestCreateInterconnect $---             createInterconnect------         , requestDeleteBGPPeer $---             deleteBGPPeer------         , requestCreateLag $---             createLag------         , requestDescribeHostedConnections $---             describeHostedConnections------           ]----     , testGroup "response"---         [ responseDescribeDirectConnectGatewayAssociations $---             describeDirectConnectGatewayAssociationsResponse------         , responseDescribeInterconnects $---             describeInterconnectsResponse------         , responseDescribeTags $---             describeTagsResponse------         , responseDescribeLoa $---             describeLoaResponse------         , responseDeleteConnection $---             connection------         , responseAssociateConnectionWithLag $---             connection------         , responseCreateConnection $---             connection------         , responseDescribeDirectConnectGateways $---             describeDirectConnectGatewaysResponse------         , responseAssociateVirtualInterface $---             virtualInterface------         , responseDescribeConnections $---             connections------         , responseDeleteInterconnect $---             deleteInterconnectResponse------         , responseConfirmPrivateVirtualInterface $---             confirmPrivateVirtualInterfaceResponse------         , responseDeleteDirectConnectGatewayAssociation $---             deleteDirectConnectGatewayAssociationResponse------         , responseDescribeLocations $---             describeLocationsResponse------         , responseCreateDirectConnectGatewayAssociation $---             createDirectConnectGatewayAssociationResponse------         , responseCreatePublicVirtualInterface $---             virtualInterface------         , responseAllocatePrivateVirtualInterface $---             virtualInterface------         , responseDescribeLags $---             describeLagsResponse------         , responseConfirmConnection $---             confirmConnectionResponse------         , responseDescribeDirectConnectGatewayAttachments $---             describeDirectConnectGatewayAttachmentsResponse------         , responseConfirmPublicVirtualInterface $---             confirmPublicVirtualInterfaceResponse------         , responseDescribeVirtualGateways $---             describeVirtualGatewaysResponse------         , responseCreateDirectConnectGateway $---             createDirectConnectGatewayResponse------         , responseDeleteDirectConnectGateway $---             deleteDirectConnectGatewayResponse------         , responseDescribeVirtualInterfaces $---             describeVirtualInterfacesResponse------         , responseAllocateHostedConnection $---             connection------         , responseDeleteVirtualInterface $---             deleteVirtualInterfaceResponse------         , responseCreatePrivateVirtualInterface $---             virtualInterface------         , responseAllocatePublicVirtualInterface $---             virtualInterface------         , responseDisassociateConnectionFromLag $---             connection------         , responseTagResource $---             tagResourceResponse------         , responseDeleteLag $---             lag------         , responseUpdateLag $---             lag------         , responseUntagResource $---             untagResourceResponse------         , responseCreateBGPPeer $---             createBGPPeerResponse------         , responseAssociateHostedConnection $---             connection------         , responseCreateInterconnect $---             interconnect------         , responseDeleteBGPPeer $---             deleteBGPPeerResponse------         , responseCreateLag $---             lag------         , responseDescribeHostedConnections $---             connections------           ]---     ]---- Requests--requestDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociations -> TestTree-requestDescribeDirectConnectGatewayAssociations = req-    "DescribeDirectConnectGatewayAssociations"-    "fixture/DescribeDirectConnectGatewayAssociations.yaml"--requestDescribeInterconnects :: DescribeInterconnects -> TestTree-requestDescribeInterconnects = req-    "DescribeInterconnects"-    "fixture/DescribeInterconnects.yaml"--requestDescribeTags :: DescribeTags -> TestTree-requestDescribeTags = req-    "DescribeTags"-    "fixture/DescribeTags.yaml"--requestDescribeLoa :: DescribeLoa -> TestTree-requestDescribeLoa = req-    "DescribeLoa"-    "fixture/DescribeLoa.yaml"--requestDeleteConnection :: DeleteConnection -> TestTree-requestDeleteConnection = req-    "DeleteConnection"-    "fixture/DeleteConnection.yaml"--requestAssociateConnectionWithLag :: AssociateConnectionWithLag -> TestTree-requestAssociateConnectionWithLag = req-    "AssociateConnectionWithLag"-    "fixture/AssociateConnectionWithLag.yaml"--requestCreateConnection :: CreateConnection -> TestTree-requestCreateConnection = req-    "CreateConnection"-    "fixture/CreateConnection.yaml"--requestDescribeDirectConnectGateways :: DescribeDirectConnectGateways -> TestTree-requestDescribeDirectConnectGateways = req-    "DescribeDirectConnectGateways"-    "fixture/DescribeDirectConnectGateways.yaml"--requestAssociateVirtualInterface :: AssociateVirtualInterface -> TestTree-requestAssociateVirtualInterface = req-    "AssociateVirtualInterface"-    "fixture/AssociateVirtualInterface.yaml"--requestDescribeConnections :: DescribeConnections -> TestTree-requestDescribeConnections = req-    "DescribeConnections"-    "fixture/DescribeConnections.yaml"--requestDeleteInterconnect :: DeleteInterconnect -> TestTree-requestDeleteInterconnect = req-    "DeleteInterconnect"-    "fixture/DeleteInterconnect.yaml"--requestConfirmPrivateVirtualInterface :: ConfirmPrivateVirtualInterface -> TestTree-requestConfirmPrivateVirtualInterface = req-    "ConfirmPrivateVirtualInterface"-    "fixture/ConfirmPrivateVirtualInterface.yaml"--requestDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociation -> TestTree-requestDeleteDirectConnectGatewayAssociation = req-    "DeleteDirectConnectGatewayAssociation"-    "fixture/DeleteDirectConnectGatewayAssociation.yaml"--requestDescribeLocations :: DescribeLocations -> TestTree-requestDescribeLocations = req-    "DescribeLocations"-    "fixture/DescribeLocations.yaml"--requestCreateDirectConnectGatewayAssociation :: CreateDirectConnectGatewayAssociation -> TestTree-requestCreateDirectConnectGatewayAssociation = req-    "CreateDirectConnectGatewayAssociation"-    "fixture/CreateDirectConnectGatewayAssociation.yaml"--requestCreatePublicVirtualInterface :: CreatePublicVirtualInterface -> TestTree-requestCreatePublicVirtualInterface = req-    "CreatePublicVirtualInterface"-    "fixture/CreatePublicVirtualInterface.yaml"--requestAllocatePrivateVirtualInterface :: AllocatePrivateVirtualInterface -> TestTree-requestAllocatePrivateVirtualInterface = req-    "AllocatePrivateVirtualInterface"-    "fixture/AllocatePrivateVirtualInterface.yaml"--requestDescribeLags :: DescribeLags -> TestTree-requestDescribeLags = req-    "DescribeLags"-    "fixture/DescribeLags.yaml"--requestConfirmConnection :: ConfirmConnection -> TestTree-requestConfirmConnection = req-    "ConfirmConnection"-    "fixture/ConfirmConnection.yaml"--requestDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachments -> TestTree-requestDescribeDirectConnectGatewayAttachments = req-    "DescribeDirectConnectGatewayAttachments"-    "fixture/DescribeDirectConnectGatewayAttachments.yaml"--requestConfirmPublicVirtualInterface :: ConfirmPublicVirtualInterface -> TestTree-requestConfirmPublicVirtualInterface = req-    "ConfirmPublicVirtualInterface"-    "fixture/ConfirmPublicVirtualInterface.yaml"--requestDescribeVirtualGateways :: DescribeVirtualGateways -> TestTree-requestDescribeVirtualGateways = req-    "DescribeVirtualGateways"-    "fixture/DescribeVirtualGateways.yaml"--requestCreateDirectConnectGateway :: CreateDirectConnectGateway -> TestTree-requestCreateDirectConnectGateway = req-    "CreateDirectConnectGateway"-    "fixture/CreateDirectConnectGateway.yaml"--requestDeleteDirectConnectGateway :: DeleteDirectConnectGateway -> TestTree-requestDeleteDirectConnectGateway = req-    "DeleteDirectConnectGateway"-    "fixture/DeleteDirectConnectGateway.yaml"--requestDescribeVirtualInterfaces :: DescribeVirtualInterfaces -> TestTree-requestDescribeVirtualInterfaces = req-    "DescribeVirtualInterfaces"-    "fixture/DescribeVirtualInterfaces.yaml"--requestAllocateHostedConnection :: AllocateHostedConnection -> TestTree-requestAllocateHostedConnection = req-    "AllocateHostedConnection"-    "fixture/AllocateHostedConnection.yaml"--requestDeleteVirtualInterface :: DeleteVirtualInterface -> TestTree-requestDeleteVirtualInterface = req-    "DeleteVirtualInterface"-    "fixture/DeleteVirtualInterface.yaml"--requestCreatePrivateVirtualInterface :: CreatePrivateVirtualInterface -> TestTree-requestCreatePrivateVirtualInterface = req-    "CreatePrivateVirtualInterface"-    "fixture/CreatePrivateVirtualInterface.yaml"--requestAllocatePublicVirtualInterface :: AllocatePublicVirtualInterface -> TestTree-requestAllocatePublicVirtualInterface = req-    "AllocatePublicVirtualInterface"-    "fixture/AllocatePublicVirtualInterface.yaml"--requestDisassociateConnectionFromLag :: DisassociateConnectionFromLag -> TestTree-requestDisassociateConnectionFromLag = req-    "DisassociateConnectionFromLag"-    "fixture/DisassociateConnectionFromLag.yaml"--requestTagResource :: TagResource -> TestTree-requestTagResource = req-    "TagResource"-    "fixture/TagResource.yaml"--requestDeleteLag :: DeleteLag -> TestTree-requestDeleteLag = req-    "DeleteLag"-    "fixture/DeleteLag.yaml"--requestUpdateLag :: UpdateLag -> TestTree-requestUpdateLag = req-    "UpdateLag"-    "fixture/UpdateLag.yaml"--requestUntagResource :: UntagResource -> TestTree-requestUntagResource = req-    "UntagResource"-    "fixture/UntagResource.yaml"--requestCreateBGPPeer :: CreateBGPPeer -> TestTree-requestCreateBGPPeer = req-    "CreateBGPPeer"-    "fixture/CreateBGPPeer.yaml"--requestAssociateHostedConnection :: AssociateHostedConnection -> TestTree-requestAssociateHostedConnection = req-    "AssociateHostedConnection"-    "fixture/AssociateHostedConnection.yaml"--requestCreateInterconnect :: CreateInterconnect -> TestTree-requestCreateInterconnect = req-    "CreateInterconnect"-    "fixture/CreateInterconnect.yaml"--requestDeleteBGPPeer :: DeleteBGPPeer -> TestTree-requestDeleteBGPPeer = req-    "DeleteBGPPeer"-    "fixture/DeleteBGPPeer.yaml"--requestCreateLag :: CreateLag -> TestTree-requestCreateLag = req-    "CreateLag"-    "fixture/CreateLag.yaml"--requestDescribeHostedConnections :: DescribeHostedConnections -> TestTree-requestDescribeHostedConnections = req-    "DescribeHostedConnections"-    "fixture/DescribeHostedConnections.yaml"---- Responses--responseDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociationsResponse -> TestTree-responseDescribeDirectConnectGatewayAssociations = res-    "DescribeDirectConnectGatewayAssociationsResponse"-    "fixture/DescribeDirectConnectGatewayAssociationsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeDirectConnectGatewayAssociations)--responseDescribeInterconnects :: DescribeInterconnectsResponse -> TestTree-responseDescribeInterconnects = res-    "DescribeInterconnectsResponse"-    "fixture/DescribeInterconnectsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeInterconnects)--responseDescribeTags :: DescribeTagsResponse -> TestTree-responseDescribeTags = res-    "DescribeTagsResponse"-    "fixture/DescribeTagsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeTags)--responseDescribeLoa :: DescribeLoaResponse -> TestTree-responseDescribeLoa = res-    "DescribeLoaResponse"-    "fixture/DescribeLoaResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeLoa)--responseDeleteConnection :: Connection -> TestTree-responseDeleteConnection = res-    "DeleteConnectionResponse"-    "fixture/DeleteConnectionResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteConnection)--responseAssociateConnectionWithLag :: Connection -> TestTree-responseAssociateConnectionWithLag = res-    "AssociateConnectionWithLagResponse"-    "fixture/AssociateConnectionWithLagResponse.proto"-    directConnect-    (Proxy :: Proxy AssociateConnectionWithLag)--responseCreateConnection :: Connection -> TestTree-responseCreateConnection = res-    "CreateConnectionResponse"-    "fixture/CreateConnectionResponse.proto"-    directConnect-    (Proxy :: Proxy CreateConnection)--responseDescribeDirectConnectGateways :: DescribeDirectConnectGatewaysResponse -> TestTree-responseDescribeDirectConnectGateways = res-    "DescribeDirectConnectGatewaysResponse"-    "fixture/DescribeDirectConnectGatewaysResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeDirectConnectGateways)--responseAssociateVirtualInterface :: VirtualInterface -> TestTree-responseAssociateVirtualInterface = res-    "AssociateVirtualInterfaceResponse"-    "fixture/AssociateVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy AssociateVirtualInterface)--responseDescribeConnections :: Connections -> TestTree-responseDescribeConnections = res-    "DescribeConnectionsResponse"-    "fixture/DescribeConnectionsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeConnections)--responseDeleteInterconnect :: DeleteInterconnectResponse -> TestTree-responseDeleteInterconnect = res-    "DeleteInterconnectResponse"-    "fixture/DeleteInterconnectResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteInterconnect)--responseConfirmPrivateVirtualInterface :: ConfirmPrivateVirtualInterfaceResponse -> TestTree-responseConfirmPrivateVirtualInterface = res-    "ConfirmPrivateVirtualInterfaceResponse"-    "fixture/ConfirmPrivateVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy ConfirmPrivateVirtualInterface)--responseDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociationResponse -> TestTree-responseDeleteDirectConnectGatewayAssociation = res-    "DeleteDirectConnectGatewayAssociationResponse"-    "fixture/DeleteDirectConnectGatewayAssociationResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteDirectConnectGatewayAssociation)--responseDescribeLocations :: DescribeLocationsResponse -> TestTree-responseDescribeLocations = res-    "DescribeLocationsResponse"-    "fixture/DescribeLocationsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeLocations)--responseCreateDirectConnectGatewayAssociation :: CreateDirectConnectGatewayAssociationResponse -> TestTree-responseCreateDirectConnectGatewayAssociation = res-    "CreateDirectConnectGatewayAssociationResponse"-    "fixture/CreateDirectConnectGatewayAssociationResponse.proto"-    directConnect-    (Proxy :: Proxy CreateDirectConnectGatewayAssociation)--responseCreatePublicVirtualInterface :: VirtualInterface -> TestTree-responseCreatePublicVirtualInterface = res-    "CreatePublicVirtualInterfaceResponse"-    "fixture/CreatePublicVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy CreatePublicVirtualInterface)--responseAllocatePrivateVirtualInterface :: VirtualInterface -> TestTree-responseAllocatePrivateVirtualInterface = res-    "AllocatePrivateVirtualInterfaceResponse"-    "fixture/AllocatePrivateVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy AllocatePrivateVirtualInterface)--responseDescribeLags :: DescribeLagsResponse -> TestTree-responseDescribeLags = res-    "DescribeLagsResponse"-    "fixture/DescribeLagsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeLags)--responseConfirmConnection :: ConfirmConnectionResponse -> TestTree-responseConfirmConnection = res-    "ConfirmConnectionResponse"-    "fixture/ConfirmConnectionResponse.proto"-    directConnect-    (Proxy :: Proxy ConfirmConnection)--responseDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachmentsResponse -> TestTree-responseDescribeDirectConnectGatewayAttachments = res-    "DescribeDirectConnectGatewayAttachmentsResponse"-    "fixture/DescribeDirectConnectGatewayAttachmentsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeDirectConnectGatewayAttachments)--responseConfirmPublicVirtualInterface :: ConfirmPublicVirtualInterfaceResponse -> TestTree-responseConfirmPublicVirtualInterface = res-    "ConfirmPublicVirtualInterfaceResponse"-    "fixture/ConfirmPublicVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy ConfirmPublicVirtualInterface)--responseDescribeVirtualGateways :: DescribeVirtualGatewaysResponse -> TestTree-responseDescribeVirtualGateways = res-    "DescribeVirtualGatewaysResponse"-    "fixture/DescribeVirtualGatewaysResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeVirtualGateways)--responseCreateDirectConnectGateway :: CreateDirectConnectGatewayResponse -> TestTree-responseCreateDirectConnectGateway = res-    "CreateDirectConnectGatewayResponse"-    "fixture/CreateDirectConnectGatewayResponse.proto"-    directConnect-    (Proxy :: Proxy CreateDirectConnectGateway)--responseDeleteDirectConnectGateway :: DeleteDirectConnectGatewayResponse -> TestTree-responseDeleteDirectConnectGateway = res-    "DeleteDirectConnectGatewayResponse"-    "fixture/DeleteDirectConnectGatewayResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteDirectConnectGateway)--responseDescribeVirtualInterfaces :: DescribeVirtualInterfacesResponse -> TestTree-responseDescribeVirtualInterfaces = res-    "DescribeVirtualInterfacesResponse"-    "fixture/DescribeVirtualInterfacesResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeVirtualInterfaces)--responseAllocateHostedConnection :: Connection -> TestTree-responseAllocateHostedConnection = res-    "AllocateHostedConnectionResponse"-    "fixture/AllocateHostedConnectionResponse.proto"-    directConnect-    (Proxy :: Proxy AllocateHostedConnection)--responseDeleteVirtualInterface :: DeleteVirtualInterfaceResponse -> TestTree-responseDeleteVirtualInterface = res-    "DeleteVirtualInterfaceResponse"-    "fixture/DeleteVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteVirtualInterface)--responseCreatePrivateVirtualInterface :: VirtualInterface -> TestTree-responseCreatePrivateVirtualInterface = res-    "CreatePrivateVirtualInterfaceResponse"-    "fixture/CreatePrivateVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy CreatePrivateVirtualInterface)--responseAllocatePublicVirtualInterface :: VirtualInterface -> TestTree-responseAllocatePublicVirtualInterface = res-    "AllocatePublicVirtualInterfaceResponse"-    "fixture/AllocatePublicVirtualInterfaceResponse.proto"-    directConnect-    (Proxy :: Proxy AllocatePublicVirtualInterface)--responseDisassociateConnectionFromLag :: Connection -> TestTree-responseDisassociateConnectionFromLag = res-    "DisassociateConnectionFromLagResponse"-    "fixture/DisassociateConnectionFromLagResponse.proto"-    directConnect-    (Proxy :: Proxy DisassociateConnectionFromLag)--responseTagResource :: TagResourceResponse -> TestTree-responseTagResource = res-    "TagResourceResponse"-    "fixture/TagResourceResponse.proto"-    directConnect-    (Proxy :: Proxy TagResource)--responseDeleteLag :: Lag -> TestTree-responseDeleteLag = res-    "DeleteLagResponse"-    "fixture/DeleteLagResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteLag)--responseUpdateLag :: Lag -> TestTree-responseUpdateLag = res-    "UpdateLagResponse"-    "fixture/UpdateLagResponse.proto"-    directConnect-    (Proxy :: Proxy UpdateLag)--responseUntagResource :: UntagResourceResponse -> TestTree-responseUntagResource = res-    "UntagResourceResponse"-    "fixture/UntagResourceResponse.proto"-    directConnect-    (Proxy :: Proxy UntagResource)--responseCreateBGPPeer :: CreateBGPPeerResponse -> TestTree-responseCreateBGPPeer = res-    "CreateBGPPeerResponse"-    "fixture/CreateBGPPeerResponse.proto"-    directConnect-    (Proxy :: Proxy CreateBGPPeer)--responseAssociateHostedConnection :: Connection -> TestTree-responseAssociateHostedConnection = res-    "AssociateHostedConnectionResponse"-    "fixture/AssociateHostedConnectionResponse.proto"-    directConnect-    (Proxy :: Proxy AssociateHostedConnection)--responseCreateInterconnect :: Interconnect -> TestTree-responseCreateInterconnect = res-    "CreateInterconnectResponse"-    "fixture/CreateInterconnectResponse.proto"-    directConnect-    (Proxy :: Proxy CreateInterconnect)--responseDeleteBGPPeer :: DeleteBGPPeerResponse -> TestTree-responseDeleteBGPPeer = res-    "DeleteBGPPeerResponse"-    "fixture/DeleteBGPPeerResponse.proto"-    directConnect-    (Proxy :: Proxy DeleteBGPPeer)--responseCreateLag :: Lag -> TestTree-responseCreateLag = res-    "CreateLagResponse"-    "fixture/CreateLagResponse.proto"-    directConnect-    (Proxy :: Proxy CreateLag)--responseDescribeHostedConnections :: Connections -> TestTree-responseDescribeHostedConnections = res-    "DescribeHostedConnectionsResponse"-    "fixture/DescribeHostedConnectionsResponse.proto"-    directConnect-    (Proxy :: Proxy DescribeHostedConnections)
+ test/Test/Amazonka/DirectConnect.hs view
@@ -0,0 +1,20 @@+-- |+-- Module      : Test.Amazonka.DirectConnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.DirectConnect+  ( tests,+    fixtures,+  )+where++import Test.Tasty (TestTree)++tests :: [TestTree]+tests = []++fixtures :: [TestTree]+fixtures = []
+ test/Test/Amazonka/DirectConnect/Internal.hs view
@@ -0,0 +1,8 @@+-- |+-- Module      : Test.Amazonka.DirectConnect.Internal+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.DirectConnect.Internal where
+ test/Test/Amazonka/Gen/DirectConnect.hs view
@@ -0,0 +1,1218 @@+{-# OPTIONS_GHC -fno-warn-orphans #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Test.Amazonka.Gen.DirectConnect+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.Gen.DirectConnect where++import Amazonka.DirectConnect+import qualified Data.Proxy as Proxy+import Test.Amazonka.DirectConnect.Internal+import Test.Amazonka.Fixture+import Test.Amazonka.Prelude+import Test.Tasty++-- Auto-generated: the actual test selection needs to be manually placed into+-- the top-level so that real test data can be incrementally added.+--+-- This commented snippet is what the entire set should look like:++-- fixtures :: TestTree+-- fixtures =+--     [ testGroup "request"+--         [ requestAcceptDirectConnectGatewayAssociationProposal $+--             newAcceptDirectConnectGatewayAssociationProposal+--+--         , requestAllocateHostedConnection $+--             newAllocateHostedConnection+--+--         , requestAllocatePrivateVirtualInterface $+--             newAllocatePrivateVirtualInterface+--+--         , requestAllocatePublicVirtualInterface $+--             newAllocatePublicVirtualInterface+--+--         , requestAllocateTransitVirtualInterface $+--             newAllocateTransitVirtualInterface+--+--         , requestAssociateConnectionWithLag $+--             newAssociateConnectionWithLag+--+--         , requestAssociateHostedConnection $+--             newAssociateHostedConnection+--+--         , requestAssociateMacSecKey $+--             newAssociateMacSecKey+--+--         , requestAssociateVirtualInterface $+--             newAssociateVirtualInterface+--+--         , requestConfirmConnection $+--             newConfirmConnection+--+--         , requestConfirmCustomerAgreement $+--             newConfirmCustomerAgreement+--+--         , requestConfirmPrivateVirtualInterface $+--             newConfirmPrivateVirtualInterface+--+--         , requestConfirmPublicVirtualInterface $+--             newConfirmPublicVirtualInterface+--+--         , requestConfirmTransitVirtualInterface $+--             newConfirmTransitVirtualInterface+--+--         , requestCreateBGPPeer $+--             newCreateBGPPeer+--+--         , requestCreateConnection $+--             newCreateConnection+--+--         , requestCreateDirectConnectGateway $+--             newCreateDirectConnectGateway+--+--         , requestCreateDirectConnectGatewayAssociation $+--             newCreateDirectConnectGatewayAssociation+--+--         , requestCreateDirectConnectGatewayAssociationProposal $+--             newCreateDirectConnectGatewayAssociationProposal+--+--         , requestCreateInterconnect $+--             newCreateInterconnect+--+--         , requestCreateLag $+--             newCreateLag+--+--         , requestCreatePrivateVirtualInterface $+--             newCreatePrivateVirtualInterface+--+--         , requestCreatePublicVirtualInterface $+--             newCreatePublicVirtualInterface+--+--         , requestCreateTransitVirtualInterface $+--             newCreateTransitVirtualInterface+--+--         , requestDeleteBGPPeer $+--             newDeleteBGPPeer+--+--         , requestDeleteConnection $+--             newDeleteConnection+--+--         , requestDeleteDirectConnectGateway $+--             newDeleteDirectConnectGateway+--+--         , requestDeleteDirectConnectGatewayAssociation $+--             newDeleteDirectConnectGatewayAssociation+--+--         , requestDeleteDirectConnectGatewayAssociationProposal $+--             newDeleteDirectConnectGatewayAssociationProposal+--+--         , requestDeleteInterconnect $+--             newDeleteInterconnect+--+--         , requestDeleteLag $+--             newDeleteLag+--+--         , requestDeleteVirtualInterface $+--             newDeleteVirtualInterface+--+--         , requestDescribeConnections $+--             newDescribeConnections+--+--         , requestDescribeCustomerMetadata $+--             newDescribeCustomerMetadata+--+--         , requestDescribeDirectConnectGatewayAssociationProposals $+--             newDescribeDirectConnectGatewayAssociationProposals+--+--         , requestDescribeDirectConnectGatewayAssociations $+--             newDescribeDirectConnectGatewayAssociations+--+--         , requestDescribeDirectConnectGatewayAttachments $+--             newDescribeDirectConnectGatewayAttachments+--+--         , requestDescribeDirectConnectGateways $+--             newDescribeDirectConnectGateways+--+--         , requestDescribeHostedConnections $+--             newDescribeHostedConnections+--+--         , requestDescribeInterconnects $+--             newDescribeInterconnects+--+--         , requestDescribeLags $+--             newDescribeLags+--+--         , requestDescribeLoa $+--             newDescribeLoa+--+--         , requestDescribeLocations $+--             newDescribeLocations+--+--         , requestDescribeRouterConfiguration $+--             newDescribeRouterConfiguration+--+--         , requestDescribeTags $+--             newDescribeTags+--+--         , requestDescribeVirtualGateways $+--             newDescribeVirtualGateways+--+--         , requestDescribeVirtualInterfaces $+--             newDescribeVirtualInterfaces+--+--         , requestDisassociateConnectionFromLag $+--             newDisassociateConnectionFromLag+--+--         , requestDisassociateMacSecKey $+--             newDisassociateMacSecKey+--+--         , requestListVirtualInterfaceTestHistory $+--             newListVirtualInterfaceTestHistory+--+--         , requestStartBgpFailoverTest $+--             newStartBgpFailoverTest+--+--         , requestStopBgpFailoverTest $+--             newStopBgpFailoverTest+--+--         , requestTagResource $+--             newTagResource+--+--         , requestUntagResource $+--             newUntagResource+--+--         , requestUpdateConnection $+--             newUpdateConnection+--+--         , requestUpdateDirectConnectGateway $+--             newUpdateDirectConnectGateway+--+--         , requestUpdateDirectConnectGatewayAssociation $+--             newUpdateDirectConnectGatewayAssociation+--+--         , requestUpdateLag $+--             newUpdateLag+--+--         , requestUpdateVirtualInterfaceAttributes $+--             newUpdateVirtualInterfaceAttributes+--+--           ]++--     , testGroup "response"+--         [ responseAcceptDirectConnectGatewayAssociationProposal $+--             newAcceptDirectConnectGatewayAssociationProposalResponse+--+--         , responseAllocateHostedConnection $+--             newConnection+--+--         , responseAllocatePrivateVirtualInterface $+--             newVirtualInterface+--+--         , responseAllocatePublicVirtualInterface $+--             newVirtualInterface+--+--         , responseAllocateTransitVirtualInterface $+--             newAllocateTransitVirtualInterfaceResponse+--+--         , responseAssociateConnectionWithLag $+--             newConnection+--+--         , responseAssociateHostedConnection $+--             newConnection+--+--         , responseAssociateMacSecKey $+--             newAssociateMacSecKeyResponse+--+--         , responseAssociateVirtualInterface $+--             newVirtualInterface+--+--         , responseConfirmConnection $+--             newConfirmConnectionResponse+--+--         , responseConfirmCustomerAgreement $+--             newConfirmCustomerAgreementResponse+--+--         , responseConfirmPrivateVirtualInterface $+--             newConfirmPrivateVirtualInterfaceResponse+--+--         , responseConfirmPublicVirtualInterface $+--             newConfirmPublicVirtualInterfaceResponse+--+--         , responseConfirmTransitVirtualInterface $+--             newConfirmTransitVirtualInterfaceResponse+--+--         , responseCreateBGPPeer $+--             newCreateBGPPeerResponse+--+--         , responseCreateConnection $+--             newConnection+--+--         , responseCreateDirectConnectGateway $+--             newCreateDirectConnectGatewayResponse+--+--         , responseCreateDirectConnectGatewayAssociation $+--             newCreateDirectConnectGatewayAssociationResponse+--+--         , responseCreateDirectConnectGatewayAssociationProposal $+--             newCreateDirectConnectGatewayAssociationProposalResponse+--+--         , responseCreateInterconnect $+--             newInterconnect+--+--         , responseCreateLag $+--             newLag+--+--         , responseCreatePrivateVirtualInterface $+--             newVirtualInterface+--+--         , responseCreatePublicVirtualInterface $+--             newVirtualInterface+--+--         , responseCreateTransitVirtualInterface $+--             newCreateTransitVirtualInterfaceResponse+--+--         , responseDeleteBGPPeer $+--             newDeleteBGPPeerResponse+--+--         , responseDeleteConnection $+--             newConnection+--+--         , responseDeleteDirectConnectGateway $+--             newDeleteDirectConnectGatewayResponse+--+--         , responseDeleteDirectConnectGatewayAssociation $+--             newDeleteDirectConnectGatewayAssociationResponse+--+--         , responseDeleteDirectConnectGatewayAssociationProposal $+--             newDeleteDirectConnectGatewayAssociationProposalResponse+--+--         , responseDeleteInterconnect $+--             newDeleteInterconnectResponse+--+--         , responseDeleteLag $+--             newLag+--+--         , responseDeleteVirtualInterface $+--             newDeleteVirtualInterfaceResponse+--+--         , responseDescribeConnections $+--             newConnections+--+--         , responseDescribeCustomerMetadata $+--             newDescribeCustomerMetadataResponse+--+--         , responseDescribeDirectConnectGatewayAssociationProposals $+--             newDescribeDirectConnectGatewayAssociationProposalsResponse+--+--         , responseDescribeDirectConnectGatewayAssociations $+--             newDescribeDirectConnectGatewayAssociationsResponse+--+--         , responseDescribeDirectConnectGatewayAttachments $+--             newDescribeDirectConnectGatewayAttachmentsResponse+--+--         , responseDescribeDirectConnectGateways $+--             newDescribeDirectConnectGatewaysResponse+--+--         , responseDescribeHostedConnections $+--             newConnections+--+--         , responseDescribeInterconnects $+--             newDescribeInterconnectsResponse+--+--         , responseDescribeLags $+--             newDescribeLagsResponse+--+--         , responseDescribeLoa $+--             newDescribeLoaResponse+--+--         , responseDescribeLocations $+--             newDescribeLocationsResponse+--+--         , responseDescribeRouterConfiguration $+--             newDescribeRouterConfigurationResponse+--+--         , responseDescribeTags $+--             newDescribeTagsResponse+--+--         , responseDescribeVirtualGateways $+--             newDescribeVirtualGatewaysResponse+--+--         , responseDescribeVirtualInterfaces $+--             newDescribeVirtualInterfacesResponse+--+--         , responseDisassociateConnectionFromLag $+--             newConnection+--+--         , responseDisassociateMacSecKey $+--             newDisassociateMacSecKeyResponse+--+--         , responseListVirtualInterfaceTestHistory $+--             newListVirtualInterfaceTestHistoryResponse+--+--         , responseStartBgpFailoverTest $+--             newStartBgpFailoverTestResponse+--+--         , responseStopBgpFailoverTest $+--             newStopBgpFailoverTestResponse+--+--         , responseTagResource $+--             newTagResourceResponse+--+--         , responseUntagResource $+--             newUntagResourceResponse+--+--         , responseUpdateConnection $+--             newConnection+--+--         , responseUpdateDirectConnectGateway $+--             newUpdateDirectConnectGatewayResponse+--+--         , responseUpdateDirectConnectGatewayAssociation $+--             newUpdateDirectConnectGatewayAssociationResponse+--+--         , responseUpdateLag $+--             newLag+--+--         , responseUpdateVirtualInterfaceAttributes $+--             newVirtualInterface+--+--           ]+--     ]++-- Requests++requestAcceptDirectConnectGatewayAssociationProposal :: AcceptDirectConnectGatewayAssociationProposal -> TestTree+requestAcceptDirectConnectGatewayAssociationProposal =+  req+    "AcceptDirectConnectGatewayAssociationProposal"+    "fixture/AcceptDirectConnectGatewayAssociationProposal.yaml"++requestAllocateHostedConnection :: AllocateHostedConnection -> TestTree+requestAllocateHostedConnection =+  req+    "AllocateHostedConnection"+    "fixture/AllocateHostedConnection.yaml"++requestAllocatePrivateVirtualInterface :: AllocatePrivateVirtualInterface -> TestTree+requestAllocatePrivateVirtualInterface =+  req+    "AllocatePrivateVirtualInterface"+    "fixture/AllocatePrivateVirtualInterface.yaml"++requestAllocatePublicVirtualInterface :: AllocatePublicVirtualInterface -> TestTree+requestAllocatePublicVirtualInterface =+  req+    "AllocatePublicVirtualInterface"+    "fixture/AllocatePublicVirtualInterface.yaml"++requestAllocateTransitVirtualInterface :: AllocateTransitVirtualInterface -> TestTree+requestAllocateTransitVirtualInterface =+  req+    "AllocateTransitVirtualInterface"+    "fixture/AllocateTransitVirtualInterface.yaml"++requestAssociateConnectionWithLag :: AssociateConnectionWithLag -> TestTree+requestAssociateConnectionWithLag =+  req+    "AssociateConnectionWithLag"+    "fixture/AssociateConnectionWithLag.yaml"++requestAssociateHostedConnection :: AssociateHostedConnection -> TestTree+requestAssociateHostedConnection =+  req+    "AssociateHostedConnection"+    "fixture/AssociateHostedConnection.yaml"++requestAssociateMacSecKey :: AssociateMacSecKey -> TestTree+requestAssociateMacSecKey =+  req+    "AssociateMacSecKey"+    "fixture/AssociateMacSecKey.yaml"++requestAssociateVirtualInterface :: AssociateVirtualInterface -> TestTree+requestAssociateVirtualInterface =+  req+    "AssociateVirtualInterface"+    "fixture/AssociateVirtualInterface.yaml"++requestConfirmConnection :: ConfirmConnection -> TestTree+requestConfirmConnection =+  req+    "ConfirmConnection"+    "fixture/ConfirmConnection.yaml"++requestConfirmCustomerAgreement :: ConfirmCustomerAgreement -> TestTree+requestConfirmCustomerAgreement =+  req+    "ConfirmCustomerAgreement"+    "fixture/ConfirmCustomerAgreement.yaml"++requestConfirmPrivateVirtualInterface :: ConfirmPrivateVirtualInterface -> TestTree+requestConfirmPrivateVirtualInterface =+  req+    "ConfirmPrivateVirtualInterface"+    "fixture/ConfirmPrivateVirtualInterface.yaml"++requestConfirmPublicVirtualInterface :: ConfirmPublicVirtualInterface -> TestTree+requestConfirmPublicVirtualInterface =+  req+    "ConfirmPublicVirtualInterface"+    "fixture/ConfirmPublicVirtualInterface.yaml"++requestConfirmTransitVirtualInterface :: ConfirmTransitVirtualInterface -> TestTree+requestConfirmTransitVirtualInterface =+  req+    "ConfirmTransitVirtualInterface"+    "fixture/ConfirmTransitVirtualInterface.yaml"++requestCreateBGPPeer :: CreateBGPPeer -> TestTree+requestCreateBGPPeer =+  req+    "CreateBGPPeer"+    "fixture/CreateBGPPeer.yaml"++requestCreateConnection :: CreateConnection -> TestTree+requestCreateConnection =+  req+    "CreateConnection"+    "fixture/CreateConnection.yaml"++requestCreateDirectConnectGateway :: CreateDirectConnectGateway -> TestTree+requestCreateDirectConnectGateway =+  req+    "CreateDirectConnectGateway"+    "fixture/CreateDirectConnectGateway.yaml"++requestCreateDirectConnectGatewayAssociation :: CreateDirectConnectGatewayAssociation -> TestTree+requestCreateDirectConnectGatewayAssociation =+  req+    "CreateDirectConnectGatewayAssociation"+    "fixture/CreateDirectConnectGatewayAssociation.yaml"++requestCreateDirectConnectGatewayAssociationProposal :: CreateDirectConnectGatewayAssociationProposal -> TestTree+requestCreateDirectConnectGatewayAssociationProposal =+  req+    "CreateDirectConnectGatewayAssociationProposal"+    "fixture/CreateDirectConnectGatewayAssociationProposal.yaml"++requestCreateInterconnect :: CreateInterconnect -> TestTree+requestCreateInterconnect =+  req+    "CreateInterconnect"+    "fixture/CreateInterconnect.yaml"++requestCreateLag :: CreateLag -> TestTree+requestCreateLag =+  req+    "CreateLag"+    "fixture/CreateLag.yaml"++requestCreatePrivateVirtualInterface :: CreatePrivateVirtualInterface -> TestTree+requestCreatePrivateVirtualInterface =+  req+    "CreatePrivateVirtualInterface"+    "fixture/CreatePrivateVirtualInterface.yaml"++requestCreatePublicVirtualInterface :: CreatePublicVirtualInterface -> TestTree+requestCreatePublicVirtualInterface =+  req+    "CreatePublicVirtualInterface"+    "fixture/CreatePublicVirtualInterface.yaml"++requestCreateTransitVirtualInterface :: CreateTransitVirtualInterface -> TestTree+requestCreateTransitVirtualInterface =+  req+    "CreateTransitVirtualInterface"+    "fixture/CreateTransitVirtualInterface.yaml"++requestDeleteBGPPeer :: DeleteBGPPeer -> TestTree+requestDeleteBGPPeer =+  req+    "DeleteBGPPeer"+    "fixture/DeleteBGPPeer.yaml"++requestDeleteConnection :: DeleteConnection -> TestTree+requestDeleteConnection =+  req+    "DeleteConnection"+    "fixture/DeleteConnection.yaml"++requestDeleteDirectConnectGateway :: DeleteDirectConnectGateway -> TestTree+requestDeleteDirectConnectGateway =+  req+    "DeleteDirectConnectGateway"+    "fixture/DeleteDirectConnectGateway.yaml"++requestDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociation -> TestTree+requestDeleteDirectConnectGatewayAssociation =+  req+    "DeleteDirectConnectGatewayAssociation"+    "fixture/DeleteDirectConnectGatewayAssociation.yaml"++requestDeleteDirectConnectGatewayAssociationProposal :: DeleteDirectConnectGatewayAssociationProposal -> TestTree+requestDeleteDirectConnectGatewayAssociationProposal =+  req+    "DeleteDirectConnectGatewayAssociationProposal"+    "fixture/DeleteDirectConnectGatewayAssociationProposal.yaml"++requestDeleteInterconnect :: DeleteInterconnect -> TestTree+requestDeleteInterconnect =+  req+    "DeleteInterconnect"+    "fixture/DeleteInterconnect.yaml"++requestDeleteLag :: DeleteLag -> TestTree+requestDeleteLag =+  req+    "DeleteLag"+    "fixture/DeleteLag.yaml"++requestDeleteVirtualInterface :: DeleteVirtualInterface -> TestTree+requestDeleteVirtualInterface =+  req+    "DeleteVirtualInterface"+    "fixture/DeleteVirtualInterface.yaml"++requestDescribeConnections :: DescribeConnections -> TestTree+requestDescribeConnections =+  req+    "DescribeConnections"+    "fixture/DescribeConnections.yaml"++requestDescribeCustomerMetadata :: DescribeCustomerMetadata -> TestTree+requestDescribeCustomerMetadata =+  req+    "DescribeCustomerMetadata"+    "fixture/DescribeCustomerMetadata.yaml"++requestDescribeDirectConnectGatewayAssociationProposals :: DescribeDirectConnectGatewayAssociationProposals -> TestTree+requestDescribeDirectConnectGatewayAssociationProposals =+  req+    "DescribeDirectConnectGatewayAssociationProposals"+    "fixture/DescribeDirectConnectGatewayAssociationProposals.yaml"++requestDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociations -> TestTree+requestDescribeDirectConnectGatewayAssociations =+  req+    "DescribeDirectConnectGatewayAssociations"+    "fixture/DescribeDirectConnectGatewayAssociations.yaml"++requestDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachments -> TestTree+requestDescribeDirectConnectGatewayAttachments =+  req+    "DescribeDirectConnectGatewayAttachments"+    "fixture/DescribeDirectConnectGatewayAttachments.yaml"++requestDescribeDirectConnectGateways :: DescribeDirectConnectGateways -> TestTree+requestDescribeDirectConnectGateways =+  req+    "DescribeDirectConnectGateways"+    "fixture/DescribeDirectConnectGateways.yaml"++requestDescribeHostedConnections :: DescribeHostedConnections -> TestTree+requestDescribeHostedConnections =+  req+    "DescribeHostedConnections"+    "fixture/DescribeHostedConnections.yaml"++requestDescribeInterconnects :: DescribeInterconnects -> TestTree+requestDescribeInterconnects =+  req+    "DescribeInterconnects"+    "fixture/DescribeInterconnects.yaml"++requestDescribeLags :: DescribeLags -> TestTree+requestDescribeLags =+  req+    "DescribeLags"+    "fixture/DescribeLags.yaml"++requestDescribeLoa :: DescribeLoa -> TestTree+requestDescribeLoa =+  req+    "DescribeLoa"+    "fixture/DescribeLoa.yaml"++requestDescribeLocations :: DescribeLocations -> TestTree+requestDescribeLocations =+  req+    "DescribeLocations"+    "fixture/DescribeLocations.yaml"++requestDescribeRouterConfiguration :: DescribeRouterConfiguration -> TestTree+requestDescribeRouterConfiguration =+  req+    "DescribeRouterConfiguration"+    "fixture/DescribeRouterConfiguration.yaml"++requestDescribeTags :: DescribeTags -> TestTree+requestDescribeTags =+  req+    "DescribeTags"+    "fixture/DescribeTags.yaml"++requestDescribeVirtualGateways :: DescribeVirtualGateways -> TestTree+requestDescribeVirtualGateways =+  req+    "DescribeVirtualGateways"+    "fixture/DescribeVirtualGateways.yaml"++requestDescribeVirtualInterfaces :: DescribeVirtualInterfaces -> TestTree+requestDescribeVirtualInterfaces =+  req+    "DescribeVirtualInterfaces"+    "fixture/DescribeVirtualInterfaces.yaml"++requestDisassociateConnectionFromLag :: DisassociateConnectionFromLag -> TestTree+requestDisassociateConnectionFromLag =+  req+    "DisassociateConnectionFromLag"+    "fixture/DisassociateConnectionFromLag.yaml"++requestDisassociateMacSecKey :: DisassociateMacSecKey -> TestTree+requestDisassociateMacSecKey =+  req+    "DisassociateMacSecKey"+    "fixture/DisassociateMacSecKey.yaml"++requestListVirtualInterfaceTestHistory :: ListVirtualInterfaceTestHistory -> TestTree+requestListVirtualInterfaceTestHistory =+  req+    "ListVirtualInterfaceTestHistory"+    "fixture/ListVirtualInterfaceTestHistory.yaml"++requestStartBgpFailoverTest :: StartBgpFailoverTest -> TestTree+requestStartBgpFailoverTest =+  req+    "StartBgpFailoverTest"+    "fixture/StartBgpFailoverTest.yaml"++requestStopBgpFailoverTest :: StopBgpFailoverTest -> TestTree+requestStopBgpFailoverTest =+  req+    "StopBgpFailoverTest"+    "fixture/StopBgpFailoverTest.yaml"++requestTagResource :: TagResource -> TestTree+requestTagResource =+  req+    "TagResource"+    "fixture/TagResource.yaml"++requestUntagResource :: UntagResource -> TestTree+requestUntagResource =+  req+    "UntagResource"+    "fixture/UntagResource.yaml"++requestUpdateConnection :: UpdateConnection -> TestTree+requestUpdateConnection =+  req+    "UpdateConnection"+    "fixture/UpdateConnection.yaml"++requestUpdateDirectConnectGateway :: UpdateDirectConnectGateway -> TestTree+requestUpdateDirectConnectGateway =+  req+    "UpdateDirectConnectGateway"+    "fixture/UpdateDirectConnectGateway.yaml"++requestUpdateDirectConnectGatewayAssociation :: UpdateDirectConnectGatewayAssociation -> TestTree+requestUpdateDirectConnectGatewayAssociation =+  req+    "UpdateDirectConnectGatewayAssociation"+    "fixture/UpdateDirectConnectGatewayAssociation.yaml"++requestUpdateLag :: UpdateLag -> TestTree+requestUpdateLag =+  req+    "UpdateLag"+    "fixture/UpdateLag.yaml"++requestUpdateVirtualInterfaceAttributes :: UpdateVirtualInterfaceAttributes -> TestTree+requestUpdateVirtualInterfaceAttributes =+  req+    "UpdateVirtualInterfaceAttributes"+    "fixture/UpdateVirtualInterfaceAttributes.yaml"++-- Responses++responseAcceptDirectConnectGatewayAssociationProposal :: AcceptDirectConnectGatewayAssociationProposalResponse -> TestTree+responseAcceptDirectConnectGatewayAssociationProposal =+  res+    "AcceptDirectConnectGatewayAssociationProposalResponse"+    "fixture/AcceptDirectConnectGatewayAssociationProposalResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AcceptDirectConnectGatewayAssociationProposal)++responseAllocateHostedConnection :: Connection -> TestTree+responseAllocateHostedConnection =+  res+    "AllocateHostedConnectionResponse"+    "fixture/AllocateHostedConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AllocateHostedConnection)++responseAllocatePrivateVirtualInterface :: VirtualInterface -> TestTree+responseAllocatePrivateVirtualInterface =+  res+    "AllocatePrivateVirtualInterfaceResponse"+    "fixture/AllocatePrivateVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AllocatePrivateVirtualInterface)++responseAllocatePublicVirtualInterface :: VirtualInterface -> TestTree+responseAllocatePublicVirtualInterface =+  res+    "AllocatePublicVirtualInterfaceResponse"+    "fixture/AllocatePublicVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AllocatePublicVirtualInterface)++responseAllocateTransitVirtualInterface :: AllocateTransitVirtualInterfaceResponse -> TestTree+responseAllocateTransitVirtualInterface =+  res+    "AllocateTransitVirtualInterfaceResponse"+    "fixture/AllocateTransitVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AllocateTransitVirtualInterface)++responseAssociateConnectionWithLag :: Connection -> TestTree+responseAssociateConnectionWithLag =+  res+    "AssociateConnectionWithLagResponse"+    "fixture/AssociateConnectionWithLagResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AssociateConnectionWithLag)++responseAssociateHostedConnection :: Connection -> TestTree+responseAssociateHostedConnection =+  res+    "AssociateHostedConnectionResponse"+    "fixture/AssociateHostedConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AssociateHostedConnection)++responseAssociateMacSecKey :: AssociateMacSecKeyResponse -> TestTree+responseAssociateMacSecKey =+  res+    "AssociateMacSecKeyResponse"+    "fixture/AssociateMacSecKeyResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AssociateMacSecKey)++responseAssociateVirtualInterface :: VirtualInterface -> TestTree+responseAssociateVirtualInterface =+  res+    "AssociateVirtualInterfaceResponse"+    "fixture/AssociateVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy AssociateVirtualInterface)++responseConfirmConnection :: ConfirmConnectionResponse -> TestTree+responseConfirmConnection =+  res+    "ConfirmConnectionResponse"+    "fixture/ConfirmConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ConfirmConnection)++responseConfirmCustomerAgreement :: ConfirmCustomerAgreementResponse -> TestTree+responseConfirmCustomerAgreement =+  res+    "ConfirmCustomerAgreementResponse"+    "fixture/ConfirmCustomerAgreementResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ConfirmCustomerAgreement)++responseConfirmPrivateVirtualInterface :: ConfirmPrivateVirtualInterfaceResponse -> TestTree+responseConfirmPrivateVirtualInterface =+  res+    "ConfirmPrivateVirtualInterfaceResponse"+    "fixture/ConfirmPrivateVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ConfirmPrivateVirtualInterface)++responseConfirmPublicVirtualInterface :: ConfirmPublicVirtualInterfaceResponse -> TestTree+responseConfirmPublicVirtualInterface =+  res+    "ConfirmPublicVirtualInterfaceResponse"+    "fixture/ConfirmPublicVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ConfirmPublicVirtualInterface)++responseConfirmTransitVirtualInterface :: ConfirmTransitVirtualInterfaceResponse -> TestTree+responseConfirmTransitVirtualInterface =+  res+    "ConfirmTransitVirtualInterfaceResponse"+    "fixture/ConfirmTransitVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ConfirmTransitVirtualInterface)++responseCreateBGPPeer :: CreateBGPPeerResponse -> TestTree+responseCreateBGPPeer =+  res+    "CreateBGPPeerResponse"+    "fixture/CreateBGPPeerResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateBGPPeer)++responseCreateConnection :: Connection -> TestTree+responseCreateConnection =+  res+    "CreateConnectionResponse"+    "fixture/CreateConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateConnection)++responseCreateDirectConnectGateway :: CreateDirectConnectGatewayResponse -> TestTree+responseCreateDirectConnectGateway =+  res+    "CreateDirectConnectGatewayResponse"+    "fixture/CreateDirectConnectGatewayResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateDirectConnectGateway)++responseCreateDirectConnectGatewayAssociation :: CreateDirectConnectGatewayAssociationResponse -> TestTree+responseCreateDirectConnectGatewayAssociation =+  res+    "CreateDirectConnectGatewayAssociationResponse"+    "fixture/CreateDirectConnectGatewayAssociationResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateDirectConnectGatewayAssociation)++responseCreateDirectConnectGatewayAssociationProposal :: CreateDirectConnectGatewayAssociationProposalResponse -> TestTree+responseCreateDirectConnectGatewayAssociationProposal =+  res+    "CreateDirectConnectGatewayAssociationProposalResponse"+    "fixture/CreateDirectConnectGatewayAssociationProposalResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateDirectConnectGatewayAssociationProposal)++responseCreateInterconnect :: Interconnect -> TestTree+responseCreateInterconnect =+  res+    "CreateInterconnectResponse"+    "fixture/CreateInterconnectResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateInterconnect)++responseCreateLag :: Lag -> TestTree+responseCreateLag =+  res+    "CreateLagResponse"+    "fixture/CreateLagResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateLag)++responseCreatePrivateVirtualInterface :: VirtualInterface -> TestTree+responseCreatePrivateVirtualInterface =+  res+    "CreatePrivateVirtualInterfaceResponse"+    "fixture/CreatePrivateVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreatePrivateVirtualInterface)++responseCreatePublicVirtualInterface :: VirtualInterface -> TestTree+responseCreatePublicVirtualInterface =+  res+    "CreatePublicVirtualInterfaceResponse"+    "fixture/CreatePublicVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreatePublicVirtualInterface)++responseCreateTransitVirtualInterface :: CreateTransitVirtualInterfaceResponse -> TestTree+responseCreateTransitVirtualInterface =+  res+    "CreateTransitVirtualInterfaceResponse"+    "fixture/CreateTransitVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy CreateTransitVirtualInterface)++responseDeleteBGPPeer :: DeleteBGPPeerResponse -> TestTree+responseDeleteBGPPeer =+  res+    "DeleteBGPPeerResponse"+    "fixture/DeleteBGPPeerResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteBGPPeer)++responseDeleteConnection :: Connection -> TestTree+responseDeleteConnection =+  res+    "DeleteConnectionResponse"+    "fixture/DeleteConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteConnection)++responseDeleteDirectConnectGateway :: DeleteDirectConnectGatewayResponse -> TestTree+responseDeleteDirectConnectGateway =+  res+    "DeleteDirectConnectGatewayResponse"+    "fixture/DeleteDirectConnectGatewayResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteDirectConnectGateway)++responseDeleteDirectConnectGatewayAssociation :: DeleteDirectConnectGatewayAssociationResponse -> TestTree+responseDeleteDirectConnectGatewayAssociation =+  res+    "DeleteDirectConnectGatewayAssociationResponse"+    "fixture/DeleteDirectConnectGatewayAssociationResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteDirectConnectGatewayAssociation)++responseDeleteDirectConnectGatewayAssociationProposal :: DeleteDirectConnectGatewayAssociationProposalResponse -> TestTree+responseDeleteDirectConnectGatewayAssociationProposal =+  res+    "DeleteDirectConnectGatewayAssociationProposalResponse"+    "fixture/DeleteDirectConnectGatewayAssociationProposalResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteDirectConnectGatewayAssociationProposal)++responseDeleteInterconnect :: DeleteInterconnectResponse -> TestTree+responseDeleteInterconnect =+  res+    "DeleteInterconnectResponse"+    "fixture/DeleteInterconnectResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteInterconnect)++responseDeleteLag :: Lag -> TestTree+responseDeleteLag =+  res+    "DeleteLagResponse"+    "fixture/DeleteLagResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteLag)++responseDeleteVirtualInterface :: DeleteVirtualInterfaceResponse -> TestTree+responseDeleteVirtualInterface =+  res+    "DeleteVirtualInterfaceResponse"+    "fixture/DeleteVirtualInterfaceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DeleteVirtualInterface)++responseDescribeConnections :: Connections -> TestTree+responseDescribeConnections =+  res+    "DescribeConnectionsResponse"+    "fixture/DescribeConnectionsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeConnections)++responseDescribeCustomerMetadata :: DescribeCustomerMetadataResponse -> TestTree+responseDescribeCustomerMetadata =+  res+    "DescribeCustomerMetadataResponse"+    "fixture/DescribeCustomerMetadataResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeCustomerMetadata)++responseDescribeDirectConnectGatewayAssociationProposals :: DescribeDirectConnectGatewayAssociationProposalsResponse -> TestTree+responseDescribeDirectConnectGatewayAssociationProposals =+  res+    "DescribeDirectConnectGatewayAssociationProposalsResponse"+    "fixture/DescribeDirectConnectGatewayAssociationProposalsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeDirectConnectGatewayAssociationProposals)++responseDescribeDirectConnectGatewayAssociations :: DescribeDirectConnectGatewayAssociationsResponse -> TestTree+responseDescribeDirectConnectGatewayAssociations =+  res+    "DescribeDirectConnectGatewayAssociationsResponse"+    "fixture/DescribeDirectConnectGatewayAssociationsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeDirectConnectGatewayAssociations)++responseDescribeDirectConnectGatewayAttachments :: DescribeDirectConnectGatewayAttachmentsResponse -> TestTree+responseDescribeDirectConnectGatewayAttachments =+  res+    "DescribeDirectConnectGatewayAttachmentsResponse"+    "fixture/DescribeDirectConnectGatewayAttachmentsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeDirectConnectGatewayAttachments)++responseDescribeDirectConnectGateways :: DescribeDirectConnectGatewaysResponse -> TestTree+responseDescribeDirectConnectGateways =+  res+    "DescribeDirectConnectGatewaysResponse"+    "fixture/DescribeDirectConnectGatewaysResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeDirectConnectGateways)++responseDescribeHostedConnections :: Connections -> TestTree+responseDescribeHostedConnections =+  res+    "DescribeHostedConnectionsResponse"+    "fixture/DescribeHostedConnectionsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeHostedConnections)++responseDescribeInterconnects :: DescribeInterconnectsResponse -> TestTree+responseDescribeInterconnects =+  res+    "DescribeInterconnectsResponse"+    "fixture/DescribeInterconnectsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeInterconnects)++responseDescribeLags :: DescribeLagsResponse -> TestTree+responseDescribeLags =+  res+    "DescribeLagsResponse"+    "fixture/DescribeLagsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeLags)++responseDescribeLoa :: DescribeLoaResponse -> TestTree+responseDescribeLoa =+  res+    "DescribeLoaResponse"+    "fixture/DescribeLoaResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeLoa)++responseDescribeLocations :: DescribeLocationsResponse -> TestTree+responseDescribeLocations =+  res+    "DescribeLocationsResponse"+    "fixture/DescribeLocationsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeLocations)++responseDescribeRouterConfiguration :: DescribeRouterConfigurationResponse -> TestTree+responseDescribeRouterConfiguration =+  res+    "DescribeRouterConfigurationResponse"+    "fixture/DescribeRouterConfigurationResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeRouterConfiguration)++responseDescribeTags :: DescribeTagsResponse -> TestTree+responseDescribeTags =+  res+    "DescribeTagsResponse"+    "fixture/DescribeTagsResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeTags)++responseDescribeVirtualGateways :: DescribeVirtualGatewaysResponse -> TestTree+responseDescribeVirtualGateways =+  res+    "DescribeVirtualGatewaysResponse"+    "fixture/DescribeVirtualGatewaysResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeVirtualGateways)++responseDescribeVirtualInterfaces :: DescribeVirtualInterfacesResponse -> TestTree+responseDescribeVirtualInterfaces =+  res+    "DescribeVirtualInterfacesResponse"+    "fixture/DescribeVirtualInterfacesResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DescribeVirtualInterfaces)++responseDisassociateConnectionFromLag :: Connection -> TestTree+responseDisassociateConnectionFromLag =+  res+    "DisassociateConnectionFromLagResponse"+    "fixture/DisassociateConnectionFromLagResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DisassociateConnectionFromLag)++responseDisassociateMacSecKey :: DisassociateMacSecKeyResponse -> TestTree+responseDisassociateMacSecKey =+  res+    "DisassociateMacSecKeyResponse"+    "fixture/DisassociateMacSecKeyResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy DisassociateMacSecKey)++responseListVirtualInterfaceTestHistory :: ListVirtualInterfaceTestHistoryResponse -> TestTree+responseListVirtualInterfaceTestHistory =+  res+    "ListVirtualInterfaceTestHistoryResponse"+    "fixture/ListVirtualInterfaceTestHistoryResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy ListVirtualInterfaceTestHistory)++responseStartBgpFailoverTest :: StartBgpFailoverTestResponse -> TestTree+responseStartBgpFailoverTest =+  res+    "StartBgpFailoverTestResponse"+    "fixture/StartBgpFailoverTestResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy StartBgpFailoverTest)++responseStopBgpFailoverTest :: StopBgpFailoverTestResponse -> TestTree+responseStopBgpFailoverTest =+  res+    "StopBgpFailoverTestResponse"+    "fixture/StopBgpFailoverTestResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy StopBgpFailoverTest)++responseTagResource :: TagResourceResponse -> TestTree+responseTagResource =+  res+    "TagResourceResponse"+    "fixture/TagResourceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy TagResource)++responseUntagResource :: UntagResourceResponse -> TestTree+responseUntagResource =+  res+    "UntagResourceResponse"+    "fixture/UntagResourceResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UntagResource)++responseUpdateConnection :: Connection -> TestTree+responseUpdateConnection =+  res+    "UpdateConnectionResponse"+    "fixture/UpdateConnectionResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UpdateConnection)++responseUpdateDirectConnectGateway :: UpdateDirectConnectGatewayResponse -> TestTree+responseUpdateDirectConnectGateway =+  res+    "UpdateDirectConnectGatewayResponse"+    "fixture/UpdateDirectConnectGatewayResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UpdateDirectConnectGateway)++responseUpdateDirectConnectGatewayAssociation :: UpdateDirectConnectGatewayAssociationResponse -> TestTree+responseUpdateDirectConnectGatewayAssociation =+  res+    "UpdateDirectConnectGatewayAssociationResponse"+    "fixture/UpdateDirectConnectGatewayAssociationResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UpdateDirectConnectGatewayAssociation)++responseUpdateLag :: Lag -> TestTree+responseUpdateLag =+  res+    "UpdateLagResponse"+    "fixture/UpdateLagResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UpdateLag)++responseUpdateVirtualInterfaceAttributes :: VirtualInterface -> TestTree+responseUpdateVirtualInterfaceAttributes =+  res+    "UpdateVirtualInterfaceAttributesResponse"+    "fixture/UpdateVirtualInterfaceAttributesResponse.proto"+    defaultService+    (Proxy.Proxy :: Proxy.Proxy UpdateVirtualInterfaceAttributes)