amazonka-apigateway 1.5.0 → 1.6.0
raw patch · 147 files changed
+6210/−4205 lines, 147 filesdep ~amazonka-coredep ~amazonka-testPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: amazonka-core, amazonka-test
API changes (from Hackage documentation)
- Network.AWS.APIGateway: API :: DocumentationPartType
- Network.AWS.APIGateway: Method :: DocumentationPartType
- Network.AWS.APIGateway: Model :: DocumentationPartType
- Network.AWS.APIGateway: PathParameter :: DocumentationPartType
- Network.AWS.APIGateway: QueryParameter :: DocumentationPartType
- Network.AWS.APIGateway: RequestBody :: DocumentationPartType
- Network.AWS.APIGateway: RequestHeader :: DocumentationPartType
- Network.AWS.APIGateway: Resource :: DocumentationPartType
- Network.AWS.APIGateway: Response :: DocumentationPartType
- Network.AWS.APIGateway: ResponseBody :: DocumentationPartType
- Network.AWS.APIGateway: ResponseHeader :: DocumentationPartType
- Network.AWS.APIGateway.CreateStage: csCacheClusterEnabled :: Lens' CreateStage (Maybe Bool)
- Network.AWS.APIGateway.CreateStage: csCacheClusterSize :: Lens' CreateStage (Maybe CacheClusterSize)
- Network.AWS.APIGateway.CreateStage: csDeploymentId :: Lens' CreateStage Text
- Network.AWS.APIGateway.CreateStage: csDescription :: Lens' CreateStage (Maybe Text)
- Network.AWS.APIGateway.CreateStage: csDocumentationVersion :: Lens' CreateStage (Maybe Text)
- Network.AWS.APIGateway.CreateStage: csRestAPIId :: Lens' CreateStage Text
- Network.AWS.APIGateway.CreateStage: csStageName :: Lens' CreateStage Text
- Network.AWS.APIGateway.CreateStage: csVariables :: Lens' CreateStage (HashMap Text Text)
- Network.AWS.APIGateway.Types: API :: DocumentationPartType
- Network.AWS.APIGateway.Types: Method :: DocumentationPartType
- Network.AWS.APIGateway.Types: Model :: DocumentationPartType
- Network.AWS.APIGateway.Types: PathParameter :: DocumentationPartType
- Network.AWS.APIGateway.Types: QueryParameter :: DocumentationPartType
- Network.AWS.APIGateway.Types: RequestBody :: DocumentationPartType
- Network.AWS.APIGateway.Types: RequestHeader :: DocumentationPartType
- Network.AWS.APIGateway.Types: Resource :: DocumentationPartType
- Network.AWS.APIGateway.Types: Response :: DocumentationPartType
- Network.AWS.APIGateway.Types: ResponseBody :: DocumentationPartType
- Network.AWS.APIGateway.Types: ResponseHeader :: DocumentationPartType
+ Network.AWS.APIGateway: DPTAPI :: DocumentationPartType
+ Network.AWS.APIGateway: DPTAuthorizer :: DocumentationPartType
+ Network.AWS.APIGateway: DPTMethod :: DocumentationPartType
+ Network.AWS.APIGateway: DPTModel :: DocumentationPartType
+ Network.AWS.APIGateway: DPTPathParameter :: DocumentationPartType
+ Network.AWS.APIGateway: DPTQueryParameter :: DocumentationPartType
+ Network.AWS.APIGateway: DPTRequestBody :: DocumentationPartType
+ Network.AWS.APIGateway: DPTRequestHeader :: DocumentationPartType
+ Network.AWS.APIGateway: DPTResource :: DocumentationPartType
+ Network.AWS.APIGateway: DPTResponse :: DocumentationPartType
+ Network.AWS.APIGateway: DPTResponseBody :: DocumentationPartType
+ Network.AWS.APIGateway: DPTResponseHeader :: DocumentationPartType
+ Network.AWS.APIGateway: Documented :: LocationStatusType
+ Network.AWS.APIGateway: Header :: APIKeySourceType
+ Network.AWS.APIGateway: Internet :: ConnectionType
+ Network.AWS.APIGateway: Undocumented :: LocationStatusType
+ Network.AWS.APIGateway: VLSAvailable :: VPCLinkStatus
+ Network.AWS.APIGateway: VLSDeleting :: VPCLinkStatus
+ Network.AWS.APIGateway: VLSFailed :: VPCLinkStatus
+ Network.AWS.APIGateway: VLSPending :: VPCLinkStatus
+ Network.AWS.APIGateway: VPCLink :: ConnectionType
+ Network.AWS.APIGateway: accessLogSettings :: AccessLogSettings
+ Network.AWS.APIGateway: alsDestinationARN :: Lens' AccessLogSettings (Maybe Text)
+ Network.AWS.APIGateway: alsFormat :: Lens' AccessLogSettings (Maybe Text)
+ Network.AWS.APIGateway: canarySettings :: CanarySettings
+ Network.AWS.APIGateway: csDeploymentId :: Lens' CanarySettings (Maybe Text)
+ Network.AWS.APIGateway: csPercentTraffic :: Lens' CanarySettings (Maybe Double)
+ Network.AWS.APIGateway: csStageVariableOverrides :: Lens' CanarySettings (HashMap Text Text)
+ Network.AWS.APIGateway: csUseStageCache :: Lens' CanarySettings (Maybe Bool)
+ Network.AWS.APIGateway: data APIKeySourceType
+ Network.AWS.APIGateway: data AccessLogSettings
+ Network.AWS.APIGateway: data CanarySettings
+ Network.AWS.APIGateway: data ConnectionType
+ Network.AWS.APIGateway: data DeploymentCanarySettings
+ Network.AWS.APIGateway: data LocationStatusType
+ Network.AWS.APIGateway: data VPCLink
+ Network.AWS.APIGateway: data VPCLinkStatus
+ Network.AWS.APIGateway: dcsPercentTraffic :: Lens' DeploymentCanarySettings (Maybe Double)
+ Network.AWS.APIGateway: dcsStageVariableOverrides :: Lens' DeploymentCanarySettings (HashMap Text Text)
+ Network.AWS.APIGateway: dcsUseStageCache :: Lens' DeploymentCanarySettings (Maybe Bool)
+ Network.AWS.APIGateway: deploymentCanarySettings :: DeploymentCanarySettings
+ Network.AWS.APIGateway: dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway: dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway: iConnectionId :: Lens' Integration (Maybe Text)
+ Network.AWS.APIGateway: iConnectionType :: Lens' Integration (Maybe ConnectionType)
+ Network.AWS.APIGateway: iTimeoutInMillis :: Lens' Integration (Maybe Int)
+ Network.AWS.APIGateway: mAuthorizationScopes :: Lens' Method [Text]
+ Network.AWS.APIGateway: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway: sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)
+ Network.AWS.APIGateway: sCanarySettings :: Lens' Stage (Maybe CanarySettings)
+ Network.AWS.APIGateway: sTags :: Lens' Stage (HashMap Text Text)
+ Network.AWS.APIGateway: vlDescription :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway: vlId :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway: vlName :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway: vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)
+ Network.AWS.APIGateway: vlStatusMessage :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway: vlTargetARNs :: Lens' VPCLink [Text]
+ Network.AWS.APIGateway: vpcLink :: VPCLink
+ Network.AWS.APIGateway.CreateDeployment: cdCanarySettings :: Lens' CreateDeployment (Maybe DeploymentCanarySettings)
+ Network.AWS.APIGateway.CreateDomainName: dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.CreateDomainName: dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.CreateRestAPI: craApiKeySource :: Lens' CreateRestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.CreateRestAPI: craMinimumCompressionSize :: Lens' CreateRestAPI (Maybe Int)
+ Network.AWS.APIGateway.CreateRestAPI: craPolicy :: Lens' CreateRestAPI (Maybe Text)
+ Network.AWS.APIGateway.CreateRestAPI: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.CreateRestAPI: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.CreateRestAPI: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.CreateStage: cCacheClusterEnabled :: Lens' CreateStage (Maybe Bool)
+ Network.AWS.APIGateway.CreateStage: cCacheClusterSize :: Lens' CreateStage (Maybe CacheClusterSize)
+ Network.AWS.APIGateway.CreateStage: cCanarySettings :: Lens' CreateStage (Maybe CanarySettings)
+ Network.AWS.APIGateway.CreateStage: cDeploymentId :: Lens' CreateStage Text
+ Network.AWS.APIGateway.CreateStage: cDescription :: Lens' CreateStage (Maybe Text)
+ Network.AWS.APIGateway.CreateStage: cDocumentationVersion :: Lens' CreateStage (Maybe Text)
+ Network.AWS.APIGateway.CreateStage: cRestAPIId :: Lens' CreateStage Text
+ Network.AWS.APIGateway.CreateStage: cStageName :: Lens' CreateStage Text
+ Network.AWS.APIGateway.CreateStage: cTags :: Lens' CreateStage (HashMap Text Text)
+ Network.AWS.APIGateway.CreateStage: cVariables :: Lens' CreateStage (HashMap Text Text)
+ Network.AWS.APIGateway.CreateStage: sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)
+ Network.AWS.APIGateway.CreateStage: sCanarySettings :: Lens' Stage (Maybe CanarySettings)
+ Network.AWS.APIGateway.CreateStage: sTags :: Lens' Stage (HashMap Text Text)
+ Network.AWS.APIGateway.CreateVPCLink: createVPCLink :: Text -> CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: cvlDescription :: Lens' CreateVPCLink (Maybe Text)
+ Network.AWS.APIGateway.CreateVPCLink: cvlName :: Lens' CreateVPCLink Text
+ Network.AWS.APIGateway.CreateVPCLink: cvlTargetARNs :: Lens' CreateVPCLink [Text]
+ Network.AWS.APIGateway.CreateVPCLink: data CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: data VPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Control.DeepSeq.NFData Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Data.Data.Data Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance GHC.Classes.Eq Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance GHC.Generics.Generic Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance GHC.Read.Read Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance GHC.Show.Show Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.CreateVPCLink.CreateVPCLink
+ Network.AWS.APIGateway.CreateVPCLink: vlDescription :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.CreateVPCLink: vlId :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.CreateVPCLink: vlName :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.CreateVPCLink: vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)
+ Network.AWS.APIGateway.CreateVPCLink: vlStatusMessage :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.CreateVPCLink: vlTargetARNs :: Lens' VPCLink [Text]
+ Network.AWS.APIGateway.CreateVPCLink: vpcLink :: VPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: data DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: data DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: deleteVPCLink :: Text -> DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: deleteVPCLinkResponse :: DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: dvlVpcLinkId :: Lens' DeleteVPCLink Text
+ Network.AWS.APIGateway.DeleteVPCLink: instance Control.DeepSeq.NFData Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance Control.DeepSeq.NFData Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance Data.Data.Data Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance Data.Data.Data Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Classes.Eq Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Classes.Eq Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Generics.Generic Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Generics.Generic Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Read.Read Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Read.Read Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Show.Show Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance GHC.Show.Show Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLinkResponse
+ Network.AWS.APIGateway.DeleteVPCLink: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.DeleteVPCLink: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.DeleteVPCLink.DeleteVPCLink
+ Network.AWS.APIGateway.GetDocumentationParts: gdpLocationStatus :: Lens' GetDocumentationParts (Maybe LocationStatusType)
+ Network.AWS.APIGateway.GetDomainName: dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.GetDomainName: dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.GetIntegration: iConnectionId :: Lens' Integration (Maybe Text)
+ Network.AWS.APIGateway.GetIntegration: iConnectionType :: Lens' Integration (Maybe ConnectionType)
+ Network.AWS.APIGateway.GetIntegration: iTimeoutInMillis :: Lens' Integration (Maybe Int)
+ Network.AWS.APIGateway.GetMethod: mAuthorizationScopes :: Lens' Method [Text]
+ Network.AWS.APIGateway.GetRestAPI: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.GetRestAPI: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.GetRestAPI: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.GetStage: sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)
+ Network.AWS.APIGateway.GetStage: sCanarySettings :: Lens' Stage (Maybe CanarySettings)
+ Network.AWS.APIGateway.GetStage: sTags :: Lens' Stage (HashMap Text Text)
+ Network.AWS.APIGateway.GetTags: data GetTags
+ Network.AWS.APIGateway.GetTags: data GetTagsResponse
+ Network.AWS.APIGateway.GetTags: getTags :: Text -> GetTags
+ Network.AWS.APIGateway.GetTags: getTagsResponse :: Int -> GetTagsResponse
+ Network.AWS.APIGateway.GetTags: gtLimit :: Lens' GetTags (Maybe Int)
+ Network.AWS.APIGateway.GetTags: gtPosition :: Lens' GetTags (Maybe Text)
+ Network.AWS.APIGateway.GetTags: gtResourceARN :: Lens' GetTags Text
+ Network.AWS.APIGateway.GetTags: gtrsResponseStatus :: Lens' GetTagsResponse Int
+ Network.AWS.APIGateway.GetTags: gtrsTags :: Lens' GetTagsResponse (HashMap Text Text)
+ Network.AWS.APIGateway.GetTags: instance Control.DeepSeq.NFData Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance Control.DeepSeq.NFData Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance Data.Data.Data Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance Data.Data.Data Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance GHC.Classes.Eq Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance GHC.Classes.Eq Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance GHC.Generics.Generic Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance GHC.Generics.Generic Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance GHC.Read.Read Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance GHC.Read.Read Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance GHC.Show.Show Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance GHC.Show.Show Network.AWS.APIGateway.GetTags.GetTagsResponse
+ Network.AWS.APIGateway.GetTags: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetTags: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.GetTags.GetTags
+ Network.AWS.APIGateway.GetVPCLink: data GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: data VPCLink
+ Network.AWS.APIGateway.GetVPCLink: getVPCLink :: Text -> GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: gvlVpcLinkId :: Lens' GetVPCLink Text
+ Network.AWS.APIGateway.GetVPCLink: instance Control.DeepSeq.NFData Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Data.Data.Data Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance GHC.Classes.Eq Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance GHC.Generics.Generic Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance GHC.Read.Read Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance GHC.Show.Show Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.GetVPCLink.GetVPCLink
+ Network.AWS.APIGateway.GetVPCLink: vlDescription :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLink: vlId :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLink: vlName :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLink: vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)
+ Network.AWS.APIGateway.GetVPCLink: vlStatusMessage :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLink: vlTargetARNs :: Lens' VPCLink [Text]
+ Network.AWS.APIGateway.GetVPCLink: vpcLink :: VPCLink
+ Network.AWS.APIGateway.GetVPCLinks: data GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: data GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: getVPCLinks :: GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: getVPCLinksResponse :: Int -> GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: gvlLimit :: Lens' GetVPCLinks (Maybe Int)
+ Network.AWS.APIGateway.GetVPCLinks: gvlPosition :: Lens' GetVPCLinks (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLinks: gvlrsItems :: Lens' GetVPCLinksResponse [VPCLink]
+ Network.AWS.APIGateway.GetVPCLinks: gvlrsPosition :: Lens' GetVPCLinksResponse (Maybe Text)
+ Network.AWS.APIGateway.GetVPCLinks: gvlrsResponseStatus :: Lens' GetVPCLinksResponse Int
+ Network.AWS.APIGateway.GetVPCLinks: instance Control.DeepSeq.NFData Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Control.DeepSeq.NFData Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance Data.Data.Data Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Data.Data.Data Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Classes.Eq Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Classes.Eq Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Generics.Generic Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Generics.Generic Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Read.Read Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Read.Read Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Show.Show Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance GHC.Show.Show Network.AWS.APIGateway.GetVPCLinks.GetVPCLinksResponse
+ Network.AWS.APIGateway.GetVPCLinks: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Network.AWS.Pager.AWSPager Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.GetVPCLinks: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.GetVPCLinks.GetVPCLinks
+ Network.AWS.APIGateway.ImportRestAPI: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.ImportRestAPI: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.ImportRestAPI: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.PutIntegration: iConnectionId :: Lens' Integration (Maybe Text)
+ Network.AWS.APIGateway.PutIntegration: iConnectionType :: Lens' Integration (Maybe ConnectionType)
+ Network.AWS.APIGateway.PutIntegration: iTimeoutInMillis :: Lens' Integration (Maybe Int)
+ Network.AWS.APIGateway.PutIntegration: pConnectionId :: Lens' PutIntegration (Maybe Text)
+ Network.AWS.APIGateway.PutIntegration: pConnectionType :: Lens' PutIntegration (Maybe ConnectionType)
+ Network.AWS.APIGateway.PutIntegration: pTimeoutInMillis :: Lens' PutIntegration (Maybe Int)
+ Network.AWS.APIGateway.PutMethod: mAuthorizationScopes :: Lens' Method [Text]
+ Network.AWS.APIGateway.PutMethod: putAuthorizationScopes :: Lens' PutMethod [Text]
+ Network.AWS.APIGateway.PutRestAPI: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.PutRestAPI: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.PutRestAPI: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.TagResource: data TagResource
+ Network.AWS.APIGateway.TagResource: data TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance Control.DeepSeq.NFData Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Control.DeepSeq.NFData Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Data.Data.Data Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Data.Data.Data Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance GHC.Classes.Eq Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance GHC.Classes.Eq Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance GHC.Generics.Generic Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance GHC.Generics.Generic Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance GHC.Read.Read Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance GHC.Read.Read Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance GHC.Show.Show Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance GHC.Show.Show Network.AWS.APIGateway.TagResource.TagResourceResponse
+ Network.AWS.APIGateway.TagResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.TagResource.TagResource
+ Network.AWS.APIGateway.TagResource: tagResource :: Text -> TagResource
+ Network.AWS.APIGateway.TagResource: tagResourceResponse :: TagResourceResponse
+ Network.AWS.APIGateway.TagResource: trResourceARN :: Lens' TagResource Text
+ Network.AWS.APIGateway.TagResource: trTags :: Lens' TagResource (HashMap Text Text)
+ Network.AWS.APIGateway.Types: DPTAPI :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTAuthorizer :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTMethod :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTModel :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTPathParameter :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTQueryParameter :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTRequestBody :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTRequestHeader :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTResource :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTResponse :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTResponseBody :: DocumentationPartType
+ Network.AWS.APIGateway.Types: DPTResponseHeader :: DocumentationPartType
+ Network.AWS.APIGateway.Types: Documented :: LocationStatusType
+ Network.AWS.APIGateway.Types: Header :: APIKeySourceType
+ Network.AWS.APIGateway.Types: Internet :: ConnectionType
+ Network.AWS.APIGateway.Types: Undocumented :: LocationStatusType
+ Network.AWS.APIGateway.Types: VLSAvailable :: VPCLinkStatus
+ Network.AWS.APIGateway.Types: VLSDeleting :: VPCLinkStatus
+ Network.AWS.APIGateway.Types: VLSFailed :: VPCLinkStatus
+ Network.AWS.APIGateway.Types: VLSPending :: VPCLinkStatus
+ Network.AWS.APIGateway.Types: VPCLink :: ConnectionType
+ Network.AWS.APIGateway.Types: accessLogSettings :: AccessLogSettings
+ Network.AWS.APIGateway.Types: alsDestinationARN :: Lens' AccessLogSettings (Maybe Text)
+ Network.AWS.APIGateway.Types: alsFormat :: Lens' AccessLogSettings (Maybe Text)
+ Network.AWS.APIGateway.Types: canarySettings :: CanarySettings
+ Network.AWS.APIGateway.Types: csDeploymentId :: Lens' CanarySettings (Maybe Text)
+ Network.AWS.APIGateway.Types: csPercentTraffic :: Lens' CanarySettings (Maybe Double)
+ Network.AWS.APIGateway.Types: csStageVariableOverrides :: Lens' CanarySettings (HashMap Text Text)
+ Network.AWS.APIGateway.Types: csUseStageCache :: Lens' CanarySettings (Maybe Bool)
+ Network.AWS.APIGateway.Types: data APIKeySourceType
+ Network.AWS.APIGateway.Types: data AccessLogSettings
+ Network.AWS.APIGateway.Types: data CanarySettings
+ Network.AWS.APIGateway.Types: data ConnectionType
+ Network.AWS.APIGateway.Types: data DeploymentCanarySettings
+ Network.AWS.APIGateway.Types: data LocationStatusType
+ Network.AWS.APIGateway.Types: data VPCLink
+ Network.AWS.APIGateway.Types: data VPCLinkStatus
+ Network.AWS.APIGateway.Types: dcsPercentTraffic :: Lens' DeploymentCanarySettings (Maybe Double)
+ Network.AWS.APIGateway.Types: dcsStageVariableOverrides :: Lens' DeploymentCanarySettings (HashMap Text Text)
+ Network.AWS.APIGateway.Types: dcsUseStageCache :: Lens' DeploymentCanarySettings (Maybe Bool)
+ Network.AWS.APIGateway.Types: deploymentCanarySettings :: DeploymentCanarySettings
+ Network.AWS.APIGateway.Types: dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.Types: dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.Types: iConnectionId :: Lens' Integration (Maybe Text)
+ Network.AWS.APIGateway.Types: iConnectionType :: Lens' Integration (Maybe ConnectionType)
+ Network.AWS.APIGateway.Types: iTimeoutInMillis :: Lens' Integration (Maybe Int)
+ Network.AWS.APIGateway.Types: mAuthorizationScopes :: Lens' Method [Text]
+ Network.AWS.APIGateway.Types: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.Types: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.Types: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.Types: sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)
+ Network.AWS.APIGateway.Types: sCanarySettings :: Lens' Stage (Maybe CanarySettings)
+ Network.AWS.APIGateway.Types: sTags :: Lens' Stage (HashMap Text Text)
+ Network.AWS.APIGateway.Types: vlDescription :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.Types: vlId :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.Types: vlName :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.Types: vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)
+ Network.AWS.APIGateway.Types: vlStatusMessage :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.Types: vlTargetARNs :: Lens' VPCLink [Text]
+ Network.AWS.APIGateway.Types: vpcLink :: VPCLink
+ Network.AWS.APIGateway.UntagResource: data UntagResource
+ Network.AWS.APIGateway.UntagResource: data UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance Control.DeepSeq.NFData Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance Control.DeepSeq.NFData Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance Data.Data.Data Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance Data.Data.Data Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance GHC.Classes.Eq Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance GHC.Classes.Eq Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance GHC.Generics.Generic Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance GHC.Generics.Generic Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance GHC.Read.Read Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance GHC.Read.Read Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance GHC.Show.Show Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance GHC.Show.Show Network.AWS.APIGateway.UntagResource.UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.UntagResource.UntagResource
+ Network.AWS.APIGateway.UntagResource: untagResource :: Text -> UntagResource
+ Network.AWS.APIGateway.UntagResource: untagResourceResponse :: UntagResourceResponse
+ Network.AWS.APIGateway.UntagResource: urResourceARN :: Lens' UntagResource Text
+ Network.AWS.APIGateway.UntagResource: urTagKeys :: Lens' UntagResource [Text]
+ Network.AWS.APIGateway.UpdateDomainName: dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.UpdateDomainName: dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)
+ Network.AWS.APIGateway.UpdateIntegration: iConnectionId :: Lens' Integration (Maybe Text)
+ Network.AWS.APIGateway.UpdateIntegration: iConnectionType :: Lens' Integration (Maybe ConnectionType)
+ Network.AWS.APIGateway.UpdateIntegration: iTimeoutInMillis :: Lens' Integration (Maybe Int)
+ Network.AWS.APIGateway.UpdateMethod: mAuthorizationScopes :: Lens' Method [Text]
+ Network.AWS.APIGateway.UpdateRestAPI: raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)
+ Network.AWS.APIGateway.UpdateRestAPI: raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)
+ Network.AWS.APIGateway.UpdateRestAPI: raPolicy :: Lens' RestAPI (Maybe Text)
+ Network.AWS.APIGateway.UpdateStage: sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)
+ Network.AWS.APIGateway.UpdateStage: sCanarySettings :: Lens' Stage (Maybe CanarySettings)
+ Network.AWS.APIGateway.UpdateStage: sTags :: Lens' Stage (HashMap Text Text)
+ Network.AWS.APIGateway.UpdateVPCLink: data UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: data VPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Control.DeepSeq.NFData Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Data.Data.Data Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Data.Hashable.Class.Hashable Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance GHC.Classes.Eq Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance GHC.Generics.Generic Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance GHC.Read.Read Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance GHC.Show.Show Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Network.AWS.Data.Path.ToPath Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Network.AWS.Data.Query.ToQuery Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: instance Network.AWS.Types.AWSRequest Network.AWS.APIGateway.UpdateVPCLink.UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: updateVPCLink :: Text -> UpdateVPCLink
+ Network.AWS.APIGateway.UpdateVPCLink: uvlPatchOperations :: Lens' UpdateVPCLink [PatchOperation]
+ Network.AWS.APIGateway.UpdateVPCLink: uvlVpcLinkId :: Lens' UpdateVPCLink Text
+ Network.AWS.APIGateway.UpdateVPCLink: vlDescription :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.UpdateVPCLink: vlId :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.UpdateVPCLink: vlName :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.UpdateVPCLink: vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)
+ Network.AWS.APIGateway.UpdateVPCLink: vlStatusMessage :: Lens' VPCLink (Maybe Text)
+ Network.AWS.APIGateway.UpdateVPCLink: vlTargetARNs :: Lens' VPCLink [Text]
+ Network.AWS.APIGateway.UpdateVPCLink: vpcLink :: VPCLink
- Network.AWS.APIGateway: Authorizer :: DocumentationPartType
+ Network.AWS.APIGateway: Authorizer :: APIKeySourceType
- Network.AWS.APIGateway.GetExport: gersBody :: Lens' GetExportResponse (Maybe (HashMap Text Value))
+ Network.AWS.APIGateway.GetExport: gersBody :: Lens' GetExportResponse (Maybe ByteString)
- Network.AWS.APIGateway.GetSDK: gsdkrsBody :: Lens' GetSDKResponse (Maybe (HashMap Text Value))
+ Network.AWS.APIGateway.GetSDK: gsdkrsBody :: Lens' GetSDKResponse (Maybe ByteString)
- Network.AWS.APIGateway.ImportAPIKeys: iakBody :: Lens' ImportAPIKeys (HashMap Text Value)
+ Network.AWS.APIGateway.ImportAPIKeys: iakBody :: Lens' ImportAPIKeys ByteString
- Network.AWS.APIGateway.ImportAPIKeys: importAPIKeys :: HashMap Text Value -> APIKeysFormat -> ImportAPIKeys
+ Network.AWS.APIGateway.ImportAPIKeys: importAPIKeys :: ByteString -> APIKeysFormat -> ImportAPIKeys
- Network.AWS.APIGateway.ImportDocumentationParts: idpBody :: Lens' ImportDocumentationParts (HashMap Text Value)
+ Network.AWS.APIGateway.ImportDocumentationParts: idpBody :: Lens' ImportDocumentationParts ByteString
- Network.AWS.APIGateway.ImportDocumentationParts: importDocumentationParts :: Text -> HashMap Text Value -> ImportDocumentationParts
+ Network.AWS.APIGateway.ImportDocumentationParts: importDocumentationParts :: Text -> ByteString -> ImportDocumentationParts
- Network.AWS.APIGateway.ImportRestAPI: importRestAPI :: HashMap Text Value -> ImportRestAPI
+ Network.AWS.APIGateway.ImportRestAPI: importRestAPI :: ByteString -> ImportRestAPI
- Network.AWS.APIGateway.ImportRestAPI: iraBody :: Lens' ImportRestAPI (HashMap Text Value)
+ Network.AWS.APIGateway.ImportRestAPI: iraBody :: Lens' ImportRestAPI ByteString
- Network.AWS.APIGateway.PutRestAPI: praBody :: Lens' PutRestAPI (HashMap Text Value)
+ Network.AWS.APIGateway.PutRestAPI: praBody :: Lens' PutRestAPI ByteString
- Network.AWS.APIGateway.PutRestAPI: putRestAPI :: Text -> HashMap Text Value -> PutRestAPI
+ Network.AWS.APIGateway.PutRestAPI: putRestAPI :: Text -> ByteString -> PutRestAPI
- Network.AWS.APIGateway.Types: Authorizer :: DocumentationPartType
+ Network.AWS.APIGateway.Types: Authorizer :: APIKeySourceType
Files
- README.md +1/−1
- amazonka-apigateway.cabal +13/−5
- fixture/CreateVPCLink.yaml +10/−0
- fixture/CreateVPCLinkResponse.proto +0/−0
- fixture/DeleteVPCLink.yaml +10/−0
- fixture/DeleteVPCLinkResponse.proto +0/−0
- fixture/GetTags.yaml +10/−0
- fixture/GetTagsResponse.proto +0/−0
- fixture/GetVPCLink.yaml +10/−0
- fixture/GetVPCLinkResponse.proto +0/−0
- fixture/GetVPCLinks.yaml +10/−0
- fixture/GetVPCLinksResponse.proto +0/−0
- fixture/TagResource.yaml +10/−0
- fixture/TagResourceResponse.proto +0/−0
- fixture/UntagResource.yaml +10/−0
- fixture/UntagResourceResponse.proto +0/−0
- fixture/UpdateVPCLink.yaml +10/−0
- fixture/UpdateVPCLinkResponse.proto +0/−0
- gen/Network/AWS/APIGateway.hs +89/−2
- gen/Network/AWS/APIGateway/CreateAPIKey.hs +16/−16
- gen/Network/AWS/APIGateway/CreateAuthorizer.hs +30/−30
- gen/Network/AWS/APIGateway/CreateBasePathMapping.hs +15/−15
- gen/Network/AWS/APIGateway/CreateDeployment.hs +29/−19
- gen/Network/AWS/APIGateway/CreateDocumentationPart.hs +8/−8
- gen/Network/AWS/APIGateway/CreateDocumentationVersion.hs +10/−10
- gen/Network/AWS/APIGateway/CreateDomainName.hs +24/−22
- gen/Network/AWS/APIGateway/CreateModel.hs +20/−20
- gen/Network/AWS/APIGateway/CreateRequestValidator.hs +12/−12
- gen/Network/AWS/APIGateway/CreateResource.hs +13/−13
- gen/Network/AWS/APIGateway/CreateRestAPI.hs +57/−23
- gen/Network/AWS/APIGateway/CreateStage.hs +88/−67
- gen/Network/AWS/APIGateway/CreateUsagePlan.hs +14/−14
- gen/Network/AWS/APIGateway/CreateUsagePlanKey.hs +14/−14
- gen/Network/AWS/APIGateway/CreateVPCLink.hs +121/−0
- gen/Network/AWS/APIGateway/DeleteAPIKey.hs +4/−4
- gen/Network/AWS/APIGateway/DeleteAuthorizer.hs +8/−8
- gen/Network/AWS/APIGateway/DeleteBasePathMapping.hs +8/−8
- gen/Network/AWS/APIGateway/DeleteClientCertificate.hs +4/−4
- gen/Network/AWS/APIGateway/DeleteDeployment.hs +9/−9
- gen/Network/AWS/APIGateway/DeleteDocumentationPart.hs +6/−4
- gen/Network/AWS/APIGateway/DeleteDocumentationVersion.hs +6/−6
- gen/Network/AWS/APIGateway/DeleteDomainName.hs +4/−4
- gen/Network/AWS/APIGateway/DeleteGatewayResponse.hs +8/−8
- gen/Network/AWS/APIGateway/DeleteIntegration.hs +14/−14
- gen/Network/AWS/APIGateway/DeleteIntegrationResponse.hs +18/−18
- gen/Network/AWS/APIGateway/DeleteMethod.hs +14/−14
- gen/Network/AWS/APIGateway/DeleteMethodResponse.hs +18/−18
- gen/Network/AWS/APIGateway/DeleteModel.hs +7/−7
- gen/Network/AWS/APIGateway/DeleteRequestValidator.hs +6/−6
- gen/Network/AWS/APIGateway/DeleteResource.hs +7/−7
- gen/Network/AWS/APIGateway/DeleteRestAPI.hs +4/−4
- gen/Network/AWS/APIGateway/DeleteStage.hs +8/−8
- gen/Network/AWS/APIGateway/DeleteUsagePlan.hs +4/−4
- gen/Network/AWS/APIGateway/DeleteUsagePlanKey.hs +7/−7
- gen/Network/AWS/APIGateway/DeleteVPCLink.hs +104/−0
- gen/Network/AWS/APIGateway/FlushStageAuthorizersCache.hs +4/−4
- gen/Network/AWS/APIGateway/FlushStageCache.hs +8/−8
- gen/Network/AWS/APIGateway/GenerateClientCertificate.hs +2/−2
- gen/Network/AWS/APIGateway/GetAPIKey.hs +5/−5
- gen/Network/AWS/APIGateway/GetAPIKeys.hs +23/−23
- gen/Network/AWS/APIGateway/GetAccount.hs +2/−2
- gen/Network/AWS/APIGateway/GetAuthorizer.hs +8/−8
- gen/Network/AWS/APIGateway/GetAuthorizers.hs +16/−16
- gen/Network/AWS/APIGateway/GetBasePathMapping.hs +8/−8
- gen/Network/AWS/APIGateway/GetBasePathMappings.hs +16/−16
- gen/Network/AWS/APIGateway/GetClientCertificate.hs +4/−4
- gen/Network/AWS/APIGateway/GetClientCertificates.hs +12/−12
- gen/Network/AWS/APIGateway/GetDeployment.hs +13/−13
- gen/Network/AWS/APIGateway/GetDeployments.hs +17/−17
- gen/Network/AWS/APIGateway/GetDocumentationPart.hs +6/−4
- gen/Network/AWS/APIGateway/GetDocumentationParts.hs +42/−32
- gen/Network/AWS/APIGateway/GetDocumentationVersion.hs +6/−6
- gen/Network/AWS/APIGateway/GetDocumentationVersions.hs +14/−14
- gen/Network/AWS/APIGateway/GetDomainName.hs +6/−4
- gen/Network/AWS/APIGateway/GetDomainNames.hs +12/−12
- gen/Network/AWS/APIGateway/GetExport.hs +30/−30
- gen/Network/AWS/APIGateway/GetGatewayResponse.hs +8/−8
- gen/Network/AWS/APIGateway/GetGatewayResponses.hs +19/−19
- gen/Network/AWS/APIGateway/GetIntegration.hs +19/−16
- gen/Network/AWS/APIGateway/GetIntegrationResponse.hs +18/−18
- gen/Network/AWS/APIGateway/GetMethod.hs +15/−14
- gen/Network/AWS/APIGateway/GetMethodResponse.hs +18/−18
- gen/Network/AWS/APIGateway/GetModel.hs +12/−9
- gen/Network/AWS/APIGateway/GetModelTemplate.hs +10/−10
- gen/Network/AWS/APIGateway/GetModels.hs +16/−16
- gen/Network/AWS/APIGateway/GetRequestValidator.hs +8/−6
- gen/Network/AWS/APIGateway/GetRequestValidators.hs +16/−16
- gen/Network/AWS/APIGateway/GetResource.hs +12/−9
- gen/Network/AWS/APIGateway/GetResources.hs +21/−21
- gen/Network/AWS/APIGateway/GetRestAPI.hs +7/−4
- gen/Network/AWS/APIGateway/GetRestAPIs.hs +12/−12
- gen/Network/AWS/APIGateway/GetSDK.hs +28/−28
- gen/Network/AWS/APIGateway/GetSDKType.hs +4/−4
- gen/Network/AWS/APIGateway/GetSDKTypes.hs +12/−12
- gen/Network/AWS/APIGateway/GetStage.hs +11/−8
- gen/Network/AWS/APIGateway/GetStages.hs +9/−9
- gen/Network/AWS/APIGateway/GetTags.hs +151/−0
- gen/Network/AWS/APIGateway/GetUsage.hs +22/−22
- gen/Network/AWS/APIGateway/GetUsagePlan.hs +4/−4
- gen/Network/AWS/APIGateway/GetUsagePlanKey.hs +7/−7
- gen/Network/AWS/APIGateway/GetUsagePlanKeys.hs +21/−21
- gen/Network/AWS/APIGateway/GetUsagePlans.hs +14/−14
- gen/Network/AWS/APIGateway/GetVPCLink.hs +96/−0
- gen/Network/AWS/APIGateway/GetVPCLinks.hs +163/−0
- gen/Network/AWS/APIGateway/ImportAPIKeys.hs +15/−15
- gen/Network/AWS/APIGateway/ImportDocumentationParts.hs +21/−21
- gen/Network/AWS/APIGateway/ImportRestAPI.hs +17/−14
- gen/Network/AWS/APIGateway/PutGatewayResponse.hs +16/−16
- gen/Network/AWS/APIGateway/PutIntegration.hs +71/−38
- gen/Network/AWS/APIGateway/PutIntegrationResponse.hs +26/−26
- gen/Network/AWS/APIGateway/PutMethod.hs +57/−46
- gen/Network/AWS/APIGateway/PutMethodResponse.hs +24/−24
- gen/Network/AWS/APIGateway/PutRestAPI.hs +23/−20
- gen/Network/AWS/APIGateway/TagResource.hs +117/−0
- gen/Network/AWS/APIGateway/TestInvokeAuthorizer.hs +39/−39
- gen/Network/AWS/APIGateway/TestInvokeMethod.hs +39/−39
- gen/Network/AWS/APIGateway/Types.hs +73/−16
- gen/Network/AWS/APIGateway/Types/Product.hs +2970/−2602
- gen/Network/AWS/APIGateway/Types/Sum.hs +159/−39
- gen/Network/AWS/APIGateway/UntagResource.hs +115/−0
- gen/Network/AWS/APIGateway/UpdateAPIKey.hs +5/−5
- gen/Network/AWS/APIGateway/UpdateAccount.hs +3/−3
- gen/Network/AWS/APIGateway/UpdateAuthorizer.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateBasePathMapping.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateClientCertificate.hs +8/−8
- gen/Network/AWS/APIGateway/UpdateDeployment.hs +11/−11
- gen/Network/AWS/APIGateway/UpdateDocumentationPart.hs +8/−8
- gen/Network/AWS/APIGateway/UpdateDocumentationVersion.hs +8/−8
- gen/Network/AWS/APIGateway/UpdateDomainName.hs +8/−6
- gen/Network/AWS/APIGateway/UpdateGatewayResponse.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateIntegration.hs +19/−16
- gen/Network/AWS/APIGateway/UpdateIntegrationResponse.hs +20/−20
- gen/Network/AWS/APIGateway/UpdateMethod.hs +17/−16
- gen/Network/AWS/APIGateway/UpdateMethodResponse.hs +20/−20
- gen/Network/AWS/APIGateway/UpdateModel.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateRequestValidator.hs +10/−10
- gen/Network/AWS/APIGateway/UpdateResource.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateRestAPI.hs +8/−5
- gen/Network/AWS/APIGateway/UpdateStage.hs +16/−13
- gen/Network/AWS/APIGateway/UpdateUsage.hs +12/−12
- gen/Network/AWS/APIGateway/UpdateUsagePlan.hs +6/−6
- gen/Network/AWS/APIGateway/UpdateVPCLink.hs +111/−0
- gen/Network/AWS/APIGateway/Waiters.hs +1/−1
- test/Main.hs +1/−1
- test/Test/AWS/APIGateway.hs +1/−1
- test/Test/AWS/APIGateway/Internal.hs +1/−1
- test/Test/AWS/Gen/APIGateway.hs +145/−1
README.md view
@@ -8,7 +8,7 @@ ## Version -`1.5.0`+`1.6.0` ## Description
amazonka-apigateway.cabal view
@@ -1,5 +1,5 @@ name: amazonka-apigateway-version: 1.5.0+version: 1.6.0 synopsis: Amazon API Gateway SDK. homepage: https://github.com/brendanhay/amazonka bug-reports: https://github.com/brendanhay/amazonka/issues@@ -7,7 +7,7 @@ license-file: LICENSE author: Brendan Hay maintainer: Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright: Copyright (c) 2013-2017 Brendan Hay+copyright: Copyright (c) 2013-2018 Brendan Hay category: Network, AWS, Cloud, Distributed Computing build-type: Simple cabal-version: >= 1.10@@ -59,6 +59,7 @@ , Network.AWS.APIGateway.CreateStage , Network.AWS.APIGateway.CreateUsagePlan , Network.AWS.APIGateway.CreateUsagePlanKey+ , Network.AWS.APIGateway.CreateVPCLink , Network.AWS.APIGateway.DeleteAPIKey , Network.AWS.APIGateway.DeleteAuthorizer , Network.AWS.APIGateway.DeleteBasePathMapping@@ -79,6 +80,7 @@ , Network.AWS.APIGateway.DeleteStage , Network.AWS.APIGateway.DeleteUsagePlan , Network.AWS.APIGateway.DeleteUsagePlanKey+ , Network.AWS.APIGateway.DeleteVPCLink , Network.AWS.APIGateway.FlushStageAuthorizersCache , Network.AWS.APIGateway.FlushStageCache , Network.AWS.APIGateway.GenerateClientCertificate@@ -120,11 +122,14 @@ , Network.AWS.APIGateway.GetSDKTypes , Network.AWS.APIGateway.GetStage , Network.AWS.APIGateway.GetStages+ , Network.AWS.APIGateway.GetTags , Network.AWS.APIGateway.GetUsage , Network.AWS.APIGateway.GetUsagePlan , Network.AWS.APIGateway.GetUsagePlanKey , Network.AWS.APIGateway.GetUsagePlanKeys , Network.AWS.APIGateway.GetUsagePlans+ , Network.AWS.APIGateway.GetVPCLink+ , Network.AWS.APIGateway.GetVPCLinks , Network.AWS.APIGateway.ImportAPIKeys , Network.AWS.APIGateway.ImportDocumentationParts , Network.AWS.APIGateway.ImportRestAPI@@ -134,9 +139,11 @@ , Network.AWS.APIGateway.PutMethod , Network.AWS.APIGateway.PutMethodResponse , Network.AWS.APIGateway.PutRestAPI+ , Network.AWS.APIGateway.TagResource , Network.AWS.APIGateway.TestInvokeAuthorizer , Network.AWS.APIGateway.TestInvokeMethod , Network.AWS.APIGateway.Types+ , Network.AWS.APIGateway.UntagResource , Network.AWS.APIGateway.UpdateAPIKey , Network.AWS.APIGateway.UpdateAccount , Network.AWS.APIGateway.UpdateAuthorizer@@ -158,6 +165,7 @@ , Network.AWS.APIGateway.UpdateStage , Network.AWS.APIGateway.UpdateUsage , Network.AWS.APIGateway.UpdateUsagePlan+ , Network.AWS.APIGateway.UpdateVPCLink , Network.AWS.APIGateway.Waiters other-modules:@@ -165,7 +173,7 @@ , Network.AWS.APIGateway.Types.Sum build-depends:- amazonka-core == 1.5.0.*+ amazonka-core == 1.6.0.* , base >= 4.7 && < 5 test-suite amazonka-apigateway-test@@ -185,8 +193,8 @@ , Test.AWS.APIGateway.Internal build-depends:- amazonka-core == 1.5.0.*- , amazonka-test == 1.5.0.*+ amazonka-core == 1.6.0.*+ , amazonka-test == 1.6.0.* , amazonka-apigateway , base , bytestring
+ fixture/CreateVPCLink.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/CreateVPCLinkResponse.proto view
+ fixture/DeleteVPCLink.yaml view
@@ -0,0 +1,10 @@+---+method: DELETE+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/DeleteVPCLinkResponse.proto view
+ fixture/GetTags.yaml view
@@ -0,0 +1,10 @@+---+method: GET+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/GetTagsResponse.proto view
+ fixture/GetVPCLink.yaml view
@@ -0,0 +1,10 @@+---+method: GET+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/GetVPCLinkResponse.proto view
+ fixture/GetVPCLinks.yaml view
@@ -0,0 +1,10 @@+---+method: GET+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/GetVPCLinksResponse.proto view
+ fixture/TagResource.yaml view
@@ -0,0 +1,10 @@+---+method: PUT+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/TagResourceResponse.proto view
+ fixture/UntagResource.yaml view
@@ -0,0 +1,10 @@+---+method: DELETE+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/UntagResourceResponse.proto view
+ fixture/UpdateVPCLink.yaml view
@@ -0,0 +1,10 @@+---+method: PATCH+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: apigateway.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/UpdateVPCLinkResponse.proto view
gen/Network/AWS/APIGateway.hs view
@@ -5,7 +5,7 @@ -- | -- Module : Network.AWS.APIGateway--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -13,7 +13,7 @@ -- -- __Amazon API Gateway__ ----- Amazon API Gateway helps developers deliver robust, secure, and scalable mobile and web application back ends. Amazon API Gateway allows developers to securely connect mobile and web applications to APIs that run on AWS Lambda, Amazon EC2, or other publicly addressable web services that are hosted outside of AWS.+-- Amazon API Gateway helps developers deliver robust, secure, and scalable mobile and web application back ends. API Gateway allows developers to securely connect mobile and web applications to APIs that run on AWS Lambda, Amazon EC2, or other publicly addressable web services that are hosted outside of AWS. -- module Network.AWS.APIGateway (@@ -59,6 +59,9 @@ -- ** GetDeployment , module Network.AWS.APIGateway.GetDeployment + -- ** GetTags+ , module Network.AWS.APIGateway.GetTags+ -- ** DeleteGatewayResponse , module Network.AWS.APIGateway.DeleteGatewayResponse @@ -119,6 +122,9 @@ -- ** CreateDeployment , module Network.AWS.APIGateway.CreateDeployment + -- ** GetVPCLinks (Paginated)+ , module Network.AWS.APIGateway.GetVPCLinks+ -- ** CreateBasePathMapping , module Network.AWS.APIGateway.CreateBasePathMapping @@ -158,6 +164,9 @@ -- ** GetUsage (Paginated) , module Network.AWS.APIGateway.GetUsage + -- ** GetVPCLink+ , module Network.AWS.APIGateway.GetVPCLink+ -- ** CreateModel , module Network.AWS.APIGateway.CreateModel @@ -224,6 +233,9 @@ -- ** GetDomainName , module Network.AWS.APIGateway.GetDomainName + -- ** CreateVPCLink+ , module Network.AWS.APIGateway.CreateVPCLink+ -- ** DeleteDocumentationPart , module Network.AWS.APIGateway.DeleteDocumentationPart @@ -242,6 +254,12 @@ -- ** GetUsagePlanKeys (Paginated) , module Network.AWS.APIGateway.GetUsagePlanKeys + -- ** DeleteVPCLink+ , module Network.AWS.APIGateway.DeleteVPCLink++ -- ** UpdateVPCLink+ , module Network.AWS.APIGateway.UpdateVPCLink+ -- ** FlushStageCache , module Network.AWS.APIGateway.FlushStageCache @@ -329,12 +347,18 @@ -- ** DeleteAuthorizer , module Network.AWS.APIGateway.DeleteAuthorizer + -- ** TagResource+ , module Network.AWS.APIGateway.TagResource+ -- ** CreateStage , module Network.AWS.APIGateway.CreateStage -- ** DeleteUsagePlanKey , module Network.AWS.APIGateway.DeleteUsagePlanKey + -- ** UntagResource+ , module Network.AWS.APIGateway.UntagResource+ -- ** CreateAPIKey , module Network.AWS.APIGateway.CreateAPIKey @@ -388,6 +412,9 @@ -- * Types + -- ** APIKeySourceType+ , APIKeySourceType (..)+ -- ** APIKeysFormat , APIKeysFormat (..) @@ -400,6 +427,9 @@ -- ** CacheClusterStatus , CacheClusterStatus (..) + -- ** ConnectionType+ , ConnectionType (..)+ -- ** ContentHandlingStrategy , ContentHandlingStrategy (..) @@ -415,6 +445,9 @@ -- ** IntegrationType , IntegrationType (..) + -- ** LocationStatusType+ , LocationStatusType (..)+ -- ** Op , Op (..) @@ -427,6 +460,9 @@ -- ** UnauthorizedCacheControlHeaderStrategy , UnauthorizedCacheControlHeaderStrategy (..) + -- ** VPCLinkStatus+ , VPCLinkStatus (..)+ -- ** APIKey , APIKey , apiKey@@ -446,6 +482,12 @@ , asStage , asApiId + -- ** AccessLogSettings+ , AccessLogSettings+ , accessLogSettings+ , alsFormat+ , alsDestinationARN+ -- ** Account , Account , account@@ -475,6 +517,14 @@ , bpmBasePath , bpmRestAPIId + -- ** CanarySettings+ , CanarySettings+ , canarySettings+ , csDeploymentId+ , csStageVariableOverrides+ , csUseStageCache+ , csPercentTraffic+ -- ** ClientCertificate , ClientCertificate , clientCertificate@@ -492,6 +542,13 @@ , dId , dDescription + -- ** DeploymentCanarySettings+ , DeploymentCanarySettings+ , deploymentCanarySettings+ , dcsStageVariableOverrides+ , dcsUseStageCache+ , dcsPercentTraffic+ -- ** DocumentationPart , DocumentationPart , documentationPart@@ -518,9 +575,11 @@ -- ** DomainName , DomainName , domainName+ , dnRegionalHostedZoneId , dnCertificateName , dnRegionalCertificateARN , dnCertificateARN+ , dnDistributionHostedZoneId , dnDomainName , dnRegionalCertificateName , dnRegionalDomainName@@ -548,13 +607,16 @@ , iHttpMethod , iRequestTemplates , iCredentials+ , iConnectionId , iRequestParameters , iContentHandling , iPassthroughBehavior , iUri , iIntegrationResponses , iCacheNamespace+ , iTimeoutInMillis , iType+ , iConnectionType , iCacheKeyParameters -- ** IntegrationResponse@@ -571,6 +633,7 @@ , method , mMethodResponses , mHttpMethod+ , mAuthorizationScopes , mRequestValidatorId , mRequestModels , mRequestParameters@@ -651,12 +714,15 @@ -- ** RestAPI , RestAPI , restAPI+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription @@ -682,6 +748,7 @@ , stage , sDeploymentId , sVariables+ , sAccessLogSettings , sDocumentationVersion , sClientCertificateId , sCreatedDate@@ -689,9 +756,11 @@ , sMethodSettings , sLastUpdatedDate , sCacheClusterSize+ , sCanarySettings , sCacheClusterEnabled , sStageName , sDescription+ , sTags -- ** StageKey , StageKey@@ -732,6 +801,16 @@ , upkName , upkId , upkType++ -- ** VPCLink+ , VPCLink+ , vpcLink+ , vlStatus+ , vlTargetARNs+ , vlName+ , vlStatusMessage+ , vlId+ , vlDescription ) where import Network.AWS.APIGateway.CreateAPIKey@@ -748,6 +827,7 @@ import Network.AWS.APIGateway.CreateStage import Network.AWS.APIGateway.CreateUsagePlan import Network.AWS.APIGateway.CreateUsagePlanKey+import Network.AWS.APIGateway.CreateVPCLink import Network.AWS.APIGateway.DeleteAPIKey import Network.AWS.APIGateway.DeleteAuthorizer import Network.AWS.APIGateway.DeleteBasePathMapping@@ -768,6 +848,7 @@ import Network.AWS.APIGateway.DeleteStage import Network.AWS.APIGateway.DeleteUsagePlan import Network.AWS.APIGateway.DeleteUsagePlanKey+import Network.AWS.APIGateway.DeleteVPCLink import Network.AWS.APIGateway.FlushStageAuthorizersCache import Network.AWS.APIGateway.FlushStageCache import Network.AWS.APIGateway.GenerateClientCertificate@@ -809,11 +890,14 @@ import Network.AWS.APIGateway.GetSDKTypes import Network.AWS.APIGateway.GetStage import Network.AWS.APIGateway.GetStages+import Network.AWS.APIGateway.GetTags import Network.AWS.APIGateway.GetUsage import Network.AWS.APIGateway.GetUsagePlan import Network.AWS.APIGateway.GetUsagePlanKey import Network.AWS.APIGateway.GetUsagePlanKeys import Network.AWS.APIGateway.GetUsagePlans+import Network.AWS.APIGateway.GetVPCLink+import Network.AWS.APIGateway.GetVPCLinks import Network.AWS.APIGateway.ImportAPIKeys import Network.AWS.APIGateway.ImportDocumentationParts import Network.AWS.APIGateway.ImportRestAPI@@ -823,9 +907,11 @@ import Network.AWS.APIGateway.PutMethod import Network.AWS.APIGateway.PutMethodResponse import Network.AWS.APIGateway.PutRestAPI+import Network.AWS.APIGateway.TagResource import Network.AWS.APIGateway.TestInvokeAuthorizer import Network.AWS.APIGateway.TestInvokeMethod import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.UntagResource import Network.AWS.APIGateway.UpdateAccount import Network.AWS.APIGateway.UpdateAPIKey import Network.AWS.APIGateway.UpdateAuthorizer@@ -847,6 +933,7 @@ import Network.AWS.APIGateway.UpdateStage import Network.AWS.APIGateway.UpdateUsage import Network.AWS.APIGateway.UpdateUsagePlan+import Network.AWS.APIGateway.UpdateVPCLink import Network.AWS.APIGateway.Waiters {- $errors
gen/Network/AWS/APIGateway/CreateAPIKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateAPIKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -95,43 +95,43 @@ :: CreateAPIKey createAPIKey = CreateAPIKey'- { _cakEnabled = Nothing- , _cakValue = Nothing- , _cakCustomerId = Nothing- , _cakGenerateDistinctId = Nothing- , _cakName = Nothing- , _cakStageKeys = Nothing- , _cakDescription = Nothing- }+ { _cakEnabled = Nothing+ , _cakValue = Nothing+ , _cakCustomerId = Nothing+ , _cakGenerateDistinctId = Nothing+ , _cakName = Nothing+ , _cakStageKeys = Nothing+ , _cakDescription = Nothing+ } -- | Specifies whether the 'ApiKey' can be used by callers. cakEnabled :: Lens' CreateAPIKey (Maybe Bool)-cakEnabled = lens _cakEnabled (\ s a -> s{_cakEnabled = a});+cakEnabled = lens _cakEnabled (\ s a -> s{_cakEnabled = a}) -- | Specifies a value of the API key. cakValue :: Lens' CreateAPIKey (Maybe Text)-cakValue = lens _cakValue (\ s a -> s{_cakValue = a});+cakValue = lens _cakValue (\ s a -> s{_cakValue = a}) -- | An AWS Marketplace customer identifier , when integrating with the AWS SaaS Marketplace. cakCustomerId :: Lens' CreateAPIKey (Maybe Text)-cakCustomerId = lens _cakCustomerId (\ s a -> s{_cakCustomerId = a});+cakCustomerId = lens _cakCustomerId (\ s a -> s{_cakCustomerId = a}) -- | Specifies whether (@true@ ) or not (@false@ ) the key identifier is distinct from the created API key value. cakGenerateDistinctId :: Lens' CreateAPIKey (Maybe Bool)-cakGenerateDistinctId = lens _cakGenerateDistinctId (\ s a -> s{_cakGenerateDistinctId = a});+cakGenerateDistinctId = lens _cakGenerateDistinctId (\ s a -> s{_cakGenerateDistinctId = a}) -- | The name of the 'ApiKey' . cakName :: Lens' CreateAPIKey (Maybe Text)-cakName = lens _cakName (\ s a -> s{_cakName = a});+cakName = lens _cakName (\ s a -> s{_cakName = a}) -- | DEPRECATED FOR USAGE PLANS - Specifies stages associated with the API key. cakStageKeys :: Lens' CreateAPIKey [StageKey]-cakStageKeys = lens _cakStageKeys (\ s a -> s{_cakStageKeys = a}) . _Default . _Coerce;+cakStageKeys = lens _cakStageKeys (\ s a -> s{_cakStageKeys = a}) . _Default . _Coerce -- | The description of the 'ApiKey' . cakDescription :: Lens' CreateAPIKey (Maybe Text)-cakDescription = lens _cakDescription (\ s a -> s{_cakDescription = a});+cakDescription = lens _cakDescription (\ s a -> s{_cakDescription = a}) instance AWSRequest CreateAPIKey where type Rs CreateAPIKey = APIKey
gen/Network/AWS/APIGateway/CreateAuthorizer.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateAuthorizer--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -87,7 +87,7 @@ -- -- * 'caAuthorizerURI' - Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ . ----- * 'caIdentityValidationExpression' - A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.+-- * 'caIdentityValidationExpression' - A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. API Gateway will match the @aud@ field of the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function when there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer. -- -- * 'caProviderARNs' - A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined. --@@ -95,11 +95,11 @@ -- -- * 'caAuthType' - Optional customer-defined field, used in Swagger imports and exports without functional impact. ----- * 'caIdentitySource' - The identity source for which authorization is requested. * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. * For a @COGNITO_USER_POOLS@ authorizer, this property is not used.+-- * 'caIdentitySource' - The identity source for which authorization is requested. * For a @TOKEN@ or @COGNITO_USER_POOLS@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. ----- * 'caAuthorizerCredentials' - Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.+-- * 'caAuthorizerCredentials' - Specifies the required credentials as an IAM role for API Gateway to invoke the authorizer. To specify an IAM role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null. ----- * 'caRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'caRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'caName' - [Required] The name of the authorizer. --@@ -111,58 +111,58 @@ -> CreateAuthorizer createAuthorizer pRestAPIId_ pName_ pType_ = CreateAuthorizer'- { _caAuthorizerURI = Nothing- , _caIdentityValidationExpression = Nothing- , _caProviderARNs = Nothing- , _caAuthorizerResultTtlInSeconds = Nothing- , _caAuthType = Nothing- , _caIdentitySource = Nothing- , _caAuthorizerCredentials = Nothing- , _caRestAPIId = pRestAPIId_- , _caName = pName_- , _caType = pType_- }+ { _caAuthorizerURI = Nothing+ , _caIdentityValidationExpression = Nothing+ , _caProviderARNs = Nothing+ , _caAuthorizerResultTtlInSeconds = Nothing+ , _caAuthType = Nothing+ , _caIdentitySource = Nothing+ , _caAuthorizerCredentials = Nothing+ , _caRestAPIId = pRestAPIId_+ , _caName = pName_+ , _caType = pType_+ } -- | Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ . caAuthorizerURI :: Lens' CreateAuthorizer (Maybe Text)-caAuthorizerURI = lens _caAuthorizerURI (\ s a -> s{_caAuthorizerURI = a});+caAuthorizerURI = lens _caAuthorizerURI (\ s a -> s{_caAuthorizerURI = a}) --- | A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.+-- | A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. API Gateway will match the @aud@ field of the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function when there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer. caIdentityValidationExpression :: Lens' CreateAuthorizer (Maybe Text)-caIdentityValidationExpression = lens _caIdentityValidationExpression (\ s a -> s{_caIdentityValidationExpression = a});+caIdentityValidationExpression = lens _caIdentityValidationExpression (\ s a -> s{_caIdentityValidationExpression = a}) -- | A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined. caProviderARNs :: Lens' CreateAuthorizer [Text]-caProviderARNs = lens _caProviderARNs (\ s a -> s{_caProviderARNs = a}) . _Default . _Coerce;+caProviderARNs = lens _caProviderARNs (\ s a -> s{_caProviderARNs = a}) . _Default . _Coerce -- | The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour. caAuthorizerResultTtlInSeconds :: Lens' CreateAuthorizer (Maybe Int)-caAuthorizerResultTtlInSeconds = lens _caAuthorizerResultTtlInSeconds (\ s a -> s{_caAuthorizerResultTtlInSeconds = a});+caAuthorizerResultTtlInSeconds = lens _caAuthorizerResultTtlInSeconds (\ s a -> s{_caAuthorizerResultTtlInSeconds = a}) -- | Optional customer-defined field, used in Swagger imports and exports without functional impact. caAuthType :: Lens' CreateAuthorizer (Maybe Text)-caAuthType = lens _caAuthType (\ s a -> s{_caAuthType = a});+caAuthType = lens _caAuthType (\ s a -> s{_caAuthType = a}) --- | The identity source for which authorization is requested. * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. * For a @COGNITO_USER_POOLS@ authorizer, this property is not used.+-- | The identity source for which authorization is requested. * For a @TOKEN@ or @COGNITO_USER_POOLS@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. caIdentitySource :: Lens' CreateAuthorizer (Maybe Text)-caIdentitySource = lens _caIdentitySource (\ s a -> s{_caIdentitySource = a});+caIdentitySource = lens _caIdentitySource (\ s a -> s{_caIdentitySource = a}) --- | Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.+-- | Specifies the required credentials as an IAM role for API Gateway to invoke the authorizer. To specify an IAM role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null. caAuthorizerCredentials :: Lens' CreateAuthorizer (Maybe Text)-caAuthorizerCredentials = lens _caAuthorizerCredentials (\ s a -> s{_caAuthorizerCredentials = a});+caAuthorizerCredentials = lens _caAuthorizerCredentials (\ s a -> s{_caAuthorizerCredentials = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . caRestAPIId :: Lens' CreateAuthorizer Text-caRestAPIId = lens _caRestAPIId (\ s a -> s{_caRestAPIId = a});+caRestAPIId = lens _caRestAPIId (\ s a -> s{_caRestAPIId = a}) -- | [Required] The name of the authorizer. caName :: Lens' CreateAuthorizer Text-caName = lens _caName (\ s a -> s{_caName = a});+caName = lens _caName (\ s a -> s{_caName = a}) -- | [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool. caType :: Lens' CreateAuthorizer AuthorizerType-caType = lens _caType (\ s a -> s{_caType = a});+caType = lens _caType (\ s a -> s{_caType = a}) instance AWSRequest CreateAuthorizer where type Rs CreateAuthorizer = Authorizer
gen/Network/AWS/APIGateway/CreateBasePathMapping.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateBasePathMapping--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -48,7 +48,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to create a new 'BasePathMapping' resource.+-- | Requests API Gateway to create a new 'BasePathMapping' resource. -- -- --@@ -69,37 +69,37 @@ -- -- * 'cbpmBasePath' - The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify a base path name after the domain name. ----- * 'cbpmDomainName' - The domain name of the 'BasePathMapping' resource to create.+-- * 'cbpmDomainName' - [Required] The domain name of the 'BasePathMapping' resource to create. ----- * 'cbpmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'cbpmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . createBasePathMapping :: Text -- ^ 'cbpmDomainName' -> Text -- ^ 'cbpmRestAPIId' -> CreateBasePathMapping createBasePathMapping pDomainName_ pRestAPIId_ = CreateBasePathMapping'- { _cbpmStage = Nothing- , _cbpmBasePath = Nothing- , _cbpmDomainName = pDomainName_- , _cbpmRestAPIId = pRestAPIId_- }+ { _cbpmStage = Nothing+ , _cbpmBasePath = Nothing+ , _cbpmDomainName = pDomainName_+ , _cbpmRestAPIId = pRestAPIId_+ } -- | The name of the API's stage that you want to use for this mapping. Leave this blank if you do not want callers to explicitly specify the stage name after any base path name. cbpmStage :: Lens' CreateBasePathMapping (Maybe Text)-cbpmStage = lens _cbpmStage (\ s a -> s{_cbpmStage = a});+cbpmStage = lens _cbpmStage (\ s a -> s{_cbpmStage = a}) -- | The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify a base path name after the domain name. cbpmBasePath :: Lens' CreateBasePathMapping (Maybe Text)-cbpmBasePath = lens _cbpmBasePath (\ s a -> s{_cbpmBasePath = a});+cbpmBasePath = lens _cbpmBasePath (\ s a -> s{_cbpmBasePath = a}) --- | The domain name of the 'BasePathMapping' resource to create.+-- | [Required] The domain name of the 'BasePathMapping' resource to create. cbpmDomainName :: Lens' CreateBasePathMapping Text-cbpmDomainName = lens _cbpmDomainName (\ s a -> s{_cbpmDomainName = a});+cbpmDomainName = lens _cbpmDomainName (\ s a -> s{_cbpmDomainName = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . cbpmRestAPIId :: Lens' CreateBasePathMapping Text-cbpmRestAPIId = lens _cbpmRestAPIId (\ s a -> s{_cbpmRestAPIId = a});+cbpmRestAPIId = lens _cbpmRestAPIId (\ s a -> s{_cbpmRestAPIId = a}) instance AWSRequest CreateBasePathMapping where type Rs CreateBasePathMapping = BasePathMapping
gen/Network/AWS/APIGateway/CreateDeployment.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateDeployment--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -30,6 +30,7 @@ , cdStageDescription , cdVariables , cdCacheClusterSize+ , cdCanarySettings , cdCacheClusterEnabled , cdStageName , cdDescription@@ -52,7 +53,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to create a 'Deployment' resource.+-- | Requests API Gateway to create a 'Deployment' resource. -- -- --@@ -61,6 +62,7 @@ { _cdStageDescription :: !(Maybe Text) , _cdVariables :: !(Maybe (Map Text Text)) , _cdCacheClusterSize :: !(Maybe CacheClusterSize)+ , _cdCanarySettings :: !(Maybe DeploymentCanarySettings) , _cdCacheClusterEnabled :: !(Maybe Bool) , _cdStageName :: !(Maybe Text) , _cdDescription :: !(Maybe Text)@@ -78,55 +80,62 @@ -- -- * 'cdCacheClusterSize' - Specifies the cache cluster size for the 'Stage' resource specified in the input, if a cache cluster is enabled. --+-- * 'cdCanarySettings' - The input configuration for the canary deployment when the deployment is a canary release deployment.+-- -- * 'cdCacheClusterEnabled' - Enables a cache cluster for the 'Stage' resource specified in the input. -- -- * 'cdStageName' - The name of the 'Stage' resource for the 'Deployment' resource to create. -- -- * 'cdDescription' - The description for the 'Deployment' resource to create. ----- * 'cdRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'cdRestAPIId' - [Required] The string identifier of the associated 'RestApi' . createDeployment :: Text -- ^ 'cdRestAPIId' -> CreateDeployment createDeployment pRestAPIId_ = CreateDeployment'- { _cdStageDescription = Nothing- , _cdVariables = Nothing- , _cdCacheClusterSize = Nothing- , _cdCacheClusterEnabled = Nothing- , _cdStageName = Nothing- , _cdDescription = Nothing- , _cdRestAPIId = pRestAPIId_- }+ { _cdStageDescription = Nothing+ , _cdVariables = Nothing+ , _cdCacheClusterSize = Nothing+ , _cdCanarySettings = Nothing+ , _cdCacheClusterEnabled = Nothing+ , _cdStageName = Nothing+ , _cdDescription = Nothing+ , _cdRestAPIId = pRestAPIId_+ } -- | The description of the 'Stage' resource for the 'Deployment' resource to create. cdStageDescription :: Lens' CreateDeployment (Maybe Text)-cdStageDescription = lens _cdStageDescription (\ s a -> s{_cdStageDescription = a});+cdStageDescription = lens _cdStageDescription (\ s a -> s{_cdStageDescription = a}) -- | A map that defines the stage variables for the 'Stage' resource that is associated with the new deployment. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ . cdVariables :: Lens' CreateDeployment (HashMap Text Text)-cdVariables = lens _cdVariables (\ s a -> s{_cdVariables = a}) . _Default . _Map;+cdVariables = lens _cdVariables (\ s a -> s{_cdVariables = a}) . _Default . _Map -- | Specifies the cache cluster size for the 'Stage' resource specified in the input, if a cache cluster is enabled. cdCacheClusterSize :: Lens' CreateDeployment (Maybe CacheClusterSize)-cdCacheClusterSize = lens _cdCacheClusterSize (\ s a -> s{_cdCacheClusterSize = a});+cdCacheClusterSize = lens _cdCacheClusterSize (\ s a -> s{_cdCacheClusterSize = a}) +-- | The input configuration for the canary deployment when the deployment is a canary release deployment.+cdCanarySettings :: Lens' CreateDeployment (Maybe DeploymentCanarySettings)+cdCanarySettings = lens _cdCanarySettings (\ s a -> s{_cdCanarySettings = a})+ -- | Enables a cache cluster for the 'Stage' resource specified in the input. cdCacheClusterEnabled :: Lens' CreateDeployment (Maybe Bool)-cdCacheClusterEnabled = lens _cdCacheClusterEnabled (\ s a -> s{_cdCacheClusterEnabled = a});+cdCacheClusterEnabled = lens _cdCacheClusterEnabled (\ s a -> s{_cdCacheClusterEnabled = a}) -- | The name of the 'Stage' resource for the 'Deployment' resource to create. cdStageName :: Lens' CreateDeployment (Maybe Text)-cdStageName = lens _cdStageName (\ s a -> s{_cdStageName = a});+cdStageName = lens _cdStageName (\ s a -> s{_cdStageName = a}) -- | The description for the 'Deployment' resource to create. cdDescription :: Lens' CreateDeployment (Maybe Text)-cdDescription = lens _cdDescription (\ s a -> s{_cdDescription = a});+cdDescription = lens _cdDescription (\ s a -> s{_cdDescription = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . cdRestAPIId :: Lens' CreateDeployment Text-cdRestAPIId = lens _cdRestAPIId (\ s a -> s{_cdRestAPIId = a});+cdRestAPIId = lens _cdRestAPIId (\ s a -> s{_cdRestAPIId = a}) instance AWSRequest CreateDeployment where type Rs CreateDeployment = Deployment@@ -150,6 +159,7 @@ [("stageDescription" .=) <$> _cdStageDescription, ("variables" .=) <$> _cdVariables, ("cacheClusterSize" .=) <$> _cdCacheClusterSize,+ ("canarySettings" .=) <$> _cdCanarySettings, ("cacheClusterEnabled" .=) <$> _cdCacheClusterEnabled, ("stageName" .=) <$> _cdStageName,
gen/Network/AWS/APIGateway/CreateDocumentationPart.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateDocumentationPart--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -73,23 +73,23 @@ -> CreateDocumentationPart createDocumentationPart pRestAPIId_ pLocation_ pProperties_ = CreateDocumentationPart'- { _cdpRestAPIId = pRestAPIId_- , _cdpLocation = pLocation_- , _cdpProperties = pProperties_- }+ { _cdpRestAPIId = pRestAPIId_+ , _cdpLocation = pLocation_+ , _cdpProperties = pProperties_+ } -- | [Required] The string identifier of the associated 'RestApi' . cdpRestAPIId :: Lens' CreateDocumentationPart Text-cdpRestAPIId = lens _cdpRestAPIId (\ s a -> s{_cdpRestAPIId = a});+cdpRestAPIId = lens _cdpRestAPIId (\ s a -> s{_cdpRestAPIId = a}) -- | [Required] The location of the targeted API entity of the to-be-created documentation part. cdpLocation :: Lens' CreateDocumentationPart DocumentationPartLocation-cdpLocation = lens _cdpLocation (\ s a -> s{_cdpLocation = a});+cdpLocation = lens _cdpLocation (\ s a -> s{_cdpLocation = a}) -- | [Required] The new documentation content map of the targeted API entity. Enclosed key-value pairs are API-specific, but only Swagger-compliant key-value pairs can be exported and, hence, published. cdpProperties :: Lens' CreateDocumentationPart Text-cdpProperties = lens _cdpProperties (\ s a -> s{_cdpProperties = a});+cdpProperties = lens _cdpProperties (\ s a -> s{_cdpProperties = a}) instance AWSRequest CreateDocumentationPart where type Rs CreateDocumentationPart = DocumentationPart
gen/Network/AWS/APIGateway/CreateDocumentationVersion.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateDocumentationVersion--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -76,28 +76,28 @@ -> CreateDocumentationVersion createDocumentationVersion pRestAPIId_ pDocumentationVersion_ = CreateDocumentationVersion'- { _cdvStageName = Nothing- , _cdvDescription = Nothing- , _cdvRestAPIId = pRestAPIId_- , _cdvDocumentationVersion = pDocumentationVersion_- }+ { _cdvStageName = Nothing+ , _cdvDescription = Nothing+ , _cdvRestAPIId = pRestAPIId_+ , _cdvDocumentationVersion = pDocumentationVersion_+ } -- | The stage name to be associated with the new documentation snapshot. cdvStageName :: Lens' CreateDocumentationVersion (Maybe Text)-cdvStageName = lens _cdvStageName (\ s a -> s{_cdvStageName = a});+cdvStageName = lens _cdvStageName (\ s a -> s{_cdvStageName = a}) -- | A description about the new documentation snapshot. cdvDescription :: Lens' CreateDocumentationVersion (Maybe Text)-cdvDescription = lens _cdvDescription (\ s a -> s{_cdvDescription = a});+cdvDescription = lens _cdvDescription (\ s a -> s{_cdvDescription = a}) -- | [Required] The string identifier of the associated 'RestApi' . cdvRestAPIId :: Lens' CreateDocumentationVersion Text-cdvRestAPIId = lens _cdvRestAPIId (\ s a -> s{_cdvRestAPIId = a});+cdvRestAPIId = lens _cdvRestAPIId (\ s a -> s{_cdvRestAPIId = a}) -- | [Required] The version identifier of the new snapshot. cdvDocumentationVersion :: Lens' CreateDocumentationVersion Text-cdvDocumentationVersion = lens _cdvDocumentationVersion (\ s a -> s{_cdvDocumentationVersion = a});+cdvDocumentationVersion = lens _cdvDocumentationVersion (\ s a -> s{_cdvDocumentationVersion = a}) instance AWSRequest CreateDocumentationVersion where type Rs CreateDocumentationVersion =
gen/Network/AWS/APIGateway/CreateDomainName.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateDomainName--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -41,9 +41,11 @@ , domainName , DomainName -- * Response Lenses+ , dnRegionalHostedZoneId , dnCertificateName , dnRegionalCertificateARN , dnCertificateARN+ , dnDistributionHostedZoneId , dnDomainName , dnRegionalCertificateName , dnRegionalDomainName@@ -97,59 +99,59 @@ -- -- * 'cdnEndpointConfiguration' - The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name. ----- * 'cdnDomainName' - (Required) The name of the 'DomainName' resource.+-- * 'cdnDomainName' - [Required] The name of the 'DomainName' resource. createDomainName :: Text -- ^ 'cdnDomainName' -> CreateDomainName createDomainName pDomainName_ = CreateDomainName'- { _cdnCertificateName = Nothing- , _cdnRegionalCertificateARN = Nothing- , _cdnCertificateARN = Nothing- , _cdnCertificatePrivateKey = Nothing- , _cdnRegionalCertificateName = Nothing- , _cdnCertificateBody = Nothing- , _cdnCertificateChain = Nothing- , _cdnEndpointConfiguration = Nothing- , _cdnDomainName = pDomainName_- }+ { _cdnCertificateName = Nothing+ , _cdnRegionalCertificateARN = Nothing+ , _cdnCertificateARN = Nothing+ , _cdnCertificatePrivateKey = Nothing+ , _cdnRegionalCertificateName = Nothing+ , _cdnCertificateBody = Nothing+ , _cdnCertificateChain = Nothing+ , _cdnEndpointConfiguration = Nothing+ , _cdnDomainName = pDomainName_+ } -- | The user-friendly name of the certificate that will be used by edge-optimized endpoint for this domain name. cdnCertificateName :: Lens' CreateDomainName (Maybe Text)-cdnCertificateName = lens _cdnCertificateName (\ s a -> s{_cdnCertificateName = a});+cdnCertificateName = lens _cdnCertificateName (\ s a -> s{_cdnCertificateName = a}) -- | The reference to an AWS-managed certificate that will be used by regional endpoint for this domain name. AWS Certificate Manager is the only supported source. cdnRegionalCertificateARN :: Lens' CreateDomainName (Maybe Text)-cdnRegionalCertificateARN = lens _cdnRegionalCertificateARN (\ s a -> s{_cdnRegionalCertificateARN = a});+cdnRegionalCertificateARN = lens _cdnRegionalCertificateARN (\ s a -> s{_cdnRegionalCertificateARN = a}) -- | The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source. cdnCertificateARN :: Lens' CreateDomainName (Maybe Text)-cdnCertificateARN = lens _cdnCertificateARN (\ s a -> s{_cdnCertificateARN = a});+cdnCertificateARN = lens _cdnCertificateARN (\ s a -> s{_cdnCertificateARN = a}) -- | [Deprecated] Your edge-optimized endpoint's domain name certificate's private key. cdnCertificatePrivateKey :: Lens' CreateDomainName (Maybe Text)-cdnCertificatePrivateKey = lens _cdnCertificatePrivateKey (\ s a -> s{_cdnCertificatePrivateKey = a});+cdnCertificatePrivateKey = lens _cdnCertificatePrivateKey (\ s a -> s{_cdnCertificatePrivateKey = a}) -- | The user-friendly name of the certificate that will be used by regional endpoint for this domain name. cdnRegionalCertificateName :: Lens' CreateDomainName (Maybe Text)-cdnRegionalCertificateName = lens _cdnRegionalCertificateName (\ s a -> s{_cdnRegionalCertificateName = a});+cdnRegionalCertificateName = lens _cdnRegionalCertificateName (\ s a -> s{_cdnRegionalCertificateName = a}) -- | [Deprecated] The body of the server certificate that will be used by edge-optimized endpoint for this domain name provided by your certificate authority. cdnCertificateBody :: Lens' CreateDomainName (Maybe Text)-cdnCertificateBody = lens _cdnCertificateBody (\ s a -> s{_cdnCertificateBody = a});+cdnCertificateBody = lens _cdnCertificateBody (\ s a -> s{_cdnCertificateBody = a}) -- | [Deprecated] The intermediate certificates and optionally the root certificate, one after the other without any blank lines, used by an edge-optimized endpoint for this domain name. If you include the root certificate, your certificate chain must start with intermediate certificates and end with the root certificate. Use the intermediate certificates that were provided by your certificate authority. Do not include any intermediaries that are not in the chain of trust path. cdnCertificateChain :: Lens' CreateDomainName (Maybe Text)-cdnCertificateChain = lens _cdnCertificateChain (\ s a -> s{_cdnCertificateChain = a});+cdnCertificateChain = lens _cdnCertificateChain (\ s a -> s{_cdnCertificateChain = a}) -- | The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name. cdnEndpointConfiguration :: Lens' CreateDomainName (Maybe EndpointConfiguration)-cdnEndpointConfiguration = lens _cdnEndpointConfiguration (\ s a -> s{_cdnEndpointConfiguration = a});+cdnEndpointConfiguration = lens _cdnEndpointConfiguration (\ s a -> s{_cdnEndpointConfiguration = a}) --- | (Required) The name of the 'DomainName' resource.+-- | [Required] The name of the 'DomainName' resource. cdnDomainName :: Lens' CreateDomainName Text-cdnDomainName = lens _cdnDomainName (\ s a -> s{_cdnDomainName = a});+cdnDomainName = lens _cdnDomainName (\ s a -> s{_cdnDomainName = a}) instance AWSRequest CreateDomainName where type Rs CreateDomainName = DomainName
gen/Network/AWS/APIGateway/CreateModel.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateModel--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -69,15 +69,15 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cmSchema' - The schema for the model. For @application/json@ models, this should be <http://json-schema.org/documentation.html JSON-schema draft v4> model.+-- * 'cmSchema' - The schema for the model. For @application/json@ models, this should be <https://tools.ietf.org/html/draft-zyp-json-schema-04 JSON schema draft 4> model. -- -- * 'cmDescription' - The description of the model. ----- * 'cmRestAPIId' - The 'RestApi' identifier under which the 'Model' will be created.+-- * 'cmRestAPIId' - [Required] The 'RestApi' identifier under which the 'Model' will be created. ----- * 'cmName' - The name of the model. Must be alphanumeric.+-- * 'cmName' - [Required] The name of the model. Must be alphanumeric. ----- * 'cmContentType' - The content-type for the model.+-- * 'cmContentType' - [Required] The content-type for the model. createModel :: Text -- ^ 'cmRestAPIId' -> Text -- ^ 'cmName'@@ -85,33 +85,33 @@ -> CreateModel createModel pRestAPIId_ pName_ pContentType_ = CreateModel'- { _cmSchema = Nothing- , _cmDescription = Nothing- , _cmRestAPIId = pRestAPIId_- , _cmName = pName_- , _cmContentType = pContentType_- }+ { _cmSchema = Nothing+ , _cmDescription = Nothing+ , _cmRestAPIId = pRestAPIId_+ , _cmName = pName_+ , _cmContentType = pContentType_+ } --- | The schema for the model. For @application/json@ models, this should be <http://json-schema.org/documentation.html JSON-schema draft v4> model.+-- | The schema for the model. For @application/json@ models, this should be <https://tools.ietf.org/html/draft-zyp-json-schema-04 JSON schema draft 4> model. cmSchema :: Lens' CreateModel (Maybe Text)-cmSchema = lens _cmSchema (\ s a -> s{_cmSchema = a});+cmSchema = lens _cmSchema (\ s a -> s{_cmSchema = a}) -- | The description of the model. cmDescription :: Lens' CreateModel (Maybe Text)-cmDescription = lens _cmDescription (\ s a -> s{_cmDescription = a});+cmDescription = lens _cmDescription (\ s a -> s{_cmDescription = a}) --- | The 'RestApi' identifier under which the 'Model' will be created.+-- | [Required] The 'RestApi' identifier under which the 'Model' will be created. cmRestAPIId :: Lens' CreateModel Text-cmRestAPIId = lens _cmRestAPIId (\ s a -> s{_cmRestAPIId = a});+cmRestAPIId = lens _cmRestAPIId (\ s a -> s{_cmRestAPIId = a}) --- | The name of the model. Must be alphanumeric.+-- | [Required] The name of the model. Must be alphanumeric. cmName :: Lens' CreateModel Text-cmName = lens _cmName (\ s a -> s{_cmName = a});+cmName = lens _cmName (\ s a -> s{_cmName = a}) --- | The content-type for the model.+-- | [Required] The content-type for the model. cmContentType :: Lens' CreateModel Text-cmContentType = lens _cmContentType (\ s a -> s{_cmContentType = a});+cmContentType = lens _cmContentType (\ s a -> s{_cmContentType = a}) instance AWSRequest CreateModel where type Rs CreateModel = Model
gen/Network/AWS/APIGateway/CreateRequestValidator.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateRequestValidator--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -72,34 +72,34 @@ -- -- * 'crvValidateRequestBody' - A Boolean flag to indicate whether to validate request body according to the configured model schema for the method (@true@ ) or not (@false@ ). ----- * 'crvRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'crvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . createRequestValidator :: Text -- ^ 'crvRestAPIId' -> CreateRequestValidator createRequestValidator pRestAPIId_ = CreateRequestValidator'- { _crvValidateRequestParameters = Nothing- , _crvName = Nothing- , _crvValidateRequestBody = Nothing- , _crvRestAPIId = pRestAPIId_- }+ { _crvValidateRequestParameters = Nothing+ , _crvName = Nothing+ , _crvValidateRequestBody = Nothing+ , _crvRestAPIId = pRestAPIId_+ } -- | A Boolean flag to indicate whether to validate request parameters, @true@ , or not @false@ . crvValidateRequestParameters :: Lens' CreateRequestValidator (Maybe Bool)-crvValidateRequestParameters = lens _crvValidateRequestParameters (\ s a -> s{_crvValidateRequestParameters = a});+crvValidateRequestParameters = lens _crvValidateRequestParameters (\ s a -> s{_crvValidateRequestParameters = a}) -- | The name of the to-be-created 'RequestValidator' . crvName :: Lens' CreateRequestValidator (Maybe Text)-crvName = lens _crvName (\ s a -> s{_crvName = a});+crvName = lens _crvName (\ s a -> s{_crvName = a}) -- | A Boolean flag to indicate whether to validate request body according to the configured model schema for the method (@true@ ) or not (@false@ ). crvValidateRequestBody :: Lens' CreateRequestValidator (Maybe Bool)-crvValidateRequestBody = lens _crvValidateRequestBody (\ s a -> s{_crvValidateRequestBody = a});+crvValidateRequestBody = lens _crvValidateRequestBody (\ s a -> s{_crvValidateRequestBody = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . crvRestAPIId :: Lens' CreateRequestValidator Text-crvRestAPIId = lens _crvRestAPIId (\ s a -> s{_crvRestAPIId = a});+crvRestAPIId = lens _crvRestAPIId (\ s a -> s{_crvRestAPIId = a}) instance AWSRequest CreateRequestValidator where type Rs CreateRequestValidator = RequestValidator
gen/Network/AWS/APIGateway/CreateResource.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateResource--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -49,7 +49,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to create a 'Resource' resource.+-- | Requests API Gateway to create a 'Resource' resource. -- -- --@@ -65,9 +65,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'crRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'crRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'crParentId' - The parent resource's identifier.+-- * 'crParentId' - [Required] The parent resource's identifier. -- -- * 'crPathPart' - The last path segment for this resource. createResource@@ -77,23 +77,23 @@ -> CreateResource createResource pRestAPIId_ pParentId_ pPathPart_ = CreateResource'- { _crRestAPIId = pRestAPIId_- , _crParentId = pParentId_- , _crPathPart = pPathPart_- }+ { _crRestAPIId = pRestAPIId_+ , _crParentId = pParentId_+ , _crPathPart = pPathPart_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . crRestAPIId :: Lens' CreateResource Text-crRestAPIId = lens _crRestAPIId (\ s a -> s{_crRestAPIId = a});+crRestAPIId = lens _crRestAPIId (\ s a -> s{_crRestAPIId = a}) --- | The parent resource's identifier.+-- | [Required] The parent resource's identifier. crParentId :: Lens' CreateResource Text-crParentId = lens _crParentId (\ s a -> s{_crParentId = a});+crParentId = lens _crParentId (\ s a -> s{_crParentId = a}) -- | The last path segment for this resource. crPathPart :: Lens' CreateResource Text-crPathPart = lens _crPathPart (\ s a -> s{_crPathPart = a});+crPathPart = lens _crPathPart (\ s a -> s{_crPathPart = a}) instance AWSRequest CreateResource where type Rs CreateResource = Resource
gen/Network/AWS/APIGateway/CreateRestAPI.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -27,9 +27,12 @@ createRestAPI , CreateRestAPI -- * Request Lenses+ , craMinimumCompressionSize , craBinaryMediaTypes , craVersion+ , craApiKeySource , craCloneFrom+ , craPolicy , craEndpointConfiguration , craDescription , craName@@ -38,12 +41,15 @@ , restAPI , RestAPI -- * Response Lenses+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription ) where@@ -61,12 +67,15 @@ -- -- /See:/ 'createRestAPI' smart constructor. data CreateRestAPI = CreateRestAPI'- { _craBinaryMediaTypes :: !(Maybe [Text])- , _craVersion :: !(Maybe Text)- , _craCloneFrom :: !(Maybe Text)- , _craEndpointConfiguration :: !(Maybe EndpointConfiguration)- , _craDescription :: !(Maybe Text)- , _craName :: !Text+ { _craMinimumCompressionSize :: !(Maybe Int)+ , _craBinaryMediaTypes :: !(Maybe [Text])+ , _craVersion :: !(Maybe Text)+ , _craApiKeySource :: !(Maybe APIKeySourceType)+ , _craCloneFrom :: !(Maybe Text)+ , _craPolicy :: !(Maybe Text)+ , _craEndpointConfiguration :: !(Maybe EndpointConfiguration)+ , _craDescription :: !(Maybe Text)+ , _craName :: !Text } deriving (Eq, Read, Show, Data, Typeable, Generic) @@ -74,54 +83,75 @@ -- -- Use one of the following lenses to modify other fields as desired: --+-- * 'craMinimumCompressionSize' - A nullable integer that is used to enable compression (with non-negative between 0 and 10485760 (10M) bytes, inclusive) or disable compression (with a null value) on an API. When compression is enabled, compression or decompression is not applied on the payload if the payload size is smaller than this value. Setting it to zero allows compression for any payload size.+-- -- * 'craBinaryMediaTypes' - The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads. -- -- * 'craVersion' - A version identifier for the API. --+-- * 'craApiKeySource' - The source of the API key for metering requests according to a usage plan. Valid values are: * @HEADER@ to read the API key from the @X-API-Key@ header of a request. * @AUTHORIZER@ to read the API key from the @UsageIdentifierKey@ from a custom authorizer.+-- -- * 'craCloneFrom' - The ID of the 'RestApi' that you want to clone from. --+-- * 'craPolicy' - 'Method'+-- -- * 'craEndpointConfiguration' - The endpoint configuration of this 'RestApi' showing the endpoint types of the API. -- -- * 'craDescription' - The description of the 'RestApi' . ----- * 'craName' - The name of the 'RestApi' .+-- * 'craName' - [Required] The name of the 'RestApi' . createRestAPI :: Text -- ^ 'craName' -> CreateRestAPI createRestAPI pName_ = CreateRestAPI'- { _craBinaryMediaTypes = Nothing- , _craVersion = Nothing- , _craCloneFrom = Nothing- , _craEndpointConfiguration = Nothing- , _craDescription = Nothing- , _craName = pName_- }+ { _craMinimumCompressionSize = Nothing+ , _craBinaryMediaTypes = Nothing+ , _craVersion = Nothing+ , _craApiKeySource = Nothing+ , _craCloneFrom = Nothing+ , _craPolicy = Nothing+ , _craEndpointConfiguration = Nothing+ , _craDescription = Nothing+ , _craName = pName_+ } +-- | A nullable integer that is used to enable compression (with non-negative between 0 and 10485760 (10M) bytes, inclusive) or disable compression (with a null value) on an API. When compression is enabled, compression or decompression is not applied on the payload if the payload size is smaller than this value. Setting it to zero allows compression for any payload size.+craMinimumCompressionSize :: Lens' CreateRestAPI (Maybe Int)+craMinimumCompressionSize = lens _craMinimumCompressionSize (\ s a -> s{_craMinimumCompressionSize = a})+ -- | The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads. craBinaryMediaTypes :: Lens' CreateRestAPI [Text]-craBinaryMediaTypes = lens _craBinaryMediaTypes (\ s a -> s{_craBinaryMediaTypes = a}) . _Default . _Coerce;+craBinaryMediaTypes = lens _craBinaryMediaTypes (\ s a -> s{_craBinaryMediaTypes = a}) . _Default . _Coerce -- | A version identifier for the API. craVersion :: Lens' CreateRestAPI (Maybe Text)-craVersion = lens _craVersion (\ s a -> s{_craVersion = a});+craVersion = lens _craVersion (\ s a -> s{_craVersion = a}) +-- | The source of the API key for metering requests according to a usage plan. Valid values are: * @HEADER@ to read the API key from the @X-API-Key@ header of a request. * @AUTHORIZER@ to read the API key from the @UsageIdentifierKey@ from a custom authorizer.+craApiKeySource :: Lens' CreateRestAPI (Maybe APIKeySourceType)+craApiKeySource = lens _craApiKeySource (\ s a -> s{_craApiKeySource = a})+ -- | The ID of the 'RestApi' that you want to clone from. craCloneFrom :: Lens' CreateRestAPI (Maybe Text)-craCloneFrom = lens _craCloneFrom (\ s a -> s{_craCloneFrom = a});+craCloneFrom = lens _craCloneFrom (\ s a -> s{_craCloneFrom = a}) +-- | 'Method'+craPolicy :: Lens' CreateRestAPI (Maybe Text)+craPolicy = lens _craPolicy (\ s a -> s{_craPolicy = a})+ -- | The endpoint configuration of this 'RestApi' showing the endpoint types of the API. craEndpointConfiguration :: Lens' CreateRestAPI (Maybe EndpointConfiguration)-craEndpointConfiguration = lens _craEndpointConfiguration (\ s a -> s{_craEndpointConfiguration = a});+craEndpointConfiguration = lens _craEndpointConfiguration (\ s a -> s{_craEndpointConfiguration = a}) -- | The description of the 'RestApi' . craDescription :: Lens' CreateRestAPI (Maybe Text)-craDescription = lens _craDescription (\ s a -> s{_craDescription = a});+craDescription = lens _craDescription (\ s a -> s{_craDescription = a}) --- | The name of the 'RestApi' .+-- | [Required] The name of the 'RestApi' . craName :: Lens' CreateRestAPI Text-craName = lens _craName (\ s a -> s{_craName = a});+craName = lens _craName (\ s a -> s{_craName = a}) instance AWSRequest CreateRestAPI where type Rs CreateRestAPI = RestAPI@@ -142,9 +172,13 @@ toJSON CreateRestAPI'{..} = object (catMaybes- [("binaryMediaTypes" .=) <$> _craBinaryMediaTypes,+ [("minimumCompressionSize" .=) <$>+ _craMinimumCompressionSize,+ ("binaryMediaTypes" .=) <$> _craBinaryMediaTypes, ("version" .=) <$> _craVersion,+ ("apiKeySource" .=) <$> _craApiKeySource, ("cloneFrom" .=) <$> _craCloneFrom,+ ("policy" .=) <$> _craPolicy, ("endpointConfiguration" .=) <$> _craEndpointConfiguration, ("description" .=) <$> _craDescription,
gen/Network/AWS/APIGateway/CreateStage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateStage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -27,14 +27,16 @@ createStage , CreateStage -- * Request Lenses- , csVariables- , csDocumentationVersion- , csCacheClusterSize- , csCacheClusterEnabled- , csDescription- , csRestAPIId- , csStageName- , csDeploymentId+ , cVariables+ , cDocumentationVersion+ , cCacheClusterSize+ , cCanarySettings+ , cCacheClusterEnabled+ , cDescription+ , cTags+ , cRestAPIId+ , cStageName+ , cDeploymentId -- * Destructuring the Response , stage@@ -42,6 +44,7 @@ -- * Response Lenses , sDeploymentId , sVariables+ , sAccessLogSettings , sDocumentationVersion , sClientCertificateId , sCreatedDate@@ -49,9 +52,11 @@ , sMethodSettings , sLastUpdatedDate , sCacheClusterSize+ , sCanarySettings , sCacheClusterEnabled , sStageName , sDescription+ , sTags ) where import Network.AWS.APIGateway.Types@@ -61,20 +66,22 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to create a 'Stage' resource.+-- | Requests API Gateway to create a 'Stage' resource. -- -- -- -- /See:/ 'createStage' smart constructor. data CreateStage = CreateStage'- { _csVariables :: !(Maybe (Map Text Text))- , _csDocumentationVersion :: !(Maybe Text)- , _csCacheClusterSize :: !(Maybe CacheClusterSize)- , _csCacheClusterEnabled :: !(Maybe Bool)- , _csDescription :: !(Maybe Text)- , _csRestAPIId :: !Text- , _csStageName :: !Text- , _csDeploymentId :: !Text+ { _cVariables :: !(Maybe (Map Text Text))+ , _cDocumentationVersion :: !(Maybe Text)+ , _cCacheClusterSize :: !(Maybe CacheClusterSize)+ , _cCanarySettings :: !(Maybe CanarySettings)+ , _cCacheClusterEnabled :: !(Maybe Bool)+ , _cDescription :: !(Maybe Text)+ , _cTags :: !(Maybe (Map Text Text))+ , _cRestAPIId :: !Text+ , _cStageName :: !Text+ , _cDeploymentId :: !Text } deriving (Eq, Read, Show, Data, Typeable, Generic) @@ -82,71 +89,85 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'csVariables' - A map that defines the stage variables for the new 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .+-- * 'cVariables' - A map that defines the stage variables for the new 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ . ----- * 'csDocumentationVersion' - The version of the associated API documentation.+-- * 'cDocumentationVersion' - The version of the associated API documentation. ----- * 'csCacheClusterSize' - The stage's cache cluster size.+-- * 'cCacheClusterSize' - The stage's cache cluster size. ----- * 'csCacheClusterEnabled' - Whether cache clustering is enabled for the stage.+-- * 'cCanarySettings' - The canary deployment settings of this stage. ----- * 'csDescription' - The description of the 'Stage' resource.+-- * 'cCacheClusterEnabled' - Whether cache clustering is enabled for the stage. ----- * 'csRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'cDescription' - The description of the 'Stage' resource. ----- * 'csStageName' - The name for the 'Stage' resource.+-- * 'cTags' - The key-value map of strings. The valid character set is [a-zA-Z+-=._:/]. The tag key can be up to 128 characters and must not start with @aws:@ . The tag value can be up to 256 characters. ----- * 'csDeploymentId' - The identifier of the 'Deployment' resource for the 'Stage' resource.+-- * 'cRestAPIId' - [Required] The string identifier of the associated 'RestApi' .+--+-- * 'cStageName' - [Required] The name for the 'Stage' resource.+--+-- * 'cDeploymentId' - [Required] The identifier of the 'Deployment' resource for the 'Stage' resource. createStage- :: Text -- ^ 'csRestAPIId'- -> Text -- ^ 'csStageName'- -> Text -- ^ 'csDeploymentId'+ :: Text -- ^ 'cRestAPIId'+ -> Text -- ^ 'cStageName'+ -> Text -- ^ 'cDeploymentId' -> CreateStage createStage pRestAPIId_ pStageName_ pDeploymentId_ = CreateStage'- { _csVariables = Nothing- , _csDocumentationVersion = Nothing- , _csCacheClusterSize = Nothing- , _csCacheClusterEnabled = Nothing- , _csDescription = Nothing- , _csRestAPIId = pRestAPIId_- , _csStageName = pStageName_- , _csDeploymentId = pDeploymentId_- }+ { _cVariables = Nothing+ , _cDocumentationVersion = Nothing+ , _cCacheClusterSize = Nothing+ , _cCanarySettings = Nothing+ , _cCacheClusterEnabled = Nothing+ , _cDescription = Nothing+ , _cTags = Nothing+ , _cRestAPIId = pRestAPIId_+ , _cStageName = pStageName_+ , _cDeploymentId = pDeploymentId_+ } -- | A map that defines the stage variables for the new 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .-csVariables :: Lens' CreateStage (HashMap Text Text)-csVariables = lens _csVariables (\ s a -> s{_csVariables = a}) . _Default . _Map;+cVariables :: Lens' CreateStage (HashMap Text Text)+cVariables = lens _cVariables (\ s a -> s{_cVariables = a}) . _Default . _Map -- | The version of the associated API documentation.-csDocumentationVersion :: Lens' CreateStage (Maybe Text)-csDocumentationVersion = lens _csDocumentationVersion (\ s a -> s{_csDocumentationVersion = a});+cDocumentationVersion :: Lens' CreateStage (Maybe Text)+cDocumentationVersion = lens _cDocumentationVersion (\ s a -> s{_cDocumentationVersion = a}) -- | The stage's cache cluster size.-csCacheClusterSize :: Lens' CreateStage (Maybe CacheClusterSize)-csCacheClusterSize = lens _csCacheClusterSize (\ s a -> s{_csCacheClusterSize = a});+cCacheClusterSize :: Lens' CreateStage (Maybe CacheClusterSize)+cCacheClusterSize = lens _cCacheClusterSize (\ s a -> s{_cCacheClusterSize = a}) +-- | The canary deployment settings of this stage.+cCanarySettings :: Lens' CreateStage (Maybe CanarySettings)+cCanarySettings = lens _cCanarySettings (\ s a -> s{_cCanarySettings = a})+ -- | Whether cache clustering is enabled for the stage.-csCacheClusterEnabled :: Lens' CreateStage (Maybe Bool)-csCacheClusterEnabled = lens _csCacheClusterEnabled (\ s a -> s{_csCacheClusterEnabled = a});+cCacheClusterEnabled :: Lens' CreateStage (Maybe Bool)+cCacheClusterEnabled = lens _cCacheClusterEnabled (\ s a -> s{_cCacheClusterEnabled = a}) -- | The description of the 'Stage' resource.-csDescription :: Lens' CreateStage (Maybe Text)-csDescription = lens _csDescription (\ s a -> s{_csDescription = a});+cDescription :: Lens' CreateStage (Maybe Text)+cDescription = lens _cDescription (\ s a -> s{_cDescription = a}) --- | The string identifier of the associated 'RestApi' .-csRestAPIId :: Lens' CreateStage Text-csRestAPIId = lens _csRestAPIId (\ s a -> s{_csRestAPIId = a});+-- | The key-value map of strings. The valid character set is [a-zA-Z+-=._:/]. The tag key can be up to 128 characters and must not start with @aws:@ . The tag value can be up to 256 characters.+cTags :: Lens' CreateStage (HashMap Text Text)+cTags = lens _cTags (\ s a -> s{_cTags = a}) . _Default . _Map --- | The name for the 'Stage' resource.-csStageName :: Lens' CreateStage Text-csStageName = lens _csStageName (\ s a -> s{_csStageName = a});+-- | [Required] The string identifier of the associated 'RestApi' .+cRestAPIId :: Lens' CreateStage Text+cRestAPIId = lens _cRestAPIId (\ s a -> s{_cRestAPIId = a}) --- | The identifier of the 'Deployment' resource for the 'Stage' resource.-csDeploymentId :: Lens' CreateStage Text-csDeploymentId = lens _csDeploymentId (\ s a -> s{_csDeploymentId = a});+-- | [Required] The name for the 'Stage' resource.+cStageName :: Lens' CreateStage Text+cStageName = lens _cStageName (\ s a -> s{_cStageName = a}) +-- | [Required] The identifier of the 'Deployment' resource for the 'Stage' resource.+cDeploymentId :: Lens' CreateStage Text+cDeploymentId = lens _cDeploymentId (\ s a -> s{_cDeploymentId = a})+ instance AWSRequest CreateStage where type Rs CreateStage = Stage request = postJSON apiGateway@@ -166,20 +187,20 @@ toJSON CreateStage'{..} = object (catMaybes- [("variables" .=) <$> _csVariables,+ [("variables" .=) <$> _cVariables, ("documentationVersion" .=) <$>- _csDocumentationVersion,- ("cacheClusterSize" .=) <$> _csCacheClusterSize,- ("cacheClusterEnabled" .=) <$>- _csCacheClusterEnabled,- ("description" .=) <$> _csDescription,- Just ("stageName" .= _csStageName),- Just ("deploymentId" .= _csDeploymentId)])+ _cDocumentationVersion,+ ("cacheClusterSize" .=) <$> _cCacheClusterSize,+ ("canarySettings" .=) <$> _cCanarySettings,+ ("cacheClusterEnabled" .=) <$> _cCacheClusterEnabled,+ ("description" .=) <$> _cDescription,+ ("tags" .=) <$> _cTags,+ Just ("stageName" .= _cStageName),+ Just ("deploymentId" .= _cDeploymentId)]) instance ToPath CreateStage where toPath CreateStage'{..}- = mconcat- ["/restapis/", toBS _csRestAPIId, "/stages"]+ = mconcat ["/restapis/", toBS _cRestAPIId, "/stages"] instance ToQuery CreateStage where toQuery = const mempty
gen/Network/AWS/APIGateway/CreateUsagePlan.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateUsagePlan--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -79,39 +79,39 @@ -- -- * 'cupDescription' - The description of the usage plan. ----- * 'cupName' - The name of the usage plan.+-- * 'cupName' - [Required] The name of the usage plan. createUsagePlan :: Text -- ^ 'cupName' -> CreateUsagePlan createUsagePlan pName_ = CreateUsagePlan'- { _cupApiStages = Nothing- , _cupThrottle = Nothing- , _cupQuota = Nothing- , _cupDescription = Nothing- , _cupName = pName_- }+ { _cupApiStages = Nothing+ , _cupThrottle = Nothing+ , _cupQuota = Nothing+ , _cupDescription = Nothing+ , _cupName = pName_+ } -- | The associated API stages of the usage plan. cupApiStages :: Lens' CreateUsagePlan [APIStage]-cupApiStages = lens _cupApiStages (\ s a -> s{_cupApiStages = a}) . _Default . _Coerce;+cupApiStages = lens _cupApiStages (\ s a -> s{_cupApiStages = a}) . _Default . _Coerce -- | The throttling limits of the usage plan. cupThrottle :: Lens' CreateUsagePlan (Maybe ThrottleSettings)-cupThrottle = lens _cupThrottle (\ s a -> s{_cupThrottle = a});+cupThrottle = lens _cupThrottle (\ s a -> s{_cupThrottle = a}) -- | The quota of the usage plan. cupQuota :: Lens' CreateUsagePlan (Maybe QuotaSettings)-cupQuota = lens _cupQuota (\ s a -> s{_cupQuota = a});+cupQuota = lens _cupQuota (\ s a -> s{_cupQuota = a}) -- | The description of the usage plan. cupDescription :: Lens' CreateUsagePlan (Maybe Text)-cupDescription = lens _cupDescription (\ s a -> s{_cupDescription = a});+cupDescription = lens _cupDescription (\ s a -> s{_cupDescription = a}) --- | The name of the usage plan.+-- | [Required] The name of the usage plan. cupName :: Lens' CreateUsagePlan Text-cupName = lens _cupName (\ s a -> s{_cupName = a});+cupName = lens _cupName (\ s a -> s{_cupName = a}) instance AWSRequest CreateUsagePlan where type Rs CreateUsagePlan = UsagePlan
gen/Network/AWS/APIGateway/CreateUsagePlanKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.CreateUsagePlanKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,11 +64,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cupkUsagePlanId' - The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-created 'UsagePlanKey' resource representing a plan customer.+-- * 'cupkUsagePlanId' - [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-created 'UsagePlanKey' resource representing a plan customer. ----- * 'cupkKeyId' - The identifier of a 'UsagePlanKey' resource for a plan customer.+-- * 'cupkKeyId' - [Required] The identifier of a 'UsagePlanKey' resource for a plan customer. ----- * 'cupkKeyType' - The type of a 'UsagePlanKey' resource for a plan customer.+-- * 'cupkKeyType' - [Required] The type of a 'UsagePlanKey' resource for a plan customer. createUsagePlanKey :: Text -- ^ 'cupkUsagePlanId' -> Text -- ^ 'cupkKeyId'@@ -76,23 +76,23 @@ -> CreateUsagePlanKey createUsagePlanKey pUsagePlanId_ pKeyId_ pKeyType_ = CreateUsagePlanKey'- { _cupkUsagePlanId = pUsagePlanId_- , _cupkKeyId = pKeyId_- , _cupkKeyType = pKeyType_- }+ { _cupkUsagePlanId = pUsagePlanId_+ , _cupkKeyId = pKeyId_+ , _cupkKeyType = pKeyType_+ } --- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-created 'UsagePlanKey' resource representing a plan customer.+-- | [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-created 'UsagePlanKey' resource representing a plan customer. cupkUsagePlanId :: Lens' CreateUsagePlanKey Text-cupkUsagePlanId = lens _cupkUsagePlanId (\ s a -> s{_cupkUsagePlanId = a});+cupkUsagePlanId = lens _cupkUsagePlanId (\ s a -> s{_cupkUsagePlanId = a}) --- | The identifier of a 'UsagePlanKey' resource for a plan customer.+-- | [Required] The identifier of a 'UsagePlanKey' resource for a plan customer. cupkKeyId :: Lens' CreateUsagePlanKey Text-cupkKeyId = lens _cupkKeyId (\ s a -> s{_cupkKeyId = a});+cupkKeyId = lens _cupkKeyId (\ s a -> s{_cupkKeyId = a}) --- | The type of a 'UsagePlanKey' resource for a plan customer.+-- | [Required] The type of a 'UsagePlanKey' resource for a plan customer. cupkKeyType :: Lens' CreateUsagePlanKey Text-cupkKeyType = lens _cupkKeyType (\ s a -> s{_cupkKeyType = a});+cupkKeyType = lens _cupkKeyType (\ s a -> s{_cupkKeyType = a}) instance AWSRequest CreateUsagePlanKey where type Rs CreateUsagePlanKey = UsagePlanKey
+ gen/Network/AWS/APIGateway/CreateVPCLink.hs view
@@ -0,0 +1,121 @@+{-# 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.APIGateway.CreateVPCLink+-- 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 VPC link, under the caller's account in a selected region, in an asynchronous operation that typically takes 2-4 minutes to complete and become operational. The caller must have permissions to create and update VPC Endpoint services.+--+--+module Network.AWS.APIGateway.CreateVPCLink+ (+ -- * Creating a Request+ createVPCLink+ , CreateVPCLink+ -- * Request Lenses+ , cvlDescription+ , cvlName+ , cvlTargetARNs++ -- * Destructuring the Response+ , vpcLink+ , VPCLink+ -- * Response Lenses+ , vlStatus+ , vlTargetARNs+ , vlName+ , vlStatusMessage+ , vlId+ , vlDescription+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Creates a VPC link, under the caller's account in a selected region, in an asynchronous operation that typically takes 2-4 minutes to complete and become operational. The caller must have permissions to create and update VPC Endpoint services.+--+--+--+-- /See:/ 'createVPCLink' smart constructor.+data CreateVPCLink = CreateVPCLink'+ { _cvlDescription :: !(Maybe Text)+ , _cvlName :: !Text+ , _cvlTargetARNs :: ![Text]+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'CreateVPCLink' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'cvlDescription' - The description of the VPC link.+--+-- * 'cvlName' - [Required] The name used to label and identify the VPC link.+--+-- * 'cvlTargetARNs' - [Required] The ARNs of network load balancers of the VPC targeted by the VPC link. The network load balancers must be owned by the same AWS account of the API owner.+createVPCLink+ :: Text -- ^ 'cvlName'+ -> CreateVPCLink+createVPCLink pName_ =+ CreateVPCLink'+ {_cvlDescription = Nothing, _cvlName = pName_, _cvlTargetARNs = mempty}+++-- | The description of the VPC link.+cvlDescription :: Lens' CreateVPCLink (Maybe Text)+cvlDescription = lens _cvlDescription (\ s a -> s{_cvlDescription = a})++-- | [Required] The name used to label and identify the VPC link.+cvlName :: Lens' CreateVPCLink Text+cvlName = lens _cvlName (\ s a -> s{_cvlName = a})++-- | [Required] The ARNs of network load balancers of the VPC targeted by the VPC link. The network load balancers must be owned by the same AWS account of the API owner.+cvlTargetARNs :: Lens' CreateVPCLink [Text]+cvlTargetARNs = lens _cvlTargetARNs (\ s a -> s{_cvlTargetARNs = a}) . _Coerce++instance AWSRequest CreateVPCLink where+ type Rs CreateVPCLink = VPCLink+ request = postJSON apiGateway+ response = receiveJSON (\ s h x -> eitherParseJSON x)++instance Hashable CreateVPCLink where++instance NFData CreateVPCLink where++instance ToHeaders CreateVPCLink where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToJSON CreateVPCLink where+ toJSON CreateVPCLink'{..}+ = object+ (catMaybes+ [("description" .=) <$> _cvlDescription,+ Just ("name" .= _cvlName),+ Just ("targetArns" .= _cvlTargetARNs)])++instance ToPath CreateVPCLink where+ toPath = const "/vpclinks"++instance ToQuery CreateVPCLink where+ toQuery = const mempty
gen/Network/AWS/APIGateway/DeleteAPIKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteAPIKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,16 +55,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dakApiKey' - The identifier of the 'ApiKey' resource to be deleted.+-- * 'dakApiKey' - [Required] The identifier of the 'ApiKey' resource to be deleted. deleteAPIKey :: Text -- ^ 'dakApiKey' -> DeleteAPIKey deleteAPIKey pApiKey_ = DeleteAPIKey' {_dakApiKey = pApiKey_} --- | The identifier of the 'ApiKey' resource to be deleted.+-- | [Required] The identifier of the 'ApiKey' resource to be deleted. dakApiKey :: Lens' DeleteAPIKey Text-dakApiKey = lens _dakApiKey (\ s a -> s{_dakApiKey = a});+dakApiKey = lens _dakApiKey (\ s a -> s{_dakApiKey = a}) instance AWSRequest DeleteAPIKey where type Rs DeleteAPIKey = DeleteAPIKeyResponse
gen/Network/AWS/APIGateway/DeleteAuthorizer.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteAuthorizer--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -58,25 +58,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'daRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'daRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'daAuthorizerId' - The identifier of the 'Authorizer' resource.+-- * 'daAuthorizerId' - [Required] The identifier of the 'Authorizer' resource. deleteAuthorizer :: Text -- ^ 'daRestAPIId' -> Text -- ^ 'daAuthorizerId' -> DeleteAuthorizer deleteAuthorizer pRestAPIId_ pAuthorizerId_ = DeleteAuthorizer'- {_daRestAPIId = pRestAPIId_, _daAuthorizerId = pAuthorizerId_}+ {_daRestAPIId = pRestAPIId_, _daAuthorizerId = pAuthorizerId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . daRestAPIId :: Lens' DeleteAuthorizer Text-daRestAPIId = lens _daRestAPIId (\ s a -> s{_daRestAPIId = a});+daRestAPIId = lens _daRestAPIId (\ s a -> s{_daRestAPIId = a}) --- | The identifier of the 'Authorizer' resource.+-- | [Required] The identifier of the 'Authorizer' resource. daAuthorizerId :: Lens' DeleteAuthorizer Text-daAuthorizerId = lens _daAuthorizerId (\ s a -> s{_daAuthorizerId = a});+daAuthorizerId = lens _daAuthorizerId (\ s a -> s{_daAuthorizerId = a}) instance AWSRequest DeleteAuthorizer where type Rs DeleteAuthorizer = DeleteAuthorizerResponse
gen/Network/AWS/APIGateway/DeleteBasePathMapping.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteBasePathMapping--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,25 +57,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dbpmDomainName' - The domain name of the 'BasePathMapping' resource to delete.+-- * 'dbpmDomainName' - [Required] The domain name of the 'BasePathMapping' resource to delete. ----- * 'dbpmBasePath' - The base path name of the 'BasePathMapping' resource to delete.+-- * 'dbpmBasePath' - [Required] The base path name of the 'BasePathMapping' resource to delete. deleteBasePathMapping :: Text -- ^ 'dbpmDomainName' -> Text -- ^ 'dbpmBasePath' -> DeleteBasePathMapping deleteBasePathMapping pDomainName_ pBasePath_ = DeleteBasePathMapping'- {_dbpmDomainName = pDomainName_, _dbpmBasePath = pBasePath_}+ {_dbpmDomainName = pDomainName_, _dbpmBasePath = pBasePath_} --- | The domain name of the 'BasePathMapping' resource to delete.+-- | [Required] The domain name of the 'BasePathMapping' resource to delete. dbpmDomainName :: Lens' DeleteBasePathMapping Text-dbpmDomainName = lens _dbpmDomainName (\ s a -> s{_dbpmDomainName = a});+dbpmDomainName = lens _dbpmDomainName (\ s a -> s{_dbpmDomainName = a}) --- | The base path name of the 'BasePathMapping' resource to delete.+-- | [Required] The base path name of the 'BasePathMapping' resource to delete. dbpmBasePath :: Lens' DeleteBasePathMapping Text-dbpmBasePath = lens _dbpmBasePath (\ s a -> s{_dbpmBasePath = a});+dbpmBasePath = lens _dbpmBasePath (\ s a -> s{_dbpmBasePath = a}) instance AWSRequest DeleteBasePathMapping where type Rs DeleteBasePathMapping =
gen/Network/AWS/APIGateway/DeleteClientCertificate.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteClientCertificate--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,7 +55,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dccClientCertificateId' - The identifier of the 'ClientCertificate' resource to be deleted.+-- * 'dccClientCertificateId' - [Required] The identifier of the 'ClientCertificate' resource to be deleted. deleteClientCertificate :: Text -- ^ 'dccClientCertificateId' -> DeleteClientCertificate@@ -63,9 +63,9 @@ DeleteClientCertificate' {_dccClientCertificateId = pClientCertificateId_} --- | The identifier of the 'ClientCertificate' resource to be deleted.+-- | [Required] The identifier of the 'ClientCertificate' resource to be deleted. dccClientCertificateId :: Lens' DeleteClientCertificate Text-dccClientCertificateId = lens _dccClientCertificateId (\ s a -> s{_dccClientCertificateId = a});+dccClientCertificateId = lens _dccClientCertificateId (\ s a -> s{_dccClientCertificateId = a}) instance AWSRequest DeleteClientCertificate where type Rs DeleteClientCertificate =
gen/Network/AWS/APIGateway/DeleteDeployment.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteDeployment--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -42,7 +42,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to delete a 'Deployment' resource.+-- | Requests API Gateway to delete a 'Deployment' resource. -- -- --@@ -57,25 +57,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ddRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'ddRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'ddDeploymentId' - The identifier of the 'Deployment' resource to delete.+-- * 'ddDeploymentId' - [Required] The identifier of the 'Deployment' resource to delete. deleteDeployment :: Text -- ^ 'ddRestAPIId' -> Text -- ^ 'ddDeploymentId' -> DeleteDeployment deleteDeployment pRestAPIId_ pDeploymentId_ = DeleteDeployment'- {_ddRestAPIId = pRestAPIId_, _ddDeploymentId = pDeploymentId_}+ {_ddRestAPIId = pRestAPIId_, _ddDeploymentId = pDeploymentId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . ddRestAPIId :: Lens' DeleteDeployment Text-ddRestAPIId = lens _ddRestAPIId (\ s a -> s{_ddRestAPIId = a});+ddRestAPIId = lens _ddRestAPIId (\ s a -> s{_ddRestAPIId = a}) --- | The identifier of the 'Deployment' resource to delete.+-- | [Required] The identifier of the 'Deployment' resource to delete. ddDeploymentId :: Lens' DeleteDeployment Text-ddDeploymentId = lens _ddDeploymentId (\ s a -> s{_ddDeploymentId = a});+ddDeploymentId = lens _ddDeploymentId (\ s a -> s{_ddDeploymentId = a}) instance AWSRequest DeleteDeployment where type Rs DeleteDeployment = DeleteDeploymentResponse
gen/Network/AWS/APIGateway/DeleteDocumentationPart.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteDocumentationPart--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,16 +64,18 @@ -> DeleteDocumentationPart deleteDocumentationPart pRestAPIId_ pDocumentationPartId_ = DeleteDocumentationPart'- {_ddpRestAPIId = pRestAPIId_, _ddpDocumentationPartId = pDocumentationPartId_}+ { _ddpRestAPIId = pRestAPIId_+ , _ddpDocumentationPartId = pDocumentationPartId_+ } -- | [Required] The string identifier of the associated 'RestApi' . ddpRestAPIId :: Lens' DeleteDocumentationPart Text-ddpRestAPIId = lens _ddpRestAPIId (\ s a -> s{_ddpRestAPIId = a});+ddpRestAPIId = lens _ddpRestAPIId (\ s a -> s{_ddpRestAPIId = a}) -- | [Required] The identifier of the to-be-deleted documentation part. ddpDocumentationPartId :: Lens' DeleteDocumentationPart Text-ddpDocumentationPartId = lens _ddpDocumentationPartId (\ s a -> s{_ddpDocumentationPartId = a});+ddpDocumentationPartId = lens _ddpDocumentationPartId (\ s a -> s{_ddpDocumentationPartId = a}) instance AWSRequest DeleteDocumentationPart where type Rs DeleteDocumentationPart =
gen/Network/AWS/APIGateway/DeleteDocumentationVersion.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteDocumentationVersion--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,18 +64,18 @@ -> DeleteDocumentationVersion deleteDocumentationVersion pRestAPIId_ pDocumentationVersion_ = DeleteDocumentationVersion'- { _ddvRestAPIId = pRestAPIId_- , _ddvDocumentationVersion = pDocumentationVersion_- }+ { _ddvRestAPIId = pRestAPIId_+ , _ddvDocumentationVersion = pDocumentationVersion_+ } -- | [Required] The string identifier of the associated 'RestApi' . ddvRestAPIId :: Lens' DeleteDocumentationVersion Text-ddvRestAPIId = lens _ddvRestAPIId (\ s a -> s{_ddvRestAPIId = a});+ddvRestAPIId = lens _ddvRestAPIId (\ s a -> s{_ddvRestAPIId = a}) -- | [Required] The version identifier of a to-be-deleted documentation snapshot. ddvDocumentationVersion :: Lens' DeleteDocumentationVersion Text-ddvDocumentationVersion = lens _ddvDocumentationVersion (\ s a -> s{_ddvDocumentationVersion = a});+ddvDocumentationVersion = lens _ddvDocumentationVersion (\ s a -> s{_ddvDocumentationVersion = a}) instance AWSRequest DeleteDocumentationVersion where type Rs DeleteDocumentationVersion =
gen/Network/AWS/APIGateway/DeleteDomainName.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteDomainName--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,7 +55,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ddnDomainName' - The name of the 'DomainName' resource to be deleted.+-- * 'ddnDomainName' - [Required] The name of the 'DomainName' resource to be deleted. deleteDomainName :: Text -- ^ 'ddnDomainName' -> DeleteDomainName@@ -63,9 +63,9 @@ DeleteDomainName' {_ddnDomainName = pDomainName_} --- | The name of the 'DomainName' resource to be deleted.+-- | [Required] The name of the 'DomainName' resource to be deleted. ddnDomainName :: Lens' DeleteDomainName Text-ddnDomainName = lens _ddnDomainName (\ s a -> s{_ddnDomainName = a});+ddnDomainName = lens _ddnDomainName (\ s a -> s{_ddnDomainName = a}) instance AWSRequest DeleteDomainName where type Rs DeleteDomainName = DeleteDomainNameResponse
gen/Network/AWS/APIGateway/DeleteGatewayResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteGatewayResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,25 +57,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dgRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'dgRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'dgResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- * 'dgResponseType' - [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE deleteGatewayResponse :: Text -- ^ 'dgRestAPIId' -> GatewayResponseType -- ^ 'dgResponseType' -> DeleteGatewayResponse deleteGatewayResponse pRestAPIId_ pResponseType_ = DeleteGatewayResponse'- {_dgRestAPIId = pRestAPIId_, _dgResponseType = pResponseType_}+ {_dgRestAPIId = pRestAPIId_, _dgResponseType = pResponseType_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . dgRestAPIId :: Lens' DeleteGatewayResponse Text-dgRestAPIId = lens _dgRestAPIId (\ s a -> s{_dgRestAPIId = a});+dgRestAPIId = lens _dgRestAPIId (\ s a -> s{_dgRestAPIId = a}) --- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- | [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE dgResponseType :: Lens' DeleteGatewayResponse GatewayResponseType-dgResponseType = lens _dgResponseType (\ s a -> s{_dgResponseType = a});+dgResponseType = lens _dgResponseType (\ s a -> s{_dgResponseType = a}) instance AWSRequest DeleteGatewayResponse where type Rs DeleteGatewayResponse =
gen/Network/AWS/APIGateway/DeleteIntegration.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteIntegration--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -59,11 +59,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'delRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'delRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'delResourceId' - Specifies a delete integration request's resource identifier.+-- * 'delResourceId' - [Required] Specifies a delete integration request's resource identifier. ----- * 'delHttpMethod' - Specifies a delete integration request's HTTP method.+-- * 'delHttpMethod' - [Required] Specifies a delete integration request's HTTP method. deleteIntegration :: Text -- ^ 'delRestAPIId' -> Text -- ^ 'delResourceId'@@ -71,23 +71,23 @@ -> DeleteIntegration deleteIntegration pRestAPIId_ pResourceId_ pHttpMethod_ = DeleteIntegration'- { _delRestAPIId = pRestAPIId_- , _delResourceId = pResourceId_- , _delHttpMethod = pHttpMethod_- }+ { _delRestAPIId = pRestAPIId_+ , _delResourceId = pResourceId_+ , _delHttpMethod = pHttpMethod_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . delRestAPIId :: Lens' DeleteIntegration Text-delRestAPIId = lens _delRestAPIId (\ s a -> s{_delRestAPIId = a});+delRestAPIId = lens _delRestAPIId (\ s a -> s{_delRestAPIId = a}) --- | Specifies a delete integration request's resource identifier.+-- | [Required] Specifies a delete integration request's resource identifier. delResourceId :: Lens' DeleteIntegration Text-delResourceId = lens _delResourceId (\ s a -> s{_delResourceId = a});+delResourceId = lens _delResourceId (\ s a -> s{_delResourceId = a}) --- | Specifies a delete integration request's HTTP method.+-- | [Required] Specifies a delete integration request's HTTP method. delHttpMethod :: Lens' DeleteIntegration Text-delHttpMethod = lens _delHttpMethod (\ s a -> s{_delHttpMethod = a});+delHttpMethod = lens _delHttpMethod (\ s a -> s{_delHttpMethod = a}) instance AWSRequest DeleteIntegration where type Rs DeleteIntegration =
gen/Network/AWS/APIGateway/DeleteIntegrationResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteIntegrationResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -61,13 +61,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'diRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'diRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'diResourceId' - Specifies a delete integration response request's resource identifier.+-- * 'diResourceId' - [Required] Specifies a delete integration response request's resource identifier. ----- * 'diHttpMethod' - Specifies a delete integration response request's HTTP method.+-- * 'diHttpMethod' - [Required] Specifies a delete integration response request's HTTP method. ----- * 'diStatusCode' - Specifies a delete integration response request's status code.+-- * 'diStatusCode' - [Required] Specifies a delete integration response request's status code. deleteIntegrationResponse :: Text -- ^ 'diRestAPIId' -> Text -- ^ 'diResourceId'@@ -76,28 +76,28 @@ -> DeleteIntegrationResponse deleteIntegrationResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = DeleteIntegrationResponse'- { _diRestAPIId = pRestAPIId_- , _diResourceId = pResourceId_- , _diHttpMethod = pHttpMethod_- , _diStatusCode = pStatusCode_- }+ { _diRestAPIId = pRestAPIId_+ , _diResourceId = pResourceId_+ , _diHttpMethod = pHttpMethod_+ , _diStatusCode = pStatusCode_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . diRestAPIId :: Lens' DeleteIntegrationResponse Text-diRestAPIId = lens _diRestAPIId (\ s a -> s{_diRestAPIId = a});+diRestAPIId = lens _diRestAPIId (\ s a -> s{_diRestAPIId = a}) --- | Specifies a delete integration response request's resource identifier.+-- | [Required] Specifies a delete integration response request's resource identifier. diResourceId :: Lens' DeleteIntegrationResponse Text-diResourceId = lens _diResourceId (\ s a -> s{_diResourceId = a});+diResourceId = lens _diResourceId (\ s a -> s{_diResourceId = a}) --- | Specifies a delete integration response request's HTTP method.+-- | [Required] Specifies a delete integration response request's HTTP method. diHttpMethod :: Lens' DeleteIntegrationResponse Text-diHttpMethod = lens _diHttpMethod (\ s a -> s{_diHttpMethod = a});+diHttpMethod = lens _diHttpMethod (\ s a -> s{_diHttpMethod = a}) --- | Specifies a delete integration response request's status code.+-- | [Required] Specifies a delete integration response request's status code. diStatusCode :: Lens' DeleteIntegrationResponse Text-diStatusCode = lens _diStatusCode (\ s a -> s{_diStatusCode = a});+diStatusCode = lens _diStatusCode (\ s a -> s{_diStatusCode = a}) instance AWSRequest DeleteIntegrationResponse where type Rs DeleteIntegrationResponse =
gen/Network/AWS/APIGateway/DeleteMethod.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteMethod--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -59,11 +59,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'dmmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'dmmResourceId' - The 'Resource' identifier for the 'Method' resource.+-- * 'dmmResourceId' - [Required] The 'Resource' identifier for the 'Method' resource. ----- * 'dmmHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'dmmHttpMethod' - [Required] The HTTP verb of the 'Method' resource. deleteMethod :: Text -- ^ 'dmmRestAPIId' -> Text -- ^ 'dmmResourceId'@@ -71,23 +71,23 @@ -> DeleteMethod deleteMethod pRestAPIId_ pResourceId_ pHttpMethod_ = DeleteMethod'- { _dmmRestAPIId = pRestAPIId_- , _dmmResourceId = pResourceId_- , _dmmHttpMethod = pHttpMethod_- }+ { _dmmRestAPIId = pRestAPIId_+ , _dmmResourceId = pResourceId_+ , _dmmHttpMethod = pHttpMethod_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . dmmRestAPIId :: Lens' DeleteMethod Text-dmmRestAPIId = lens _dmmRestAPIId (\ s a -> s{_dmmRestAPIId = a});+dmmRestAPIId = lens _dmmRestAPIId (\ s a -> s{_dmmRestAPIId = a}) --- | The 'Resource' identifier for the 'Method' resource.+-- | [Required] The 'Resource' identifier for the 'Method' resource. dmmResourceId :: Lens' DeleteMethod Text-dmmResourceId = lens _dmmResourceId (\ s a -> s{_dmmResourceId = a});+dmmResourceId = lens _dmmResourceId (\ s a -> s{_dmmResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. dmmHttpMethod :: Lens' DeleteMethod Text-dmmHttpMethod = lens _dmmHttpMethod (\ s a -> s{_dmmHttpMethod = a});+dmmHttpMethod = lens _dmmHttpMethod (\ s a -> s{_dmmHttpMethod = a}) instance AWSRequest DeleteMethod where type Rs DeleteMethod = DeleteMethodResponse'
gen/Network/AWS/APIGateway/DeleteMethodResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteMethodResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -61,13 +61,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'dmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'dmResourceId' - The 'Resource' identifier for the 'MethodResponse' resource.+-- * 'dmResourceId' - [Required] The 'Resource' identifier for the 'MethodResponse' resource. ----- * 'dmHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'dmHttpMethod' - [Required] The HTTP verb of the 'Method' resource. ----- * 'dmStatusCode' - The status code identifier for the 'MethodResponse' resource.+-- * 'dmStatusCode' - [Required] The status code identifier for the 'MethodResponse' resource. deleteMethodResponse :: Text -- ^ 'dmRestAPIId' -> Text -- ^ 'dmResourceId'@@ -76,28 +76,28 @@ -> DeleteMethodResponse deleteMethodResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = DeleteMethodResponse'- { _dmRestAPIId = pRestAPIId_- , _dmResourceId = pResourceId_- , _dmHttpMethod = pHttpMethod_- , _dmStatusCode = pStatusCode_- }+ { _dmRestAPIId = pRestAPIId_+ , _dmResourceId = pResourceId_+ , _dmHttpMethod = pHttpMethod_+ , _dmStatusCode = pStatusCode_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . dmRestAPIId :: Lens' DeleteMethodResponse Text-dmRestAPIId = lens _dmRestAPIId (\ s a -> s{_dmRestAPIId = a});+dmRestAPIId = lens _dmRestAPIId (\ s a -> s{_dmRestAPIId = a}) --- | The 'Resource' identifier for the 'MethodResponse' resource.+-- | [Required] The 'Resource' identifier for the 'MethodResponse' resource. dmResourceId :: Lens' DeleteMethodResponse Text-dmResourceId = lens _dmResourceId (\ s a -> s{_dmResourceId = a});+dmResourceId = lens _dmResourceId (\ s a -> s{_dmResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. dmHttpMethod :: Lens' DeleteMethodResponse Text-dmHttpMethod = lens _dmHttpMethod (\ s a -> s{_dmHttpMethod = a});+dmHttpMethod = lens _dmHttpMethod (\ s a -> s{_dmHttpMethod = a}) --- | The status code identifier for the 'MethodResponse' resource.+-- | [Required] The status code identifier for the 'MethodResponse' resource. dmStatusCode :: Lens' DeleteMethodResponse Text-dmStatusCode = lens _dmStatusCode (\ s a -> s{_dmStatusCode = a});+dmStatusCode = lens _dmStatusCode (\ s a -> s{_dmStatusCode = a}) instance AWSRequest DeleteMethodResponse where type Rs DeleteMethodResponse =
gen/Network/AWS/APIGateway/DeleteModel.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteModel--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,9 +57,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'dRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'dModelName' - The name of the model to delete.+-- * 'dModelName' - [Required] The name of the model to delete. deleteModel :: Text -- ^ 'dRestAPIId' -> Text -- ^ 'dModelName'@@ -68,13 +68,13 @@ DeleteModel' {_dRestAPIId = pRestAPIId_, _dModelName = pModelName_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . dRestAPIId :: Lens' DeleteModel Text-dRestAPIId = lens _dRestAPIId (\ s a -> s{_dRestAPIId = a});+dRestAPIId = lens _dRestAPIId (\ s a -> s{_dRestAPIId = a}) --- | The name of the model to delete.+-- | [Required] The name of the model to delete. dModelName :: Lens' DeleteModel Text-dModelName = lens _dModelName (\ s a -> s{_dModelName = a});+dModelName = lens _dModelName (\ s a -> s{_dModelName = a}) instance AWSRequest DeleteModel where type Rs DeleteModel = DeleteModelResponse
gen/Network/AWS/APIGateway/DeleteRequestValidator.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteRequestValidator--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,7 +57,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'drvRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'drvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'drvRequestValidatorId' - [Required] The identifier of the 'RequestValidator' to be deleted. deleteRequestValidator@@ -66,16 +66,16 @@ -> DeleteRequestValidator deleteRequestValidator pRestAPIId_ pRequestValidatorId_ = DeleteRequestValidator'- {_drvRestAPIId = pRestAPIId_, _drvRequestValidatorId = pRequestValidatorId_}+ {_drvRestAPIId = pRestAPIId_, _drvRequestValidatorId = pRequestValidatorId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . drvRestAPIId :: Lens' DeleteRequestValidator Text-drvRestAPIId = lens _drvRestAPIId (\ s a -> s{_drvRestAPIId = a});+drvRestAPIId = lens _drvRestAPIId (\ s a -> s{_drvRestAPIId = a}) -- | [Required] The identifier of the 'RequestValidator' to be deleted. drvRequestValidatorId :: Lens' DeleteRequestValidator Text-drvRequestValidatorId = lens _drvRequestValidatorId (\ s a -> s{_drvRequestValidatorId = a});+drvRequestValidatorId = lens _drvRequestValidatorId (\ s a -> s{_drvRequestValidatorId = a}) instance AWSRequest DeleteRequestValidator where type Rs DeleteRequestValidator =
gen/Network/AWS/APIGateway/DeleteResource.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteResource--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,9 +57,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'drRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'drRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'drResourceId' - The identifier of the 'Resource' resource.+-- * 'drResourceId' - [Required] The identifier of the 'Resource' resource. deleteResource :: Text -- ^ 'drRestAPIId' -> Text -- ^ 'drResourceId'@@ -68,13 +68,13 @@ DeleteResource' {_drRestAPIId = pRestAPIId_, _drResourceId = pResourceId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . drRestAPIId :: Lens' DeleteResource Text-drRestAPIId = lens _drRestAPIId (\ s a -> s{_drRestAPIId = a});+drRestAPIId = lens _drRestAPIId (\ s a -> s{_drRestAPIId = a}) --- | The identifier of the 'Resource' resource.+-- | [Required] The identifier of the 'Resource' resource. drResourceId :: Lens' DeleteResource Text-drResourceId = lens _drResourceId (\ s a -> s{_drResourceId = a});+drResourceId = lens _drResourceId (\ s a -> s{_drResourceId = a}) instance AWSRequest DeleteResource where type Rs DeleteResource = DeleteResourceResponse
gen/Network/AWS/APIGateway/DeleteRestAPI.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,16 +55,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'draRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'draRestAPIId' - [Required] The string identifier of the associated 'RestApi' . deleteRestAPI :: Text -- ^ 'draRestAPIId' -> DeleteRestAPI deleteRestAPI pRestAPIId_ = DeleteRestAPI' {_draRestAPIId = pRestAPIId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . draRestAPIId :: Lens' DeleteRestAPI Text-draRestAPIId = lens _draRestAPIId (\ s a -> s{_draRestAPIId = a});+draRestAPIId = lens _draRestAPIId (\ s a -> s{_draRestAPIId = a}) instance AWSRequest DeleteRestAPI where type Rs DeleteRestAPI = DeleteRestAPIResponse
gen/Network/AWS/APIGateway/DeleteStage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteStage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -42,7 +42,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to delete a 'Stage' resource.+-- | Requests API Gateway to delete a 'Stage' resource. -- -- --@@ -57,9 +57,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dsRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'dsRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'dsStageName' - The name of the 'Stage' resource to delete.+-- * 'dsStageName' - [Required] The name of the 'Stage' resource to delete. deleteStage :: Text -- ^ 'dsRestAPIId' -> Text -- ^ 'dsStageName'@@ -68,13 +68,13 @@ DeleteStage' {_dsRestAPIId = pRestAPIId_, _dsStageName = pStageName_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . dsRestAPIId :: Lens' DeleteStage Text-dsRestAPIId = lens _dsRestAPIId (\ s a -> s{_dsRestAPIId = a});+dsRestAPIId = lens _dsRestAPIId (\ s a -> s{_dsRestAPIId = a}) --- | The name of the 'Stage' resource to delete.+-- | [Required] The name of the 'Stage' resource to delete. dsStageName :: Lens' DeleteStage Text-dsStageName = lens _dsStageName (\ s a -> s{_dsStageName = a});+dsStageName = lens _dsStageName (\ s a -> s{_dsStageName = a}) instance AWSRequest DeleteStage where type Rs DeleteStage = DeleteStageResponse
gen/Network/AWS/APIGateway/DeleteUsagePlan.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteUsagePlan--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,7 +55,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dupUsagePlanId' - The Id of the to-be-deleted usage plan.+-- * 'dupUsagePlanId' - [Required] The Id of the to-be-deleted usage plan. deleteUsagePlan :: Text -- ^ 'dupUsagePlanId' -> DeleteUsagePlan@@ -63,9 +63,9 @@ DeleteUsagePlan' {_dupUsagePlanId = pUsagePlanId_} --- | The Id of the to-be-deleted usage plan.+-- | [Required] The Id of the to-be-deleted usage plan. dupUsagePlanId :: Lens' DeleteUsagePlan Text-dupUsagePlanId = lens _dupUsagePlanId (\ s a -> s{_dupUsagePlanId = a});+dupUsagePlanId = lens _dupUsagePlanId (\ s a -> s{_dupUsagePlanId = a}) instance AWSRequest DeleteUsagePlan where type Rs DeleteUsagePlan = DeleteUsagePlanResponse
gen/Network/AWS/APIGateway/DeleteUsagePlanKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.DeleteUsagePlanKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -57,9 +57,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dupkUsagePlanId' - The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-deleted 'UsagePlanKey' resource representing a plan customer.+-- * 'dupkUsagePlanId' - [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-deleted 'UsagePlanKey' resource representing a plan customer. ----- * 'dupkKeyId' - The Id of the 'UsagePlanKey' resource to be deleted.+-- * 'dupkKeyId' - [Required] The Id of the 'UsagePlanKey' resource to be deleted. deleteUsagePlanKey :: Text -- ^ 'dupkUsagePlanId' -> Text -- ^ 'dupkKeyId'@@ -68,13 +68,13 @@ DeleteUsagePlanKey' {_dupkUsagePlanId = pUsagePlanId_, _dupkKeyId = pKeyId_} --- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-deleted 'UsagePlanKey' resource representing a plan customer.+-- | [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-deleted 'UsagePlanKey' resource representing a plan customer. dupkUsagePlanId :: Lens' DeleteUsagePlanKey Text-dupkUsagePlanId = lens _dupkUsagePlanId (\ s a -> s{_dupkUsagePlanId = a});+dupkUsagePlanId = lens _dupkUsagePlanId (\ s a -> s{_dupkUsagePlanId = a}) --- | The Id of the 'UsagePlanKey' resource to be deleted.+-- | [Required] The Id of the 'UsagePlanKey' resource to be deleted. dupkKeyId :: Lens' DeleteUsagePlanKey Text-dupkKeyId = lens _dupkKeyId (\ s a -> s{_dupkKeyId = a});+dupkKeyId = lens _dupkKeyId (\ s a -> s{_dupkKeyId = a}) instance AWSRequest DeleteUsagePlanKey where type Rs DeleteUsagePlanKey =
+ gen/Network/AWS/APIGateway/DeleteVPCLink.hs view
@@ -0,0 +1,104 @@+{-# 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.APIGateway.DeleteVPCLink+-- 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 an existing 'VpcLink' of a specified identifier.+--+--+module Network.AWS.APIGateway.DeleteVPCLink+ (+ -- * Creating a Request+ deleteVPCLink+ , DeleteVPCLink+ -- * Request Lenses+ , dvlVpcLinkId++ -- * Destructuring the Response+ , deleteVPCLinkResponse+ , DeleteVPCLinkResponse+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Deletes an existing 'VpcLink' of a specified identifier.+--+--+--+-- /See:/ 'deleteVPCLink' smart constructor.+newtype DeleteVPCLink = DeleteVPCLink'+ { _dvlVpcLinkId :: Text+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteVPCLink' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dvlVpcLinkId' - [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+deleteVPCLink+ :: Text -- ^ 'dvlVpcLinkId'+ -> DeleteVPCLink+deleteVPCLink pVpcLinkId_ = DeleteVPCLink' {_dvlVpcLinkId = pVpcLinkId_}+++-- | [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+dvlVpcLinkId :: Lens' DeleteVPCLink Text+dvlVpcLinkId = lens _dvlVpcLinkId (\ s a -> s{_dvlVpcLinkId = a})++instance AWSRequest DeleteVPCLink where+ type Rs DeleteVPCLink = DeleteVPCLinkResponse+ request = delete apiGateway+ response = receiveNull DeleteVPCLinkResponse'++instance Hashable DeleteVPCLink where++instance NFData DeleteVPCLink where++instance ToHeaders DeleteVPCLink where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToPath DeleteVPCLink where+ toPath DeleteVPCLink'{..}+ = mconcat ["/vpclinks/", toBS _dvlVpcLinkId]++instance ToQuery DeleteVPCLink where+ toQuery = const mempty++-- | /See:/ 'deleteVPCLinkResponse' smart constructor.+data DeleteVPCLinkResponse =+ DeleteVPCLinkResponse'+ deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeleteVPCLinkResponse' with the minimum fields required to make a request.+--+deleteVPCLinkResponse+ :: DeleteVPCLinkResponse+deleteVPCLinkResponse = DeleteVPCLinkResponse'+++instance NFData DeleteVPCLinkResponse where
gen/Network/AWS/APIGateway/FlushStageAuthorizersCache.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.FlushStageAuthorizersCache--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -66,16 +66,16 @@ -> FlushStageAuthorizersCache flushStageAuthorizersCache pRestAPIId_ pStageName_ = FlushStageAuthorizersCache'- {_fsacRestAPIId = pRestAPIId_, _fsacStageName = pStageName_}+ {_fsacRestAPIId = pRestAPIId_, _fsacStageName = pStageName_} -- | The string identifier of the associated 'RestApi' . fsacRestAPIId :: Lens' FlushStageAuthorizersCache Text-fsacRestAPIId = lens _fsacRestAPIId (\ s a -> s{_fsacRestAPIId = a});+fsacRestAPIId = lens _fsacRestAPIId (\ s a -> s{_fsacRestAPIId = a}) -- | The name of the stage to flush. fsacStageName :: Lens' FlushStageAuthorizersCache Text-fsacStageName = lens _fsacStageName (\ s a -> s{_fsacStageName = a});+fsacStageName = lens _fsacStageName (\ s a -> s{_fsacStageName = a}) instance AWSRequest FlushStageAuthorizersCache where type Rs FlushStageAuthorizersCache =
gen/Network/AWS/APIGateway/FlushStageCache.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.FlushStageCache--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -42,7 +42,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to flush a stage's cache.+-- | Requests API Gateway to flush a stage's cache. -- -- --@@ -57,9 +57,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'fscRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'fscRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'fscStageName' - The name of the stage to flush its cache.+-- * 'fscStageName' - [Required] The name of the stage to flush its cache. flushStageCache :: Text -- ^ 'fscRestAPIId' -> Text -- ^ 'fscStageName'@@ -68,13 +68,13 @@ FlushStageCache' {_fscRestAPIId = pRestAPIId_, _fscStageName = pStageName_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . fscRestAPIId :: Lens' FlushStageCache Text-fscRestAPIId = lens _fscRestAPIId (\ s a -> s{_fscRestAPIId = a});+fscRestAPIId = lens _fscRestAPIId (\ s a -> s{_fscRestAPIId = a}) --- | The name of the stage to flush its cache.+-- | [Required] The name of the stage to flush its cache. fscStageName :: Lens' FlushStageCache Text-fscStageName = lens _fscStageName (\ s a -> s{_fscStageName = a});+fscStageName = lens _fscStageName (\ s a -> s{_fscStageName = a}) instance AWSRequest FlushStageCache where type Rs FlushStageCache = FlushStageCacheResponse
gen/Network/AWS/APIGateway/GenerateClientCertificate.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GenerateClientCertificate--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -70,7 +70,7 @@ -- | The description of the 'ClientCertificate' . gccDescription :: Lens' GenerateClientCertificate (Maybe Text)-gccDescription = lens _gccDescription (\ s a -> s{_gccDescription = a});+gccDescription = lens _gccDescription (\ s a -> s{_gccDescription = a}) instance AWSRequest GenerateClientCertificate where type Rs GenerateClientCertificate = ClientCertificate
gen/Network/AWS/APIGateway/GetAPIKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetAPIKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -69,7 +69,7 @@ -- -- * 'gakIncludeValue' - A boolean flag to specify whether (@true@ ) or not (@false@ ) the result contains the key value. ----- * 'gakApiKey' - The identifier of the 'ApiKey' resource.+-- * 'gakApiKey' - [Required] The identifier of the 'ApiKey' resource. getAPIKey :: Text -- ^ 'gakApiKey' -> GetAPIKey@@ -79,11 +79,11 @@ -- | A boolean flag to specify whether (@true@ ) or not (@false@ ) the result contains the key value. gakIncludeValue :: Lens' GetAPIKey (Maybe Bool)-gakIncludeValue = lens _gakIncludeValue (\ s a -> s{_gakIncludeValue = a});+gakIncludeValue = lens _gakIncludeValue (\ s a -> s{_gakIncludeValue = a}) --- | The identifier of the 'ApiKey' resource.+-- | [Required] The identifier of the 'ApiKey' resource. gakApiKey :: Lens' GetAPIKey Text-gakApiKey = lens _gakApiKey (\ s a -> s{_gakApiKey = a});+gakApiKey = lens _gakApiKey (\ s a -> s{_gakApiKey = a}) instance AWSRequest GetAPIKey where type Rs GetAPIKey = APIKey
gen/Network/AWS/APIGateway/GetAPIKeys.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetAPIKeys--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -77,40 +77,40 @@ -- -- * 'gakNameQuery' - The name of queried API keys. ----- * 'gakLimit' - The maximum number of returned results per page.+-- * 'gakLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gakPosition' - The current pagination position in the paged result set. getAPIKeys :: GetAPIKeys getAPIKeys = GetAPIKeys'- { _gakIncludeValues = Nothing- , _gakCustomerId = Nothing- , _gakNameQuery = Nothing- , _gakLimit = Nothing- , _gakPosition = Nothing- }+ { _gakIncludeValues = Nothing+ , _gakCustomerId = Nothing+ , _gakNameQuery = Nothing+ , _gakLimit = Nothing+ , _gakPosition = Nothing+ } -- | A boolean flag to specify whether (@true@ ) or not (@false@ ) the result contains key values. gakIncludeValues :: Lens' GetAPIKeys (Maybe Bool)-gakIncludeValues = lens _gakIncludeValues (\ s a -> s{_gakIncludeValues = a});+gakIncludeValues = lens _gakIncludeValues (\ s a -> s{_gakIncludeValues = a}) -- | The identifier of a customer in AWS Marketplace or an external system, such as a developer portal. gakCustomerId :: Lens' GetAPIKeys (Maybe Text)-gakCustomerId = lens _gakCustomerId (\ s a -> s{_gakCustomerId = a});+gakCustomerId = lens _gakCustomerId (\ s a -> s{_gakCustomerId = a}) -- | The name of queried API keys. gakNameQuery :: Lens' GetAPIKeys (Maybe Text)-gakNameQuery = lens _gakNameQuery (\ s a -> s{_gakNameQuery = a});+gakNameQuery = lens _gakNameQuery (\ s a -> s{_gakNameQuery = a}) --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gakLimit :: Lens' GetAPIKeys (Maybe Int)-gakLimit = lens _gakLimit (\ s a -> s{_gakLimit = a});+gakLimit = lens _gakLimit (\ s a -> s{_gakLimit = a}) -- | The current pagination position in the paged result set. gakPosition :: Lens' GetAPIKeys (Maybe Text)-gakPosition = lens _gakPosition (\ s a -> s{_gakPosition = a});+gakPosition = lens _gakPosition (\ s a -> s{_gakPosition = a}) instance AWSPager GetAPIKeys where page rq rs@@ -182,27 +182,27 @@ -> GetAPIKeysResponse getAPIKeysResponse pResponseStatus_ = GetAPIKeysResponse'- { _gakrsItems = Nothing- , _gakrsWarnings = Nothing- , _gakrsPosition = Nothing- , _gakrsResponseStatus = pResponseStatus_- }+ { _gakrsItems = Nothing+ , _gakrsWarnings = Nothing+ , _gakrsPosition = Nothing+ , _gakrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gakrsItems :: Lens' GetAPIKeysResponse [APIKey]-gakrsItems = lens _gakrsItems (\ s a -> s{_gakrsItems = a}) . _Default . _Coerce;+gakrsItems = lens _gakrsItems (\ s a -> s{_gakrsItems = a}) . _Default . _Coerce -- | A list of warning messages logged during the import of API keys when the @failOnWarnings@ option is set to true. gakrsWarnings :: Lens' GetAPIKeysResponse [Text]-gakrsWarnings = lens _gakrsWarnings (\ s a -> s{_gakrsWarnings = a}) . _Default . _Coerce;+gakrsWarnings = lens _gakrsWarnings (\ s a -> s{_gakrsWarnings = a}) . _Default . _Coerce -- | Undocumented member. gakrsPosition :: Lens' GetAPIKeysResponse (Maybe Text)-gakrsPosition = lens _gakrsPosition (\ s a -> s{_gakrsPosition = a});+gakrsPosition = lens _gakrsPosition (\ s a -> s{_gakrsPosition = a}) -- | -- | The response status code. gakrsResponseStatus :: Lens' GetAPIKeysResponse Int-gakrsResponseStatus = lens _gakrsResponseStatus (\ s a -> s{_gakrsResponseStatus = a});+gakrsResponseStatus = lens _gakrsResponseStatus (\ s a -> s{_gakrsResponseStatus = a}) instance NFData GetAPIKeysResponse where
gen/Network/AWS/APIGateway/GetAccount.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetAccount--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -44,7 +44,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to get information about the current 'Account' resource.+-- | Requests API Gateway to get information about the current 'Account' resource. -- -- --
gen/Network/AWS/APIGateway/GetAuthorizer.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetAuthorizer--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -69,25 +69,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gaaRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gaaRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gaaAuthorizerId' - The identifier of the 'Authorizer' resource.+-- * 'gaaAuthorizerId' - [Required] The identifier of the 'Authorizer' resource. getAuthorizer :: Text -- ^ 'gaaRestAPIId' -> Text -- ^ 'gaaAuthorizerId' -> GetAuthorizer getAuthorizer pRestAPIId_ pAuthorizerId_ = GetAuthorizer'- {_gaaRestAPIId = pRestAPIId_, _gaaAuthorizerId = pAuthorizerId_}+ {_gaaRestAPIId = pRestAPIId_, _gaaAuthorizerId = pAuthorizerId_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gaaRestAPIId :: Lens' GetAuthorizer Text-gaaRestAPIId = lens _gaaRestAPIId (\ s a -> s{_gaaRestAPIId = a});+gaaRestAPIId = lens _gaaRestAPIId (\ s a -> s{_gaaRestAPIId = a}) --- | The identifier of the 'Authorizer' resource.+-- | [Required] The identifier of the 'Authorizer' resource. gaaAuthorizerId :: Lens' GetAuthorizer Text-gaaAuthorizerId = lens _gaaAuthorizerId (\ s a -> s{_gaaAuthorizerId = a});+gaaAuthorizerId = lens _gaaAuthorizerId (\ s a -> s{_gaaAuthorizerId = a}) instance AWSRequest GetAuthorizer where type Rs GetAuthorizer = Authorizer
gen/Network/AWS/APIGateway/GetAuthorizers.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetAuthorizers--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,30 +64,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gaLimit' - The maximum number of returned results per page.+-- * 'gaLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gaPosition' - The current pagination position in the paged result set. ----- * 'gaRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gaRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getAuthorizers :: Text -- ^ 'gaRestAPIId' -> GetAuthorizers getAuthorizers pRestAPIId_ = GetAuthorizers'- {_gaLimit = Nothing, _gaPosition = Nothing, _gaRestAPIId = pRestAPIId_}+ {_gaLimit = Nothing, _gaPosition = Nothing, _gaRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gaLimit :: Lens' GetAuthorizers (Maybe Int)-gaLimit = lens _gaLimit (\ s a -> s{_gaLimit = a});+gaLimit = lens _gaLimit (\ s a -> s{_gaLimit = a}) -- | The current pagination position in the paged result set. gaPosition :: Lens' GetAuthorizers (Maybe Text)-gaPosition = lens _gaPosition (\ s a -> s{_gaPosition = a});+gaPosition = lens _gaPosition (\ s a -> s{_gaPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gaRestAPIId :: Lens' GetAuthorizers Text-gaRestAPIId = lens _gaRestAPIId (\ s a -> s{_gaRestAPIId = a});+gaRestAPIId = lens _gaRestAPIId (\ s a -> s{_gaRestAPIId = a}) instance AWSRequest GetAuthorizers where type Rs GetAuthorizers = GetAuthorizersResponse@@ -146,22 +146,22 @@ -> GetAuthorizersResponse getAuthorizersResponse pResponseStatus_ = GetAuthorizersResponse'- { _garsItems = Nothing- , _garsPosition = Nothing- , _garsResponseStatus = pResponseStatus_- }+ { _garsItems = Nothing+ , _garsPosition = Nothing+ , _garsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. garsItems :: Lens' GetAuthorizersResponse [Authorizer]-garsItems = lens _garsItems (\ s a -> s{_garsItems = a}) . _Default . _Coerce;+garsItems = lens _garsItems (\ s a -> s{_garsItems = a}) . _Default . _Coerce -- | Undocumented member. garsPosition :: Lens' GetAuthorizersResponse (Maybe Text)-garsPosition = lens _garsPosition (\ s a -> s{_garsPosition = a});+garsPosition = lens _garsPosition (\ s a -> s{_garsPosition = a}) -- | -- | The response status code. garsResponseStatus :: Lens' GetAuthorizersResponse Int-garsResponseStatus = lens _garsResponseStatus (\ s a -> s{_garsResponseStatus = a});+garsResponseStatus = lens _garsResponseStatus (\ s a -> s{_garsResponseStatus = a}) instance NFData GetAuthorizersResponse where
gen/Network/AWS/APIGateway/GetBasePathMapping.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetBasePathMapping--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -61,25 +61,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gbpmDomainName' - The domain name of the 'BasePathMapping' resource to be described.+-- * 'gbpmDomainName' - [Required] The domain name of the 'BasePathMapping' resource to be described. ----- * 'gbpmBasePath' - The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify any base path name after the domain name.+-- * 'gbpmBasePath' - [Required] The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify any base path name after the domain name. getBasePathMapping :: Text -- ^ 'gbpmDomainName' -> Text -- ^ 'gbpmBasePath' -> GetBasePathMapping getBasePathMapping pDomainName_ pBasePath_ = GetBasePathMapping'- {_gbpmDomainName = pDomainName_, _gbpmBasePath = pBasePath_}+ {_gbpmDomainName = pDomainName_, _gbpmBasePath = pBasePath_} --- | The domain name of the 'BasePathMapping' resource to be described.+-- | [Required] The domain name of the 'BasePathMapping' resource to be described. gbpmDomainName :: Lens' GetBasePathMapping Text-gbpmDomainName = lens _gbpmDomainName (\ s a -> s{_gbpmDomainName = a});+gbpmDomainName = lens _gbpmDomainName (\ s a -> s{_gbpmDomainName = a}) --- | The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify any base path name after the domain name.+-- | [Required] The base path name that callers of the API must provide as part of the URL after the domain name. This value must be unique for all of the mappings across a single API. Leave this blank if you do not want callers to specify any base path name after the domain name. gbpmBasePath :: Lens' GetBasePathMapping Text-gbpmBasePath = lens _gbpmBasePath (\ s a -> s{_gbpmBasePath = a});+gbpmBasePath = lens _gbpmBasePath (\ s a -> s{_gbpmBasePath = a}) instance AWSRequest GetBasePathMapping where type Rs GetBasePathMapping = BasePathMapping
gen/Network/AWS/APIGateway/GetBasePathMappings.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetBasePathMappings--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -66,30 +66,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'gLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gPosition' - The current pagination position in the paged result set. ----- * 'gDomainName' - The domain name of a 'BasePathMapping' resource.+-- * 'gDomainName' - [Required] The domain name of a 'BasePathMapping' resource. getBasePathMappings :: Text -- ^ 'gDomainName' -> GetBasePathMappings getBasePathMappings pDomainName_ = GetBasePathMappings'- {_gLimit = Nothing, _gPosition = Nothing, _gDomainName = pDomainName_}+ {_gLimit = Nothing, _gPosition = Nothing, _gDomainName = pDomainName_} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gLimit :: Lens' GetBasePathMappings (Maybe Int)-gLimit = lens _gLimit (\ s a -> s{_gLimit = a});+gLimit = lens _gLimit (\ s a -> s{_gLimit = a}) -- | The current pagination position in the paged result set. gPosition :: Lens' GetBasePathMappings (Maybe Text)-gPosition = lens _gPosition (\ s a -> s{_gPosition = a});+gPosition = lens _gPosition (\ s a -> s{_gPosition = a}) --- | The domain name of a 'BasePathMapping' resource.+-- | [Required] The domain name of a 'BasePathMapping' resource. gDomainName :: Lens' GetBasePathMappings Text-gDomainName = lens _gDomainName (\ s a -> s{_gDomainName = a});+gDomainName = lens _gDomainName (\ s a -> s{_gDomainName = a}) instance AWSPager GetBasePathMappings where page rq rs@@ -157,22 +157,22 @@ -> GetBasePathMappingsResponse getBasePathMappingsResponse pResponseStatus_ = GetBasePathMappingsResponse'- { _gbpmrsItems = Nothing- , _gbpmrsPosition = Nothing- , _gbpmrsResponseStatus = pResponseStatus_- }+ { _gbpmrsItems = Nothing+ , _gbpmrsPosition = Nothing+ , _gbpmrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gbpmrsItems :: Lens' GetBasePathMappingsResponse [BasePathMapping]-gbpmrsItems = lens _gbpmrsItems (\ s a -> s{_gbpmrsItems = a}) . _Default . _Coerce;+gbpmrsItems = lens _gbpmrsItems (\ s a -> s{_gbpmrsItems = a}) . _Default . _Coerce -- | Undocumented member. gbpmrsPosition :: Lens' GetBasePathMappingsResponse (Maybe Text)-gbpmrsPosition = lens _gbpmrsPosition (\ s a -> s{_gbpmrsPosition = a});+gbpmrsPosition = lens _gbpmrsPosition (\ s a -> s{_gbpmrsPosition = a}) -- | -- | The response status code. gbpmrsResponseStatus :: Lens' GetBasePathMappingsResponse Int-gbpmrsResponseStatus = lens _gbpmrsResponseStatus (\ s a -> s{_gbpmrsResponseStatus = a});+gbpmrsResponseStatus = lens _gbpmrsResponseStatus (\ s a -> s{_gbpmrsResponseStatus = a}) instance NFData GetBasePathMappingsResponse where
gen/Network/AWS/APIGateway/GetClientCertificate.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetClientCertificate--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -61,7 +61,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gccClientCertificateId' - The identifier of the 'ClientCertificate' resource to be described.+-- * 'gccClientCertificateId' - [Required] The identifier of the 'ClientCertificate' resource to be described. getClientCertificate :: Text -- ^ 'gccClientCertificateId' -> GetClientCertificate@@ -69,9 +69,9 @@ GetClientCertificate' {_gccClientCertificateId = pClientCertificateId_} --- | The identifier of the 'ClientCertificate' resource to be described.+-- | [Required] The identifier of the 'ClientCertificate' resource to be described. gccClientCertificateId :: Lens' GetClientCertificate Text-gccClientCertificateId = lens _gccClientCertificateId (\ s a -> s{_gccClientCertificateId = a});+gccClientCertificateId = lens _gccClientCertificateId (\ s a -> s{_gccClientCertificateId = a}) instance AWSRequest GetClientCertificate where type Rs GetClientCertificate = ClientCertificate
gen/Network/AWS/APIGateway/GetClientCertificates.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetClientCertificates--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,7 +64,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gccLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'gccLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gccPosition' - The current pagination position in the paged result set. getClientCertificates@@ -73,13 +73,13 @@ GetClientCertificates' {_gccLimit = Nothing, _gccPosition = Nothing} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gccLimit :: Lens' GetClientCertificates (Maybe Int)-gccLimit = lens _gccLimit (\ s a -> s{_gccLimit = a});+gccLimit = lens _gccLimit (\ s a -> s{_gccLimit = a}) -- | The current pagination position in the paged result set. gccPosition :: Lens' GetClientCertificates (Maybe Text)-gccPosition = lens _gccPosition (\ s a -> s{_gccPosition = a});+gccPosition = lens _gccPosition (\ s a -> s{_gccPosition = a}) instance AWSPager GetClientCertificates where page rq rs@@ -144,22 +144,22 @@ -> GetClientCertificatesResponse getClientCertificatesResponse pResponseStatus_ = GetClientCertificatesResponse'- { _gccrsItems = Nothing- , _gccrsPosition = Nothing- , _gccrsResponseStatus = pResponseStatus_- }+ { _gccrsItems = Nothing+ , _gccrsPosition = Nothing+ , _gccrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gccrsItems :: Lens' GetClientCertificatesResponse [ClientCertificate]-gccrsItems = lens _gccrsItems (\ s a -> s{_gccrsItems = a}) . _Default . _Coerce;+gccrsItems = lens _gccrsItems (\ s a -> s{_gccrsItems = a}) . _Default . _Coerce -- | Undocumented member. gccrsPosition :: Lens' GetClientCertificatesResponse (Maybe Text)-gccrsPosition = lens _gccrsPosition (\ s a -> s{_gccrsPosition = a});+gccrsPosition = lens _gccrsPosition (\ s a -> s{_gccrsPosition = a}) -- | -- | The response status code. gccrsResponseStatus :: Lens' GetClientCertificatesResponse Int-gccrsResponseStatus = lens _gccrsResponseStatus (\ s a -> s{_gccrsResponseStatus = a});+gccrsResponseStatus = lens _gccrsResponseStatus (\ s a -> s{_gccrsResponseStatus = a}) instance NFData GetClientCertificatesResponse where
gen/Network/AWS/APIGateway/GetDeployment.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDeployment--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -48,7 +48,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to get information about a 'Deployment' resource.+-- | Requests API Gateway to get information about a 'Deployment' resource. -- -- --@@ -66,32 +66,32 @@ -- -- * 'gEmbed' - A query parameter to retrieve the specified embedded resources of the returned 'Deployment' resource in the response. In a REST API call, this @embed@ parameter value is a list of comma-separated strings, as in @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=var1,var2@ . The SDK and other platform-dependent libraries might use a different format for the list. Currently, this request supports only retrieval of the embedded API summary this way. Hence, the parameter value must be a single-valued list containing only the @"apisummary"@ string. For example, @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=apisummary@ . ----- * 'gRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gDeploymentId' - The identifier of the 'Deployment' resource to get information about.+-- * 'gDeploymentId' - [Required] The identifier of the 'Deployment' resource to get information about. getDeployment :: Text -- ^ 'gRestAPIId' -> Text -- ^ 'gDeploymentId' -> GetDeployment getDeployment pRestAPIId_ pDeploymentId_ = GetDeployment'- { _gEmbed = Nothing- , _gRestAPIId = pRestAPIId_- , _gDeploymentId = pDeploymentId_- }+ { _gEmbed = Nothing+ , _gRestAPIId = pRestAPIId_+ , _gDeploymentId = pDeploymentId_+ } -- | A query parameter to retrieve the specified embedded resources of the returned 'Deployment' resource in the response. In a REST API call, this @embed@ parameter value is a list of comma-separated strings, as in @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=var1,var2@ . The SDK and other platform-dependent libraries might use a different format for the list. Currently, this request supports only retrieval of the embedded API summary this way. Hence, the parameter value must be a single-valued list containing only the @"apisummary"@ string. For example, @GET /restapis/{restapi_id}/deployments/{deployment_id}?embed=apisummary@ . gEmbed :: Lens' GetDeployment [Text]-gEmbed = lens _gEmbed (\ s a -> s{_gEmbed = a}) . _Default . _Coerce;+gEmbed = lens _gEmbed (\ s a -> s{_gEmbed = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gRestAPIId :: Lens' GetDeployment Text-gRestAPIId = lens _gRestAPIId (\ s a -> s{_gRestAPIId = a});+gRestAPIId = lens _gRestAPIId (\ s a -> s{_gRestAPIId = a}) --- | The identifier of the 'Deployment' resource to get information about.+-- | [Required] The identifier of the 'Deployment' resource to get information about. gDeploymentId :: Lens' GetDeployment Text-gDeploymentId = lens _gDeploymentId (\ s a -> s{_gDeploymentId = a});+gDeploymentId = lens _gDeploymentId (\ s a -> s{_gDeploymentId = a}) instance AWSRequest GetDeployment where type Rs GetDeployment = Deployment
gen/Network/AWS/APIGateway/GetDeployments.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDeployments--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -50,7 +50,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to get information about a 'Deployments' collection.+-- | Requests API Gateway to get information about a 'Deployments' collection. -- -- --@@ -66,30 +66,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'gdLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gdPosition' - The current pagination position in the paged result set. ----- * 'gdRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gdRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getDeployments :: Text -- ^ 'gdRestAPIId' -> GetDeployments getDeployments pRestAPIId_ = GetDeployments'- {_gdLimit = Nothing, _gdPosition = Nothing, _gdRestAPIId = pRestAPIId_}+ {_gdLimit = Nothing, _gdPosition = Nothing, _gdRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gdLimit :: Lens' GetDeployments (Maybe Int)-gdLimit = lens _gdLimit (\ s a -> s{_gdLimit = a});+gdLimit = lens _gdLimit (\ s a -> s{_gdLimit = a}) -- | The current pagination position in the paged result set. gdPosition :: Lens' GetDeployments (Maybe Text)-gdPosition = lens _gdPosition (\ s a -> s{_gdPosition = a});+gdPosition = lens _gdPosition (\ s a -> s{_gdPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gdRestAPIId :: Lens' GetDeployments Text-gdRestAPIId = lens _gdRestAPIId (\ s a -> s{_gdRestAPIId = a});+gdRestAPIId = lens _gdRestAPIId (\ s a -> s{_gdRestAPIId = a}) instance AWSPager GetDeployments where page rq rs@@ -155,22 +155,22 @@ -> GetDeploymentsResponse getDeploymentsResponse pResponseStatus_ = GetDeploymentsResponse'- { _gdrsItems = Nothing- , _gdrsPosition = Nothing- , _gdrsResponseStatus = pResponseStatus_- }+ { _gdrsItems = Nothing+ , _gdrsPosition = Nothing+ , _gdrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gdrsItems :: Lens' GetDeploymentsResponse [Deployment]-gdrsItems = lens _gdrsItems (\ s a -> s{_gdrsItems = a}) . _Default . _Coerce;+gdrsItems = lens _gdrsItems (\ s a -> s{_gdrsItems = a}) . _Default . _Coerce -- | Undocumented member. gdrsPosition :: Lens' GetDeploymentsResponse (Maybe Text)-gdrsPosition = lens _gdrsPosition (\ s a -> s{_gdrsPosition = a});+gdrsPosition = lens _gdrsPosition (\ s a -> s{_gdrsPosition = a}) -- | -- | The response status code. gdrsResponseStatus :: Lens' GetDeploymentsResponse Int-gdrsResponseStatus = lens _gdrsResponseStatus (\ s a -> s{_gdrsResponseStatus = a});+gdrsResponseStatus = lens _gdrsResponseStatus (\ s a -> s{_gdrsResponseStatus = a}) instance NFData GetDeploymentsResponse where
gen/Network/AWS/APIGateway/GetDocumentationPart.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDocumentationPart--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -68,16 +68,18 @@ -> GetDocumentationPart getDocumentationPart pRestAPIId_ pDocumentationPartId_ = GetDocumentationPart'- {_getRestAPIId = pRestAPIId_, _getDocumentationPartId = pDocumentationPartId_}+ { _getRestAPIId = pRestAPIId_+ , _getDocumentationPartId = pDocumentationPartId_+ } -- | [Required] The string identifier of the associated 'RestApi' . getRestAPIId :: Lens' GetDocumentationPart Text-getRestAPIId = lens _getRestAPIId (\ s a -> s{_getRestAPIId = a});+getRestAPIId = lens _getRestAPIId (\ s a -> s{_getRestAPIId = a}) -- | [Required] The string identifier of the associated 'RestApi' . getDocumentationPartId :: Lens' GetDocumentationPart Text-getDocumentationPartId = lens _getDocumentationPartId (\ s a -> s{_getDocumentationPartId = a});+getDocumentationPartId = lens _getDocumentationPartId (\ s a -> s{_getDocumentationPartId = a}) instance AWSRequest GetDocumentationPart where type Rs GetDocumentationPart = DocumentationPart
gen/Network/AWS/APIGateway/GetDocumentationParts.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDocumentationParts--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -26,6 +26,7 @@ , GetDocumentationParts -- * Request Lenses , gdpPath+ , gdpLocationStatus , gdpNameQuery , gdpLimit , gdpType@@ -54,12 +55,13 @@ -- -- /See:/ 'getDocumentationParts' smart constructor. data GetDocumentationParts = GetDocumentationParts'- { _gdpPath :: !(Maybe Text)- , _gdpNameQuery :: !(Maybe Text)- , _gdpLimit :: !(Maybe Int)- , _gdpType :: !(Maybe DocumentationPartType)- , _gdpPosition :: !(Maybe Text)- , _gdpRestAPIId :: !Text+ { _gdpPath :: !(Maybe Text)+ , _gdpLocationStatus :: !(Maybe LocationStatusType)+ , _gdpNameQuery :: !(Maybe Text)+ , _gdpLimit :: !(Maybe Int)+ , _gdpType :: !(Maybe DocumentationPartType)+ , _gdpPosition :: !(Maybe Text)+ , _gdpRestAPIId :: !Text } deriving (Eq, Read, Show, Data, Typeable, Generic) @@ -69,9 +71,11 @@ -- -- * 'gdpPath' - The path of API entities of the to-be-retrieved documentation parts. --+-- * 'gdpLocationStatus' - The status of the API documentation parts to retrieve. Valid values are @DOCUMENTED@ for retrieving 'DocumentationPart' resources with content and @UNDOCUMENTED@ for 'DocumentationPart' resources without content.+-- -- * 'gdpNameQuery' - The name of API entities of the to-be-retrieved documentation parts. ----- * 'gdpLimit' - The maximum number of returned results per page.+-- * 'gdpLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gdpType' - The type of API entities of the to-be-retrieved documentation parts. --@@ -83,38 +87,43 @@ -> GetDocumentationParts getDocumentationParts pRestAPIId_ = GetDocumentationParts'- { _gdpPath = Nothing- , _gdpNameQuery = Nothing- , _gdpLimit = Nothing- , _gdpType = Nothing- , _gdpPosition = Nothing- , _gdpRestAPIId = pRestAPIId_- }+ { _gdpPath = Nothing+ , _gdpLocationStatus = Nothing+ , _gdpNameQuery = Nothing+ , _gdpLimit = Nothing+ , _gdpType = Nothing+ , _gdpPosition = Nothing+ , _gdpRestAPIId = pRestAPIId_+ } -- | The path of API entities of the to-be-retrieved documentation parts. gdpPath :: Lens' GetDocumentationParts (Maybe Text)-gdpPath = lens _gdpPath (\ s a -> s{_gdpPath = a});+gdpPath = lens _gdpPath (\ s a -> s{_gdpPath = a}) +-- | The status of the API documentation parts to retrieve. Valid values are @DOCUMENTED@ for retrieving 'DocumentationPart' resources with content and @UNDOCUMENTED@ for 'DocumentationPart' resources without content.+gdpLocationStatus :: Lens' GetDocumentationParts (Maybe LocationStatusType)+gdpLocationStatus = lens _gdpLocationStatus (\ s a -> s{_gdpLocationStatus = a})+ -- | The name of API entities of the to-be-retrieved documentation parts. gdpNameQuery :: Lens' GetDocumentationParts (Maybe Text)-gdpNameQuery = lens _gdpNameQuery (\ s a -> s{_gdpNameQuery = a});+gdpNameQuery = lens _gdpNameQuery (\ s a -> s{_gdpNameQuery = a}) --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gdpLimit :: Lens' GetDocumentationParts (Maybe Int)-gdpLimit = lens _gdpLimit (\ s a -> s{_gdpLimit = a});+gdpLimit = lens _gdpLimit (\ s a -> s{_gdpLimit = a}) -- | The type of API entities of the to-be-retrieved documentation parts. gdpType :: Lens' GetDocumentationParts (Maybe DocumentationPartType)-gdpType = lens _gdpType (\ s a -> s{_gdpType = a});+gdpType = lens _gdpType (\ s a -> s{_gdpType = a}) -- | The current pagination position in the paged result set. gdpPosition :: Lens' GetDocumentationParts (Maybe Text)-gdpPosition = lens _gdpPosition (\ s a -> s{_gdpPosition = a});+gdpPosition = lens _gdpPosition (\ s a -> s{_gdpPosition = a}) -- | [Required] The string identifier of the associated 'RestApi' . gdpRestAPIId :: Lens' GetDocumentationParts Text-gdpRestAPIId = lens _gdpRestAPIId (\ s a -> s{_gdpRestAPIId = a});+gdpRestAPIId = lens _gdpRestAPIId (\ s a -> s{_gdpRestAPIId = a}) instance AWSRequest GetDocumentationParts where type Rs GetDocumentationParts =@@ -146,9 +155,10 @@ instance ToQuery GetDocumentationParts where toQuery GetDocumentationParts'{..} = mconcat- ["path" =: _gdpPath, "name" =: _gdpNameQuery,- "limit" =: _gdpLimit, "type" =: _gdpType,- "position" =: _gdpPosition]+ ["path" =: _gdpPath,+ "locationStatus" =: _gdpLocationStatus,+ "name" =: _gdpNameQuery, "limit" =: _gdpLimit,+ "type" =: _gdpType, "position" =: _gdpPosition] -- | The collection of documentation parts of an API. --@@ -177,22 +187,22 @@ -> GetDocumentationPartsResponse getDocumentationPartsResponse pResponseStatus_ = GetDocumentationPartsResponse'- { _gdprsItems = Nothing- , _gdprsPosition = Nothing- , _gdprsResponseStatus = pResponseStatus_- }+ { _gdprsItems = Nothing+ , _gdprsPosition = Nothing+ , _gdprsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gdprsItems :: Lens' GetDocumentationPartsResponse [DocumentationPart]-gdprsItems = lens _gdprsItems (\ s a -> s{_gdprsItems = a}) . _Default . _Coerce;+gdprsItems = lens _gdprsItems (\ s a -> s{_gdprsItems = a}) . _Default . _Coerce -- | Undocumented member. gdprsPosition :: Lens' GetDocumentationPartsResponse (Maybe Text)-gdprsPosition = lens _gdprsPosition (\ s a -> s{_gdprsPosition = a});+gdprsPosition = lens _gdprsPosition (\ s a -> s{_gdprsPosition = a}) -- | -- | The response status code. gdprsResponseStatus :: Lens' GetDocumentationPartsResponse Int-gdprsResponseStatus = lens _gdprsResponseStatus (\ s a -> s{_gdprsResponseStatus = a});+gdprsResponseStatus = lens _gdprsResponseStatus (\ s a -> s{_gdprsResponseStatus = a}) instance NFData GetDocumentationPartsResponse where
gen/Network/AWS/APIGateway/GetDocumentationVersion.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDocumentationVersion--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -68,18 +68,18 @@ -> GetDocumentationVersion getDocumentationVersion pRestAPIId_ pDocumentationVersion_ = GetDocumentationVersion'- { _gdvdRestAPIId = pRestAPIId_- , _gdvdDocumentationVersion = pDocumentationVersion_- }+ { _gdvdRestAPIId = pRestAPIId_+ , _gdvdDocumentationVersion = pDocumentationVersion_+ } -- | [Required] The string identifier of the associated 'RestApi' . gdvdRestAPIId :: Lens' GetDocumentationVersion Text-gdvdRestAPIId = lens _gdvdRestAPIId (\ s a -> s{_gdvdRestAPIId = a});+gdvdRestAPIId = lens _gdvdRestAPIId (\ s a -> s{_gdvdRestAPIId = a}) -- | [Required] The version identifier of the to-be-retrieved documentation snapshot. gdvdDocumentationVersion :: Lens' GetDocumentationVersion Text-gdvdDocumentationVersion = lens _gdvdDocumentationVersion (\ s a -> s{_gdvdDocumentationVersion = a});+gdvdDocumentationVersion = lens _gdvdDocumentationVersion (\ s a -> s{_gdvdDocumentationVersion = a}) instance AWSRequest GetDocumentationVersion where type Rs GetDocumentationVersion =
gen/Network/AWS/APIGateway/GetDocumentationVersions.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDocumentationVersions--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -61,7 +61,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdvLimit' - The maximum number of returned results per page.+-- * 'gdvLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gdvPosition' - The current pagination position in the paged result set. --@@ -71,20 +71,20 @@ -> GetDocumentationVersions getDocumentationVersions pRestAPIId_ = GetDocumentationVersions'- {_gdvLimit = Nothing, _gdvPosition = Nothing, _gdvRestAPIId = pRestAPIId_}+ {_gdvLimit = Nothing, _gdvPosition = Nothing, _gdvRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gdvLimit :: Lens' GetDocumentationVersions (Maybe Int)-gdvLimit = lens _gdvLimit (\ s a -> s{_gdvLimit = a});+gdvLimit = lens _gdvLimit (\ s a -> s{_gdvLimit = a}) -- | The current pagination position in the paged result set. gdvPosition :: Lens' GetDocumentationVersions (Maybe Text)-gdvPosition = lens _gdvPosition (\ s a -> s{_gdvPosition = a});+gdvPosition = lens _gdvPosition (\ s a -> s{_gdvPosition = a}) -- | [Required] The string identifier of the associated 'RestApi' . gdvRestAPIId :: Lens' GetDocumentationVersions Text-gdvRestAPIId = lens _gdvRestAPIId (\ s a -> s{_gdvRestAPIId = a});+gdvRestAPIId = lens _gdvRestAPIId (\ s a -> s{_gdvRestAPIId = a}) instance AWSRequest GetDocumentationVersions where type Rs GetDocumentationVersions =@@ -147,23 +147,23 @@ -> GetDocumentationVersionsResponse getDocumentationVersionsResponse pResponseStatus_ = GetDocumentationVersionsResponse'- { _gdvrsItems = Nothing- , _gdvrsPosition = Nothing- , _gdvrsResponseStatus = pResponseStatus_- }+ { _gdvrsItems = Nothing+ , _gdvrsPosition = Nothing+ , _gdvrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gdvrsItems :: Lens' GetDocumentationVersionsResponse [DocumentationVersion]-gdvrsItems = lens _gdvrsItems (\ s a -> s{_gdvrsItems = a}) . _Default . _Coerce;+gdvrsItems = lens _gdvrsItems (\ s a -> s{_gdvrsItems = a}) . _Default . _Coerce -- | Undocumented member. gdvrsPosition :: Lens' GetDocumentationVersionsResponse (Maybe Text)-gdvrsPosition = lens _gdvrsPosition (\ s a -> s{_gdvrsPosition = a});+gdvrsPosition = lens _gdvrsPosition (\ s a -> s{_gdvrsPosition = a}) -- | -- | The response status code. gdvrsResponseStatus :: Lens' GetDocumentationVersionsResponse Int-gdvrsResponseStatus = lens _gdvrsResponseStatus (\ s a -> s{_gdvrsResponseStatus = a});+gdvrsResponseStatus = lens _gdvrsResponseStatus (\ s a -> s{_gdvrsResponseStatus = a}) instance NFData GetDocumentationVersionsResponse where
gen/Network/AWS/APIGateway/GetDomainName.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDomainName--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -33,9 +33,11 @@ , domainName , DomainName -- * Response Lenses+ , dnRegionalHostedZoneId , dnCertificateName , dnRegionalCertificateARN , dnCertificateARN+ , dnDistributionHostedZoneId , dnDomainName , dnRegionalCertificateName , dnRegionalDomainName@@ -65,16 +67,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdnDomainName' - The name of the 'DomainName' resource.+-- * 'gdnDomainName' - [Required] The name of the 'DomainName' resource. getDomainName :: Text -- ^ 'gdnDomainName' -> GetDomainName getDomainName pDomainName_ = GetDomainName' {_gdnDomainName = pDomainName_} --- | The name of the 'DomainName' resource.+-- | [Required] The name of the 'DomainName' resource. gdnDomainName :: Lens' GetDomainName Text-gdnDomainName = lens _gdnDomainName (\ s a -> s{_gdnDomainName = a});+gdnDomainName = lens _gdnDomainName (\ s a -> s{_gdnDomainName = a}) instance AWSRequest GetDomainName where type Rs GetDomainName = DomainName
gen/Network/AWS/APIGateway/GetDomainNames.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetDomainNames--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,7 +64,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gdnLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'gdnLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gdnPosition' - The current pagination position in the paged result set. getDomainNames@@ -72,13 +72,13 @@ getDomainNames = GetDomainNames' {_gdnLimit = Nothing, _gdnPosition = Nothing} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gdnLimit :: Lens' GetDomainNames (Maybe Int)-gdnLimit = lens _gdnLimit (\ s a -> s{_gdnLimit = a});+gdnLimit = lens _gdnLimit (\ s a -> s{_gdnLimit = a}) -- | The current pagination position in the paged result set. gdnPosition :: Lens' GetDomainNames (Maybe Text)-gdnPosition = lens _gdnPosition (\ s a -> s{_gdnPosition = a});+gdnPosition = lens _gdnPosition (\ s a -> s{_gdnPosition = a}) instance AWSPager GetDomainNames where page rq rs@@ -142,22 +142,22 @@ -> GetDomainNamesResponse getDomainNamesResponse pResponseStatus_ = GetDomainNamesResponse'- { _gdnrsItems = Nothing- , _gdnrsPosition = Nothing- , _gdnrsResponseStatus = pResponseStatus_- }+ { _gdnrsItems = Nothing+ , _gdnrsPosition = Nothing+ , _gdnrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gdnrsItems :: Lens' GetDomainNamesResponse [DomainName]-gdnrsItems = lens _gdnrsItems (\ s a -> s{_gdnrsItems = a}) . _Default . _Coerce;+gdnrsItems = lens _gdnrsItems (\ s a -> s{_gdnrsItems = a}) . _Default . _Coerce -- | Undocumented member. gdnrsPosition :: Lens' GetDomainNamesResponse (Maybe Text)-gdnrsPosition = lens _gdnrsPosition (\ s a -> s{_gdnrsPosition = a});+gdnrsPosition = lens _gdnrsPosition (\ s a -> s{_gdnrsPosition = a}) -- | -- | The response status code. gdnrsResponseStatus :: Lens' GetDomainNamesResponse Int-gdnrsResponseStatus = lens _gdnrsResponseStatus (\ s a -> s{_gdnrsResponseStatus = a});+gdnrsResponseStatus = lens _gdnrsResponseStatus (\ s a -> s{_gdnrsResponseStatus = a}) instance NFData GetDomainNamesResponse where
gen/Network/AWS/APIGateway/GetExport.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetExport--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -72,11 +72,11 @@ -- -- * 'geAccepts' - The content-type of the export, for example @application/json@ . Currently @application/json@ and @application/yaml@ are supported for @exportType@ of @swagger@ . This should be specified in the @Accept@ header for direct API requests. ----- * 'geRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'geRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'geStageName' - The name of the 'Stage' that will be exported.+-- * 'geStageName' - [Required] The name of the 'Stage' that will be exported. ----- * 'geExportType' - The type of export. Currently only 'swagger' is supported.+-- * 'geExportType' - [Required] The type of export. Currently only 'swagger' is supported. getExport :: Text -- ^ 'geRestAPIId' -> Text -- ^ 'geStageName'@@ -84,39 +84,39 @@ -> GetExport getExport pRestAPIId_ pStageName_ pExportType_ = GetExport'- { _geParameters = Nothing- , _geAccepts = Nothing- , _geRestAPIId = pRestAPIId_- , _geStageName = pStageName_- , _geExportType = pExportType_- }+ { _geParameters = Nothing+ , _geAccepts = Nothing+ , _geRestAPIId = pRestAPIId_+ , _geStageName = pStageName_+ , _geExportType = pExportType_+ } -- | A key-value map of query string parameters that specify properties of the export, depending on the requested @exportType@ . For @exportType@ @swagger@ , any combination of the following parameters are supported: @integrations@ will export the API with x-amazon-apigateway-integration extensions. @authorizers@ will export the API with x-amazon-apigateway-authorizer extensions. @postman@ will export the API with Postman extensions, allowing for import to the Postman tool geParameters :: Lens' GetExport (HashMap Text Text)-geParameters = lens _geParameters (\ s a -> s{_geParameters = a}) . _Default . _Map;+geParameters = lens _geParameters (\ s a -> s{_geParameters = a}) . _Default . _Map -- | The content-type of the export, for example @application/json@ . Currently @application/json@ and @application/yaml@ are supported for @exportType@ of @swagger@ . This should be specified in the @Accept@ header for direct API requests. geAccepts :: Lens' GetExport (Maybe Text)-geAccepts = lens _geAccepts (\ s a -> s{_geAccepts = a});+geAccepts = lens _geAccepts (\ s a -> s{_geAccepts = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . geRestAPIId :: Lens' GetExport Text-geRestAPIId = lens _geRestAPIId (\ s a -> s{_geRestAPIId = a});+geRestAPIId = lens _geRestAPIId (\ s a -> s{_geRestAPIId = a}) --- | The name of the 'Stage' that will be exported.+-- | [Required] The name of the 'Stage' that will be exported. geStageName :: Lens' GetExport Text-geStageName = lens _geStageName (\ s a -> s{_geStageName = a});+geStageName = lens _geStageName (\ s a -> s{_geStageName = a}) --- | The type of export. Currently only 'swagger' is supported.+-- | [Required] The type of export. Currently only 'swagger' is supported. geExportType :: Lens' GetExport Text-geExportType = lens _geExportType (\ s a -> s{_geExportType = a});+geExportType = lens _geExportType (\ s a -> s{_geExportType = a}) instance AWSRequest GetExport where type Rs GetExport = GetExportResponse request = get apiGateway response- = receiveJSON+ = receiveBytes (\ s h x -> GetExportResponse' <$> (pure (Just x)) <*> (h .#? "Content-Disposition") <*>@@ -152,7 +152,7 @@ -- -- /See:/ 'getExportResponse' smart constructor. data GetExportResponse = GetExportResponse'- { _gersBody :: !(Maybe (HashMap Text Value))+ { _gersBody :: !(Maybe ByteString) , _gersContentDisposition :: !(Maybe Text) , _gersContentType :: !(Maybe Text) , _gersResponseStatus :: !Int@@ -175,27 +175,27 @@ -> GetExportResponse getExportResponse pResponseStatus_ = GetExportResponse'- { _gersBody = Nothing- , _gersContentDisposition = Nothing- , _gersContentType = Nothing- , _gersResponseStatus = pResponseStatus_- }+ { _gersBody = Nothing+ , _gersContentDisposition = Nothing+ , _gersContentType = Nothing+ , _gersResponseStatus = pResponseStatus_+ } -- | The binary blob response to 'GetExport' , which contains the export.-gersBody :: Lens' GetExportResponse (Maybe (HashMap Text Value))-gersBody = lens _gersBody (\ s a -> s{_gersBody = a});+gersBody :: Lens' GetExportResponse (Maybe ByteString)+gersBody = lens _gersBody (\ s a -> s{_gersBody = a}) -- | The content-disposition header value in the HTTP response. gersContentDisposition :: Lens' GetExportResponse (Maybe Text)-gersContentDisposition = lens _gersContentDisposition (\ s a -> s{_gersContentDisposition = a});+gersContentDisposition = lens _gersContentDisposition (\ s a -> s{_gersContentDisposition = a}) -- | The content-type header value in the HTTP response. This will correspond to a valid 'accept' type in the request. gersContentType :: Lens' GetExportResponse (Maybe Text)-gersContentType = lens _gersContentType (\ s a -> s{_gersContentType = a});+gersContentType = lens _gersContentType (\ s a -> s{_gersContentType = a}) -- | -- | The response status code. gersResponseStatus :: Lens' GetExportResponse Int-gersResponseStatus = lens _gersResponseStatus (\ s a -> s{_gersResponseStatus = a});+gersResponseStatus = lens _gersResponseStatus (\ s a -> s{_gersResponseStatus = a}) instance NFData GetExportResponse where
gen/Network/AWS/APIGateway/GetGatewayResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetGatewayResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -63,25 +63,25 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gggRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gggRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gggResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- * 'gggResponseType' - [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE getGatewayResponse :: Text -- ^ 'gggRestAPIId' -> GatewayResponseType -- ^ 'gggResponseType' -> GetGatewayResponse getGatewayResponse pRestAPIId_ pResponseType_ = GetGatewayResponse'- {_gggRestAPIId = pRestAPIId_, _gggResponseType = pResponseType_}+ {_gggRestAPIId = pRestAPIId_, _gggResponseType = pResponseType_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gggRestAPIId :: Lens' GetGatewayResponse Text-gggRestAPIId = lens _gggRestAPIId (\ s a -> s{_gggRestAPIId = a});+gggRestAPIId = lens _gggRestAPIId (\ s a -> s{_gggRestAPIId = a}) --- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- | [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE gggResponseType :: Lens' GetGatewayResponse GatewayResponseType-gggResponseType = lens _gggResponseType (\ s a -> s{_gggResponseType = a});+gggResponseType = lens _gggResponseType (\ s a -> s{_gggResponseType = a}) instance AWSRequest GetGatewayResponse where type Rs GetGatewayResponse = GatewayResponse
gen/Network/AWS/APIGateway/GetGatewayResponses.hs view
@@ -12,13 +12,13 @@ -- | -- Module : Network.AWS.APIGateway.GetGatewayResponses--- Copyright : (c) 2013-2017 Brendan Hay+-- 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) ----- Gets the 'GatewayResponses' collection on the given 'RestApi' . If an API developer has not added any definitions for gateway responses, the result will be the Amazon API Gateway-generated default 'GatewayResponses' collection for the supported response types.+-- Gets the 'GatewayResponses' collection on the given 'RestApi' . If an API developer has not added any definitions for gateway responses, the result will be the API Gateway-generated default 'GatewayResponses' collection for the supported response types. -- -- module Network.AWS.APIGateway.GetGatewayResponses@@ -47,7 +47,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Gets the 'GatewayResponses' collection on the given 'RestApi' . If an API developer has not added any definitions for gateway responses, the result will be the Amazon API Gateway-generated default 'GatewayResponses' collection for the supported response types.+-- | Gets the 'GatewayResponses' collection on the given 'RestApi' . If an API developer has not added any definitions for gateway responses, the result will be the API Gateway-generated default 'GatewayResponses' collection for the supported response types. -- -- --@@ -63,30 +63,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ggrLimit' - The maximum number of returned results per page. The 'GatewayResponses' collection does not support pagination and the limit does not apply here.+-- * 'ggrLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. The 'GatewayResponses' collection does not support pagination and the limit does not apply here. -- -- * 'ggrPosition' - The current pagination position in the paged result set. The 'GatewayResponse' collection does not support pagination and the position does not apply here. ----- * 'ggrRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'ggrRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getGatewayResponses :: Text -- ^ 'ggrRestAPIId' -> GetGatewayResponses getGatewayResponses pRestAPIId_ = GetGatewayResponses'- {_ggrLimit = Nothing, _ggrPosition = Nothing, _ggrRestAPIId = pRestAPIId_}+ {_ggrLimit = Nothing, _ggrPosition = Nothing, _ggrRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page. The 'GatewayResponses' collection does not support pagination and the limit does not apply here.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. The 'GatewayResponses' collection does not support pagination and the limit does not apply here. ggrLimit :: Lens' GetGatewayResponses (Maybe Int)-ggrLimit = lens _ggrLimit (\ s a -> s{_ggrLimit = a});+ggrLimit = lens _ggrLimit (\ s a -> s{_ggrLimit = a}) -- | The current pagination position in the paged result set. The 'GatewayResponse' collection does not support pagination and the position does not apply here. ggrPosition :: Lens' GetGatewayResponses (Maybe Text)-ggrPosition = lens _ggrPosition (\ s a -> s{_ggrPosition = a});+ggrPosition = lens _ggrPosition (\ s a -> s{_ggrPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . ggrRestAPIId :: Lens' GetGatewayResponses Text-ggrRestAPIId = lens _ggrRestAPIId (\ s a -> s{_ggrRestAPIId = a});+ggrRestAPIId = lens _ggrRestAPIId (\ s a -> s{_ggrRestAPIId = a}) instance AWSRequest GetGatewayResponses where type Rs GetGatewayResponses =@@ -123,7 +123,7 @@ -- | The collection of the 'GatewayResponse' instances of a 'RestApi' as a @responseType@ -to-'GatewayResponse' object map of key-value pairs. As such, pagination is not supported for querying this collection. -- ----- For more information about valid gateway response types, see <http://docs.aws.amazon.com/apigateway/latest/developerguide/supported-gateway-response-types.html Gateway Response Types Supported by Amazon API Gateway> __Example: Get the collection of gateway responses of an API__+-- For more information about valid gateway response types, see <http://docs.aws.amazon.com/apigateway/latest/developerguide/supported-gateway-response-types.html Gateway Response Types Supported by API Gateway> __Example: Get the collection of gateway responses of an API__ -- __Request__ -- This example request shows how to retrieve the 'GatewayResponses' collection from an API. --@@ -158,22 +158,22 @@ -> GetGatewayResponsesResponse getGatewayResponsesResponse pResponseStatus_ = GetGatewayResponsesResponse'- { _ggrrsItems = Nothing- , _ggrrsPosition = Nothing- , _ggrrsResponseStatus = pResponseStatus_- }+ { _ggrrsItems = Nothing+ , _ggrrsPosition = Nothing+ , _ggrrsResponseStatus = pResponseStatus_+ } -- | Returns the entire collection, because of no pagination support. ggrrsItems :: Lens' GetGatewayResponsesResponse [GatewayResponse]-ggrrsItems = lens _ggrrsItems (\ s a -> s{_ggrrsItems = a}) . _Default . _Coerce;+ggrrsItems = lens _ggrrsItems (\ s a -> s{_ggrrsItems = a}) . _Default . _Coerce -- | Undocumented member. ggrrsPosition :: Lens' GetGatewayResponsesResponse (Maybe Text)-ggrrsPosition = lens _ggrrsPosition (\ s a -> s{_ggrrsPosition = a});+ggrrsPosition = lens _ggrrsPosition (\ s a -> s{_ggrrsPosition = a}) -- | -- | The response status code. ggrrsResponseStatus :: Lens' GetGatewayResponsesResponse Int-ggrrsResponseStatus = lens _ggrrsResponseStatus (\ s a -> s{_ggrrsResponseStatus = a});+ggrrsResponseStatus = lens _ggrrsResponseStatus (\ s a -> s{_ggrrsResponseStatus = a}) instance NFData GetGatewayResponsesResponse where
gen/Network/AWS/APIGateway/GetIntegration.hs view
@@ -12,13 +12,13 @@ -- | -- Module : Network.AWS.APIGateway.GetIntegration--- Copyright : (c) 2013-2017 Brendan Hay+-- 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) ----- Represents a get integration.+-- Get the integration settings. -- -- module Network.AWS.APIGateway.GetIntegration@@ -38,13 +38,16 @@ , iHttpMethod , iRequestTemplates , iCredentials+ , iConnectionId , iRequestParameters , iContentHandling , iPassthroughBehavior , iUri , iIntegrationResponses , iCacheNamespace+ , iTimeoutInMillis , iType+ , iConnectionType , iCacheKeyParameters ) where @@ -55,7 +58,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Represents a get integration request.+-- | Represents a request to get the integration configuration. -- -- --@@ -71,11 +74,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'giRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'giRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'giResourceId' - Specifies a get integration request's resource identifier+-- * 'giResourceId' - [Required] Specifies a get integration request's resource identifier ----- * 'giHttpMethod' - Specifies a get integration request's HTTP method.+-- * 'giHttpMethod' - [Required] Specifies a get integration request's HTTP method. getIntegration :: Text -- ^ 'giRestAPIId' -> Text -- ^ 'giResourceId'@@ -83,23 +86,23 @@ -> GetIntegration getIntegration pRestAPIId_ pResourceId_ pHttpMethod_ = GetIntegration'- { _giRestAPIId = pRestAPIId_- , _giResourceId = pResourceId_- , _giHttpMethod = pHttpMethod_- }+ { _giRestAPIId = pRestAPIId_+ , _giResourceId = pResourceId_+ , _giHttpMethod = pHttpMethod_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . giRestAPIId :: Lens' GetIntegration Text-giRestAPIId = lens _giRestAPIId (\ s a -> s{_giRestAPIId = a});+giRestAPIId = lens _giRestAPIId (\ s a -> s{_giRestAPIId = a}) --- | Specifies a get integration request's resource identifier+-- | [Required] Specifies a get integration request's resource identifier giResourceId :: Lens' GetIntegration Text-giResourceId = lens _giResourceId (\ s a -> s{_giResourceId = a});+giResourceId = lens _giResourceId (\ s a -> s{_giResourceId = a}) --- | Specifies a get integration request's HTTP method.+-- | [Required] Specifies a get integration request's HTTP method. giHttpMethod :: Lens' GetIntegration Text-giHttpMethod = lens _giHttpMethod (\ s a -> s{_giHttpMethod = a});+giHttpMethod = lens _giHttpMethod (\ s a -> s{_giHttpMethod = a}) instance AWSRequest GetIntegration where type Rs GetIntegration = Integration
gen/Network/AWS/APIGateway/GetIntegrationResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetIntegrationResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,13 +67,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'giiRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'giiRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'giiResourceId' - Specifies a get integration response request's resource identifier.+-- * 'giiResourceId' - [Required] Specifies a get integration response request's resource identifier. ----- * 'giiHttpMethod' - Specifies a get integration response request's HTTP method.+-- * 'giiHttpMethod' - [Required] Specifies a get integration response request's HTTP method. ----- * 'giiStatusCode' - Specifies a get integration response request's status code.+-- * 'giiStatusCode' - [Required] Specifies a get integration response request's status code. getIntegrationResponse :: Text -- ^ 'giiRestAPIId' -> Text -- ^ 'giiResourceId'@@ -82,28 +82,28 @@ -> GetIntegrationResponse getIntegrationResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = GetIntegrationResponse'- { _giiRestAPIId = pRestAPIId_- , _giiResourceId = pResourceId_- , _giiHttpMethod = pHttpMethod_- , _giiStatusCode = pStatusCode_- }+ { _giiRestAPIId = pRestAPIId_+ , _giiResourceId = pResourceId_+ , _giiHttpMethod = pHttpMethod_+ , _giiStatusCode = pStatusCode_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . giiRestAPIId :: Lens' GetIntegrationResponse Text-giiRestAPIId = lens _giiRestAPIId (\ s a -> s{_giiRestAPIId = a});+giiRestAPIId = lens _giiRestAPIId (\ s a -> s{_giiRestAPIId = a}) --- | Specifies a get integration response request's resource identifier.+-- | [Required] Specifies a get integration response request's resource identifier. giiResourceId :: Lens' GetIntegrationResponse Text-giiResourceId = lens _giiResourceId (\ s a -> s{_giiResourceId = a});+giiResourceId = lens _giiResourceId (\ s a -> s{_giiResourceId = a}) --- | Specifies a get integration response request's HTTP method.+-- | [Required] Specifies a get integration response request's HTTP method. giiHttpMethod :: Lens' GetIntegrationResponse Text-giiHttpMethod = lens _giiHttpMethod (\ s a -> s{_giiHttpMethod = a});+giiHttpMethod = lens _giiHttpMethod (\ s a -> s{_giiHttpMethod = a}) --- | Specifies a get integration response request's status code.+-- | [Required] Specifies a get integration response request's status code. giiStatusCode :: Lens' GetIntegrationResponse Text-giiStatusCode = lens _giiStatusCode (\ s a -> s{_giiStatusCode = a});+giiStatusCode = lens _giiStatusCode (\ s a -> s{_giiStatusCode = a}) instance AWSRequest GetIntegrationResponse where type Rs GetIntegrationResponse = IntegrationResponse
gen/Network/AWS/APIGateway/GetMethod.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetMethod--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -37,6 +37,7 @@ -- * Response Lenses , mMethodResponses , mHttpMethod+ , mAuthorizationScopes , mRequestValidatorId , mRequestModels , mRequestParameters@@ -70,11 +71,11 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gmmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gmmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gmmResourceId' - The 'Resource' identifier for the 'Method' resource.+-- * 'gmmResourceId' - [Required] The 'Resource' identifier for the 'Method' resource. ----- * 'gmmHttpMethod' - Specifies the method request's HTTP method type.+-- * 'gmmHttpMethod' - [Required] Specifies the method request's HTTP method type. getMethod :: Text -- ^ 'gmmRestAPIId' -> Text -- ^ 'gmmResourceId'@@ -82,23 +83,23 @@ -> GetMethod getMethod pRestAPIId_ pResourceId_ pHttpMethod_ = GetMethod'- { _gmmRestAPIId = pRestAPIId_- , _gmmResourceId = pResourceId_- , _gmmHttpMethod = pHttpMethod_- }+ { _gmmRestAPIId = pRestAPIId_+ , _gmmResourceId = pResourceId_+ , _gmmHttpMethod = pHttpMethod_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gmmRestAPIId :: Lens' GetMethod Text-gmmRestAPIId = lens _gmmRestAPIId (\ s a -> s{_gmmRestAPIId = a});+gmmRestAPIId = lens _gmmRestAPIId (\ s a -> s{_gmmRestAPIId = a}) --- | The 'Resource' identifier for the 'Method' resource.+-- | [Required] The 'Resource' identifier for the 'Method' resource. gmmResourceId :: Lens' GetMethod Text-gmmResourceId = lens _gmmResourceId (\ s a -> s{_gmmResourceId = a});+gmmResourceId = lens _gmmResourceId (\ s a -> s{_gmmResourceId = a}) --- | Specifies the method request's HTTP method type.+-- | [Required] Specifies the method request's HTTP method type. gmmHttpMethod :: Lens' GetMethod Text-gmmHttpMethod = lens _gmmHttpMethod (\ s a -> s{_gmmHttpMethod = a});+gmmHttpMethod = lens _gmmHttpMethod (\ s a -> s{_gmmHttpMethod = a}) instance AWSRequest GetMethod where type Rs GetMethod = Method
gen/Network/AWS/APIGateway/GetMethodResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetMethodResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -65,13 +65,13 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gmResourceId' - The 'Resource' identifier for the 'MethodResponse' resource.+-- * 'gmResourceId' - [Required] The 'Resource' identifier for the 'MethodResponse' resource. ----- * 'gmHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'gmHttpMethod' - [Required] The HTTP verb of the 'Method' resource. ----- * 'gmStatusCode' - The status code for the 'MethodResponse' resource.+-- * 'gmStatusCode' - [Required] The status code for the 'MethodResponse' resource. getMethodResponse :: Text -- ^ 'gmRestAPIId' -> Text -- ^ 'gmResourceId'@@ -80,28 +80,28 @@ -> GetMethodResponse getMethodResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = GetMethodResponse'- { _gmRestAPIId = pRestAPIId_- , _gmResourceId = pResourceId_- , _gmHttpMethod = pHttpMethod_- , _gmStatusCode = pStatusCode_- }+ { _gmRestAPIId = pRestAPIId_+ , _gmResourceId = pResourceId_+ , _gmHttpMethod = pHttpMethod_+ , _gmStatusCode = pStatusCode_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gmRestAPIId :: Lens' GetMethodResponse Text-gmRestAPIId = lens _gmRestAPIId (\ s a -> s{_gmRestAPIId = a});+gmRestAPIId = lens _gmRestAPIId (\ s a -> s{_gmRestAPIId = a}) --- | The 'Resource' identifier for the 'MethodResponse' resource.+-- | [Required] The 'Resource' identifier for the 'MethodResponse' resource. gmResourceId :: Lens' GetMethodResponse Text-gmResourceId = lens _gmResourceId (\ s a -> s{_gmResourceId = a});+gmResourceId = lens _gmResourceId (\ s a -> s{_gmResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. gmHttpMethod :: Lens' GetMethodResponse Text-gmHttpMethod = lens _gmHttpMethod (\ s a -> s{_gmHttpMethod = a});+gmHttpMethod = lens _gmHttpMethod (\ s a -> s{_gmHttpMethod = a}) --- | The status code for the 'MethodResponse' resource.+-- | [Required] The status code for the 'MethodResponse' resource. gmStatusCode :: Lens' GetMethodResponse Text-gmStatusCode = lens _gmStatusCode (\ s a -> s{_gmStatusCode = a});+gmStatusCode = lens _gmStatusCode (\ s a -> s{_gmStatusCode = a}) instance AWSRequest GetMethodResponse where type Rs GetMethodResponse = MethodResponse
gen/Network/AWS/APIGateway/GetModel.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetModel--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,29 +67,32 @@ -- -- * 'ggFlatten' - A query parameter of a Boolean value to resolve (@true@ ) all external model references and returns a flattened model schema or not (@false@ ) The default is @false@ . ----- * 'ggRestAPIId' - The 'RestApi' identifier under which the 'Model' exists.+-- * 'ggRestAPIId' - [Required] The 'RestApi' identifier under which the 'Model' exists. ----- * 'ggModelName' - The name of the model as an identifier.+-- * 'ggModelName' - [Required] The name of the model as an identifier. getModel :: Text -- ^ 'ggRestAPIId' -> Text -- ^ 'ggModelName' -> GetModel getModel pRestAPIId_ pModelName_ = GetModel'- {_ggFlatten = Nothing, _ggRestAPIId = pRestAPIId_, _ggModelName = pModelName_}+ { _ggFlatten = Nothing+ , _ggRestAPIId = pRestAPIId_+ , _ggModelName = pModelName_+ } -- | A query parameter of a Boolean value to resolve (@true@ ) all external model references and returns a flattened model schema or not (@false@ ) The default is @false@ . ggFlatten :: Lens' GetModel (Maybe Bool)-ggFlatten = lens _ggFlatten (\ s a -> s{_ggFlatten = a});+ggFlatten = lens _ggFlatten (\ s a -> s{_ggFlatten = a}) --- | The 'RestApi' identifier under which the 'Model' exists.+-- | [Required] The 'RestApi' identifier under which the 'Model' exists. ggRestAPIId :: Lens' GetModel Text-ggRestAPIId = lens _ggRestAPIId (\ s a -> s{_ggRestAPIId = a});+ggRestAPIId = lens _ggRestAPIId (\ s a -> s{_ggRestAPIId = a}) --- | The name of the model as an identifier.+-- | [Required] The name of the model as an identifier. ggModelName :: Lens' GetModel Text-ggModelName = lens _ggModelName (\ s a -> s{_ggModelName = a});+ggModelName = lens _ggModelName (\ s a -> s{_ggModelName = a}) instance AWSRequest GetModel where type Rs GetModel = Model
gen/Network/AWS/APIGateway/GetModelTemplate.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetModelTemplate--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -60,9 +60,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gmtRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gmtRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gmtModelName' - The name of the model for which to generate a template.+-- * 'gmtModelName' - [Required] The name of the model for which to generate a template. getModelTemplate :: Text -- ^ 'gmtRestAPIId' -> Text -- ^ 'gmtModelName'@@ -71,13 +71,13 @@ GetModelTemplate' {_gmtRestAPIId = pRestAPIId_, _gmtModelName = pModelName_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gmtRestAPIId :: Lens' GetModelTemplate Text-gmtRestAPIId = lens _gmtRestAPIId (\ s a -> s{_gmtRestAPIId = a});+gmtRestAPIId = lens _gmtRestAPIId (\ s a -> s{_gmtRestAPIId = a}) --- | The name of the model for which to generate a template.+-- | [Required] The name of the model for which to generate a template. gmtModelName :: Lens' GetModelTemplate Text-gmtModelName = lens _gmtModelName (\ s a -> s{_gmtModelName = a});+gmtModelName = lens _gmtModelName (\ s a -> s{_gmtModelName = a}) instance AWSRequest GetModelTemplate where type Rs GetModelTemplate = GetModelTemplateResponse@@ -131,15 +131,15 @@ -> GetModelTemplateResponse getModelTemplateResponse pResponseStatus_ = GetModelTemplateResponse'- {_gmtrsValue = Nothing, _gmtrsResponseStatus = pResponseStatus_}+ {_gmtrsValue = Nothing, _gmtrsResponseStatus = pResponseStatus_} -- | The Apache <http://velocity.apache.org/engine/devel/vtl-reference-guide.html Velocity Template Language (VTL)> template content used for the template resource. gmtrsValue :: Lens' GetModelTemplateResponse (Maybe Text)-gmtrsValue = lens _gmtrsValue (\ s a -> s{_gmtrsValue = a});+gmtrsValue = lens _gmtrsValue (\ s a -> s{_gmtrsValue = a}) -- | -- | The response status code. gmtrsResponseStatus :: Lens' GetModelTemplateResponse Int-gmtrsResponseStatus = lens _gmtrsResponseStatus (\ s a -> s{_gmtrsResponseStatus = a});+gmtrsResponseStatus = lens _gmtrsResponseStatus (\ s a -> s{_gmtrsResponseStatus = a}) instance NFData GetModelTemplateResponse where
gen/Network/AWS/APIGateway/GetModels.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetModels--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -66,30 +66,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gmsLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'gmsLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gmsPosition' - The current pagination position in the paged result set. ----- * 'gmsRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gmsRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getModels :: Text -- ^ 'gmsRestAPIId' -> GetModels getModels pRestAPIId_ = GetModels'- {_gmsLimit = Nothing, _gmsPosition = Nothing, _gmsRestAPIId = pRestAPIId_}+ {_gmsLimit = Nothing, _gmsPosition = Nothing, _gmsRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gmsLimit :: Lens' GetModels (Maybe Int)-gmsLimit = lens _gmsLimit (\ s a -> s{_gmsLimit = a});+gmsLimit = lens _gmsLimit (\ s a -> s{_gmsLimit = a}) -- | The current pagination position in the paged result set. gmsPosition :: Lens' GetModels (Maybe Text)-gmsPosition = lens _gmsPosition (\ s a -> s{_gmsPosition = a});+gmsPosition = lens _gmsPosition (\ s a -> s{_gmsPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gmsRestAPIId :: Lens' GetModels Text-gmsRestAPIId = lens _gmsRestAPIId (\ s a -> s{_gmsRestAPIId = a});+gmsRestAPIId = lens _gmsRestAPIId (\ s a -> s{_gmsRestAPIId = a}) instance AWSPager GetModels where page rq rs@@ -155,22 +155,22 @@ -> GetModelsResponse getModelsResponse pResponseStatus_ = GetModelsResponse'- { _gmrsItems = Nothing- , _gmrsPosition = Nothing- , _gmrsResponseStatus = pResponseStatus_- }+ { _gmrsItems = Nothing+ , _gmrsPosition = Nothing+ , _gmrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gmrsItems :: Lens' GetModelsResponse [Model]-gmrsItems = lens _gmrsItems (\ s a -> s{_gmrsItems = a}) . _Default . _Coerce;+gmrsItems = lens _gmrsItems (\ s a -> s{_gmrsItems = a}) . _Default . _Coerce -- | Undocumented member. gmrsPosition :: Lens' GetModelsResponse (Maybe Text)-gmrsPosition = lens _gmrsPosition (\ s a -> s{_gmrsPosition = a});+gmrsPosition = lens _gmrsPosition (\ s a -> s{_gmrsPosition = a}) -- | -- | The response status code. gmrsResponseStatus :: Lens' GetModelsResponse Int-gmrsResponseStatus = lens _gmrsResponseStatus (\ s a -> s{_gmrsResponseStatus = a});+gmrsResponseStatus = lens _gmrsResponseStatus (\ s a -> s{_gmrsResponseStatus = a}) instance NFData GetModelsResponse where
gen/Network/AWS/APIGateway/GetRequestValidator.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetRequestValidator--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -62,7 +62,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'grvrRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'grvrRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'grvrRequestValidatorId' - [Required] The identifier of the 'RequestValidator' to be retrieved. getRequestValidator@@ -71,16 +71,18 @@ -> GetRequestValidator getRequestValidator pRestAPIId_ pRequestValidatorId_ = GetRequestValidator'- {_grvrRestAPIId = pRestAPIId_, _grvrRequestValidatorId = pRequestValidatorId_}+ { _grvrRestAPIId = pRestAPIId_+ , _grvrRequestValidatorId = pRequestValidatorId_+ } --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . grvrRestAPIId :: Lens' GetRequestValidator Text-grvrRestAPIId = lens _grvrRestAPIId (\ s a -> s{_grvrRestAPIId = a});+grvrRestAPIId = lens _grvrRestAPIId (\ s a -> s{_grvrRestAPIId = a}) -- | [Required] The identifier of the 'RequestValidator' to be retrieved. grvrRequestValidatorId :: Lens' GetRequestValidator Text-grvrRequestValidatorId = lens _grvrRequestValidatorId (\ s a -> s{_grvrRequestValidatorId = a});+grvrRequestValidatorId = lens _grvrRequestValidatorId (\ s a -> s{_grvrRequestValidatorId = a}) instance AWSRequest GetRequestValidator where type Rs GetRequestValidator = RequestValidator
gen/Network/AWS/APIGateway/GetRequestValidators.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetRequestValidators--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -63,30 +63,30 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'grvLimit' - The maximum number of returned results per page.+-- * 'grvLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'grvPosition' - The current pagination position in the paged result set. ----- * 'grvRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'grvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getRequestValidators :: Text -- ^ 'grvRestAPIId' -> GetRequestValidators getRequestValidators pRestAPIId_ = GetRequestValidators'- {_grvLimit = Nothing, _grvPosition = Nothing, _grvRestAPIId = pRestAPIId_}+ {_grvLimit = Nothing, _grvPosition = Nothing, _grvRestAPIId = pRestAPIId_} --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. grvLimit :: Lens' GetRequestValidators (Maybe Int)-grvLimit = lens _grvLimit (\ s a -> s{_grvLimit = a});+grvLimit = lens _grvLimit (\ s a -> s{_grvLimit = a}) -- | The current pagination position in the paged result set. grvPosition :: Lens' GetRequestValidators (Maybe Text)-grvPosition = lens _grvPosition (\ s a -> s{_grvPosition = a});+grvPosition = lens _grvPosition (\ s a -> s{_grvPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . grvRestAPIId :: Lens' GetRequestValidators Text-grvRestAPIId = lens _grvRestAPIId (\ s a -> s{_grvRestAPIId = a});+grvRestAPIId = lens _grvRestAPIId (\ s a -> s{_grvRestAPIId = a}) instance AWSRequest GetRequestValidators where type Rs GetRequestValidators =@@ -149,22 +149,22 @@ -> GetRequestValidatorsResponse getRequestValidatorsResponse pResponseStatus_ = GetRequestValidatorsResponse'- { _grvrsItems = Nothing- , _grvrsPosition = Nothing- , _grvrsResponseStatus = pResponseStatus_- }+ { _grvrsItems = Nothing+ , _grvrsPosition = Nothing+ , _grvrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. grvrsItems :: Lens' GetRequestValidatorsResponse [RequestValidator]-grvrsItems = lens _grvrsItems (\ s a -> s{_grvrsItems = a}) . _Default . _Coerce;+grvrsItems = lens _grvrsItems (\ s a -> s{_grvrsItems = a}) . _Default . _Coerce -- | Undocumented member. grvrsPosition :: Lens' GetRequestValidatorsResponse (Maybe Text)-grvrsPosition = lens _grvrsPosition (\ s a -> s{_grvrsPosition = a});+grvrsPosition = lens _grvrsPosition (\ s a -> s{_grvrsPosition = a}) -- | -- | The response status code. grvrsResponseStatus :: Lens' GetRequestValidatorsResponse Int-grvrsResponseStatus = lens _grvrsResponseStatus (\ s a -> s{_grvrsResponseStatus = a});+grvrsResponseStatus = lens _grvrsResponseStatus (\ s a -> s{_grvrsResponseStatus = a}) instance NFData GetRequestValidatorsResponse where
gen/Network/AWS/APIGateway/GetResource.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetResource--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,29 +67,32 @@ -- -- * 'grEmbed' - A query parameter to retrieve the specified resources embedded in the returned 'Resource' representation in the response. This @embed@ parameter value is a list of comma-separated strings. Currently, the request supports only retrieval of the embedded 'Method' resources this way. The query parameter value must be a single-valued list and contain the @"methods"@ string. For example, @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ . ----- * 'grRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'grRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'grResourceId' - The identifier for the 'Resource' resource.+-- * 'grResourceId' - [Required] The identifier for the 'Resource' resource. getResource :: Text -- ^ 'grRestAPIId' -> Text -- ^ 'grResourceId' -> GetResource getResource pRestAPIId_ pResourceId_ = GetResource'- {_grEmbed = Nothing, _grRestAPIId = pRestAPIId_, _grResourceId = pResourceId_}+ { _grEmbed = Nothing+ , _grRestAPIId = pRestAPIId_+ , _grResourceId = pResourceId_+ } -- | A query parameter to retrieve the specified resources embedded in the returned 'Resource' representation in the response. This @embed@ parameter value is a list of comma-separated strings. Currently, the request supports only retrieval of the embedded 'Method' resources this way. The query parameter value must be a single-valued list and contain the @"methods"@ string. For example, @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ . grEmbed :: Lens' GetResource [Text]-grEmbed = lens _grEmbed (\ s a -> s{_grEmbed = a}) . _Default . _Coerce;+grEmbed = lens _grEmbed (\ s a -> s{_grEmbed = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . grRestAPIId :: Lens' GetResource Text-grRestAPIId = lens _grRestAPIId (\ s a -> s{_grRestAPIId = a});+grRestAPIId = lens _grRestAPIId (\ s a -> s{_grRestAPIId = a}) --- | The identifier for the 'Resource' resource.+-- | [Required] The identifier for the 'Resource' resource. grResourceId :: Lens' GetResource Text-grResourceId = lens _grResourceId (\ s a -> s{_grResourceId = a});+grResourceId = lens _grResourceId (\ s a -> s{_grResourceId = a}) instance AWSRequest GetResource where type Rs GetResource = Resource
gen/Network/AWS/APIGateway/GetResources.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetResources--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -70,38 +70,38 @@ -- -- * 'grsEmbed' - A query parameter used to retrieve the specified resources embedded in the returned 'Resources' resource in the response. This @embed@ parameter value is a list of comma-separated strings. Currently, the request supports only retrieval of the embedded 'Method' resources this way. The query parameter value must be a single-valued list and contain the @"methods"@ string. For example, @GET /restapis/{restapi_id}/resources?embed=methods@ . ----- * 'grsLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'grsLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'grsPosition' - The current pagination position in the paged result set. ----- * 'grsRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'grsRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getResources :: Text -- ^ 'grsRestAPIId' -> GetResources getResources pRestAPIId_ = GetResources'- { _grsEmbed = Nothing- , _grsLimit = Nothing- , _grsPosition = Nothing- , _grsRestAPIId = pRestAPIId_- }+ { _grsEmbed = Nothing+ , _grsLimit = Nothing+ , _grsPosition = Nothing+ , _grsRestAPIId = pRestAPIId_+ } -- | A query parameter used to retrieve the specified resources embedded in the returned 'Resources' resource in the response. This @embed@ parameter value is a list of comma-separated strings. Currently, the request supports only retrieval of the embedded 'Method' resources this way. The query parameter value must be a single-valued list and contain the @"methods"@ string. For example, @GET /restapis/{restapi_id}/resources?embed=methods@ . grsEmbed :: Lens' GetResources [Text]-grsEmbed = lens _grsEmbed (\ s a -> s{_grsEmbed = a}) . _Default . _Coerce;+grsEmbed = lens _grsEmbed (\ s a -> s{_grsEmbed = a}) . _Default . _Coerce --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. grsLimit :: Lens' GetResources (Maybe Int)-grsLimit = lens _grsLimit (\ s a -> s{_grsLimit = a});+grsLimit = lens _grsLimit (\ s a -> s{_grsLimit = a}) -- | The current pagination position in the paged result set. grsPosition :: Lens' GetResources (Maybe Text)-grsPosition = lens _grsPosition (\ s a -> s{_grsPosition = a});+grsPosition = lens _grsPosition (\ s a -> s{_grsPosition = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . grsRestAPIId :: Lens' GetResources Text-grsRestAPIId = lens _grsRestAPIId (\ s a -> s{_grsRestAPIId = a});+grsRestAPIId = lens _grsRestAPIId (\ s a -> s{_grsRestAPIId = a}) instance AWSPager GetResources where page rq rs@@ -169,22 +169,22 @@ -> GetResourcesResponse getResourcesResponse pResponseStatus_ = GetResourcesResponse'- { _grrsItems = Nothing- , _grrsPosition = Nothing- , _grrsResponseStatus = pResponseStatus_- }+ { _grrsItems = Nothing+ , _grrsPosition = Nothing+ , _grrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. grrsItems :: Lens' GetResourcesResponse [Resource]-grrsItems = lens _grrsItems (\ s a -> s{_grrsItems = a}) . _Default . _Coerce;+grrsItems = lens _grrsItems (\ s a -> s{_grrsItems = a}) . _Default . _Coerce -- | Undocumented member. grrsPosition :: Lens' GetResourcesResponse (Maybe Text)-grrsPosition = lens _grrsPosition (\ s a -> s{_grrsPosition = a});+grrsPosition = lens _grrsPosition (\ s a -> s{_grrsPosition = a}) -- | -- | The response status code. grrsResponseStatus :: Lens' GetResourcesResponse Int-grrsResponseStatus = lens _grrsResponseStatus (\ s a -> s{_grrsResponseStatus = a});+grrsResponseStatus = lens _grrsResponseStatus (\ s a -> s{_grrsResponseStatus = a}) instance NFData GetResourcesResponse where
gen/Network/AWS/APIGateway/GetRestAPI.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -33,12 +33,15 @@ , restAPI , RestAPI -- * Response Lenses+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription ) where@@ -64,16 +67,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'graRestAPIId' - The identifier of the 'RestApi' resource.+-- * 'graRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getRestAPI :: Text -- ^ 'graRestAPIId' -> GetRestAPI getRestAPI pRestAPIId_ = GetRestAPI' {_graRestAPIId = pRestAPIId_} --- | The identifier of the 'RestApi' resource.+-- | [Required] The string identifier of the associated 'RestApi' . graRestAPIId :: Lens' GetRestAPI Text-graRestAPIId = lens _graRestAPIId (\ s a -> s{_graRestAPIId = a});+graRestAPIId = lens _graRestAPIId (\ s a -> s{_graRestAPIId = a}) instance AWSRequest GetRestAPI where type Rs GetRestAPI = RestAPI
gen/Network/AWS/APIGateway/GetRestAPIs.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetRestAPIs--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -64,7 +64,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'graLimit' - The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- * 'graLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'graPosition' - The current pagination position in the paged result set. getRestAPIs@@ -72,13 +72,13 @@ getRestAPIs = GetRestAPIs' {_graLimit = Nothing, _graPosition = Nothing} --- | The maximum number of returned results per page. The value is 25 by default and could be between 1 - 500.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. graLimit :: Lens' GetRestAPIs (Maybe Int)-graLimit = lens _graLimit (\ s a -> s{_graLimit = a});+graLimit = lens _graLimit (\ s a -> s{_graLimit = a}) -- | The current pagination position in the paged result set. graPosition :: Lens' GetRestAPIs (Maybe Text)-graPosition = lens _graPosition (\ s a -> s{_graPosition = a});+graPosition = lens _graPosition (\ s a -> s{_graPosition = a}) instance AWSPager GetRestAPIs where page rq rs@@ -142,22 +142,22 @@ -> GetRestAPIsResponse getRestAPIsResponse pResponseStatus_ = GetRestAPIsResponse'- { _grarsItems = Nothing- , _grarsPosition = Nothing- , _grarsResponseStatus = pResponseStatus_- }+ { _grarsItems = Nothing+ , _grarsPosition = Nothing+ , _grarsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. grarsItems :: Lens' GetRestAPIsResponse [RestAPI]-grarsItems = lens _grarsItems (\ s a -> s{_grarsItems = a}) . _Default . _Coerce;+grarsItems = lens _grarsItems (\ s a -> s{_grarsItems = a}) . _Default . _Coerce -- | Undocumented member. grarsPosition :: Lens' GetRestAPIsResponse (Maybe Text)-grarsPosition = lens _grarsPosition (\ s a -> s{_grarsPosition = a});+grarsPosition = lens _grarsPosition (\ s a -> s{_grarsPosition = a}) -- | -- | The response status code. grarsResponseStatus :: Lens' GetRestAPIsResponse Int-grarsResponseStatus = lens _grarsResponseStatus (\ s a -> s{_grarsResponseStatus = a});+grarsResponseStatus = lens _grarsResponseStatus (\ s a -> s{_grarsResponseStatus = a}) instance NFData GetRestAPIsResponse where
gen/Network/AWS/APIGateway/GetSDK.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetSDK--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -68,11 +68,11 @@ -- -- * 'gsdkParameters' - A string-to-string key-value map of query parameters @sdkType@ -dependent properties of the SDK. For @sdkType@ of @objectivec@ or @swift@ , a parameter named @classPrefix@ is required. For @sdkType@ of @android@ , parameters named @groupId@ , @artifactId@ , @artifactVersion@ , and @invokerPackage@ are required. For @sdkType@ of @java@ , parameters named @serviceName@ and @javaPackageName@ are required. ----- * 'gsdkRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gsdkRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gsdkStageName' - The name of the 'Stage' that the SDK will use.+-- * 'gsdkStageName' - [Required] The name of the 'Stage' that the SDK will use. ----- * 'gsdkSdkType' - The language for the generated SDK. Currently @java@ , @javascript@ , @android@ , @objectivec@ and @swift@ (for iOS) are supported.+-- * 'gsdkSdkType' - [Required] The language for the generated SDK. Currently @java@ , @javascript@ , @android@ , @objectivec@ (for iOS), @swift@ (for iOS), and @ruby@ are supported. getSDK :: Text -- ^ 'gsdkRestAPIId' -> Text -- ^ 'gsdkStageName'@@ -80,34 +80,34 @@ -> GetSDK getSDK pRestAPIId_ pStageName_ pSdkType_ = GetSDK'- { _gsdkParameters = Nothing- , _gsdkRestAPIId = pRestAPIId_- , _gsdkStageName = pStageName_- , _gsdkSdkType = pSdkType_- }+ { _gsdkParameters = Nothing+ , _gsdkRestAPIId = pRestAPIId_+ , _gsdkStageName = pStageName_+ , _gsdkSdkType = pSdkType_+ } -- | A string-to-string key-value map of query parameters @sdkType@ -dependent properties of the SDK. For @sdkType@ of @objectivec@ or @swift@ , a parameter named @classPrefix@ is required. For @sdkType@ of @android@ , parameters named @groupId@ , @artifactId@ , @artifactVersion@ , and @invokerPackage@ are required. For @sdkType@ of @java@ , parameters named @serviceName@ and @javaPackageName@ are required. gsdkParameters :: Lens' GetSDK (HashMap Text Text)-gsdkParameters = lens _gsdkParameters (\ s a -> s{_gsdkParameters = a}) . _Default . _Map;+gsdkParameters = lens _gsdkParameters (\ s a -> s{_gsdkParameters = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gsdkRestAPIId :: Lens' GetSDK Text-gsdkRestAPIId = lens _gsdkRestAPIId (\ s a -> s{_gsdkRestAPIId = a});+gsdkRestAPIId = lens _gsdkRestAPIId (\ s a -> s{_gsdkRestAPIId = a}) --- | The name of the 'Stage' that the SDK will use.+-- | [Required] The name of the 'Stage' that the SDK will use. gsdkStageName :: Lens' GetSDK Text-gsdkStageName = lens _gsdkStageName (\ s a -> s{_gsdkStageName = a});+gsdkStageName = lens _gsdkStageName (\ s a -> s{_gsdkStageName = a}) --- | The language for the generated SDK. Currently @java@ , @javascript@ , @android@ , @objectivec@ and @swift@ (for iOS) are supported.+-- | [Required] The language for the generated SDK. Currently @java@ , @javascript@ , @android@ , @objectivec@ (for iOS), @swift@ (for iOS), and @ruby@ are supported. gsdkSdkType :: Lens' GetSDK Text-gsdkSdkType = lens _gsdkSdkType (\ s a -> s{_gsdkSdkType = a});+gsdkSdkType = lens _gsdkSdkType (\ s a -> s{_gsdkSdkType = a}) instance AWSRequest GetSDK where type Rs GetSDK = GetSDKResponse request = get apiGateway response- = receiveJSON+ = receiveBytes (\ s h x -> GetSDKResponse' <$> (pure (Just x)) <*> (h .#? "Content-Disposition") <*>@@ -144,7 +144,7 @@ -- -- /See:/ 'getSDKResponse' smart constructor. data GetSDKResponse = GetSDKResponse'- { _gsdkrsBody :: !(Maybe (HashMap Text Value))+ { _gsdkrsBody :: !(Maybe ByteString) , _gsdkrsContentDisposition :: !(Maybe Text) , _gsdkrsContentType :: !(Maybe Text) , _gsdkrsResponseStatus :: !Int@@ -167,27 +167,27 @@ -> GetSDKResponse getSDKResponse pResponseStatus_ = GetSDKResponse'- { _gsdkrsBody = Nothing- , _gsdkrsContentDisposition = Nothing- , _gsdkrsContentType = Nothing- , _gsdkrsResponseStatus = pResponseStatus_- }+ { _gsdkrsBody = Nothing+ , _gsdkrsContentDisposition = Nothing+ , _gsdkrsContentType = Nothing+ , _gsdkrsResponseStatus = pResponseStatus_+ } -- | The binary blob response to 'GetSdk' , which contains the generated SDK.-gsdkrsBody :: Lens' GetSDKResponse (Maybe (HashMap Text Value))-gsdkrsBody = lens _gsdkrsBody (\ s a -> s{_gsdkrsBody = a});+gsdkrsBody :: Lens' GetSDKResponse (Maybe ByteString)+gsdkrsBody = lens _gsdkrsBody (\ s a -> s{_gsdkrsBody = a}) -- | The content-disposition header value in the HTTP response. gsdkrsContentDisposition :: Lens' GetSDKResponse (Maybe Text)-gsdkrsContentDisposition = lens _gsdkrsContentDisposition (\ s a -> s{_gsdkrsContentDisposition = a});+gsdkrsContentDisposition = lens _gsdkrsContentDisposition (\ s a -> s{_gsdkrsContentDisposition = a}) -- | The content-type header value in the HTTP response. gsdkrsContentType :: Lens' GetSDKResponse (Maybe Text)-gsdkrsContentType = lens _gsdkrsContentType (\ s a -> s{_gsdkrsContentType = a});+gsdkrsContentType = lens _gsdkrsContentType (\ s a -> s{_gsdkrsContentType = a}) -- | -- | The response status code. gsdkrsResponseStatus :: Lens' GetSDKResponse Int-gsdkrsResponseStatus = lens _gsdkrsResponseStatus (\ s a -> s{_gsdkrsResponseStatus = a});+gsdkrsResponseStatus = lens _gsdkrsResponseStatus (\ s a -> s{_gsdkrsResponseStatus = a}) instance NFData GetSDKResponse where
gen/Network/AWS/APIGateway/GetSDKType.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetSDKType--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -58,16 +58,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gstId' - The identifier of the queried 'SdkType' instance.+-- * 'gstId' - [Required] The identifier of the queried 'SdkType' instance. getSDKType :: Text -- ^ 'gstId' -> GetSDKType getSDKType pId_ = GetSDKType' {_gstId = pId_} --- | The identifier of the queried 'SdkType' instance.+-- | [Required] The identifier of the queried 'SdkType' instance. gstId :: Lens' GetSDKType Text-gstId = lens _gstId (\ s a -> s{_gstId = a});+gstId = lens _gstId (\ s a -> s{_gstId = a}) instance AWSRequest GetSDKType where type Rs GetSDKType = SDKType
gen/Network/AWS/APIGateway/GetSDKTypes.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetSDKTypes--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -59,7 +59,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gstLimit' - The maximum number of returned results per page.+-- * 'gstLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gstPosition' - The current pagination position in the paged result set. getSDKTypes@@ -67,13 +67,13 @@ getSDKTypes = GetSDKTypes' {_gstLimit = Nothing, _gstPosition = Nothing} --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gstLimit :: Lens' GetSDKTypes (Maybe Int)-gstLimit = lens _gstLimit (\ s a -> s{_gstLimit = a});+gstLimit = lens _gstLimit (\ s a -> s{_gstLimit = a}) -- | The current pagination position in the paged result set. gstPosition :: Lens' GetSDKTypes (Maybe Text)-gstPosition = lens _gstPosition (\ s a -> s{_gstPosition = a});+gstPosition = lens _gstPosition (\ s a -> s{_gstPosition = a}) instance AWSRequest GetSDKTypes where type Rs GetSDKTypes = GetSDKTypesResponse@@ -129,22 +129,22 @@ -> GetSDKTypesResponse getSDKTypesResponse pResponseStatus_ = GetSDKTypesResponse'- { _gstrsItems = Nothing- , _gstrsPosition = Nothing- , _gstrsResponseStatus = pResponseStatus_- }+ { _gstrsItems = Nothing+ , _gstrsPosition = Nothing+ , _gstrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gstrsItems :: Lens' GetSDKTypesResponse [SDKType]-gstrsItems = lens _gstrsItems (\ s a -> s{_gstrsItems = a}) . _Default . _Coerce;+gstrsItems = lens _gstrsItems (\ s a -> s{_gstrsItems = a}) . _Default . _Coerce -- | Undocumented member. gstrsPosition :: Lens' GetSDKTypesResponse (Maybe Text)-gstrsPosition = lens _gstrsPosition (\ s a -> s{_gstrsPosition = a});+gstrsPosition = lens _gstrsPosition (\ s a -> s{_gstrsPosition = a}) -- | -- | The response status code. gstrsResponseStatus :: Lens' GetSDKTypesResponse Int-gstrsResponseStatus = lens _gstrsResponseStatus (\ s a -> s{_gstrsResponseStatus = a});+gstrsResponseStatus = lens _gstrsResponseStatus (\ s a -> s{_gstrsResponseStatus = a}) instance NFData GetSDKTypesResponse where
gen/Network/AWS/APIGateway/GetStage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetStage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -36,6 +36,7 @@ -- * Response Lenses , sDeploymentId , sVariables+ , sAccessLogSettings , sDocumentationVersion , sClientCertificateId , sCreatedDate@@ -43,9 +44,11 @@ , sMethodSettings , sLastUpdatedDate , sCacheClusterSize+ , sCanarySettings , sCacheClusterEnabled , sStageName , sDescription+ , sTags ) where import Network.AWS.APIGateway.Types@@ -55,7 +58,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to get information about a 'Stage' resource.+-- | Requests API Gateway to get information about a 'Stage' resource. -- -- --@@ -70,9 +73,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gssRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gssRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'gssStageName' - The name of the 'Stage' resource to get information about.+-- * 'gssStageName' - [Required] The name of the 'Stage' resource to get information about. getStage :: Text -- ^ 'gssRestAPIId' -> Text -- ^ 'gssStageName'@@ -81,13 +84,13 @@ GetStage' {_gssRestAPIId = pRestAPIId_, _gssStageName = pStageName_} --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gssRestAPIId :: Lens' GetStage Text-gssRestAPIId = lens _gssRestAPIId (\ s a -> s{_gssRestAPIId = a});+gssRestAPIId = lens _gssRestAPIId (\ s a -> s{_gssRestAPIId = a}) --- | The name of the 'Stage' resource to get information about.+-- | [Required] The name of the 'Stage' resource to get information about. gssStageName :: Lens' GetStage Text-gssStageName = lens _gssStageName (\ s a -> s{_gssStageName = a});+gssStageName = lens _gssStageName (\ s a -> s{_gssStageName = a}) instance AWSRequest GetStage where type Rs GetStage = Stage
gen/Network/AWS/APIGateway/GetStages.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetStages--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -45,7 +45,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to get information about one or more 'Stage' resources.+-- | Requests API Gateway to get information about one or more 'Stage' resources. -- -- --@@ -62,7 +62,7 @@ -- -- * 'gsDeploymentId' - The stages' deployment identifiers. ----- * 'gsRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'gsRestAPIId' - [Required] The string identifier of the associated 'RestApi' . getStages :: Text -- ^ 'gsRestAPIId' -> GetStages@@ -72,11 +72,11 @@ -- | The stages' deployment identifiers. gsDeploymentId :: Lens' GetStages (Maybe Text)-gsDeploymentId = lens _gsDeploymentId (\ s a -> s{_gsDeploymentId = a});+gsDeploymentId = lens _gsDeploymentId (\ s a -> s{_gsDeploymentId = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . gsRestAPIId :: Lens' GetStages Text-gsRestAPIId = lens _gsRestAPIId (\ s a -> s{_gsRestAPIId = a});+gsRestAPIId = lens _gsRestAPIId (\ s a -> s{_gsRestAPIId = a}) instance AWSRequest GetStages where type Rs GetStages = GetStagesResponse@@ -130,15 +130,15 @@ -> GetStagesResponse getStagesResponse pResponseStatus_ = GetStagesResponse'- {_gsrsItem = Nothing, _gsrsResponseStatus = pResponseStatus_}+ {_gsrsItem = Nothing, _gsrsResponseStatus = pResponseStatus_} -- | The current page of elements from this collection. gsrsItem :: Lens' GetStagesResponse [Stage]-gsrsItem = lens _gsrsItem (\ s a -> s{_gsrsItem = a}) . _Default . _Coerce;+gsrsItem = lens _gsrsItem (\ s a -> s{_gsrsItem = a}) . _Default . _Coerce -- | -- | The response status code. gsrsResponseStatus :: Lens' GetStagesResponse Int-gsrsResponseStatus = lens _gsrsResponseStatus (\ s a -> s{_gsrsResponseStatus = a});+gsrsResponseStatus = lens _gsrsResponseStatus (\ s a -> s{_gsrsResponseStatus = a}) instance NFData GetStagesResponse where
+ gen/Network/AWS/APIGateway/GetTags.hs view
@@ -0,0 +1,151 @@+{-# 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.APIGateway.GetTags+-- 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)+--+-- Gets the 'Tags' collection for a given resource.+--+--+module Network.AWS.APIGateway.GetTags+ (+ -- * Creating a Request+ getTags+ , GetTags+ -- * Request Lenses+ , gtLimit+ , gtPosition+ , gtResourceARN++ -- * Destructuring the Response+ , getTagsResponse+ , GetTagsResponse+ -- * Response Lenses+ , gtrsTags+ , gtrsResponseStatus+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Gets the 'Tags' collection for a given resource.+--+--+--+-- /See:/ 'getTags' smart constructor.+data GetTags = GetTags'+ { _gtLimit :: !(Maybe Int)+ , _gtPosition :: !(Maybe Text)+ , _gtResourceARN :: !Text+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetTags' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gtLimit' - (Not currently supported) The maximum number of returned results per page. The default value is 25 and the maximum value is 500.+--+-- * 'gtPosition' - (Not currently supported) The current pagination position in the paged result set.+--+-- * 'gtResourceARN' - [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+getTags+ :: Text -- ^ 'gtResourceARN'+ -> GetTags+getTags pResourceARN_ =+ GetTags'+ {_gtLimit = Nothing, _gtPosition = Nothing, _gtResourceARN = pResourceARN_}+++-- | (Not currently supported) The maximum number of returned results per page. The default value is 25 and the maximum value is 500.+gtLimit :: Lens' GetTags (Maybe Int)+gtLimit = lens _gtLimit (\ s a -> s{_gtLimit = a})++-- | (Not currently supported) The current pagination position in the paged result set.+gtPosition :: Lens' GetTags (Maybe Text)+gtPosition = lens _gtPosition (\ s a -> s{_gtPosition = a})++-- | [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+gtResourceARN :: Lens' GetTags Text+gtResourceARN = lens _gtResourceARN (\ s a -> s{_gtResourceARN = a})++instance AWSRequest GetTags where+ type Rs GetTags = GetTagsResponse+ request = get apiGateway+ response+ = receiveJSON+ (\ s h x ->+ GetTagsResponse' <$>+ (x .?> "tags" .!@ mempty) <*> (pure (fromEnum s)))++instance Hashable GetTags where++instance NFData GetTags where++instance ToHeaders GetTags where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToPath GetTags where+ toPath GetTags'{..}+ = mconcat ["/tags/", toBS _gtResourceARN]++instance ToQuery GetTags where+ toQuery GetTags'{..}+ = mconcat+ ["limit" =: _gtLimit, "position" =: _gtPosition]++-- | The collection of tags. Each tag element is associated with a given resource.+--+--+--+-- /See:/ 'getTagsResponse' smart constructor.+data GetTagsResponse = GetTagsResponse'+ { _gtrsTags :: !(Maybe (Map Text Text))+ , _gtrsResponseStatus :: !Int+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetTagsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gtrsTags' - The collection of tags. Each tag element is associated with a given resource.+--+-- * 'gtrsResponseStatus' - -- | The response status code.+getTagsResponse+ :: Int -- ^ 'gtrsResponseStatus'+ -> GetTagsResponse+getTagsResponse pResponseStatus_ =+ GetTagsResponse' {_gtrsTags = Nothing, _gtrsResponseStatus = pResponseStatus_}+++-- | The collection of tags. Each tag element is associated with a given resource.+gtrsTags :: Lens' GetTagsResponse (HashMap Text Text)+gtrsTags = lens _gtrsTags (\ s a -> s{_gtrsTags = a}) . _Default . _Map++-- | -- | The response status code.+gtrsResponseStatus :: Lens' GetTagsResponse Int+gtrsResponseStatus = lens _gtrsResponseStatus (\ s a -> s{_gtrsResponseStatus = a})++instance NFData GetTagsResponse where
gen/Network/AWS/APIGateway/GetUsage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetUsage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -76,15 +76,15 @@ -- -- * 'guKeyId' - The Id of the API key associated with the resultant usage data. ----- * 'guLimit' - The maximum number of returned results per page.+-- * 'guLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'guPosition' - The current pagination position in the paged result set. ----- * 'guUsagePlanId' - The Id of the usage plan associated with the usage data.+-- * 'guUsagePlanId' - [Required] The Id of the usage plan associated with the usage data. ----- * 'guStartDate' - The starting date (e.g., 2016-01-01) of the usage data.+-- * 'guStartDate' - [Required] The starting date (e.g., 2016-01-01) of the usage data. ----- * 'guEndDate' - The ending date (e.g., 2016-12-31) of the usage data.+-- * 'guEndDate' - [Required] The ending date (e.g., 2016-12-31) of the usage data. getUsage :: Text -- ^ 'guUsagePlanId' -> Text -- ^ 'guStartDate'@@ -92,38 +92,38 @@ -> GetUsage getUsage pUsagePlanId_ pStartDate_ pEndDate_ = GetUsage'- { _guKeyId = Nothing- , _guLimit = Nothing- , _guPosition = Nothing- , _guUsagePlanId = pUsagePlanId_- , _guStartDate = pStartDate_- , _guEndDate = pEndDate_- }+ { _guKeyId = Nothing+ , _guLimit = Nothing+ , _guPosition = Nothing+ , _guUsagePlanId = pUsagePlanId_+ , _guStartDate = pStartDate_+ , _guEndDate = pEndDate_+ } -- | The Id of the API key associated with the resultant usage data. guKeyId :: Lens' GetUsage (Maybe Text)-guKeyId = lens _guKeyId (\ s a -> s{_guKeyId = a});+guKeyId = lens _guKeyId (\ s a -> s{_guKeyId = a}) --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. guLimit :: Lens' GetUsage (Maybe Int)-guLimit = lens _guLimit (\ s a -> s{_guLimit = a});+guLimit = lens _guLimit (\ s a -> s{_guLimit = a}) -- | The current pagination position in the paged result set. guPosition :: Lens' GetUsage (Maybe Text)-guPosition = lens _guPosition (\ s a -> s{_guPosition = a});+guPosition = lens _guPosition (\ s a -> s{_guPosition = a}) --- | The Id of the usage plan associated with the usage data.+-- | [Required] The Id of the usage plan associated with the usage data. guUsagePlanId :: Lens' GetUsage Text-guUsagePlanId = lens _guUsagePlanId (\ s a -> s{_guUsagePlanId = a});+guUsagePlanId = lens _guUsagePlanId (\ s a -> s{_guUsagePlanId = a}) --- | The starting date (e.g., 2016-01-01) of the usage data.+-- | [Required] The starting date (e.g., 2016-01-01) of the usage data. guStartDate :: Lens' GetUsage Text-guStartDate = lens _guStartDate (\ s a -> s{_guStartDate = a});+guStartDate = lens _guStartDate (\ s a -> s{_guStartDate = a}) --- | The ending date (e.g., 2016-12-31) of the usage data.+-- | [Required] The ending date (e.g., 2016-12-31) of the usage data. guEndDate :: Lens' GetUsage Text-guEndDate = lens _guEndDate (\ s a -> s{_guEndDate = a});+guEndDate = lens _guEndDate (\ s a -> s{_guEndDate = a}) instance AWSPager GetUsage where page rq rs
gen/Network/AWS/APIGateway/GetUsagePlan.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetUsagePlan--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -63,16 +63,16 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gupUsagePlanId' - The identifier of the 'UsagePlan' resource to be retrieved.+-- * 'gupUsagePlanId' - [Required] The identifier of the 'UsagePlan' resource to be retrieved. getUsagePlan :: Text -- ^ 'gupUsagePlanId' -> GetUsagePlan getUsagePlan pUsagePlanId_ = GetUsagePlan' {_gupUsagePlanId = pUsagePlanId_} --- | The identifier of the 'UsagePlan' resource to be retrieved.+-- | [Required] The identifier of the 'UsagePlan' resource to be retrieved. gupUsagePlanId :: Lens' GetUsagePlan Text-gupUsagePlanId = lens _gupUsagePlanId (\ s a -> s{_gupUsagePlanId = a});+gupUsagePlanId = lens _gupUsagePlanId (\ s a -> s{_gupUsagePlanId = a}) instance AWSRequest GetUsagePlan where type Rs GetUsagePlan = UsagePlan
gen/Network/AWS/APIGateway/GetUsagePlanKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetUsagePlanKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -62,9 +62,9 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gUsagePlanId' - The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- * 'gUsagePlanId' - [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. ----- * 'gKeyId' - The key Id of the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- * 'gKeyId' - [Required] The key Id of the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. getUsagePlanKey :: Text -- ^ 'gUsagePlanId' -> Text -- ^ 'gKeyId'@@ -73,13 +73,13 @@ GetUsagePlanKey' {_gUsagePlanId = pUsagePlanId_, _gKeyId = pKeyId_} --- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- | [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. gUsagePlanId :: Lens' GetUsagePlanKey Text-gUsagePlanId = lens _gUsagePlanId (\ s a -> s{_gUsagePlanId = a});+gUsagePlanId = lens _gUsagePlanId (\ s a -> s{_gUsagePlanId = a}) --- | The key Id of the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- | [Required] The key Id of the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. gKeyId :: Lens' GetUsagePlanKey Text-gKeyId = lens _gKeyId (\ s a -> s{_gKeyId = a});+gKeyId = lens _gKeyId (\ s a -> s{_gKeyId = a}) instance AWSRequest GetUsagePlanKey where type Rs GetUsagePlanKey = UsagePlanKey
gen/Network/AWS/APIGateway/GetUsagePlanKeys.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetUsagePlanKeys--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -70,38 +70,38 @@ -- -- * 'gupkNameQuery' - A query parameter specifying the name of the to-be-returned usage plan keys. ----- * 'gupkLimit' - The maximum number of returned results per page.+-- * 'gupkLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gupkPosition' - The current pagination position in the paged result set. ----- * 'gupkUsagePlanId' - The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- * 'gupkUsagePlanId' - [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. getUsagePlanKeys :: Text -- ^ 'gupkUsagePlanId' -> GetUsagePlanKeys getUsagePlanKeys pUsagePlanId_ = GetUsagePlanKeys'- { _gupkNameQuery = Nothing- , _gupkLimit = Nothing- , _gupkPosition = Nothing- , _gupkUsagePlanId = pUsagePlanId_- }+ { _gupkNameQuery = Nothing+ , _gupkLimit = Nothing+ , _gupkPosition = Nothing+ , _gupkUsagePlanId = pUsagePlanId_+ } -- | A query parameter specifying the name of the to-be-returned usage plan keys. gupkNameQuery :: Lens' GetUsagePlanKeys (Maybe Text)-gupkNameQuery = lens _gupkNameQuery (\ s a -> s{_gupkNameQuery = a});+gupkNameQuery = lens _gupkNameQuery (\ s a -> s{_gupkNameQuery = a}) --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gupkLimit :: Lens' GetUsagePlanKeys (Maybe Int)-gupkLimit = lens _gupkLimit (\ s a -> s{_gupkLimit = a});+gupkLimit = lens _gupkLimit (\ s a -> s{_gupkLimit = a}) -- | The current pagination position in the paged result set. gupkPosition :: Lens' GetUsagePlanKeys (Maybe Text)-gupkPosition = lens _gupkPosition (\ s a -> s{_gupkPosition = a});+gupkPosition = lens _gupkPosition (\ s a -> s{_gupkPosition = a}) --- | The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer.+-- | [Required] The Id of the 'UsagePlan' resource representing the usage plan containing the to-be-retrieved 'UsagePlanKey' resource representing a plan customer. gupkUsagePlanId :: Lens' GetUsagePlanKeys Text-gupkUsagePlanId = lens _gupkUsagePlanId (\ s a -> s{_gupkUsagePlanId = a});+gupkUsagePlanId = lens _gupkUsagePlanId (\ s a -> s{_gupkUsagePlanId = a}) instance AWSPager GetUsagePlanKeys where page rq rs@@ -168,22 +168,22 @@ -> GetUsagePlanKeysResponse getUsagePlanKeysResponse pResponseStatus_ = GetUsagePlanKeysResponse'- { _gupkrsItems = Nothing- , _gupkrsPosition = Nothing- , _gupkrsResponseStatus = pResponseStatus_- }+ { _gupkrsItems = Nothing+ , _gupkrsPosition = Nothing+ , _gupkrsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. gupkrsItems :: Lens' GetUsagePlanKeysResponse [UsagePlanKey]-gupkrsItems = lens _gupkrsItems (\ s a -> s{_gupkrsItems = a}) . _Default . _Coerce;+gupkrsItems = lens _gupkrsItems (\ s a -> s{_gupkrsItems = a}) . _Default . _Coerce -- | Undocumented member. gupkrsPosition :: Lens' GetUsagePlanKeysResponse (Maybe Text)-gupkrsPosition = lens _gupkrsPosition (\ s a -> s{_gupkrsPosition = a});+gupkrsPosition = lens _gupkrsPosition (\ s a -> s{_gupkrsPosition = a}) -- | -- | The response status code. gupkrsResponseStatus :: Lens' GetUsagePlanKeysResponse Int-gupkrsResponseStatus = lens _gupkrsResponseStatus (\ s a -> s{_gupkrsResponseStatus = a});+gupkrsResponseStatus = lens _gupkrsResponseStatus (\ s a -> s{_gupkrsResponseStatus = a}) instance NFData GetUsagePlanKeysResponse where
gen/Network/AWS/APIGateway/GetUsagePlans.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.GetUsagePlans--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -68,27 +68,27 @@ -- -- * 'gupKeyId' - The identifier of the API key associated with the usage plans. ----- * 'gupLimit' - The maximum number of returned results per page.+-- * 'gupLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500. -- -- * 'gupPosition' - The current pagination position in the paged result set. getUsagePlans :: GetUsagePlans getUsagePlans = GetUsagePlans'- {_gupKeyId = Nothing, _gupLimit = Nothing, _gupPosition = Nothing}+ {_gupKeyId = Nothing, _gupLimit = Nothing, _gupPosition = Nothing} -- | The identifier of the API key associated with the usage plans. gupKeyId :: Lens' GetUsagePlans (Maybe Text)-gupKeyId = lens _gupKeyId (\ s a -> s{_gupKeyId = a});+gupKeyId = lens _gupKeyId (\ s a -> s{_gupKeyId = a}) --- | The maximum number of returned results per page.+-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500. gupLimit :: Lens' GetUsagePlans (Maybe Int)-gupLimit = lens _gupLimit (\ s a -> s{_gupLimit = a});+gupLimit = lens _gupLimit (\ s a -> s{_gupLimit = a}) -- | The current pagination position in the paged result set. gupPosition :: Lens' GetUsagePlans (Maybe Text)-gupPosition = lens _gupPosition (\ s a -> s{_gupPosition = a});+gupPosition = lens _gupPosition (\ s a -> s{_gupPosition = a}) instance AWSPager GetUsagePlans where page rq rs@@ -153,22 +153,22 @@ -> GetUsagePlansResponse getUsagePlansResponse pResponseStatus_ = GetUsagePlansResponse'- { _guprsItems = Nothing- , _guprsPosition = Nothing- , _guprsResponseStatus = pResponseStatus_- }+ { _guprsItems = Nothing+ , _guprsPosition = Nothing+ , _guprsResponseStatus = pResponseStatus_+ } -- | The current page of elements from this collection. guprsItems :: Lens' GetUsagePlansResponse [UsagePlan]-guprsItems = lens _guprsItems (\ s a -> s{_guprsItems = a}) . _Default . _Coerce;+guprsItems = lens _guprsItems (\ s a -> s{_guprsItems = a}) . _Default . _Coerce -- | Undocumented member. guprsPosition :: Lens' GetUsagePlansResponse (Maybe Text)-guprsPosition = lens _guprsPosition (\ s a -> s{_guprsPosition = a});+guprsPosition = lens _guprsPosition (\ s a -> s{_guprsPosition = a}) -- | -- | The response status code. guprsResponseStatus :: Lens' GetUsagePlansResponse Int-guprsResponseStatus = lens _guprsResponseStatus (\ s a -> s{_guprsResponseStatus = a});+guprsResponseStatus = lens _guprsResponseStatus (\ s a -> s{_guprsResponseStatus = a}) instance NFData GetUsagePlansResponse where
+ gen/Network/AWS/APIGateway/GetVPCLink.hs view
@@ -0,0 +1,96 @@+{-# 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.APIGateway.GetVPCLink+-- 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)+--+-- Gets a specified VPC link under the caller's account in a region.+--+--+module Network.AWS.APIGateway.GetVPCLink+ (+ -- * Creating a Request+ getVPCLink+ , GetVPCLink+ -- * Request Lenses+ , gvlVpcLinkId++ -- * Destructuring the Response+ , vpcLink+ , VPCLink+ -- * Response Lenses+ , vlStatus+ , vlTargetARNs+ , vlName+ , vlStatusMessage+ , vlId+ , vlDescription+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Gets a specified VPC link under the caller's account in a region.+--+--+--+-- /See:/ 'getVPCLink' smart constructor.+newtype GetVPCLink = GetVPCLink'+ { _gvlVpcLinkId :: Text+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetVPCLink' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gvlVpcLinkId' - [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+getVPCLink+ :: Text -- ^ 'gvlVpcLinkId'+ -> GetVPCLink+getVPCLink pVpcLinkId_ = GetVPCLink' {_gvlVpcLinkId = pVpcLinkId_}+++-- | [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+gvlVpcLinkId :: Lens' GetVPCLink Text+gvlVpcLinkId = lens _gvlVpcLinkId (\ s a -> s{_gvlVpcLinkId = a})++instance AWSRequest GetVPCLink where+ type Rs GetVPCLink = VPCLink+ request = get apiGateway+ response = receiveJSON (\ s h x -> eitherParseJSON x)++instance Hashable GetVPCLink where++instance NFData GetVPCLink where++instance ToHeaders GetVPCLink where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToPath GetVPCLink where+ toPath GetVPCLink'{..}+ = mconcat ["/vpclinks/", toBS _gvlVpcLinkId]++instance ToQuery GetVPCLink where+ toQuery = const mempty
+ gen/Network/AWS/APIGateway/GetVPCLinks.hs view
@@ -0,0 +1,163 @@+{-# 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.APIGateway.GetVPCLinks+-- 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)+--+-- Gets the 'VpcLinks' collection under the caller's account in a selected region.+--+--+--+-- This operation returns paginated results.+module Network.AWS.APIGateway.GetVPCLinks+ (+ -- * Creating a Request+ getVPCLinks+ , GetVPCLinks+ -- * Request Lenses+ , gvlLimit+ , gvlPosition++ -- * Destructuring the Response+ , getVPCLinksResponse+ , GetVPCLinksResponse+ -- * Response Lenses+ , gvlrsItems+ , gvlrsPosition+ , gvlrsResponseStatus+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Pager+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Gets the 'VpcLinks' collection under the caller's account in a selected region.+--+--+--+-- /See:/ 'getVPCLinks' smart constructor.+data GetVPCLinks = GetVPCLinks'+ { _gvlLimit :: !(Maybe Int)+ , _gvlPosition :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetVPCLinks' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gvlLimit' - The maximum number of returned results per page. The default value is 25 and the maximum value is 500.+--+-- * 'gvlPosition' - The current pagination position in the paged result set.+getVPCLinks+ :: GetVPCLinks+getVPCLinks = GetVPCLinks' {_gvlLimit = Nothing, _gvlPosition = Nothing}+++-- | The maximum number of returned results per page. The default value is 25 and the maximum value is 500.+gvlLimit :: Lens' GetVPCLinks (Maybe Int)+gvlLimit = lens _gvlLimit (\ s a -> s{_gvlLimit = a})++-- | The current pagination position in the paged result set.+gvlPosition :: Lens' GetVPCLinks (Maybe Text)+gvlPosition = lens _gvlPosition (\ s a -> s{_gvlPosition = a})++instance AWSPager GetVPCLinks where+ page rq rs+ | stop (rs ^. gvlrsPosition) = Nothing+ | stop (rs ^. gvlrsItems) = Nothing+ | otherwise =+ Just $ rq & gvlPosition .~ rs ^. gvlrsPosition++instance AWSRequest GetVPCLinks where+ type Rs GetVPCLinks = GetVPCLinksResponse+ request = get apiGateway+ response+ = receiveJSON+ (\ s h x ->+ GetVPCLinksResponse' <$>+ (x .?> "item" .!@ mempty) <*> (x .?> "position") <*>+ (pure (fromEnum s)))++instance Hashable GetVPCLinks where++instance NFData GetVPCLinks where++instance ToHeaders GetVPCLinks where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToPath GetVPCLinks where+ toPath = const "/vpclinks"++instance ToQuery GetVPCLinks where+ toQuery GetVPCLinks'{..}+ = mconcat+ ["limit" =: _gvlLimit, "position" =: _gvlPosition]++-- | The collection of VPC links under the caller's account in a region.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/getting-started-with-private-integration.html Getting Started with Private Integrations> , <http://docs.aws.amazon.com/apigateway/latest/developerguide/set-up-private-integration.html Set up Private Integrations>+--+-- /See:/ 'getVPCLinksResponse' smart constructor.+data GetVPCLinksResponse = GetVPCLinksResponse'+ { _gvlrsItems :: !(Maybe [VPCLink])+ , _gvlrsPosition :: !(Maybe Text)+ , _gvlrsResponseStatus :: !Int+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GetVPCLinksResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gvlrsItems' - The current page of elements from this collection.+--+-- * 'gvlrsPosition' - Undocumented member.+--+-- * 'gvlrsResponseStatus' - -- | The response status code.+getVPCLinksResponse+ :: Int -- ^ 'gvlrsResponseStatus'+ -> GetVPCLinksResponse+getVPCLinksResponse pResponseStatus_ =+ GetVPCLinksResponse'+ { _gvlrsItems = Nothing+ , _gvlrsPosition = Nothing+ , _gvlrsResponseStatus = pResponseStatus_+ }+++-- | The current page of elements from this collection.+gvlrsItems :: Lens' GetVPCLinksResponse [VPCLink]+gvlrsItems = lens _gvlrsItems (\ s a -> s{_gvlrsItems = a}) . _Default . _Coerce++-- | Undocumented member.+gvlrsPosition :: Lens' GetVPCLinksResponse (Maybe Text)+gvlrsPosition = lens _gvlrsPosition (\ s a -> s{_gvlrsPosition = a})++-- | -- | The response status code.+gvlrsResponseStatus :: Lens' GetVPCLinksResponse Int+gvlrsResponseStatus = lens _gvlrsResponseStatus (\ s a -> s{_gvlrsResponseStatus = a})++instance NFData GetVPCLinksResponse where
gen/Network/AWS/APIGateway/ImportAPIKeys.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.ImportAPIKeys--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -54,7 +54,7 @@ -- /See:/ 'importAPIKeys' smart constructor. data ImportAPIKeys = ImportAPIKeys' { _iakFailOnWarnings :: !(Maybe Bool)- , _iakBody :: !(HashMap Text Value)+ , _iakBody :: !ByteString , _iakFormat :: !APIKeysFormat } deriving (Eq, Show, Data, Typeable, Generic) @@ -69,25 +69,25 @@ -- -- * 'iakFormat' - A query parameter to specify the input format to imported API keys. Currently, only the @csv@ format is supported. importAPIKeys- :: HashMap Text Value -- ^ 'iakBody'+ :: ByteString -- ^ 'iakBody' -> APIKeysFormat -- ^ 'iakFormat' -> ImportAPIKeys importAPIKeys pBody_ pFormat_ = ImportAPIKeys'- {_iakFailOnWarnings = Nothing, _iakBody = pBody_, _iakFormat = pFormat_}+ {_iakFailOnWarnings = Nothing, _iakBody = pBody_, _iakFormat = pFormat_} -- | A query parameter to indicate whether to rollback 'ApiKey' importation (@true@ ) or not (@false@ ) when error is encountered. iakFailOnWarnings :: Lens' ImportAPIKeys (Maybe Bool)-iakFailOnWarnings = lens _iakFailOnWarnings (\ s a -> s{_iakFailOnWarnings = a});+iakFailOnWarnings = lens _iakFailOnWarnings (\ s a -> s{_iakFailOnWarnings = a}) -- | The payload of the POST request to import API keys. For the payload format, see <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-key-file-format.html API Key File Format> .-iakBody :: Lens' ImportAPIKeys (HashMap Text Value)-iakBody = lens _iakBody (\ s a -> s{_iakBody = a});+iakBody :: Lens' ImportAPIKeys ByteString+iakBody = lens _iakBody (\ s a -> s{_iakBody = a}) -- | A query parameter to specify the input format to imported API keys. Currently, only the @csv@ format is supported. iakFormat :: Lens' ImportAPIKeys APIKeysFormat-iakFormat = lens _iakFormat (\ s a -> s{_iakFormat = a});+iakFormat = lens _iakFormat (\ s a -> s{_iakFormat = a}) instance AWSRequest ImportAPIKeys where type Rs ImportAPIKeys = ImportAPIKeysResponse@@ -148,22 +148,22 @@ -> ImportAPIKeysResponse importAPIKeysResponse pResponseStatus_ = ImportAPIKeysResponse'- { _iakrsIds = Nothing- , _iakrsWarnings = Nothing- , _iakrsResponseStatus = pResponseStatus_- }+ { _iakrsIds = Nothing+ , _iakrsWarnings = Nothing+ , _iakrsResponseStatus = pResponseStatus_+ } -- | A list of all the 'ApiKey' identifiers. iakrsIds :: Lens' ImportAPIKeysResponse [Text]-iakrsIds = lens _iakrsIds (\ s a -> s{_iakrsIds = a}) . _Default . _Coerce;+iakrsIds = lens _iakrsIds (\ s a -> s{_iakrsIds = a}) . _Default . _Coerce -- | A list of warning messages. iakrsWarnings :: Lens' ImportAPIKeysResponse [Text]-iakrsWarnings = lens _iakrsWarnings (\ s a -> s{_iakrsWarnings = a}) . _Default . _Coerce;+iakrsWarnings = lens _iakrsWarnings (\ s a -> s{_iakrsWarnings = a}) . _Default . _Coerce -- | -- | The response status code. iakrsResponseStatus :: Lens' ImportAPIKeysResponse Int-iakrsResponseStatus = lens _iakrsResponseStatus (\ s a -> s{_iakrsResponseStatus = a});+iakrsResponseStatus = lens _iakrsResponseStatus (\ s a -> s{_iakrsResponseStatus = a}) instance NFData ImportAPIKeysResponse where
gen/Network/AWS/APIGateway/ImportDocumentationParts.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.ImportDocumentationParts--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -55,7 +55,7 @@ { _idpMode :: !(Maybe PutMode) , _idpFailOnWarnings :: !(Maybe Bool) , _idpRestAPIId :: !Text- , _idpBody :: !(HashMap Text Value)+ , _idpBody :: !ByteString } deriving (Eq, Show, Data, Typeable, Generic) @@ -72,32 +72,32 @@ -- * 'idpBody' - [Required] Raw byte array representing the to-be-imported documentation parts. To import from a Swagger file, this is a JSON object. importDocumentationParts :: Text -- ^ 'idpRestAPIId'- -> HashMap Text Value -- ^ 'idpBody'+ -> ByteString -- ^ 'idpBody' -> ImportDocumentationParts importDocumentationParts pRestAPIId_ pBody_ = ImportDocumentationParts'- { _idpMode = Nothing- , _idpFailOnWarnings = Nothing- , _idpRestAPIId = pRestAPIId_- , _idpBody = pBody_- }+ { _idpMode = Nothing+ , _idpFailOnWarnings = Nothing+ , _idpRestAPIId = pRestAPIId_+ , _idpBody = pBody_+ } -- | A query parameter to indicate whether to overwrite (@OVERWRITE@ ) any existing 'DocumentationParts' definition or to merge (@MERGE@ ) the new definition into the existing one. The default value is @MERGE@ . idpMode :: Lens' ImportDocumentationParts (Maybe PutMode)-idpMode = lens _idpMode (\ s a -> s{_idpMode = a});+idpMode = lens _idpMode (\ s a -> s{_idpMode = a}) -- | A query parameter to specify whether to rollback the documentation importation (@true@ ) or not (@false@ ) when a warning is encountered. The default value is @false@ . idpFailOnWarnings :: Lens' ImportDocumentationParts (Maybe Bool)-idpFailOnWarnings = lens _idpFailOnWarnings (\ s a -> s{_idpFailOnWarnings = a});+idpFailOnWarnings = lens _idpFailOnWarnings (\ s a -> s{_idpFailOnWarnings = a}) -- | [Required] The string identifier of the associated 'RestApi' . idpRestAPIId :: Lens' ImportDocumentationParts Text-idpRestAPIId = lens _idpRestAPIId (\ s a -> s{_idpRestAPIId = a});+idpRestAPIId = lens _idpRestAPIId (\ s a -> s{_idpRestAPIId = a}) -- | [Required] Raw byte array representing the to-be-imported documentation parts. To import from a Swagger file, this is a JSON object.-idpBody :: Lens' ImportDocumentationParts (HashMap Text Value)-idpBody = lens _idpBody (\ s a -> s{_idpBody = a});+idpBody :: Lens' ImportDocumentationParts ByteString+idpBody = lens _idpBody (\ s a -> s{_idpBody = a}) instance AWSRequest ImportDocumentationParts where type Rs ImportDocumentationParts =@@ -139,7 +139,7 @@ -- | A collection of the imported 'DocumentationPart' identifiers. -- ----- This is used to return the result when documentation parts in an external (e.g., Swagger) file are imported into Amazon API Gateway<http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , <http://docs.aws.amazon.com/apigateway/api-reference/link-relation/documentationpart-import/ documentationpart:import> , 'DocumentationPart'+-- This is used to return the result when documentation parts in an external (e.g., Swagger) file are imported into API Gateway<http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , <http://docs.aws.amazon.com/apigateway/api-reference/link-relation/documentationpart-import/ documentationpart:import> , 'DocumentationPart' -- -- /See:/ 'importDocumentationPartsResponse' smart constructor. data ImportDocumentationPartsResponse = ImportDocumentationPartsResponse'@@ -163,23 +163,23 @@ -> ImportDocumentationPartsResponse importDocumentationPartsResponse pResponseStatus_ = ImportDocumentationPartsResponse'- { _idprsIds = Nothing- , _idprsWarnings = Nothing- , _idprsResponseStatus = pResponseStatus_- }+ { _idprsIds = Nothing+ , _idprsWarnings = Nothing+ , _idprsResponseStatus = pResponseStatus_+ } -- | A list of the returned documentation part identifiers. idprsIds :: Lens' ImportDocumentationPartsResponse [Text]-idprsIds = lens _idprsIds (\ s a -> s{_idprsIds = a}) . _Default . _Coerce;+idprsIds = lens _idprsIds (\ s a -> s{_idprsIds = a}) . _Default . _Coerce -- | A list of warning messages reported during import of documentation parts. idprsWarnings :: Lens' ImportDocumentationPartsResponse [Text]-idprsWarnings = lens _idprsWarnings (\ s a -> s{_idprsWarnings = a}) . _Default . _Coerce;+idprsWarnings = lens _idprsWarnings (\ s a -> s{_idprsWarnings = a}) . _Default . _Coerce -- | -- | The response status code. idprsResponseStatus :: Lens' ImportDocumentationPartsResponse Int-idprsResponseStatus = lens _idprsResponseStatus (\ s a -> s{_idprsResponseStatus = a});+idprsResponseStatus = lens _idprsResponseStatus (\ s a -> s{_idprsResponseStatus = a}) instance NFData ImportDocumentationPartsResponse where
gen/Network/AWS/APIGateway/ImportRestAPI.hs view
@@ -12,13 +12,13 @@ -- | -- Module : Network.AWS.APIGateway.ImportRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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) ----- A feature of the Amazon API Gateway control service for creating a new API from an external API definition file.+-- A feature of the API Gateway control service for creating a new API from an external API definition file. -- -- module Network.AWS.APIGateway.ImportRestAPI@@ -35,12 +35,15 @@ , restAPI , RestAPI -- * Response Lenses+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription ) where@@ -52,7 +55,7 @@ import Network.AWS.Request import Network.AWS.Response --- | A POST request to import an API to Amazon API Gateway using an input of an API definition file.+-- | A POST request to import an API to API Gateway using an input of an API definition file. -- -- --@@ -60,7 +63,7 @@ data ImportRestAPI = ImportRestAPI' { _iraFailOnWarnings :: !(Maybe Bool) , _iraParameters :: !(Maybe (Map Text Text))- , _iraBody :: !(HashMap Text Value)+ , _iraBody :: !ByteString } deriving (Eq, Show, Data, Typeable, Generic) @@ -70,28 +73,28 @@ -- -- * 'iraFailOnWarnings' - A query parameter to indicate whether to rollback the API creation (@true@ ) or not (@false@ ) when a warning is encountered. The default value is @false@ . ----- * 'iraParameters' - Custom header parameters as part of the request. For example, to exclude 'DocumentationParts' from an imported API, set @ignore=documentation@ as a @parameters@ value, as in the AWS CLI command of @aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ .+-- * 'iraParameters' - A key-value map of context-specific query string parameters specifying the behavior of different API importing operations. The following shows operation-specific parameters and their supported values. To exclude 'DocumentationParts' from the import, set @parameters@ as @ignore=documentation@ . To configure the endpoint type, set @parameters@ as @endpointConfigurationTypes=EDGE@ or@endpointConfigurationTypes=REGIONAL@ . The default endpoint type is @EDGE@ . To handle imported @basePath@ , set @parameters@ as @basePath=ignore@ , @basePath=prepend@ or @basePath=split@ . For example, the AWS CLI command to exclude documentation from the imported API is: @@aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ @ The AWS CLI command to set the regional endpoint on the imported API is: @@aws apigateway import-rest-api --parameters endpointConfigurationTypes=REGIONAL --body 'file:///path/to/imported-api-body.json@ @ ----- * 'iraBody' - The POST request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.+-- * 'iraBody' - [Required] The POST request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB. importRestAPI- :: HashMap Text Value -- ^ 'iraBody'+ :: ByteString -- ^ 'iraBody' -> ImportRestAPI importRestAPI pBody_ = ImportRestAPI'- {_iraFailOnWarnings = Nothing, _iraParameters = Nothing, _iraBody = pBody_}+ {_iraFailOnWarnings = Nothing, _iraParameters = Nothing, _iraBody = pBody_} -- | A query parameter to indicate whether to rollback the API creation (@true@ ) or not (@false@ ) when a warning is encountered. The default value is @false@ . iraFailOnWarnings :: Lens' ImportRestAPI (Maybe Bool)-iraFailOnWarnings = lens _iraFailOnWarnings (\ s a -> s{_iraFailOnWarnings = a});+iraFailOnWarnings = lens _iraFailOnWarnings (\ s a -> s{_iraFailOnWarnings = a}) --- | Custom header parameters as part of the request. For example, to exclude 'DocumentationParts' from an imported API, set @ignore=documentation@ as a @parameters@ value, as in the AWS CLI command of @aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ .+-- | A key-value map of context-specific query string parameters specifying the behavior of different API importing operations. The following shows operation-specific parameters and their supported values. To exclude 'DocumentationParts' from the import, set @parameters@ as @ignore=documentation@ . To configure the endpoint type, set @parameters@ as @endpointConfigurationTypes=EDGE@ or@endpointConfigurationTypes=REGIONAL@ . The default endpoint type is @EDGE@ . To handle imported @basePath@ , set @parameters@ as @basePath=ignore@ , @basePath=prepend@ or @basePath=split@ . For example, the AWS CLI command to exclude documentation from the imported API is: @@aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ @ The AWS CLI command to set the regional endpoint on the imported API is: @@aws apigateway import-rest-api --parameters endpointConfigurationTypes=REGIONAL --body 'file:///path/to/imported-api-body.json@ @ iraParameters :: Lens' ImportRestAPI (HashMap Text Text)-iraParameters = lens _iraParameters (\ s a -> s{_iraParameters = a}) . _Default . _Map;+iraParameters = lens _iraParameters (\ s a -> s{_iraParameters = a}) . _Default . _Map --- | The POST request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.-iraBody :: Lens' ImportRestAPI (HashMap Text Value)-iraBody = lens _iraBody (\ s a -> s{_iraBody = a});+-- | [Required] The POST request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.+iraBody :: Lens' ImportRestAPI ByteString+iraBody = lens _iraBody (\ s a -> s{_iraBody = a}) instance AWSRequest ImportRestAPI where type Rs ImportRestAPI = RestAPI
gen/Network/AWS/APIGateway/PutGatewayResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.PutGatewayResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -75,42 +75,42 @@ -- -- * 'pgResponseParameters' - Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs. ----- * 'pgRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'pgRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'pgResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- * 'pgResponseType' - [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE putGatewayResponse :: Text -- ^ 'pgRestAPIId' -> GatewayResponseType -- ^ 'pgResponseType' -> PutGatewayResponse putGatewayResponse pRestAPIId_ pResponseType_ = PutGatewayResponse'- { _pgResponseTemplates = Nothing- , _pgStatusCode = Nothing- , _pgResponseParameters = Nothing- , _pgRestAPIId = pRestAPIId_- , _pgResponseType = pResponseType_- }+ { _pgResponseTemplates = Nothing+ , _pgStatusCode = Nothing+ , _pgResponseParameters = Nothing+ , _pgRestAPIId = pRestAPIId_+ , _pgResponseType = pResponseType_+ } -- | Response templates of the 'GatewayResponse' as a string-to-string map of key-value pairs. pgResponseTemplates :: Lens' PutGatewayResponse (HashMap Text Text)-pgResponseTemplates = lens _pgResponseTemplates (\ s a -> s{_pgResponseTemplates = a}) . _Default . _Map;+pgResponseTemplates = lens _pgResponseTemplates (\ s a -> s{_pgResponseTemplates = a}) . _Default . _Map -- | 'GatewayResponse' pgStatusCode :: Lens' PutGatewayResponse (Maybe Text)-pgStatusCode = lens _pgStatusCode (\ s a -> s{_pgStatusCode = a});+pgStatusCode = lens _pgStatusCode (\ s a -> s{_pgStatusCode = a}) -- | Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs. pgResponseParameters :: Lens' PutGatewayResponse (HashMap Text Text)-pgResponseParameters = lens _pgResponseParameters (\ s a -> s{_pgResponseParameters = a}) . _Default . _Map;+pgResponseParameters = lens _pgResponseParameters (\ s a -> s{_pgResponseParameters = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . pgRestAPIId :: Lens' PutGatewayResponse Text-pgRestAPIId = lens _pgRestAPIId (\ s a -> s{_pgRestAPIId = a});+pgRestAPIId = lens _pgRestAPIId (\ s a -> s{_pgRestAPIId = a}) --- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- | [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE pgResponseType :: Lens' PutGatewayResponse GatewayResponseType-pgResponseType = lens _pgResponseType (\ s a -> s{_pgResponseType = a});+pgResponseType = lens _pgResponseType (\ s a -> s{_pgResponseType = a}) instance AWSRequest PutGatewayResponse where type Rs PutGatewayResponse = GatewayResponse
gen/Network/AWS/APIGateway/PutIntegration.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.PutIntegration--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -29,11 +29,14 @@ -- * Request Lenses , pRequestTemplates , pCredentials+ , pConnectionId , pRequestParameters , pContentHandling , pPassthroughBehavior , pUri , pCacheNamespace+ , pTimeoutInMillis+ , pConnectionType , pIntegrationHTTPMethod , pCacheKeyParameters , pRestAPIId@@ -48,13 +51,16 @@ , iHttpMethod , iRequestTemplates , iCredentials+ , iConnectionId , iRequestParameters , iContentHandling , iPassthroughBehavior , iUri , iIntegrationResponses , iCacheNamespace+ , iTimeoutInMillis , iType+ , iConnectionType , iCacheKeyParameters ) where @@ -73,11 +79,14 @@ data PutIntegration = PutIntegration' { _pRequestTemplates :: !(Maybe (Map Text Text)) , _pCredentials :: !(Maybe Text)+ , _pConnectionId :: !(Maybe Text) , _pRequestParameters :: !(Maybe (Map Text Text)) , _pContentHandling :: !(Maybe ContentHandlingStrategy) , _pPassthroughBehavior :: !(Maybe Text) , _pUri :: !(Maybe Text) , _pCacheNamespace :: !(Maybe Text)+ , _pTimeoutInMillis :: !(Maybe Int)+ , _pConnectionType :: !(Maybe ConnectionType) , _pIntegrationHTTPMethod :: !(Maybe Text) , _pCacheKeyParameters :: !(Maybe [Text]) , _pRestAPIId :: !Text@@ -95,27 +104,33 @@ -- -- * 'pCredentials' - Specifies whether credentials are required for a put integration. --+-- * 'pConnectionId' - The (<http://docs.aws.amazon.com/apigateway/api-reference/resource/vpc-link/#id @id@ > ) of the 'VpcLink' used for the integration when @connectionType=VPC_LINK@ and undefined, otherwise.+-- -- * 'pRequestParameters' - A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name. -- -- * 'pContentHandling' - Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through. -- -- * 'pPassthroughBehavior' - Specifies the pass-through behavior for incoming requests based on the Content-Type header in the request, and the available mapping templates specified as the @requestTemplates@ property on the Integration resource. There are three valid values: @WHEN_NO_MATCH@ , @WHEN_NO_TEMPLATES@ , and @NEVER@ . * @WHEN_NO_MATCH@ passes the request body for unmapped content types through to the integration back end without transformation. * @NEVER@ rejects unmapped content types with an HTTP 415 'Unsupported Media Type' response. * @WHEN_NO_TEMPLATES@ allows pass-through when the integration has NO content types mapped to templates. However if there is at least one content type defined, unmapped content types will be rejected with the same 415 response. ----- * 'pUri' - Specifies the integration's Uniform Resource Identifier (URI). For HTTP integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> . For AWS integrations, the URI should be of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:{path|action}/{service_api}@ . @Region@ , @subdomain@ and @service@ are used to determine the right endpoint. For AWS services that use the @Action=@ query string parameter, @service_api@ should be a valid action for the desired service. For RESTful AWS service APIs, @path@ is used to indicate that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ .+-- * 'pUri' - Specifies Uniform Resource Identifier (URI) of the integration endpoint. * For @HTTP@ or @HTTP_PROXY@ integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> , for either standard integration, where @connectionType@ is not @VPC_LINK@ , or private integration, where @connectionType@ is @VPC_LINK@ . For a private HTTP integration, the URI is not used for routing. * For @AWS@ or @AWS_PROXY@ integrations, the URI is of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:path|action/{service_api}@ . Here, @{Region}@ is the API Gateway region (e.g., @us-east-1@ ); @{service}@ is the name of the integrated AWS service (e.g., @s3@ ); and @{subdomain}@ is a designated subdomain supported by certain AWS service for fast host-name lookup. @action@ can be used for an AWS service action-based API, using an @Action={name}&{p1}={v1}&p2={v2}...@ query string. The ensuing @{service_api}@ refers to a supported action @{name}@ plus any required input parameters. Alternatively, @path@ can be used for an AWS service path-based API. The ensuing @service_api@ refers to the path to an AWS service resource, including the region of the integrated AWS service, if applicable. For example, for integration with the S3 API of @<http://docs.aws.amazon.com/AmazonS3/latest/API/RESTObjectGET.html GetObject> @ , the @uri@ can be either @arn:aws:apigateway:us-west-2:s3:action/GetObject&Bucket={bucket}&Key={key}@ or @arn:aws:apigateway:us-west-2:s3:path/{bucket}/{key}@ -- -- * 'pCacheNamespace' - Specifies a put integration input's cache namespace. --+-- * 'pTimeoutInMillis' - Custom timeout between 50 and 29,000 milliseconds. The default value is 29,000 milliseconds or 29 seconds.+--+-- * 'pConnectionType' - The type of the network connection to the integration endpoint. The valid value is @INTERNET@ for connections through the public routable internet or @VPC_LINK@ for private connections between API Gateway and a network load balancer in a VPC. The default value is @INTERNET@ .+-- -- * 'pIntegrationHTTPMethod' - Specifies a put integration HTTP method. When the integration type is HTTP or AWS, this field is required. -- -- * 'pCacheKeyParameters' - Specifies a put integration input's cache key parameters. ----- * 'pRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'pRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'pResourceId' - Specifies a put integration request's resource ID.+-- * 'pResourceId' - [Required] Specifies a put integration request's resource ID. ----- * 'pHttpMethod' - Specifies a put integration request's HTTP method.+-- * 'pHttpMethod' - [Required] Specifies a put integration request's HTTP method. ----- * 'pType' - Specifies a put integration input's type.+-- * 'pType' - [Required] Specifies a put integration input's type. putIntegration :: Text -- ^ 'pRestAPIId' -> Text -- ^ 'pResourceId'@@ -124,73 +139,88 @@ -> PutIntegration putIntegration pRestAPIId_ pResourceId_ pHttpMethod_ pType_ = PutIntegration'- { _pRequestTemplates = Nothing- , _pCredentials = Nothing- , _pRequestParameters = Nothing- , _pContentHandling = Nothing- , _pPassthroughBehavior = Nothing- , _pUri = Nothing- , _pCacheNamespace = Nothing- , _pIntegrationHTTPMethod = Nothing- , _pCacheKeyParameters = Nothing- , _pRestAPIId = pRestAPIId_- , _pResourceId = pResourceId_- , _pHttpMethod = pHttpMethod_- , _pType = pType_- }+ { _pRequestTemplates = Nothing+ , _pCredentials = Nothing+ , _pConnectionId = Nothing+ , _pRequestParameters = Nothing+ , _pContentHandling = Nothing+ , _pPassthroughBehavior = Nothing+ , _pUri = Nothing+ , _pCacheNamespace = Nothing+ , _pTimeoutInMillis = Nothing+ , _pConnectionType = Nothing+ , _pIntegrationHTTPMethod = Nothing+ , _pCacheKeyParameters = Nothing+ , _pRestAPIId = pRestAPIId_+ , _pResourceId = pResourceId_+ , _pHttpMethod = pHttpMethod_+ , _pType = pType_+ } -- | Represents a map of Velocity templates that are applied on the request payload based on the value of the Content-Type header sent by the client. The content type value is the key in this map, and the template (as a String) is the value. pRequestTemplates :: Lens' PutIntegration (HashMap Text Text)-pRequestTemplates = lens _pRequestTemplates (\ s a -> s{_pRequestTemplates = a}) . _Default . _Map;+pRequestTemplates = lens _pRequestTemplates (\ s a -> s{_pRequestTemplates = a}) . _Default . _Map -- | Specifies whether credentials are required for a put integration. pCredentials :: Lens' PutIntegration (Maybe Text)-pCredentials = lens _pCredentials (\ s a -> s{_pCredentials = a});+pCredentials = lens _pCredentials (\ s a -> s{_pCredentials = a}) +-- | The (<http://docs.aws.amazon.com/apigateway/api-reference/resource/vpc-link/#id @id@ > ) of the 'VpcLink' used for the integration when @connectionType=VPC_LINK@ and undefined, otherwise.+pConnectionId :: Lens' PutIntegration (Maybe Text)+pConnectionId = lens _pConnectionId (\ s a -> s{_pConnectionId = a})+ -- | A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name. pRequestParameters :: Lens' PutIntegration (HashMap Text Text)-pRequestParameters = lens _pRequestParameters (\ s a -> s{_pRequestParameters = a}) . _Default . _Map;+pRequestParameters = lens _pRequestParameters (\ s a -> s{_pRequestParameters = a}) . _Default . _Map -- | Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through. pContentHandling :: Lens' PutIntegration (Maybe ContentHandlingStrategy)-pContentHandling = lens _pContentHandling (\ s a -> s{_pContentHandling = a});+pContentHandling = lens _pContentHandling (\ s a -> s{_pContentHandling = a}) -- | Specifies the pass-through behavior for incoming requests based on the Content-Type header in the request, and the available mapping templates specified as the @requestTemplates@ property on the Integration resource. There are three valid values: @WHEN_NO_MATCH@ , @WHEN_NO_TEMPLATES@ , and @NEVER@ . * @WHEN_NO_MATCH@ passes the request body for unmapped content types through to the integration back end without transformation. * @NEVER@ rejects unmapped content types with an HTTP 415 'Unsupported Media Type' response. * @WHEN_NO_TEMPLATES@ allows pass-through when the integration has NO content types mapped to templates. However if there is at least one content type defined, unmapped content types will be rejected with the same 415 response. pPassthroughBehavior :: Lens' PutIntegration (Maybe Text)-pPassthroughBehavior = lens _pPassthroughBehavior (\ s a -> s{_pPassthroughBehavior = a});+pPassthroughBehavior = lens _pPassthroughBehavior (\ s a -> s{_pPassthroughBehavior = a}) --- | Specifies the integration's Uniform Resource Identifier (URI). For HTTP integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> . For AWS integrations, the URI should be of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:{path|action}/{service_api}@ . @Region@ , @subdomain@ and @service@ are used to determine the right endpoint. For AWS services that use the @Action=@ query string parameter, @service_api@ should be a valid action for the desired service. For RESTful AWS service APIs, @path@ is used to indicate that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ .+-- | Specifies Uniform Resource Identifier (URI) of the integration endpoint. * For @HTTP@ or @HTTP_PROXY@ integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> , for either standard integration, where @connectionType@ is not @VPC_LINK@ , or private integration, where @connectionType@ is @VPC_LINK@ . For a private HTTP integration, the URI is not used for routing. * For @AWS@ or @AWS_PROXY@ integrations, the URI is of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:path|action/{service_api}@ . Here, @{Region}@ is the API Gateway region (e.g., @us-east-1@ ); @{service}@ is the name of the integrated AWS service (e.g., @s3@ ); and @{subdomain}@ is a designated subdomain supported by certain AWS service for fast host-name lookup. @action@ can be used for an AWS service action-based API, using an @Action={name}&{p1}={v1}&p2={v2}...@ query string. The ensuing @{service_api}@ refers to a supported action @{name}@ plus any required input parameters. Alternatively, @path@ can be used for an AWS service path-based API. The ensuing @service_api@ refers to the path to an AWS service resource, including the region of the integrated AWS service, if applicable. For example, for integration with the S3 API of @<http://docs.aws.amazon.com/AmazonS3/latest/API/RESTObjectGET.html GetObject> @ , the @uri@ can be either @arn:aws:apigateway:us-west-2:s3:action/GetObject&Bucket={bucket}&Key={key}@ or @arn:aws:apigateway:us-west-2:s3:path/{bucket}/{key}@ pUri :: Lens' PutIntegration (Maybe Text)-pUri = lens _pUri (\ s a -> s{_pUri = a});+pUri = lens _pUri (\ s a -> s{_pUri = a}) -- | Specifies a put integration input's cache namespace. pCacheNamespace :: Lens' PutIntegration (Maybe Text)-pCacheNamespace = lens _pCacheNamespace (\ s a -> s{_pCacheNamespace = a});+pCacheNamespace = lens _pCacheNamespace (\ s a -> s{_pCacheNamespace = a}) +-- | Custom timeout between 50 and 29,000 milliseconds. The default value is 29,000 milliseconds or 29 seconds.+pTimeoutInMillis :: Lens' PutIntegration (Maybe Int)+pTimeoutInMillis = lens _pTimeoutInMillis (\ s a -> s{_pTimeoutInMillis = a})++-- | The type of the network connection to the integration endpoint. The valid value is @INTERNET@ for connections through the public routable internet or @VPC_LINK@ for private connections between API Gateway and a network load balancer in a VPC. The default value is @INTERNET@ .+pConnectionType :: Lens' PutIntegration (Maybe ConnectionType)+pConnectionType = lens _pConnectionType (\ s a -> s{_pConnectionType = a})+ -- | Specifies a put integration HTTP method. When the integration type is HTTP or AWS, this field is required. pIntegrationHTTPMethod :: Lens' PutIntegration (Maybe Text)-pIntegrationHTTPMethod = lens _pIntegrationHTTPMethod (\ s a -> s{_pIntegrationHTTPMethod = a});+pIntegrationHTTPMethod = lens _pIntegrationHTTPMethod (\ s a -> s{_pIntegrationHTTPMethod = a}) -- | Specifies a put integration input's cache key parameters. pCacheKeyParameters :: Lens' PutIntegration [Text]-pCacheKeyParameters = lens _pCacheKeyParameters (\ s a -> s{_pCacheKeyParameters = a}) . _Default . _Coerce;+pCacheKeyParameters = lens _pCacheKeyParameters (\ s a -> s{_pCacheKeyParameters = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . pRestAPIId :: Lens' PutIntegration Text-pRestAPIId = lens _pRestAPIId (\ s a -> s{_pRestAPIId = a});+pRestAPIId = lens _pRestAPIId (\ s a -> s{_pRestAPIId = a}) --- | Specifies a put integration request's resource ID.+-- | [Required] Specifies a put integration request's resource ID. pResourceId :: Lens' PutIntegration Text-pResourceId = lens _pResourceId (\ s a -> s{_pResourceId = a});+pResourceId = lens _pResourceId (\ s a -> s{_pResourceId = a}) --- | Specifies a put integration request's HTTP method.+-- | [Required] Specifies a put integration request's HTTP method. pHttpMethod :: Lens' PutIntegration Text-pHttpMethod = lens _pHttpMethod (\ s a -> s{_pHttpMethod = a});+pHttpMethod = lens _pHttpMethod (\ s a -> s{_pHttpMethod = a}) --- | Specifies a put integration input's type.+-- | [Required] Specifies a put integration input's type. pType :: Lens' PutIntegration IntegrationType-pType = lens _pType (\ s a -> s{_pType = a});+pType = lens _pType (\ s a -> s{_pType = a}) instance AWSRequest PutIntegration where type Rs PutIntegration = Integration@@ -213,11 +243,14 @@ (catMaybes [("requestTemplates" .=) <$> _pRequestTemplates, ("credentials" .=) <$> _pCredentials,+ ("connectionId" .=) <$> _pConnectionId, ("requestParameters" .=) <$> _pRequestParameters, ("contentHandling" .=) <$> _pContentHandling, ("passthroughBehavior" .=) <$> _pPassthroughBehavior, ("uri" .=) <$> _pUri, ("cacheNamespace" .=) <$> _pCacheNamespace,+ ("timeoutInMillis" .=) <$> _pTimeoutInMillis,+ ("connectionType" .=) <$> _pConnectionType, ("httpMethod" .=) <$> _pIntegrationHTTPMethod, ("cacheKeyParameters" .=) <$> _pCacheKeyParameters, Just ("type" .= _pType)])
gen/Network/AWS/APIGateway/PutIntegrationResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.PutIntegrationResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -83,13 +83,13 @@ -- -- * 'piResponseParameters' - A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ must be a valid and unique response header name and @JSON-expression@ a valid JSON expression without the @> @ prefix. ----- * 'piRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'piRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'piResourceId' - Specifies a put integration response request's resource identifier.+-- * 'piResourceId' - [Required] Specifies a put integration response request's resource identifier. ----- * 'piHttpMethod' - Specifies a put integration response request's HTTP method.+-- * 'piHttpMethod' - [Required] Specifies a put integration response request's HTTP method. ----- * 'piStatusCode' - Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .+-- * 'piStatusCode' - [Required] Specifies the status code that is used to map the integration response to an existing 'MethodResponse' . putIntegrationResponse :: Text -- ^ 'piRestAPIId' -> Text -- ^ 'piResourceId'@@ -98,48 +98,48 @@ -> PutIntegrationResponse putIntegrationResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = PutIntegrationResponse'- { _piContentHandling = Nothing- , _piResponseTemplates = Nothing- , _piSelectionPattern = Nothing- , _piResponseParameters = Nothing- , _piRestAPIId = pRestAPIId_- , _piResourceId = pResourceId_- , _piHttpMethod = pHttpMethod_- , _piStatusCode = pStatusCode_- }+ { _piContentHandling = Nothing+ , _piResponseTemplates = Nothing+ , _piSelectionPattern = Nothing+ , _piResponseParameters = Nothing+ , _piRestAPIId = pRestAPIId_+ , _piResourceId = pResourceId_+ , _piHttpMethod = pHttpMethod_+ , _piStatusCode = pStatusCode_+ } -- | Specifies how to handle response payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a response payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a response payload from a binary blob to a Base64-encoded string. If this property is not defined, the response payload will be passed through from the integration response to the method response without modification. piContentHandling :: Lens' PutIntegrationResponse (Maybe ContentHandlingStrategy)-piContentHandling = lens _piContentHandling (\ s a -> s{_piContentHandling = a});+piContentHandling = lens _piContentHandling (\ s a -> s{_piContentHandling = a}) -- | Specifies a put integration response's templates. piResponseTemplates :: Lens' PutIntegrationResponse (HashMap Text Text)-piResponseTemplates = lens _piResponseTemplates (\ s a -> s{_piResponseTemplates = a}) . _Default . _Map;+piResponseTemplates = lens _piResponseTemplates (\ s a -> s{_piResponseTemplates = a}) . _Default . _Map -- | Specifies the selection pattern of a put integration response. piSelectionPattern :: Lens' PutIntegrationResponse (Maybe Text)-piSelectionPattern = lens _piSelectionPattern (\ s a -> s{_piSelectionPattern = a});+piSelectionPattern = lens _piSelectionPattern (\ s a -> s{_piSelectionPattern = a}) -- | A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ must be a valid and unique response header name and @JSON-expression@ a valid JSON expression without the @> @ prefix. piResponseParameters :: Lens' PutIntegrationResponse (HashMap Text Text)-piResponseParameters = lens _piResponseParameters (\ s a -> s{_piResponseParameters = a}) . _Default . _Map;+piResponseParameters = lens _piResponseParameters (\ s a -> s{_piResponseParameters = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . piRestAPIId :: Lens' PutIntegrationResponse Text-piRestAPIId = lens _piRestAPIId (\ s a -> s{_piRestAPIId = a});+piRestAPIId = lens _piRestAPIId (\ s a -> s{_piRestAPIId = a}) --- | Specifies a put integration response request's resource identifier.+-- | [Required] Specifies a put integration response request's resource identifier. piResourceId :: Lens' PutIntegrationResponse Text-piResourceId = lens _piResourceId (\ s a -> s{_piResourceId = a});+piResourceId = lens _piResourceId (\ s a -> s{_piResourceId = a}) --- | Specifies a put integration response request's HTTP method.+-- | [Required] Specifies a put integration response request's HTTP method. piHttpMethod :: Lens' PutIntegrationResponse Text-piHttpMethod = lens _piHttpMethod (\ s a -> s{_piHttpMethod = a});+piHttpMethod = lens _piHttpMethod (\ s a -> s{_piHttpMethod = a}) --- | Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .+-- | [Required] Specifies the status code that is used to map the integration response to an existing 'MethodResponse' . piStatusCode :: Lens' PutIntegrationResponse Text-piStatusCode = lens _piStatusCode (\ s a -> s{_piStatusCode = a});+piStatusCode = lens _piStatusCode (\ s a -> s{_piStatusCode = a}) instance AWSRequest PutIntegrationResponse where type Rs PutIntegrationResponse = IntegrationResponse
gen/Network/AWS/APIGateway/PutMethod.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.PutMethod--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -27,6 +27,7 @@ putMethod , PutMethod -- * Request Lenses+ , putAuthorizationScopes , putRequestValidatorId , putRequestModels , putRequestParameters@@ -44,6 +45,7 @@ -- * Response Lenses , mMethodResponses , mHttpMethod+ , mAuthorizationScopes , mRequestValidatorId , mRequestModels , mRequestParameters@@ -67,16 +69,17 @@ -- -- /See:/ 'putMethod' smart constructor. data PutMethod = PutMethod'- { _putRequestValidatorId :: !(Maybe Text)- , _putRequestModels :: !(Maybe (Map Text Text))- , _putRequestParameters :: !(Maybe (Map Text Bool))- , _putAuthorizerId :: !(Maybe Text)- , _putOperationName :: !(Maybe Text)- , _putApiKeyRequired :: !(Maybe Bool)- , _putRestAPIId :: !Text- , _putResourceId :: !Text- , _putHttpMethod :: !Text- , _putAuthorizationType :: !Text+ { _putAuthorizationScopes :: !(Maybe [Text])+ , _putRequestValidatorId :: !(Maybe Text)+ , _putRequestModels :: !(Maybe (Map Text Text))+ , _putRequestParameters :: !(Maybe (Map Text Bool))+ , _putAuthorizerId :: !(Maybe Text)+ , _putOperationName :: !(Maybe Text)+ , _putApiKeyRequired :: !(Maybe Bool)+ , _putRestAPIId :: !Text+ , _putResourceId :: !Text+ , _putHttpMethod :: !Text+ , _putAuthorizationType :: !Text } deriving (Eq, Read, Show, Data, Typeable, Generic) @@ -84,25 +87,27 @@ -- -- Use one of the following lenses to modify other fields as desired: --+-- * 'putAuthorizationScopes' - A list of authorization scopes configured on the method. The scopes are used with a @COGNITO_USER_POOLS@ authorizer to authorize the method invocation. The authorization works by matching the method scopes against the scopes parsed from the access token in the incoming request. The method invocation is authorized if any method scopes matches a claimed scope in the access token. Otherwise, the invocation is not authorized. When the method scope is configured, the client must provide an access token instead of an identity token for authorization purposes.+-- -- * 'putRequestValidatorId' - The identifier of a 'RequestValidator' for validating the method request. -- -- * 'putRequestModels' - Specifies the 'Model' resources used for the request's content type. Request models are represented as a key/value map, with a content type as the key and a 'Model' name as the value. ----- * 'putRequestParameters' - A key-value map defining required or optional method request parameters that can be accepted by Amazon API Gateway. A key defines a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or body-mapping templates.+-- * 'putRequestParameters' - A key-value map defining required or optional method request parameters that can be accepted by API Gateway. A key defines a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or body-mapping templates. ----- * 'putAuthorizerId' - Specifies the identifier of an 'Authorizer' to use on this Method, if the type is CUSTOM.+-- * 'putAuthorizerId' - Specifies the identifier of an 'Authorizer' to use on this Method, if the type is CUSTOM or COGNITO_USER_POOLS. The authorizer identifier is generated by API Gateway when you created the authorizer. -- -- * 'putOperationName' - A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example. -- -- * 'putApiKeyRequired' - Specifies whether the method required a valid 'ApiKey' . ----- * 'putRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'putRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'putResourceId' - The 'Resource' identifier for the new 'Method' resource.+-- * 'putResourceId' - [Required] The 'Resource' identifier for the new 'Method' resource. ----- * 'putHttpMethod' - Specifies the method request's HTTP method type.+-- * 'putHttpMethod' - [Required] Specifies the method request's HTTP method type. ----- * 'putAuthorizationType' - The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+-- * 'putAuthorizationType' - [Required] The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool. putMethod :: Text -- ^ 'putRestAPIId' -> Text -- ^ 'putResourceId'@@ -111,58 +116,63 @@ -> PutMethod putMethod pRestAPIId_ pResourceId_ pHttpMethod_ pAuthorizationType_ = PutMethod'- { _putRequestValidatorId = Nothing- , _putRequestModels = Nothing- , _putRequestParameters = Nothing- , _putAuthorizerId = Nothing- , _putOperationName = Nothing- , _putApiKeyRequired = Nothing- , _putRestAPIId = pRestAPIId_- , _putResourceId = pResourceId_- , _putHttpMethod = pHttpMethod_- , _putAuthorizationType = pAuthorizationType_- }+ { _putAuthorizationScopes = Nothing+ , _putRequestValidatorId = Nothing+ , _putRequestModels = Nothing+ , _putRequestParameters = Nothing+ , _putAuthorizerId = Nothing+ , _putOperationName = Nothing+ , _putApiKeyRequired = Nothing+ , _putRestAPIId = pRestAPIId_+ , _putResourceId = pResourceId_+ , _putHttpMethod = pHttpMethod_+ , _putAuthorizationType = pAuthorizationType_+ } +-- | A list of authorization scopes configured on the method. The scopes are used with a @COGNITO_USER_POOLS@ authorizer to authorize the method invocation. The authorization works by matching the method scopes against the scopes parsed from the access token in the incoming request. The method invocation is authorized if any method scopes matches a claimed scope in the access token. Otherwise, the invocation is not authorized. When the method scope is configured, the client must provide an access token instead of an identity token for authorization purposes.+putAuthorizationScopes :: Lens' PutMethod [Text]+putAuthorizationScopes = lens _putAuthorizationScopes (\ s a -> s{_putAuthorizationScopes = a}) . _Default . _Coerce+ -- | The identifier of a 'RequestValidator' for validating the method request. putRequestValidatorId :: Lens' PutMethod (Maybe Text)-putRequestValidatorId = lens _putRequestValidatorId (\ s a -> s{_putRequestValidatorId = a});+putRequestValidatorId = lens _putRequestValidatorId (\ s a -> s{_putRequestValidatorId = a}) -- | Specifies the 'Model' resources used for the request's content type. Request models are represented as a key/value map, with a content type as the key and a 'Model' name as the value. putRequestModels :: Lens' PutMethod (HashMap Text Text)-putRequestModels = lens _putRequestModels (\ s a -> s{_putRequestModels = a}) . _Default . _Map;+putRequestModels = lens _putRequestModels (\ s a -> s{_putRequestModels = a}) . _Default . _Map --- | A key-value map defining required or optional method request parameters that can be accepted by Amazon API Gateway. A key defines a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or body-mapping templates.+-- | A key-value map defining required or optional method request parameters that can be accepted by API Gateway. A key defines a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or body-mapping templates. putRequestParameters :: Lens' PutMethod (HashMap Text Bool)-putRequestParameters = lens _putRequestParameters (\ s a -> s{_putRequestParameters = a}) . _Default . _Map;+putRequestParameters = lens _putRequestParameters (\ s a -> s{_putRequestParameters = a}) . _Default . _Map --- | Specifies the identifier of an 'Authorizer' to use on this Method, if the type is CUSTOM.+-- | Specifies the identifier of an 'Authorizer' to use on this Method, if the type is CUSTOM or COGNITO_USER_POOLS. The authorizer identifier is generated by API Gateway when you created the authorizer. putAuthorizerId :: Lens' PutMethod (Maybe Text)-putAuthorizerId = lens _putAuthorizerId (\ s a -> s{_putAuthorizerId = a});+putAuthorizerId = lens _putAuthorizerId (\ s a -> s{_putAuthorizerId = a}) -- | A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example. putOperationName :: Lens' PutMethod (Maybe Text)-putOperationName = lens _putOperationName (\ s a -> s{_putOperationName = a});+putOperationName = lens _putOperationName (\ s a -> s{_putOperationName = a}) -- | Specifies whether the method required a valid 'ApiKey' . putApiKeyRequired :: Lens' PutMethod (Maybe Bool)-putApiKeyRequired = lens _putApiKeyRequired (\ s a -> s{_putApiKeyRequired = a});+putApiKeyRequired = lens _putApiKeyRequired (\ s a -> s{_putApiKeyRequired = a}) --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . putRestAPIId :: Lens' PutMethod Text-putRestAPIId = lens _putRestAPIId (\ s a -> s{_putRestAPIId = a});+putRestAPIId = lens _putRestAPIId (\ s a -> s{_putRestAPIId = a}) --- | The 'Resource' identifier for the new 'Method' resource.+-- | [Required] The 'Resource' identifier for the new 'Method' resource. putResourceId :: Lens' PutMethod Text-putResourceId = lens _putResourceId (\ s a -> s{_putResourceId = a});+putResourceId = lens _putResourceId (\ s a -> s{_putResourceId = a}) --- | Specifies the method request's HTTP method type.+-- | [Required] Specifies the method request's HTTP method type. putHttpMethod :: Lens' PutMethod Text-putHttpMethod = lens _putHttpMethod (\ s a -> s{_putHttpMethod = a});+putHttpMethod = lens _putHttpMethod (\ s a -> s{_putHttpMethod = a}) --- | The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+-- | [Required] The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool. putAuthorizationType :: Lens' PutMethod Text-putAuthorizationType = lens _putAuthorizationType (\ s a -> s{_putAuthorizationType = a});+putAuthorizationType = lens _putAuthorizationType (\ s a -> s{_putAuthorizationType = a}) instance AWSRequest PutMethod where type Rs PutMethod = Method@@ -183,8 +193,9 @@ toJSON PutMethod'{..} = object (catMaybes- [("requestValidatorId" .=) <$>- _putRequestValidatorId,+ [("authorizationScopes" .=) <$>+ _putAuthorizationScopes,+ ("requestValidatorId" .=) <$> _putRequestValidatorId, ("requestModels" .=) <$> _putRequestModels, ("requestParameters" .=) <$> _putRequestParameters, ("authorizerId" .=) <$> _putAuthorizerId,
gen/Network/AWS/APIGateway/PutMethodResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.PutMethodResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -71,15 +71,15 @@ -- -- * 'pmResponseModels' - Specifies the 'Model' resources used for the response's content type. Response models are represented as a key/value map, with a content type as the key and a 'Model' name as the value. ----- * 'pmResponseParameters' - A key-value map specifying required or optional response parameters that Amazon API Gateway can send back to the caller. A key defines a method response header name and the associated value is a Boolean flag indicating whether the method response parameter is required or not. The method response header names must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The response parameter names defined here are available in the integration response to be mapped from an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)+-- * 'pmResponseParameters' - A key-value map specifying required or optional response parameters that API Gateway can send back to the caller. A key defines a method response header name and the associated value is a Boolean flag indicating whether the method response parameter is required or not. The method response header names must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The response parameter names defined here are available in the integration response to be mapped from an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.) ----- * 'pmRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'pmRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'pmResourceId' - The 'Resource' identifier for the 'Method' resource.+-- * 'pmResourceId' - [Required] The 'Resource' identifier for the 'Method' resource. ----- * 'pmHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'pmHttpMethod' - [Required] The HTTP verb of the 'Method' resource. ----- * 'pmStatusCode' - The method response's status code.+-- * 'pmStatusCode' - [Required] The method response's status code. putMethodResponse :: Text -- ^ 'pmRestAPIId' -> Text -- ^ 'pmResourceId'@@ -88,38 +88,38 @@ -> PutMethodResponse putMethodResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = PutMethodResponse'- { _pmResponseModels = Nothing- , _pmResponseParameters = Nothing- , _pmRestAPIId = pRestAPIId_- , _pmResourceId = pResourceId_- , _pmHttpMethod = pHttpMethod_- , _pmStatusCode = pStatusCode_- }+ { _pmResponseModels = Nothing+ , _pmResponseParameters = Nothing+ , _pmRestAPIId = pRestAPIId_+ , _pmResourceId = pResourceId_+ , _pmHttpMethod = pHttpMethod_+ , _pmStatusCode = pStatusCode_+ } -- | Specifies the 'Model' resources used for the response's content type. Response models are represented as a key/value map, with a content type as the key and a 'Model' name as the value. pmResponseModels :: Lens' PutMethodResponse (HashMap Text Text)-pmResponseModels = lens _pmResponseModels (\ s a -> s{_pmResponseModels = a}) . _Default . _Map;+pmResponseModels = lens _pmResponseModels (\ s a -> s{_pmResponseModels = a}) . _Default . _Map --- | A key-value map specifying required or optional response parameters that Amazon API Gateway can send back to the caller. A key defines a method response header name and the associated value is a Boolean flag indicating whether the method response parameter is required or not. The method response header names must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The response parameter names defined here are available in the integration response to be mapped from an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)+-- | A key-value map specifying required or optional response parameters that API Gateway can send back to the caller. A key defines a method response header name and the associated value is a Boolean flag indicating whether the method response parameter is required or not. The method response header names must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The response parameter names defined here are available in the integration response to be mapped from an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.) pmResponseParameters :: Lens' PutMethodResponse (HashMap Text Bool)-pmResponseParameters = lens _pmResponseParameters (\ s a -> s{_pmResponseParameters = a}) . _Default . _Map;+pmResponseParameters = lens _pmResponseParameters (\ s a -> s{_pmResponseParameters = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . pmRestAPIId :: Lens' PutMethodResponse Text-pmRestAPIId = lens _pmRestAPIId (\ s a -> s{_pmRestAPIId = a});+pmRestAPIId = lens _pmRestAPIId (\ s a -> s{_pmRestAPIId = a}) --- | The 'Resource' identifier for the 'Method' resource.+-- | [Required] The 'Resource' identifier for the 'Method' resource. pmResourceId :: Lens' PutMethodResponse Text-pmResourceId = lens _pmResourceId (\ s a -> s{_pmResourceId = a});+pmResourceId = lens _pmResourceId (\ s a -> s{_pmResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. pmHttpMethod :: Lens' PutMethodResponse Text-pmHttpMethod = lens _pmHttpMethod (\ s a -> s{_pmHttpMethod = a});+pmHttpMethod = lens _pmHttpMethod (\ s a -> s{_pmHttpMethod = a}) --- | The method response's status code.+-- | [Required] The method response's status code. pmStatusCode :: Lens' PutMethodResponse Text-pmStatusCode = lens _pmStatusCode (\ s a -> s{_pmStatusCode = a});+pmStatusCode = lens _pmStatusCode (\ s a -> s{_pmStatusCode = a}) instance AWSRequest PutMethodResponse where type Rs PutMethodResponse = MethodResponse
gen/Network/AWS/APIGateway/PutRestAPI.hs view
@@ -12,13 +12,13 @@ -- | -- Module : Network.AWS.APIGateway.PutRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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) ----- A feature of the Amazon API Gateway control service for updating an existing API with an input of external API definitions. The update can take the form of merging the supplied definition into the existing API or overwriting the existing API.+-- A feature of the API Gateway control service for updating an existing API with an input of external API definitions. The update can take the form of merging the supplied definition into the existing API or overwriting the existing API. -- -- module Network.AWS.APIGateway.PutRestAPI@@ -37,12 +37,15 @@ , restAPI , RestAPI -- * Response Lenses+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription ) where@@ -64,7 +67,7 @@ , _praFailOnWarnings :: !(Maybe Bool) , _praParameters :: !(Maybe (Map Text Text)) , _praRestAPIId :: !Text- , _praBody :: !(HashMap Text Value)+ , _praBody :: !ByteString } deriving (Eq, Show, Data, Typeable, Generic) @@ -78,42 +81,42 @@ -- -- * 'praParameters' - Custom header parameters as part of the request. For example, to exclude 'DocumentationParts' from an imported API, set @ignore=documentation@ as a @parameters@ value, as in the AWS CLI command of @aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ . ----- * 'praRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'praRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'praBody' - The PUT request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.+-- * 'praBody' - [Required] The PUT request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB. putRestAPI :: Text -- ^ 'praRestAPIId'- -> HashMap Text Value -- ^ 'praBody'+ -> ByteString -- ^ 'praBody' -> PutRestAPI putRestAPI pRestAPIId_ pBody_ = PutRestAPI'- { _praMode = Nothing- , _praFailOnWarnings = Nothing- , _praParameters = Nothing- , _praRestAPIId = pRestAPIId_- , _praBody = pBody_- }+ { _praMode = Nothing+ , _praFailOnWarnings = Nothing+ , _praParameters = Nothing+ , _praRestAPIId = pRestAPIId_+ , _praBody = pBody_+ } -- | The @mode@ query parameter to specify the update mode. Valid values are "merge" and "overwrite". By default, the update mode is "merge". praMode :: Lens' PutRestAPI (Maybe PutMode)-praMode = lens _praMode (\ s a -> s{_praMode = a});+praMode = lens _praMode (\ s a -> s{_praMode = a}) -- | A query parameter to indicate whether to rollback the API update (@true@ ) or not (@false@ ) when a warning is encountered. The default value is @false@ . praFailOnWarnings :: Lens' PutRestAPI (Maybe Bool)-praFailOnWarnings = lens _praFailOnWarnings (\ s a -> s{_praFailOnWarnings = a});+praFailOnWarnings = lens _praFailOnWarnings (\ s a -> s{_praFailOnWarnings = a}) -- | Custom header parameters as part of the request. For example, to exclude 'DocumentationParts' from an imported API, set @ignore=documentation@ as a @parameters@ value, as in the AWS CLI command of @aws apigateway import-rest-api --parameters ignore=documentation --body 'file:///path/to/imported-api-body.json@ . praParameters :: Lens' PutRestAPI (HashMap Text Text)-praParameters = lens _praParameters (\ s a -> s{_praParameters = a}) . _Default . _Map;+praParameters = lens _praParameters (\ s a -> s{_praParameters = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . praRestAPIId :: Lens' PutRestAPI Text-praRestAPIId = lens _praRestAPIId (\ s a -> s{_praRestAPIId = a});+praRestAPIId = lens _praRestAPIId (\ s a -> s{_praRestAPIId = a}) --- | The PUT request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.-praBody :: Lens' PutRestAPI (HashMap Text Value)-praBody = lens _praBody (\ s a -> s{_praBody = a});+-- | [Required] The PUT request body containing external API definitions. Currently, only Swagger definition JSON files are supported. The maximum size of the API definition file is 2MB.+praBody :: Lens' PutRestAPI ByteString+praBody = lens _praBody (\ s a -> s{_praBody = a}) instance AWSRequest PutRestAPI where type Rs PutRestAPI = RestAPI
+ gen/Network/AWS/APIGateway/TagResource.hs view
@@ -0,0 +1,117 @@+{-# 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.APIGateway.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 or updates a tag on a given resource.+--+--+module Network.AWS.APIGateway.TagResource+ (+ -- * Creating a Request+ tagResource+ , TagResource+ -- * Request Lenses+ , trResourceARN+ , trTags++ -- * Destructuring the Response+ , tagResourceResponse+ , TagResourceResponse+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Adds or updates a tag on a given resource.+--+--+--+-- /See:/ 'tagResource' smart constructor.+data TagResource = TagResource'+ { _trResourceARN :: !Text+ , _trTags :: !(Map Text Text)+ } 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' - [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+--+-- * 'trTags' - [Required] The key-value map of strings. The valid character set is [a-zA-Z+-=._:/]. The tag key can be up to 128 characters and must not start with @aws:@ . The tag value can be up to 256 characters.+tagResource+ :: Text -- ^ 'trResourceARN'+ -> TagResource+tagResource pResourceARN_ =+ TagResource' {_trResourceARN = pResourceARN_, _trTags = mempty}+++-- | [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+trResourceARN :: Lens' TagResource Text+trResourceARN = lens _trResourceARN (\ s a -> s{_trResourceARN = a})++-- | [Required] The key-value map of strings. The valid character set is [a-zA-Z+-=._:/]. The tag key can be up to 128 characters and must not start with @aws:@ . The tag value can be up to 256 characters.+trTags :: Lens' TagResource (HashMap Text Text)+trTags = lens _trTags (\ s a -> s{_trTags = a}) . _Map++instance AWSRequest TagResource where+ type Rs TagResource = TagResourceResponse+ request = putJSON apiGateway+ response = receiveNull TagResourceResponse'++instance Hashable TagResource where++instance NFData TagResource where++instance ToHeaders TagResource where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToJSON TagResource where+ toJSON TagResource'{..}+ = object (catMaybes [Just ("tags" .= _trTags)])++instance ToPath TagResource where+ toPath TagResource'{..}+ = mconcat ["/tags/", toBS _trResourceARN]++instance ToQuery TagResource where+ toQuery = const mempty++-- | /See:/ 'tagResourceResponse' smart constructor.+data TagResourceResponse =+ TagResourceResponse'+ deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'TagResourceResponse' with the minimum fields required to make a request.+--+tagResourceResponse+ :: TagResourceResponse+tagResourceResponse = TagResourceResponse'+++instance NFData TagResourceResponse where
gen/Network/AWS/APIGateway/TestInvokeAuthorizer.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.TestInvokeAuthorizer--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -87,52 +87,52 @@ -- -- * 'tiaHeaders' - [Required] A key-value map of headers to simulate an incoming invocation request. This is where the incoming authorization token, or identity source, should be specified. ----- * 'tiaRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'tiaRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'tiaAuthorizerId' - Specifies a test invoke authorizer request's 'Authorizer' ID.+-- * 'tiaAuthorizerId' - [Required] Specifies a test invoke authorizer request's 'Authorizer' ID. testInvokeAuthorizer :: Text -- ^ 'tiaRestAPIId' -> Text -- ^ 'tiaAuthorizerId' -> TestInvokeAuthorizer testInvokeAuthorizer pRestAPIId_ pAuthorizerId_ = TestInvokeAuthorizer'- { _tiaPathWithQueryString = Nothing- , _tiaBody = Nothing- , _tiaAdditionalContext = Nothing- , _tiaStageVariables = Nothing- , _tiaHeaders = Nothing- , _tiaRestAPIId = pRestAPIId_- , _tiaAuthorizerId = pAuthorizerId_- }+ { _tiaPathWithQueryString = Nothing+ , _tiaBody = Nothing+ , _tiaAdditionalContext = Nothing+ , _tiaStageVariables = Nothing+ , _tiaHeaders = Nothing+ , _tiaRestAPIId = pRestAPIId_+ , _tiaAuthorizerId = pAuthorizerId_+ } -- | [Optional] The URI path, including query string, of the simulated invocation request. Use this to specify path parameters and query string parameters. tiaPathWithQueryString :: Lens' TestInvokeAuthorizer (Maybe Text)-tiaPathWithQueryString = lens _tiaPathWithQueryString (\ s a -> s{_tiaPathWithQueryString = a});+tiaPathWithQueryString = lens _tiaPathWithQueryString (\ s a -> s{_tiaPathWithQueryString = a}) -- | [Optional] The simulated request body of an incoming invocation request. tiaBody :: Lens' TestInvokeAuthorizer (Maybe Text)-tiaBody = lens _tiaBody (\ s a -> s{_tiaBody = a});+tiaBody = lens _tiaBody (\ s a -> s{_tiaBody = a}) -- | [Optional] A key-value map of additional context variables. tiaAdditionalContext :: Lens' TestInvokeAuthorizer (HashMap Text Text)-tiaAdditionalContext = lens _tiaAdditionalContext (\ s a -> s{_tiaAdditionalContext = a}) . _Default . _Map;+tiaAdditionalContext = lens _tiaAdditionalContext (\ s a -> s{_tiaAdditionalContext = a}) . _Default . _Map -- | A key-value map of stage variables to simulate an invocation on a deployed 'Stage' . tiaStageVariables :: Lens' TestInvokeAuthorizer (HashMap Text Text)-tiaStageVariables = lens _tiaStageVariables (\ s a -> s{_tiaStageVariables = a}) . _Default . _Map;+tiaStageVariables = lens _tiaStageVariables (\ s a -> s{_tiaStageVariables = a}) . _Default . _Map -- | [Required] A key-value map of headers to simulate an incoming invocation request. This is where the incoming authorization token, or identity source, should be specified. tiaHeaders :: Lens' TestInvokeAuthorizer (HashMap Text Text)-tiaHeaders = lens _tiaHeaders (\ s a -> s{_tiaHeaders = a}) . _Default . _Map;+tiaHeaders = lens _tiaHeaders (\ s a -> s{_tiaHeaders = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . tiaRestAPIId :: Lens' TestInvokeAuthorizer Text-tiaRestAPIId = lens _tiaRestAPIId (\ s a -> s{_tiaRestAPIId = a});+tiaRestAPIId = lens _tiaRestAPIId (\ s a -> s{_tiaRestAPIId = a}) --- | Specifies a test invoke authorizer request's 'Authorizer' ID.+-- | [Required] Specifies a test invoke authorizer request's 'Authorizer' ID. tiaAuthorizerId :: Lens' TestInvokeAuthorizer Text-tiaAuthorizerId = lens _tiaAuthorizerId (\ s a -> s{_tiaAuthorizerId = a});+tiaAuthorizerId = lens _tiaAuthorizerId (\ s a -> s{_tiaAuthorizerId = a}) instance AWSRequest TestInvokeAuthorizer where type Rs TestInvokeAuthorizer =@@ -201,7 +201,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'tiarsLog' - The Amazon API Gateway execution log for the test authorizer request.+-- * 'tiarsLog' - The API Gateway execution log for the test authorizer request. -- -- * 'tiarsPrincipalId' - The principal identity returned by the 'Authorizer' --@@ -221,47 +221,47 @@ -> TestInvokeAuthorizerResponse testInvokeAuthorizerResponse pResponseStatus_ = TestInvokeAuthorizerResponse'- { _tiarsLog = Nothing- , _tiarsPrincipalId = Nothing- , _tiarsLatency = Nothing- , _tiarsAuthorization = Nothing- , _tiarsClaims = Nothing- , _tiarsClientStatus = Nothing- , _tiarsPolicy = Nothing- , _tiarsResponseStatus = pResponseStatus_- }+ { _tiarsLog = Nothing+ , _tiarsPrincipalId = Nothing+ , _tiarsLatency = Nothing+ , _tiarsAuthorization = Nothing+ , _tiarsClaims = Nothing+ , _tiarsClientStatus = Nothing+ , _tiarsPolicy = Nothing+ , _tiarsResponseStatus = pResponseStatus_+ } --- | The Amazon API Gateway execution log for the test authorizer request.+-- | The API Gateway execution log for the test authorizer request. tiarsLog :: Lens' TestInvokeAuthorizerResponse (Maybe Text)-tiarsLog = lens _tiarsLog (\ s a -> s{_tiarsLog = a});+tiarsLog = lens _tiarsLog (\ s a -> s{_tiarsLog = a}) -- | The principal identity returned by the 'Authorizer' tiarsPrincipalId :: Lens' TestInvokeAuthorizerResponse (Maybe Text)-tiarsPrincipalId = lens _tiarsPrincipalId (\ s a -> s{_tiarsPrincipalId = a});+tiarsPrincipalId = lens _tiarsPrincipalId (\ s a -> s{_tiarsPrincipalId = a}) -- | The execution latency of the test authorizer request. tiarsLatency :: Lens' TestInvokeAuthorizerResponse (Maybe Integer)-tiarsLatency = lens _tiarsLatency (\ s a -> s{_tiarsLatency = a});+tiarsLatency = lens _tiarsLatency (\ s a -> s{_tiarsLatency = a}) -- | Undocumented member. tiarsAuthorization :: Lens' TestInvokeAuthorizerResponse (HashMap Text [Text])-tiarsAuthorization = lens _tiarsAuthorization (\ s a -> s{_tiarsAuthorization = a}) . _Default . _Map;+tiarsAuthorization = lens _tiarsAuthorization (\ s a -> s{_tiarsAuthorization = a}) . _Default . _Map -- | The <http://openid.net/specs/openid-connect-core-1_0.html#StandardClaims open identity claims> , with any supported custom attributes, returned from the Cognito Your User Pool configured for the API. tiarsClaims :: Lens' TestInvokeAuthorizerResponse (HashMap Text Text)-tiarsClaims = lens _tiarsClaims (\ s a -> s{_tiarsClaims = a}) . _Default . _Map;+tiarsClaims = lens _tiarsClaims (\ s a -> s{_tiarsClaims = a}) . _Default . _Map -- | The HTTP status code that the client would have received. Value is 0 if the authorizer succeeded. tiarsClientStatus :: Lens' TestInvokeAuthorizerResponse (Maybe Int)-tiarsClientStatus = lens _tiarsClientStatus (\ s a -> s{_tiarsClientStatus = a});+tiarsClientStatus = lens _tiarsClientStatus (\ s a -> s{_tiarsClientStatus = a}) -- | The JSON policy document returned by the 'Authorizer' tiarsPolicy :: Lens' TestInvokeAuthorizerResponse (Maybe Text)-tiarsPolicy = lens _tiarsPolicy (\ s a -> s{_tiarsPolicy = a});+tiarsPolicy = lens _tiarsPolicy (\ s a -> s{_tiarsPolicy = a}) -- | -- | The response status code. tiarsResponseStatus :: Lens' TestInvokeAuthorizerResponse Int-tiarsResponseStatus = lens _tiarsResponseStatus (\ s a -> s{_tiarsResponseStatus = a});+tiarsResponseStatus = lens _tiarsResponseStatus (\ s a -> s{_tiarsResponseStatus = a}) instance NFData TestInvokeAuthorizerResponse where
gen/Network/AWS/APIGateway/TestInvokeMethod.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.TestInvokeMethod--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -86,11 +86,11 @@ -- -- * 'timHeaders' - A key-value map of headers to simulate an incoming invocation request. ----- * 'timRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'timRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'timResourceId' - Specifies a test invoke method request's resource ID.+-- * 'timResourceId' - [Required] Specifies a test invoke method request's resource ID. ----- * 'timHttpMethod' - Specifies a test invoke method request's HTTP method.+-- * 'timHttpMethod' - [Required] Specifies a test invoke method request's HTTP method. testInvokeMethod :: Text -- ^ 'timRestAPIId' -> Text -- ^ 'timResourceId'@@ -98,48 +98,48 @@ -> TestInvokeMethod testInvokeMethod pRestAPIId_ pResourceId_ pHttpMethod_ = TestInvokeMethod'- { _timPathWithQueryString = Nothing- , _timBody = Nothing- , _timClientCertificateId = Nothing- , _timStageVariables = Nothing- , _timHeaders = Nothing- , _timRestAPIId = pRestAPIId_- , _timResourceId = pResourceId_- , _timHttpMethod = pHttpMethod_- }+ { _timPathWithQueryString = Nothing+ , _timBody = Nothing+ , _timClientCertificateId = Nothing+ , _timStageVariables = Nothing+ , _timHeaders = Nothing+ , _timRestAPIId = pRestAPIId_+ , _timResourceId = pResourceId_+ , _timHttpMethod = pHttpMethod_+ } -- | The URI path, including query string, of the simulated invocation request. Use this to specify path parameters and query string parameters. timPathWithQueryString :: Lens' TestInvokeMethod (Maybe Text)-timPathWithQueryString = lens _timPathWithQueryString (\ s a -> s{_timPathWithQueryString = a});+timPathWithQueryString = lens _timPathWithQueryString (\ s a -> s{_timPathWithQueryString = a}) -- | The simulated request body of an incoming invocation request. timBody :: Lens' TestInvokeMethod (Maybe Text)-timBody = lens _timBody (\ s a -> s{_timBody = a});+timBody = lens _timBody (\ s a -> s{_timBody = a}) -- | A 'ClientCertificate' identifier to use in the test invocation. API Gateway will use the certificate when making the HTTPS request to the defined back-end endpoint. timClientCertificateId :: Lens' TestInvokeMethod (Maybe Text)-timClientCertificateId = lens _timClientCertificateId (\ s a -> s{_timClientCertificateId = a});+timClientCertificateId = lens _timClientCertificateId (\ s a -> s{_timClientCertificateId = a}) -- | A key-value map of stage variables to simulate an invocation on a deployed 'Stage' . timStageVariables :: Lens' TestInvokeMethod (HashMap Text Text)-timStageVariables = lens _timStageVariables (\ s a -> s{_timStageVariables = a}) . _Default . _Map;+timStageVariables = lens _timStageVariables (\ s a -> s{_timStageVariables = a}) . _Default . _Map -- | A key-value map of headers to simulate an incoming invocation request. timHeaders :: Lens' TestInvokeMethod (HashMap Text Text)-timHeaders = lens _timHeaders (\ s a -> s{_timHeaders = a}) . _Default . _Map;+timHeaders = lens _timHeaders (\ s a -> s{_timHeaders = a}) . _Default . _Map --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . timRestAPIId :: Lens' TestInvokeMethod Text-timRestAPIId = lens _timRestAPIId (\ s a -> s{_timRestAPIId = a});+timRestAPIId = lens _timRestAPIId (\ s a -> s{_timRestAPIId = a}) --- | Specifies a test invoke method request's resource ID.+-- | [Required] Specifies a test invoke method request's resource ID. timResourceId :: Lens' TestInvokeMethod Text-timResourceId = lens _timResourceId (\ s a -> s{_timResourceId = a});+timResourceId = lens _timResourceId (\ s a -> s{_timResourceId = a}) --- | Specifies a test invoke method request's HTTP method.+-- | [Required] Specifies a test invoke method request's HTTP method. timHttpMethod :: Lens' TestInvokeMethod Text-timHttpMethod = lens _timHttpMethod (\ s a -> s{_timHttpMethod = a});+timHttpMethod = lens _timHttpMethod (\ s a -> s{_timHttpMethod = a}) instance AWSRequest TestInvokeMethod where type Rs TestInvokeMethod = TestInvokeMethodResponse@@ -205,7 +205,7 @@ -- -- Use one of the following lenses to modify other fields as desired: ----- * 'timrsLog' - The Amazon API Gateway execution log for the test invoke request.+-- * 'timrsLog' - The API Gateway execution log for the test invoke request. -- -- * 'timrsStatus' - The HTTP status code. --@@ -221,37 +221,37 @@ -> TestInvokeMethodResponse testInvokeMethodResponse pResponseStatus_ = TestInvokeMethodResponse'- { _timrsLog = Nothing- , _timrsStatus = Nothing- , _timrsBody = Nothing- , _timrsLatency = Nothing- , _timrsHeaders = Nothing- , _timrsResponseStatus = pResponseStatus_- }+ { _timrsLog = Nothing+ , _timrsStatus = Nothing+ , _timrsBody = Nothing+ , _timrsLatency = Nothing+ , _timrsHeaders = Nothing+ , _timrsResponseStatus = pResponseStatus_+ } --- | The Amazon API Gateway execution log for the test invoke request.+-- | The API Gateway execution log for the test invoke request. timrsLog :: Lens' TestInvokeMethodResponse (Maybe Text)-timrsLog = lens _timrsLog (\ s a -> s{_timrsLog = a});+timrsLog = lens _timrsLog (\ s a -> s{_timrsLog = a}) -- | The HTTP status code. timrsStatus :: Lens' TestInvokeMethodResponse (Maybe Int)-timrsStatus = lens _timrsStatus (\ s a -> s{_timrsStatus = a});+timrsStatus = lens _timrsStatus (\ s a -> s{_timrsStatus = a}) -- | The body of the HTTP response. timrsBody :: Lens' TestInvokeMethodResponse (Maybe Text)-timrsBody = lens _timrsBody (\ s a -> s{_timrsBody = a});+timrsBody = lens _timrsBody (\ s a -> s{_timrsBody = a}) -- | The execution latency of the test invoke request. timrsLatency :: Lens' TestInvokeMethodResponse (Maybe Integer)-timrsLatency = lens _timrsLatency (\ s a -> s{_timrsLatency = a});+timrsLatency = lens _timrsLatency (\ s a -> s{_timrsLatency = a}) -- | The headers of the HTTP response. timrsHeaders :: Lens' TestInvokeMethodResponse (HashMap Text Text)-timrsHeaders = lens _timrsHeaders (\ s a -> s{_timrsHeaders = a}) . _Default . _Map;+timrsHeaders = lens _timrsHeaders (\ s a -> s{_timrsHeaders = a}) . _Default . _Map -- | -- | The response status code. timrsResponseStatus :: Lens' TestInvokeMethodResponse Int-timrsResponseStatus = lens _timrsResponseStatus (\ s a -> s{_timrsResponseStatus = a});+timrsResponseStatus = lens _timrsResponseStatus (\ s a -> s{_timrsResponseStatus = a}) instance NFData TestInvokeMethodResponse where
gen/Network/AWS/APIGateway/Types.hs view
@@ -4,7 +4,7 @@ -- | -- Module : Network.AWS.APIGateway.Types--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -24,6 +24,9 @@ , _BadRequestException , _LimitExceededException + -- * APIKeySourceType+ , APIKeySourceType (..)+ -- * APIKeysFormat , APIKeysFormat (..) @@ -36,6 +39,9 @@ -- * CacheClusterStatus , CacheClusterStatus (..) + -- * ConnectionType+ , ConnectionType (..)+ -- * ContentHandlingStrategy , ContentHandlingStrategy (..) @@ -51,6 +57,9 @@ -- * IntegrationType , IntegrationType (..) + -- * LocationStatusType+ , LocationStatusType (..)+ -- * Op , Op (..) @@ -63,6 +72,9 @@ -- * UnauthorizedCacheControlHeaderStrategy , UnauthorizedCacheControlHeaderStrategy (..) + -- * VPCLinkStatus+ , VPCLinkStatus (..)+ -- * APIKey , APIKey , apiKey@@ -82,6 +94,12 @@ , asStage , asApiId + -- * AccessLogSettings+ , AccessLogSettings+ , accessLogSettings+ , alsFormat+ , alsDestinationARN+ -- * Account , Account , account@@ -111,6 +129,14 @@ , bpmBasePath , bpmRestAPIId + -- * CanarySettings+ , CanarySettings+ , canarySettings+ , csDeploymentId+ , csStageVariableOverrides+ , csUseStageCache+ , csPercentTraffic+ -- * ClientCertificate , ClientCertificate , clientCertificate@@ -128,6 +154,13 @@ , dId , dDescription + -- * DeploymentCanarySettings+ , DeploymentCanarySettings+ , deploymentCanarySettings+ , dcsStageVariableOverrides+ , dcsUseStageCache+ , dcsPercentTraffic+ -- * DocumentationPart , DocumentationPart , documentationPart@@ -154,9 +187,11 @@ -- * DomainName , DomainName , domainName+ , dnRegionalHostedZoneId , dnCertificateName , dnRegionalCertificateARN , dnCertificateARN+ , dnDistributionHostedZoneId , dnDomainName , dnRegionalCertificateName , dnRegionalDomainName@@ -184,13 +219,16 @@ , iHttpMethod , iRequestTemplates , iCredentials+ , iConnectionId , iRequestParameters , iContentHandling , iPassthroughBehavior , iUri , iIntegrationResponses , iCacheNamespace+ , iTimeoutInMillis , iType+ , iConnectionType , iCacheKeyParameters -- * IntegrationResponse@@ -207,6 +245,7 @@ , method , mMethodResponses , mHttpMethod+ , mAuthorizationScopes , mRequestValidatorId , mRequestModels , mRequestParameters@@ -287,12 +326,15 @@ -- * RestAPI , RestAPI , restAPI+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription @@ -318,6 +360,7 @@ , stage , sDeploymentId , sVariables+ , sAccessLogSettings , sDocumentationVersion , sClientCertificateId , sCreatedDate@@ -325,9 +368,11 @@ , sMethodSettings , sLastUpdatedDate , sCacheClusterSize+ , sCanarySettings , sCacheClusterEnabled , sStageName , sDescription+ , sTags -- * StageKey , StageKey@@ -368,6 +413,16 @@ , upkName , upkId , upkType++ -- * VPCLink+ , VPCLink+ , vpcLink+ , vlStatus+ , vlTargetARNs+ , vlName+ , vlStatusMessage+ , vlId+ , vlDescription ) where import Network.AWS.APIGateway.Types.Product@@ -380,24 +435,24 @@ apiGateway :: Service apiGateway = Service- { _svcAbbrev = "APIGateway"- , _svcSigner = v4- , _svcPrefix = "apigateway"- , _svcVersion = "2015-07-09"- , _svcEndpoint = defaultEndpoint apiGateway- , _svcTimeout = Just 70- , _svcCheck = statusSuccess- , _svcError = parseJSONError "APIGateway"- , _svcRetry = retry- }+ { _svcAbbrev = "APIGateway"+ , _svcSigner = v4+ , _svcPrefix = "apigateway"+ , _svcVersion = "2015-07-09"+ , _svcEndpoint = defaultEndpoint apiGateway+ , _svcTimeout = Just 70+ , _svcCheck = statusSuccess+ , _svcError = parseJSONError "APIGateway"+ , _svcRetry = retry+ } where retry = Exponential- { _retryBase = 5.0e-2- , _retryGrowth = 2- , _retryAttempts = 5- , _retryCheck = check- }+ { _retryBase = 5.0e-2+ , _retryGrowth = 2+ , _retryAttempts = 5+ , _retryCheck = check+ } check e | has (hasCode "ThrottledException" . hasStatus 400) e = Just "throttled_exception"@@ -406,6 +461,8 @@ 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"
gen/Network/AWS/APIGateway/Types/Product.hs view
@@ -9,2605 +9,2973 @@ -- | -- Module : Network.AWS.APIGateway.Types.Product--- Copyright : (c) 2013-2017 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.APIGateway.Types.Product where--import Network.AWS.APIGateway.Types.Sum-import Network.AWS.Lens-import Network.AWS.Prelude---- | A resource that can be distributed to callers for executing 'Method' resources that require an API key. API keys can be mapped to any 'Stage' on any 'RestApi' , which indicates that the callers with the API key can make requests to that stage.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-api-keys.html Use API Keys>------ /See:/ 'apiKey' smart constructor.-data APIKey = APIKey'- { _akEnabled :: !(Maybe Bool)- , _akValue :: !(Maybe Text)- , _akCustomerId :: !(Maybe Text)- , _akCreatedDate :: !(Maybe POSIX)- , _akName :: !(Maybe Text)- , _akId :: !(Maybe Text)- , _akStageKeys :: !(Maybe [Text])- , _akLastUpdatedDate :: !(Maybe POSIX)- , _akDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'APIKey' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'akEnabled' - Specifies whether the API Key can be used by callers.------ * 'akValue' - The value of the API Key.------ * 'akCustomerId' - An AWS Marketplace customer identifier , when integrating with the AWS SaaS Marketplace.------ * 'akCreatedDate' - The timestamp when the API Key was created.------ * 'akName' - The name of the API Key.------ * 'akId' - The identifier of the API Key.------ * 'akStageKeys' - A list of 'Stage' resources that are associated with the 'ApiKey' resource.------ * 'akLastUpdatedDate' - The timestamp when the API Key was last updated.------ * 'akDescription' - The description of the API Key.-apiKey- :: APIKey-apiKey =- APIKey'- { _akEnabled = Nothing- , _akValue = Nothing- , _akCustomerId = Nothing- , _akCreatedDate = Nothing- , _akName = Nothing- , _akId = Nothing- , _akStageKeys = Nothing- , _akLastUpdatedDate = Nothing- , _akDescription = Nothing- }----- | Specifies whether the API Key can be used by callers.-akEnabled :: Lens' APIKey (Maybe Bool)-akEnabled = lens _akEnabled (\ s a -> s{_akEnabled = a});---- | The value of the API Key.-akValue :: Lens' APIKey (Maybe Text)-akValue = lens _akValue (\ s a -> s{_akValue = a});---- | An AWS Marketplace customer identifier , when integrating with the AWS SaaS Marketplace.-akCustomerId :: Lens' APIKey (Maybe Text)-akCustomerId = lens _akCustomerId (\ s a -> s{_akCustomerId = a});---- | The timestamp when the API Key was created.-akCreatedDate :: Lens' APIKey (Maybe UTCTime)-akCreatedDate = lens _akCreatedDate (\ s a -> s{_akCreatedDate = a}) . mapping _Time;---- | The name of the API Key.-akName :: Lens' APIKey (Maybe Text)-akName = lens _akName (\ s a -> s{_akName = a});---- | The identifier of the API Key.-akId :: Lens' APIKey (Maybe Text)-akId = lens _akId (\ s a -> s{_akId = a});---- | A list of 'Stage' resources that are associated with the 'ApiKey' resource.-akStageKeys :: Lens' APIKey [Text]-akStageKeys = lens _akStageKeys (\ s a -> s{_akStageKeys = a}) . _Default . _Coerce;---- | The timestamp when the API Key was last updated.-akLastUpdatedDate :: Lens' APIKey (Maybe UTCTime)-akLastUpdatedDate = lens _akLastUpdatedDate (\ s a -> s{_akLastUpdatedDate = a}) . mapping _Time;---- | The description of the API Key.-akDescription :: Lens' APIKey (Maybe Text)-akDescription = lens _akDescription (\ s a -> s{_akDescription = a});--instance FromJSON APIKey where- parseJSON- = withObject "APIKey"- (\ x ->- APIKey' <$>- (x .:? "enabled") <*> (x .:? "value") <*>- (x .:? "customerId")- <*> (x .:? "createdDate")- <*> (x .:? "name")- <*> (x .:? "id")- <*> (x .:? "stageKeys" .!= mempty)- <*> (x .:? "lastUpdatedDate")- <*> (x .:? "description"))--instance Hashable APIKey where--instance NFData APIKey where---- | API stage name of the associated API stage in a usage plan.------------ /See:/ 'apiStage' smart constructor.-data APIStage = APIStage'- { _asStage :: !(Maybe Text)- , _asApiId :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'APIStage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'asStage' - API stage name of the associated API stage in a usage plan.------ * 'asApiId' - API Id of the associated API stage in a usage plan.-apiStage- :: APIStage-apiStage = APIStage' {_asStage = Nothing, _asApiId = Nothing}----- | API stage name of the associated API stage in a usage plan.-asStage :: Lens' APIStage (Maybe Text)-asStage = lens _asStage (\ s a -> s{_asStage = a});---- | API Id of the associated API stage in a usage plan.-asApiId :: Lens' APIStage (Maybe Text)-asApiId = lens _asApiId (\ s a -> s{_asApiId = a});--instance FromJSON APIStage where- parseJSON- = withObject "APIStage"- (\ x ->- APIStage' <$> (x .:? "stage") <*> (x .:? "apiId"))--instance Hashable APIStage where--instance NFData APIStage where--instance ToJSON APIStage where- toJSON APIStage'{..}- = object- (catMaybes- [("stage" .=) <$> _asStage,- ("apiId" .=) <$> _asApiId])---- | Represents an AWS account that is associated with Amazon API Gateway.--------- To view the account info, call @GET@ on this resource.------ __Error Codes__--- The following exception may be thrown when the request fails.------ * UnauthorizedException * NotFoundException * TooManyRequestsException------ For detailed error code information, including the corresponding HTTP Status Codes, see <http://docs.aws.amazon.com/apigateway/api-reference/handling-errors/#api-error-codes API Gateway Error Codes>------ __Example: Get the information about an account.__--- __Request__--- @@GET /account HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160531T184618Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__--- The successful response returns a @200 OK@ status code and a payload similar to the following:------ @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/account-apigateway-{rel}.html", "name": "account", "templated": true }, "self": { "href": "/account" }, "account:update": { "href": "/account" } }, "cloudwatchRoleArn": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "throttleSettings": { "rateLimit": 500, "burstLimit": 1000 } } @ @ In addition to making the REST API call directly, you can use the AWS CLI and an AWS SDK to access this resource.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-limits.html API Gateway Limits> <http://docs.aws.amazon.com/apigateway/latest/developerguide/welcome.html Developer Guide> , <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-account.html AWS CLI>------ /See:/ 'account' smart constructor.-data Account = Account'- { _aApiKeyVersion :: !(Maybe Text)- , _aCloudwatchRoleARN :: !(Maybe Text)- , _aFeatures :: !(Maybe [Text])- , _aThrottleSettings :: !(Maybe ThrottleSettings)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Account' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aApiKeyVersion' - The version of the API keys used for the account.------ * 'aCloudwatchRoleARN' - The ARN of an Amazon CloudWatch role for the current 'Account' .------ * 'aFeatures' - A list of features supported for the account. When usage plans are enabled, the features list will include an entry of @"UsagePlans"@ .------ * 'aThrottleSettings' - Specifies the API request limits configured for the current 'Account' .-account- :: Account-account =- Account'- { _aApiKeyVersion = Nothing- , _aCloudwatchRoleARN = Nothing- , _aFeatures = Nothing- , _aThrottleSettings = Nothing- }----- | The version of the API keys used for the account.-aApiKeyVersion :: Lens' Account (Maybe Text)-aApiKeyVersion = lens _aApiKeyVersion (\ s a -> s{_aApiKeyVersion = a});---- | The ARN of an Amazon CloudWatch role for the current 'Account' .-aCloudwatchRoleARN :: Lens' Account (Maybe Text)-aCloudwatchRoleARN = lens _aCloudwatchRoleARN (\ s a -> s{_aCloudwatchRoleARN = a});---- | A list of features supported for the account. When usage plans are enabled, the features list will include an entry of @"UsagePlans"@ .-aFeatures :: Lens' Account [Text]-aFeatures = lens _aFeatures (\ s a -> s{_aFeatures = a}) . _Default . _Coerce;---- | Specifies the API request limits configured for the current 'Account' .-aThrottleSettings :: Lens' Account (Maybe ThrottleSettings)-aThrottleSettings = lens _aThrottleSettings (\ s a -> s{_aThrottleSettings = a});--instance FromJSON Account where- parseJSON- = withObject "Account"- (\ x ->- Account' <$>- (x .:? "apiKeyVersion") <*>- (x .:? "cloudwatchRoleArn")- <*> (x .:? "features" .!= mempty)- <*> (x .:? "throttleSettings"))--instance Hashable Account where--instance NFData Account where---- | Represents an authorization layer for methods. If enabled on a method, API Gateway will activate the authorizer when a client calls the method.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/use-custom-authorizer.html Enable custom authorization>------ /See:/ 'authorizer' smart constructor.-data Authorizer = Authorizer'- { _aAuthorizerURI :: !(Maybe Text)- , _aIdentityValidationExpression :: !(Maybe Text)- , _aProviderARNs :: !(Maybe [Text])- , _aName :: !(Maybe Text)- , _aId :: !(Maybe Text)- , _aAuthorizerResultTtlInSeconds :: !(Maybe Int)- , _aAuthType :: !(Maybe Text)- , _aType :: !(Maybe AuthorizerType)- , _aIdentitySource :: !(Maybe Text)- , _aAuthorizerCredentials :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Authorizer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aAuthorizerURI' - Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ .------ * 'aIdentityValidationExpression' - A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.------ * 'aProviderARNs' - A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined.------ * 'aName' - [Required] The name of the authorizer.------ * 'aId' - The identifier for the authorizer resource.------ * 'aAuthorizerResultTtlInSeconds' - The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour.------ * 'aAuthType' - Optional customer-defined field, used in Swagger imports and exports without functional impact.------ * 'aType' - [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool.------ * 'aIdentitySource' - The identity source for which authorization is requested. * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. * For a @COGNITO_USER_POOLS@ authorizer, this property is not used.------ * 'aAuthorizerCredentials' - Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.-authorizer- :: Authorizer-authorizer =- Authorizer'- { _aAuthorizerURI = Nothing- , _aIdentityValidationExpression = Nothing- , _aProviderARNs = Nothing- , _aName = Nothing- , _aId = Nothing- , _aAuthorizerResultTtlInSeconds = Nothing- , _aAuthType = Nothing- , _aType = Nothing- , _aIdentitySource = Nothing- , _aAuthorizerCredentials = Nothing- }----- | Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ .-aAuthorizerURI :: Lens' Authorizer (Maybe Text)-aAuthorizerURI = lens _aAuthorizerURI (\ s a -> s{_aAuthorizerURI = a});---- | A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. Amazon API Gateway will match the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.-aIdentityValidationExpression :: Lens' Authorizer (Maybe Text)-aIdentityValidationExpression = lens _aIdentityValidationExpression (\ s a -> s{_aIdentityValidationExpression = a});---- | A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined.-aProviderARNs :: Lens' Authorizer [Text]-aProviderARNs = lens _aProviderARNs (\ s a -> s{_aProviderARNs = a}) . _Default . _Coerce;---- | [Required] The name of the authorizer.-aName :: Lens' Authorizer (Maybe Text)-aName = lens _aName (\ s a -> s{_aName = a});---- | The identifier for the authorizer resource.-aId :: Lens' Authorizer (Maybe Text)-aId = lens _aId (\ s a -> s{_aId = a});---- | The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour.-aAuthorizerResultTtlInSeconds :: Lens' Authorizer (Maybe Int)-aAuthorizerResultTtlInSeconds = lens _aAuthorizerResultTtlInSeconds (\ s a -> s{_aAuthorizerResultTtlInSeconds = a});---- | Optional customer-defined field, used in Swagger imports and exports without functional impact.-aAuthType :: Lens' Authorizer (Maybe Text)-aAuthType = lens _aAuthType (\ s a -> s{_aAuthType = a});---- | [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool.-aType :: Lens' Authorizer (Maybe AuthorizerType)-aType = lens _aType (\ s a -> s{_aType = a});---- | The identity source for which authorization is requested. * For a @TOKEN@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional. * For a @COGNITO_USER_POOLS@ authorizer, this property is not used.-aIdentitySource :: Lens' Authorizer (Maybe Text)-aIdentitySource = lens _aIdentitySource (\ s a -> s{_aIdentitySource = a});---- | Specifies the required credentials as an IAM role for Amazon API Gateway to invoke the authorizer. To specify an IAM role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.-aAuthorizerCredentials :: Lens' Authorizer (Maybe Text)-aAuthorizerCredentials = lens _aAuthorizerCredentials (\ s a -> s{_aAuthorizerCredentials = a});--instance FromJSON Authorizer where- parseJSON- = withObject "Authorizer"- (\ x ->- Authorizer' <$>- (x .:? "authorizerUri") <*>- (x .:? "identityValidationExpression")- <*> (x .:? "providerARNs" .!= mempty)- <*> (x .:? "name")- <*> (x .:? "id")- <*> (x .:? "authorizerResultTtlInSeconds")- <*> (x .:? "authType")- <*> (x .:? "type")- <*> (x .:? "identitySource")- <*> (x .:? "authorizerCredentials"))--instance Hashable Authorizer where--instance NFData Authorizer where---- | Represents the base path that callers of the API must provide as part of the URL after the domain name.--------- A custom domain name plus a @BasePathMapping@ specification identifies a deployed 'RestApi' in a given stage of the owner 'Account' .<http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-custom-domains.html Use Custom Domain Names>------ /See:/ 'basePathMapping' smart constructor.-data BasePathMapping = BasePathMapping'- { _bpmStage :: !(Maybe Text)- , _bpmBasePath :: !(Maybe Text)- , _bpmRestAPIId :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'BasePathMapping' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bpmStage' - The name of the associated stage.------ * 'bpmBasePath' - The base path name that callers of the API must provide as part of the URL after the domain name.------ * 'bpmRestAPIId' - The string identifier of the associated 'RestApi' .-basePathMapping- :: BasePathMapping-basePathMapping =- BasePathMapping'- {_bpmStage = Nothing, _bpmBasePath = Nothing, _bpmRestAPIId = Nothing}----- | The name of the associated stage.-bpmStage :: Lens' BasePathMapping (Maybe Text)-bpmStage = lens _bpmStage (\ s a -> s{_bpmStage = a});---- | The base path name that callers of the API must provide as part of the URL after the domain name.-bpmBasePath :: Lens' BasePathMapping (Maybe Text)-bpmBasePath = lens _bpmBasePath (\ s a -> s{_bpmBasePath = a});---- | The string identifier of the associated 'RestApi' .-bpmRestAPIId :: Lens' BasePathMapping (Maybe Text)-bpmRestAPIId = lens _bpmRestAPIId (\ s a -> s{_bpmRestAPIId = a});--instance FromJSON BasePathMapping where- parseJSON- = withObject "BasePathMapping"- (\ x ->- BasePathMapping' <$>- (x .:? "stage") <*> (x .:? "basePath") <*>- (x .:? "restApiId"))--instance Hashable BasePathMapping where--instance NFData BasePathMapping where---- | Represents a client certificate used to configure client-side SSL authentication while sending requests to the integration endpoint.--------- Client certificates are used to authenticate an API by the backend server. To authenticate an API client (or user), use IAM roles and policies, a custom 'Authorizer' or an Amazon Cognito user pool.<http://docs.aws.amazon.com/apigateway/latest/developerguide/getting-started-client-side-ssl-authentication.html Use Client-Side Certificate>------ /See:/ 'clientCertificate' smart constructor.-data ClientCertificate = ClientCertificate'- { _ccPemEncodedCertificate :: !(Maybe Text)- , _ccClientCertificateId :: !(Maybe Text)- , _ccCreatedDate :: !(Maybe POSIX)- , _ccExpirationDate :: !(Maybe POSIX)- , _ccDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ClientCertificate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccPemEncodedCertificate' - The PEM-encoded public key of the client certificate, which can be used to configure certificate authentication in the integration endpoint .------ * 'ccClientCertificateId' - The identifier of the client certificate.------ * 'ccCreatedDate' - The timestamp when the client certificate was created.------ * 'ccExpirationDate' - The timestamp when the client certificate will expire.------ * 'ccDescription' - The description of the client certificate.-clientCertificate- :: ClientCertificate-clientCertificate =- ClientCertificate'- { _ccPemEncodedCertificate = Nothing- , _ccClientCertificateId = Nothing- , _ccCreatedDate = Nothing- , _ccExpirationDate = Nothing- , _ccDescription = Nothing- }----- | The PEM-encoded public key of the client certificate, which can be used to configure certificate authentication in the integration endpoint .-ccPemEncodedCertificate :: Lens' ClientCertificate (Maybe Text)-ccPemEncodedCertificate = lens _ccPemEncodedCertificate (\ s a -> s{_ccPemEncodedCertificate = a});---- | The identifier of the client certificate.-ccClientCertificateId :: Lens' ClientCertificate (Maybe Text)-ccClientCertificateId = lens _ccClientCertificateId (\ s a -> s{_ccClientCertificateId = a});---- | The timestamp when the client certificate was created.-ccCreatedDate :: Lens' ClientCertificate (Maybe UTCTime)-ccCreatedDate = lens _ccCreatedDate (\ s a -> s{_ccCreatedDate = a}) . mapping _Time;---- | The timestamp when the client certificate will expire.-ccExpirationDate :: Lens' ClientCertificate (Maybe UTCTime)-ccExpirationDate = lens _ccExpirationDate (\ s a -> s{_ccExpirationDate = a}) . mapping _Time;---- | The description of the client certificate.-ccDescription :: Lens' ClientCertificate (Maybe Text)-ccDescription = lens _ccDescription (\ s a -> s{_ccDescription = a});--instance FromJSON ClientCertificate where- parseJSON- = withObject "ClientCertificate"- (\ x ->- ClientCertificate' <$>- (x .:? "pemEncodedCertificate") <*>- (x .:? "clientCertificateId")- <*> (x .:? "createdDate")- <*> (x .:? "expirationDate")- <*> (x .:? "description"))--instance Hashable ClientCertificate where--instance NFData ClientCertificate where---- | An immutable representation of a 'RestApi' resource that can be called by users using 'Stages' . A deployment must be associated with a 'Stage' for it to be callable over the Internet.--------- To create a deployment, call @POST@ on the 'Deployments' resource of a 'RestApi' . To view, update, or delete a deployment, call @GET@ , @PATCH@ , or @DELETE@ on the specified deployment resource (@/restapis/{restapi_id}/deployments/{deployment_id}@ ).'RestApi' , 'Deployments' , 'Stage' , <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-deployment.html AWS CLI> , <https://aws.amazon.com/tools/ AWS SDKs>------ /See:/ 'deployment' smart constructor.-data Deployment = Deployment'- { _dApiSummary :: !(Maybe (Map Text (Map Text MethodSnapshot)))- , _dCreatedDate :: !(Maybe POSIX)- , _dId :: !(Maybe Text)- , _dDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Deployment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dApiSummary' - A summary of the 'RestApi' at the date and time that the deployment resource was created.------ * 'dCreatedDate' - The date and time that the deployment resource was created.------ * 'dId' - The identifier for the deployment resource.------ * 'dDescription' - The description for the deployment resource.-deployment- :: Deployment-deployment =- Deployment'- { _dApiSummary = Nothing- , _dCreatedDate = Nothing- , _dId = Nothing- , _dDescription = Nothing- }----- | A summary of the 'RestApi' at the date and time that the deployment resource was created.-dApiSummary :: Lens' Deployment (HashMap Text (HashMap Text MethodSnapshot))-dApiSummary = lens _dApiSummary (\ s a -> s{_dApiSummary = a}) . _Default . _Map;---- | The date and time that the deployment resource was created.-dCreatedDate :: Lens' Deployment (Maybe UTCTime)-dCreatedDate = lens _dCreatedDate (\ s a -> s{_dCreatedDate = a}) . mapping _Time;---- | The identifier for the deployment resource.-dId :: Lens' Deployment (Maybe Text)-dId = lens _dId (\ s a -> s{_dId = a});---- | The description for the deployment resource.-dDescription :: Lens' Deployment (Maybe Text)-dDescription = lens _dDescription (\ s a -> s{_dDescription = a});--instance FromJSON Deployment where- parseJSON- = withObject "Deployment"- (\ x ->- Deployment' <$>- (x .:? "apiSummary" .!= mempty) <*>- (x .:? "createdDate")- <*> (x .:? "id")- <*> (x .:? "description"))--instance Hashable Deployment where--instance NFData Deployment where---- | A documentation part for a targeted API entity.--------- A documentation part consists of a content map (@properties@ ) and a target (@location@ ). The target specifies an API entity to which the documentation content applies. The supported API entity types are @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Valid @location@ fields depend on the API entity type. All valid fields are not required.------ The content map is a JSON string of API-specific key-value pairs. Although an API can use any shape for the content map, only the Swagger-compliant documentation fields will be injected into the associated API entity definition in the exported Swagger definition file.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , 'DocumentationParts'------ /See:/ 'documentationPart' smart constructor.-data DocumentationPart = DocumentationPart'- { _dpLocation :: !(Maybe DocumentationPartLocation)- , _dpId :: !(Maybe Text)- , _dpProperties :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DocumentationPart' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dpLocation' - The location of the API entity to which the documentation applies. Valid fields depend on the targeted API entity type. All the valid location fields are not required. If not explicitly specified, a valid location field is treated as a wildcard and associated documentation content may be inherited by matching entities, unless overridden.------ * 'dpId' - The 'DocumentationPart' identifier, generated by Amazon API Gateway when the @DocumentationPart@ is created.------ * 'dpProperties' - A content map of API-specific key-value pairs describing the targeted API entity. The map must be encoded as a JSON string, e.g., @"{ \"description\": \"The API does ...\" }"@ . Only Swagger-compliant documentation-related fields from the @properties@ map are exported and, hence, published as part of the API entity definitions, while the original documentation parts are exported in a Swagger extension of @x-amazon-apigateway-documentation@ .-documentationPart- :: DocumentationPart-documentationPart =- DocumentationPart'- {_dpLocation = Nothing, _dpId = Nothing, _dpProperties = Nothing}----- | The location of the API entity to which the documentation applies. Valid fields depend on the targeted API entity type. All the valid location fields are not required. If not explicitly specified, a valid location field is treated as a wildcard and associated documentation content may be inherited by matching entities, unless overridden.-dpLocation :: Lens' DocumentationPart (Maybe DocumentationPartLocation)-dpLocation = lens _dpLocation (\ s a -> s{_dpLocation = a});---- | The 'DocumentationPart' identifier, generated by Amazon API Gateway when the @DocumentationPart@ is created.-dpId :: Lens' DocumentationPart (Maybe Text)-dpId = lens _dpId (\ s a -> s{_dpId = a});---- | A content map of API-specific key-value pairs describing the targeted API entity. The map must be encoded as a JSON string, e.g., @"{ \"description\": \"The API does ...\" }"@ . Only Swagger-compliant documentation-related fields from the @properties@ map are exported and, hence, published as part of the API entity definitions, while the original documentation parts are exported in a Swagger extension of @x-amazon-apigateway-documentation@ .-dpProperties :: Lens' DocumentationPart (Maybe Text)-dpProperties = lens _dpProperties (\ s a -> s{_dpProperties = a});--instance FromJSON DocumentationPart where- parseJSON- = withObject "DocumentationPart"- (\ x ->- DocumentationPart' <$>- (x .:? "location") <*> (x .:? "id") <*>- (x .:? "properties"))--instance Hashable DocumentationPart where--instance NFData DocumentationPart where---- | Specifies the target API entity to which the documentation applies.------------ /See:/ 'documentationPartLocation' smart constructor.-data DocumentationPartLocation = DocumentationPartLocation'- { _dplPath :: !(Maybe Text)- , _dplName :: !(Maybe Text)- , _dplMethod :: !(Maybe Text)- , _dplStatusCode :: !(Maybe Text)- , _dplType :: !DocumentationPartType- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DocumentationPartLocation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dplPath' - The URL path of the target. It is a valid field for the API entity types of @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @/@ for the root resource. When an applicable child entity inherits the content of another entity of the same type with more general specifications of the other @location@ attributes, the child entity's @path@ attribute must match that of the parent entity as a prefix.------ * 'dplName' - The name of the targeted API entity. It is a valid and required field for the API entity types of @AUTHORIZER@ , @MODEL@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ and @RESPONSE_HEADER@ . It is an invalid field for any other entity type.------ * 'dplMethod' - The HTTP verb of a method. It is a valid field for the API entity types of @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any method. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @method@ attribute must match that of the parent entity exactly.------ * 'dplStatusCode' - The HTTP status code of a response. It is a valid field for the API entity types of @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any status code. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @statusCode@ attribute must match that of the parent entity exactly.------ * 'dplType' - The type of API entity to which the documentation content applies. It is a valid and required field for API entity types of @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Content inheritance does not apply to any entity of the @API@ , @AUTHORIZER@ , @METHOD@ , @MODEL@ , @REQUEST_BODY@ , or @RESOURCE@ type.-documentationPartLocation- :: DocumentationPartType -- ^ 'dplType'- -> DocumentationPartLocation-documentationPartLocation pType_ =- DocumentationPartLocation'- { _dplPath = Nothing- , _dplName = Nothing- , _dplMethod = Nothing- , _dplStatusCode = Nothing- , _dplType = pType_- }----- | The URL path of the target. It is a valid field for the API entity types of @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @/@ for the root resource. When an applicable child entity inherits the content of another entity of the same type with more general specifications of the other @location@ attributes, the child entity's @path@ attribute must match that of the parent entity as a prefix.-dplPath :: Lens' DocumentationPartLocation (Maybe Text)-dplPath = lens _dplPath (\ s a -> s{_dplPath = a});---- | The name of the targeted API entity. It is a valid and required field for the API entity types of @AUTHORIZER@ , @MODEL@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ and @RESPONSE_HEADER@ . It is an invalid field for any other entity type.-dplName :: Lens' DocumentationPartLocation (Maybe Text)-dplName = lens _dplName (\ s a -> s{_dplName = a});---- | The HTTP verb of a method. It is a valid field for the API entity types of @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any method. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @method@ attribute must match that of the parent entity exactly.-dplMethod :: Lens' DocumentationPartLocation (Maybe Text)-dplMethod = lens _dplMethod (\ s a -> s{_dplMethod = a});---- | The HTTP status code of a response. It is a valid field for the API entity types of @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any status code. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @statusCode@ attribute must match that of the parent entity exactly.-dplStatusCode :: Lens' DocumentationPartLocation (Maybe Text)-dplStatusCode = lens _dplStatusCode (\ s a -> s{_dplStatusCode = a});---- | The type of API entity to which the documentation content applies. It is a valid and required field for API entity types of @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Content inheritance does not apply to any entity of the @API@ , @AUTHORIZER@ , @METHOD@ , @MODEL@ , @REQUEST_BODY@ , or @RESOURCE@ type.-dplType :: Lens' DocumentationPartLocation DocumentationPartType-dplType = lens _dplType (\ s a -> s{_dplType = a});--instance FromJSON DocumentationPartLocation where- parseJSON- = withObject "DocumentationPartLocation"- (\ x ->- DocumentationPartLocation' <$>- (x .:? "path") <*> (x .:? "name") <*>- (x .:? "method")- <*> (x .:? "statusCode")- <*> (x .: "type"))--instance Hashable DocumentationPartLocation where--instance NFData DocumentationPartLocation where--instance ToJSON DocumentationPartLocation where- toJSON DocumentationPartLocation'{..}- = object- (catMaybes- [("path" .=) <$> _dplPath, ("name" .=) <$> _dplName,- ("method" .=) <$> _dplMethod,- ("statusCode" .=) <$> _dplStatusCode,- Just ("type" .= _dplType)])---- | A snapshot of the documentation of an API.--------- Publishing API documentation involves creating a documentation version associated with an API stage and exporting the versioned documentation to an external (e.g., Swagger) file.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , 'DocumentationPart' , 'DocumentationVersions'------ /See:/ 'documentationVersion' smart constructor.-data DocumentationVersion = DocumentationVersion'- { _dvCreatedDate :: !(Maybe POSIX)- , _dvVersion :: !(Maybe Text)- , _dvDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DocumentationVersion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvCreatedDate' - The date when the API documentation snapshot is created.------ * 'dvVersion' - The version identifier of the API documentation snapshot.------ * 'dvDescription' - The description of the API documentation snapshot.-documentationVersion- :: DocumentationVersion-documentationVersion =- DocumentationVersion'- {_dvCreatedDate = Nothing, _dvVersion = Nothing, _dvDescription = Nothing}----- | The date when the API documentation snapshot is created.-dvCreatedDate :: Lens' DocumentationVersion (Maybe UTCTime)-dvCreatedDate = lens _dvCreatedDate (\ s a -> s{_dvCreatedDate = a}) . mapping _Time;---- | The version identifier of the API documentation snapshot.-dvVersion :: Lens' DocumentationVersion (Maybe Text)-dvVersion = lens _dvVersion (\ s a -> s{_dvVersion = a});---- | The description of the API documentation snapshot.-dvDescription :: Lens' DocumentationVersion (Maybe Text)-dvDescription = lens _dvDescription (\ s a -> s{_dvDescription = a});--instance FromJSON DocumentationVersion where- parseJSON- = withObject "DocumentationVersion"- (\ x ->- DocumentationVersion' <$>- (x .:? "createdDate") <*> (x .:? "version") <*>- (x .:? "description"))--instance Hashable DocumentationVersion where--instance NFData DocumentationVersion where---- | Represents a custom domain name as a user-friendly host name of an API ('RestApi' ).--------- When you deploy an API, Amazon API Gateway creates a default host name for the API. This default API host name is of the @{restapi-id}.execute-api.{region}.amazonaws.com@ format. With the default host name, you can access the API's root resource with the URL of @https://{restapi-id}.execute-api.{region}.amazonaws.com/{stage}/@ . When you set up a custom domain name of @apis.example.com@ for this API, you can then access the same resource using the URL of the @https://apis.examples.com/myApi@ , where @myApi@ is the base path mapping ('BasePathMapping' ) of your API under the custom domain name.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-custom-domains.html Set a Custom Host Name for an API>------ /See:/ 'domainName' smart constructor.-data DomainName = DomainName'- { _dnCertificateName :: !(Maybe Text)- , _dnRegionalCertificateARN :: !(Maybe Text)- , _dnCertificateARN :: !(Maybe Text)- , _dnDomainName :: !(Maybe Text)- , _dnRegionalCertificateName :: !(Maybe Text)- , _dnRegionalDomainName :: !(Maybe Text)- , _dnCertificateUploadDate :: !(Maybe POSIX)- , _dnDistributionDomainName :: !(Maybe Text)- , _dnEndpointConfiguration :: !(Maybe EndpointConfiguration)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DomainName' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dnCertificateName' - The name of the certificate that will be used by edge-optimized endpoint for this domain name.------ * 'dnRegionalCertificateARN' - The reference to an AWS-managed certificate that will be used for validating the regional domain name. AWS Certificate Manager is the only supported source.------ * 'dnCertificateARN' - The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source.------ * 'dnDomainName' - The name of the 'DomainName' resource.------ * 'dnRegionalCertificateName' - The name of the certificate that will be used for validating the regional domain name.------ * 'dnRegionalDomainName' - The domain name associated with the regional endpoint for this custom domain name. You set up this association by adding a DNS record that points the custom domain name to this regional domain name. The regional domain name is returned by Amazon API Gateway when you create a regional endpoint.------ * 'dnCertificateUploadDate' - The timestamp when the certificate that was used by edge-optimized endpoint for this domain name was uploaded.------ * 'dnDistributionDomainName' - The domain name of the Amazon CloudFront distribution associated with this custom domain name for an edge-optimized endpoint. You set up this association when adding a DNS record pointing the custom domain name to this distribution name. For more information about CloudFront distributions, see the <http://aws.amazon.com/documentation/cloudfront/ Amazon CloudFront documentation> .------ * 'dnEndpointConfiguration' - The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.-domainName- :: DomainName-domainName =- DomainName'- { _dnCertificateName = Nothing- , _dnRegionalCertificateARN = Nothing- , _dnCertificateARN = Nothing- , _dnDomainName = Nothing- , _dnRegionalCertificateName = Nothing- , _dnRegionalDomainName = Nothing- , _dnCertificateUploadDate = Nothing- , _dnDistributionDomainName = Nothing- , _dnEndpointConfiguration = Nothing- }----- | The name of the certificate that will be used by edge-optimized endpoint for this domain name.-dnCertificateName :: Lens' DomainName (Maybe Text)-dnCertificateName = lens _dnCertificateName (\ s a -> s{_dnCertificateName = a});---- | The reference to an AWS-managed certificate that will be used for validating the regional domain name. AWS Certificate Manager is the only supported source.-dnRegionalCertificateARN :: Lens' DomainName (Maybe Text)-dnRegionalCertificateARN = lens _dnRegionalCertificateARN (\ s a -> s{_dnRegionalCertificateARN = a});---- | The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source.-dnCertificateARN :: Lens' DomainName (Maybe Text)-dnCertificateARN = lens _dnCertificateARN (\ s a -> s{_dnCertificateARN = a});---- | The name of the 'DomainName' resource.-dnDomainName :: Lens' DomainName (Maybe Text)-dnDomainName = lens _dnDomainName (\ s a -> s{_dnDomainName = a});---- | The name of the certificate that will be used for validating the regional domain name.-dnRegionalCertificateName :: Lens' DomainName (Maybe Text)-dnRegionalCertificateName = lens _dnRegionalCertificateName (\ s a -> s{_dnRegionalCertificateName = a});---- | The domain name associated with the regional endpoint for this custom domain name. You set up this association by adding a DNS record that points the custom domain name to this regional domain name. The regional domain name is returned by Amazon API Gateway when you create a regional endpoint.-dnRegionalDomainName :: Lens' DomainName (Maybe Text)-dnRegionalDomainName = lens _dnRegionalDomainName (\ s a -> s{_dnRegionalDomainName = a});---- | The timestamp when the certificate that was used by edge-optimized endpoint for this domain name was uploaded.-dnCertificateUploadDate :: Lens' DomainName (Maybe UTCTime)-dnCertificateUploadDate = lens _dnCertificateUploadDate (\ s a -> s{_dnCertificateUploadDate = a}) . mapping _Time;---- | The domain name of the Amazon CloudFront distribution associated with this custom domain name for an edge-optimized endpoint. You set up this association when adding a DNS record pointing the custom domain name to this distribution name. For more information about CloudFront distributions, see the <http://aws.amazon.com/documentation/cloudfront/ Amazon CloudFront documentation> .-dnDistributionDomainName :: Lens' DomainName (Maybe Text)-dnDistributionDomainName = lens _dnDistributionDomainName (\ s a -> s{_dnDistributionDomainName = a});---- | The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.-dnEndpointConfiguration :: Lens' DomainName (Maybe EndpointConfiguration)-dnEndpointConfiguration = lens _dnEndpointConfiguration (\ s a -> s{_dnEndpointConfiguration = a});--instance FromJSON DomainName where- parseJSON- = withObject "DomainName"- (\ x ->- DomainName' <$>- (x .:? "certificateName") <*>- (x .:? "regionalCertificateArn")- <*> (x .:? "certificateArn")- <*> (x .:? "domainName")- <*> (x .:? "regionalCertificateName")- <*> (x .:? "regionalDomainName")- <*> (x .:? "certificateUploadDate")- <*> (x .:? "distributionDomainName")- <*> (x .:? "endpointConfiguration"))--instance Hashable DomainName where--instance NFData DomainName where---- | The endpoint configuration to indicate the types of endpoints an API ('RestApi' ) or its custom domain name ('DomainName' ) has.------------ /See:/ 'endpointConfiguration' smart constructor.-newtype EndpointConfiguration = EndpointConfiguration'- { _ecTypes :: Maybe [EndpointType]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'EndpointConfiguration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ecTypes' - A list of endpoint types of an API ('RestApi' ) or its custom domain name ('DomainName' ). For an edge-optimized API and its custom domain name, the endpoint type is @"EDGE"@ . For a regional API and its custom domain name, the endpoint type is @REGIONAL@ .-endpointConfiguration- :: EndpointConfiguration-endpointConfiguration = EndpointConfiguration' {_ecTypes = Nothing}----- | A list of endpoint types of an API ('RestApi' ) or its custom domain name ('DomainName' ). For an edge-optimized API and its custom domain name, the endpoint type is @"EDGE"@ . For a regional API and its custom domain name, the endpoint type is @REGIONAL@ .-ecTypes :: Lens' EndpointConfiguration [EndpointType]-ecTypes = lens _ecTypes (\ s a -> s{_ecTypes = a}) . _Default . _Coerce;--instance FromJSON EndpointConfiguration where- parseJSON- = withObject "EndpointConfiguration"- (\ x ->- EndpointConfiguration' <$>- (x .:? "types" .!= mempty))--instance Hashable EndpointConfiguration where--instance NFData EndpointConfiguration where--instance ToJSON EndpointConfiguration where- toJSON EndpointConfiguration'{..}- = object (catMaybes [("types" .=) <$> _ecTypes])---- | A gateway response of a given response type and status code, with optional response parameters and mapping templates.--------- For more information about valid gateway response types, see <http://docs.aws.amazon.com/apigateway/latest/developerguide/supported-gateway-response-types.html Gateway Response Types Supported by Amazon API Gateway> __Example: Get a Gateway Response of a given response type__--- __Request__--- This example shows how to get a gateway response of the @MISSING_AUTHNETICATION_TOKEN@ type.------ @@GET /restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN HTTP/1.1 Host: beta-apigateway.us-east-1.amazonaws.com Content-Type: application/json X-Amz-Date: 20170503T202516Z Authorization: AWS4-HMAC-SHA256 Credential={access-key-id}/20170503/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature=1b52460e3159c1a26cff29093855d50ea141c1c5b937528fecaf60f51129697a Cache-Control: no-cache Postman-Token: 3b2a1ce9-c848-2e26-2e2f-9c2caefbed45 @ @ The response type is specified as a URL path.------ __Response__--- The successful operation returns the @200 OK@ status code and a payload similar to the following:------ @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-gatewayresponse-{rel}.html", "name": "gatewayresponse", "templated": true }, "self": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" }, "gatewayresponse:delete": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" }, "gatewayresponse:put": { "href": "/restapis/o81lxisefl/gatewayresponses/{response_type}", "templated": true }, "gatewayresponse:update": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" } }, "defaultResponse": false, "responseParameters": { "gatewayresponse.header.x-request-path": "method.request.path.petId", "gatewayresponse.header.Access-Control-Allow-Origin": "'a.b.c'", "gatewayresponse.header.x-request-query": "method.request.querystring.q", "gatewayresponse.header.x-request-header": "method.request.header.Accept" }, "responseTemplates": { "application/json": "{\n \"message\": $context.error.messageString,\n \"type\": \"$context.error.responseType\",\n \"stage\": \"$context.stage\",\n \"resourcePath\": \"$context.resourcePath\",\n \"stageVariables.a\": \"$stageVariables.a\",\n \"statusCode\": \"'404'\"\n}" }, "responseType": "MISSING_AUTHENTICATION_TOKEN", "statusCode": "404" }@ @------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/customize-gateway-responses.html Customize Gateway Responses>------ /See:/ 'gatewayResponse' smart constructor.-data GatewayResponse = GatewayResponse'- { _gDefaultResponse :: !(Maybe Bool)- , _gResponseTemplates :: !(Maybe (Map Text Text))- , _gResponseType :: !(Maybe GatewayResponseType)- , _gStatusCode :: !(Maybe Text)- , _gResponseParameters :: !(Maybe (Map Text Text))- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'GatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gDefaultResponse' - A Boolean flag to indicate whether this 'GatewayResponse' is the default gateway response (@true@ ) or not (@false@ ). A default gateway response is one generated by Amazon API Gateway without any customization by an API developer.------ * 'gResponseTemplates' - Response templates of the 'GatewayResponse' as a string-to-string map of key-value pairs.------ * 'gResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES------ * 'gStatusCode' - The HTTP status code for this 'GatewayResponse' .------ * 'gResponseParameters' - Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs.-gatewayResponse- :: GatewayResponse-gatewayResponse =- GatewayResponse'- { _gDefaultResponse = Nothing- , _gResponseTemplates = Nothing- , _gResponseType = Nothing- , _gStatusCode = Nothing- , _gResponseParameters = Nothing- }----- | A Boolean flag to indicate whether this 'GatewayResponse' is the default gateway response (@true@ ) or not (@false@ ). A default gateway response is one generated by Amazon API Gateway without any customization by an API developer.-gDefaultResponse :: Lens' GatewayResponse (Maybe Bool)-gDefaultResponse = lens _gDefaultResponse (\ s a -> s{_gDefaultResponse = a});---- | Response templates of the 'GatewayResponse' as a string-to-string map of key-value pairs.-gResponseTemplates :: Lens' GatewayResponse (HashMap Text Text)-gResponseTemplates = lens _gResponseTemplates (\ s a -> s{_gResponseTemplates = a}) . _Default . _Map;---- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES-gResponseType :: Lens' GatewayResponse (Maybe GatewayResponseType)-gResponseType = lens _gResponseType (\ s a -> s{_gResponseType = a});---- | The HTTP status code for this 'GatewayResponse' .-gStatusCode :: Lens' GatewayResponse (Maybe Text)-gStatusCode = lens _gStatusCode (\ s a -> s{_gStatusCode = a});---- | Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs.-gResponseParameters :: Lens' GatewayResponse (HashMap Text Text)-gResponseParameters = lens _gResponseParameters (\ s a -> s{_gResponseParameters = a}) . _Default . _Map;--instance FromJSON GatewayResponse where- parseJSON- = withObject "GatewayResponse"- (\ x ->- GatewayResponse' <$>- (x .:? "defaultResponse") <*>- (x .:? "responseTemplates" .!= mempty)- <*> (x .:? "responseType")- <*> (x .:? "statusCode")- <*> (x .:? "responseParameters" .!= mempty))--instance Hashable GatewayResponse where--instance NFData GatewayResponse where---- | Represents an HTTP, HTTP_PROXY, AWS, AWS_PROXY, or Mock integration.--------- In the API Gateway console, the built-in Lambda integration is an AWS integration.<http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>------ /See:/ 'integration' smart constructor.-data Integration = Integration'- { _iHttpMethod :: !(Maybe Text)- , _iRequestTemplates :: !(Maybe (Map Text Text))- , _iCredentials :: !(Maybe Text)- , _iRequestParameters :: !(Maybe (Map Text Text))- , _iContentHandling :: !(Maybe ContentHandlingStrategy)- , _iPassthroughBehavior :: !(Maybe Text)- , _iUri :: !(Maybe Text)- , _iIntegrationResponses :: !(Maybe (Map Text IntegrationResponse))- , _iCacheNamespace :: !(Maybe Text)- , _iType :: !(Maybe IntegrationType)- , _iCacheKeyParameters :: !(Maybe [Text])- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Integration' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iHttpMethod' - Specifies the integration's HTTP method type.------ * 'iRequestTemplates' - Represents a map of Velocity templates that are applied on the request payload based on the value of the Content-Type header sent by the client. The content type value is the key in this map, and the template (as a String) is the value.------ * 'iCredentials' - Specifies the credentials required for the integration, if any. For AWS integrations, three options are available. To specify an IAM Role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To require that the caller's identity be passed through from the request, specify the string @arn:aws:iam::\*:user/\*@ . To use resource-based permissions on supported AWS services, specify null.------ * 'iRequestParameters' - A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name.------ * 'iContentHandling' - Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through.------ * 'iPassthroughBehavior' - Specifies how the method request body of an unmapped content type will be passed through the integration request to the back end without transformation. A content type is unmapped if no mapping template is defined in the integration or the content type does not match any of the mapped content types, as specified in @requestTemplates@ . There are three valid values: @WHEN_NO_MATCH@ , @WHEN_NO_TEMPLATES@ , and @NEVER@ . * @WHEN_NO_MATCH@ passes the method request body through the integration request to the back end without transformation when the method request content type does not match any content type associated with the mapping templates defined in the integration request. * @WHEN_NO_TEMPLATES@ passes the method request body through the integration request to the back end without transformation when no mapping template is defined in the integration request. If a template is defined when this option is selected, the method request of an unmapped content-type will be rejected with an HTTP @415 Unsupported Media Type@ response. * @NEVER@ rejects the method request with an HTTP @415 Unsupported Media Type@ response when either the method request content type does not match any content type associated with the mapping templates defined in the integration request or no mapping template is defined in the integration request.------ * 'iUri' - Specifies the integration's Uniform Resource Identifier (URI). For HTTP integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> . For AWS integrations, the URI should be of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:{path|action}/{service_api}@ . @Region@ , @subdomain@ and @service@ are used to determine the right endpoint. For AWS services that use the @Action=@ query string parameter, @service_api@ should be a valid action for the desired service. For RESTful AWS service APIs, @path@ is used to indicate that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ .------ * 'iIntegrationResponses' - Specifies the integration's responses. __Example: Get integration responses of a method__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160607T191449Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160607/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__ The successful response returns @200 OK@ status and a payload as follows: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>------ * 'iCacheNamespace' - Specifies the integration's cache namespace.------ * 'iType' - Specifies the integration's type. The valid value is @HTTP@ for integrating with an HTTP back end, @AWS@ for any AWS service endpoints, @MOCK@ for testing without actually invoking the back end, @HTTP_PROXY@ for integrating with the HTTP proxy integration, or @AWS_PROXY@ for integrating with the Lambda proxy integration type.------ * 'iCacheKeyParameters' - Specifies the integration's cache key parameters.-integration- :: Integration-integration =- Integration'- { _iHttpMethod = Nothing- , _iRequestTemplates = Nothing- , _iCredentials = Nothing- , _iRequestParameters = Nothing- , _iContentHandling = Nothing- , _iPassthroughBehavior = Nothing- , _iUri = Nothing- , _iIntegrationResponses = Nothing- , _iCacheNamespace = Nothing- , _iType = Nothing- , _iCacheKeyParameters = Nothing- }----- | Specifies the integration's HTTP method type.-iHttpMethod :: Lens' Integration (Maybe Text)-iHttpMethod = lens _iHttpMethod (\ s a -> s{_iHttpMethod = a});---- | Represents a map of Velocity templates that are applied on the request payload based on the value of the Content-Type header sent by the client. The content type value is the key in this map, and the template (as a String) is the value.-iRequestTemplates :: Lens' Integration (HashMap Text Text)-iRequestTemplates = lens _iRequestTemplates (\ s a -> s{_iRequestTemplates = a}) . _Default . _Map;---- | Specifies the credentials required for the integration, if any. For AWS integrations, three options are available. To specify an IAM Role for Amazon API Gateway to assume, use the role's Amazon Resource Name (ARN). To require that the caller's identity be passed through from the request, specify the string @arn:aws:iam::\*:user/\*@ . To use resource-based permissions on supported AWS services, specify null.-iCredentials :: Lens' Integration (Maybe Text)-iCredentials = lens _iCredentials (\ s a -> s{_iCredentials = a});---- | A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name.-iRequestParameters :: Lens' Integration (HashMap Text Text)-iRequestParameters = lens _iRequestParameters (\ s a -> s{_iRequestParameters = a}) . _Default . _Map;---- | Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through.-iContentHandling :: Lens' Integration (Maybe ContentHandlingStrategy)-iContentHandling = lens _iContentHandling (\ s a -> s{_iContentHandling = a});---- | Specifies how the method request body of an unmapped content type will be passed through the integration request to the back end without transformation. A content type is unmapped if no mapping template is defined in the integration or the content type does not match any of the mapped content types, as specified in @requestTemplates@ . There are three valid values: @WHEN_NO_MATCH@ , @WHEN_NO_TEMPLATES@ , and @NEVER@ . * @WHEN_NO_MATCH@ passes the method request body through the integration request to the back end without transformation when the method request content type does not match any content type associated with the mapping templates defined in the integration request. * @WHEN_NO_TEMPLATES@ passes the method request body through the integration request to the back end without transformation when no mapping template is defined in the integration request. If a template is defined when this option is selected, the method request of an unmapped content-type will be rejected with an HTTP @415 Unsupported Media Type@ response. * @NEVER@ rejects the method request with an HTTP @415 Unsupported Media Type@ response when either the method request content type does not match any content type associated with the mapping templates defined in the integration request or no mapping template is defined in the integration request.-iPassthroughBehavior :: Lens' Integration (Maybe Text)-iPassthroughBehavior = lens _iPassthroughBehavior (\ s a -> s{_iPassthroughBehavior = a});---- | Specifies the integration's Uniform Resource Identifier (URI). For HTTP integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> . For AWS integrations, the URI should be of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:{path|action}/{service_api}@ . @Region@ , @subdomain@ and @service@ are used to determine the right endpoint. For AWS services that use the @Action=@ query string parameter, @service_api@ should be a valid action for the desired service. For RESTful AWS service APIs, @path@ is used to indicate that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ .-iUri :: Lens' Integration (Maybe Text)-iUri = lens _iUri (\ s a -> s{_iUri = a});---- | Specifies the integration's responses. __Example: Get integration responses of a method__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160607T191449Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160607/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__ The successful response returns @200 OK@ status and a payload as follows: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>-iIntegrationResponses :: Lens' Integration (HashMap Text IntegrationResponse)-iIntegrationResponses = lens _iIntegrationResponses (\ s a -> s{_iIntegrationResponses = a}) . _Default . _Map;---- | Specifies the integration's cache namespace.-iCacheNamespace :: Lens' Integration (Maybe Text)-iCacheNamespace = lens _iCacheNamespace (\ s a -> s{_iCacheNamespace = a});---- | Specifies the integration's type. The valid value is @HTTP@ for integrating with an HTTP back end, @AWS@ for any AWS service endpoints, @MOCK@ for testing without actually invoking the back end, @HTTP_PROXY@ for integrating with the HTTP proxy integration, or @AWS_PROXY@ for integrating with the Lambda proxy integration type.-iType :: Lens' Integration (Maybe IntegrationType)-iType = lens _iType (\ s a -> s{_iType = a});---- | Specifies the integration's cache key parameters.-iCacheKeyParameters :: Lens' Integration [Text]-iCacheKeyParameters = lens _iCacheKeyParameters (\ s a -> s{_iCacheKeyParameters = a}) . _Default . _Coerce;--instance FromJSON Integration where- parseJSON- = withObject "Integration"- (\ x ->- Integration' <$>- (x .:? "httpMethod") <*>- (x .:? "requestTemplates" .!= mempty)- <*> (x .:? "credentials")- <*> (x .:? "requestParameters" .!= mempty)- <*> (x .:? "contentHandling")- <*> (x .:? "passthroughBehavior")- <*> (x .:? "uri")- <*> (x .:? "integrationResponses" .!= mempty)- <*> (x .:? "cacheNamespace")- <*> (x .:? "type")- <*> (x .:? "cacheKeyParameters" .!= mempty))--instance Hashable Integration where--instance NFData Integration where---- | Represents an integration response. The status code must map to an existing 'MethodResponse' , and parameters and templates can be used to transform the back-end response.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>------ /See:/ 'integrationResponse' smart constructor.-data IntegrationResponse = IntegrationResponse'- { _intContentHandling :: !(Maybe ContentHandlingStrategy)- , _intResponseTemplates :: !(Maybe (Map Text Text))- , _intSelectionPattern :: !(Maybe Text)- , _intStatusCode :: !(Maybe Text)- , _intResponseParameters :: !(Maybe (Map Text Text))- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'IntegrationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'intContentHandling' - Specifies how to handle response payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a response payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a response payload from a binary blob to a Base64-encoded string. If this property is not defined, the response payload will be passed through from the integration response to the method response without modification.------ * 'intResponseTemplates' - Specifies the templates used to transform the integration response body. Response templates are represented as a key/value map, with a content-type as the key and a template as the value.------ * 'intSelectionPattern' - Specifies the regular expression (regex) pattern used to choose an integration response based on the response from the back end. For example, if the success response returns nothing and the error response returns some string, you could use the @.+@ regex to match error response. However, make sure that the error response does not contain any newline (@\n@ ) character in such cases. If the back end is an AWS Lambda function, the AWS Lambda function error header is matched. For all other HTTP and AWS back ends, the HTTP status code is matched.------ * 'intStatusCode' - Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .------ * 'intResponseParameters' - A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ is a valid and unique response header name and @JSON-expression@ is a valid JSON expression without the @> @ prefix.-integrationResponse- :: IntegrationResponse-integrationResponse =- IntegrationResponse'- { _intContentHandling = Nothing- , _intResponseTemplates = Nothing- , _intSelectionPattern = Nothing- , _intStatusCode = Nothing- , _intResponseParameters = Nothing- }----- | Specifies how to handle response payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a response payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a response payload from a binary blob to a Base64-encoded string. If this property is not defined, the response payload will be passed through from the integration response to the method response without modification.-intContentHandling :: Lens' IntegrationResponse (Maybe ContentHandlingStrategy)-intContentHandling = lens _intContentHandling (\ s a -> s{_intContentHandling = a});---- | Specifies the templates used to transform the integration response body. Response templates are represented as a key/value map, with a content-type as the key and a template as the value.-intResponseTemplates :: Lens' IntegrationResponse (HashMap Text Text)-intResponseTemplates = lens _intResponseTemplates (\ s a -> s{_intResponseTemplates = a}) . _Default . _Map;---- | Specifies the regular expression (regex) pattern used to choose an integration response based on the response from the back end. For example, if the success response returns nothing and the error response returns some string, you could use the @.+@ regex to match error response. However, make sure that the error response does not contain any newline (@\n@ ) character in such cases. If the back end is an AWS Lambda function, the AWS Lambda function error header is matched. For all other HTTP and AWS back ends, the HTTP status code is matched.-intSelectionPattern :: Lens' IntegrationResponse (Maybe Text)-intSelectionPattern = lens _intSelectionPattern (\ s a -> s{_intSelectionPattern = a});---- | Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .-intStatusCode :: Lens' IntegrationResponse (Maybe Text)-intStatusCode = lens _intStatusCode (\ s a -> s{_intStatusCode = a});---- | A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ is a valid and unique response header name and @JSON-expression@ is a valid JSON expression without the @> @ prefix.-intResponseParameters :: Lens' IntegrationResponse (HashMap Text Text)-intResponseParameters = lens _intResponseParameters (\ s a -> s{_intResponseParameters = a}) . _Default . _Map;--instance FromJSON IntegrationResponse where- parseJSON- = withObject "IntegrationResponse"- (\ x ->- IntegrationResponse' <$>- (x .:? "contentHandling") <*>- (x .:? "responseTemplates" .!= mempty)- <*> (x .:? "selectionPattern")- <*> (x .:? "statusCode")- <*> (x .:? "responseParameters" .!= mempty))--instance Hashable IntegrationResponse where--instance NFData IntegrationResponse where---- | Represents a client-facing interface by which the client calls the API to access back-end resources. A __Method__ resource is integrated with an 'Integration' resource. Both consist of a request and one or more responses. The method request takes the client input that is passed to the back end through the integration request. A method response returns the output from the back end to the client through an integration response. A method request is embodied in a __Method__ resource, whereas an integration request is embodied in an 'Integration' resource. On the other hand, a method response is represented by a 'MethodResponse' resource, whereas an integration response is represented by an 'IntegrationResponse' resource.--------------- __Example: Retrive the GET method on a specified resource__--- __Request__--- The following example request retrieves the information about the GET method on an API resource (@3kzxbg5sa2@ ) of an API (@fugvjdxtri@ ).------ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160603T210259Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160603/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__--- The successful response returns a @200 OK@ status code and a payload similar to the following:------ @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": true, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E%23foreach(%24stream%20in%20%24input.path(%27%24.StreamNames%27))%3Cstream%3E%3Cname%3E%24stream%3C%2Fname%3E%3C%2Fstream%3E%23end%3C%2FkinesisStreams%3E\")" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ In the example above, the response template for the @200 OK@ response maps the JSON output from the @ListStreams@ action in the back end to an XML output. The mapping template is URL-encoded as @%3CkinesisStreams%3E%23foreach(%24stream%20in%20%24input.path(%27%24.StreamNames%27))%3Cstream%3E%3Cname%3E%24stream%3C%2Fname%3E%3C%2Fstream%3E%23end%3C%2FkinesisStreams%3E@ and the output is decoded using the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-mapping-template-reference.html#util-templat-reference > util.urlDecode()> helper function.------ 'MethodResponse' , 'Integration' , 'IntegrationResponse' , 'Resource' , <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-method-settings.html Set up an API's method>------ /See:/ 'method' smart constructor.-data Method = Method'- { _mMethodResponses :: !(Maybe (Map Text MethodResponse))- , _mHttpMethod :: !(Maybe Text)- , _mRequestValidatorId :: !(Maybe Text)- , _mRequestModels :: !(Maybe (Map Text Text))- , _mRequestParameters :: !(Maybe (Map Text Bool))- , _mAuthorizerId :: !(Maybe Text)- , _mOperationName :: !(Maybe Text)- , _mAuthorizationType :: !(Maybe Text)- , _mApiKeyRequired :: !(Maybe Bool)- , _mMethodIntegration :: !(Maybe Integration)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Method' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mMethodResponses' - Gets a method response associated with a given HTTP status code. The collection of method responses are encapsulated in a key-value map, where the key is a response's HTTP status code and the value is a 'MethodResponse' resource that specifies the response returned to the caller from the back end through the integration response. __Example: Get a 200 OK response of a GET method__ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T215008Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.operator": false, "method.response.header.operand_2": false, "method.response.header.operand_1": false }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-method-response.html AWS CLI>------ * 'mHttpMethod' - The method's HTTP verb.------ * 'mRequestValidatorId' - The identifier of a 'RequestValidator' for request validation.------ * 'mRequestModels' - A key-value map specifying data schemas, represented by 'Model' resources, (as the mapped value) of the request payloads of given content types (as the mapping key).------ * 'mRequestParameters' - A key-value map defining required or optional method request parameters that can be accepted by Amazon API Gateway. A key is a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or templates.------ * 'mAuthorizerId' - The identifier of an 'Authorizer' to use on this method. The @authorizationType@ must be @CUSTOM@ .------ * 'mOperationName' - A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example.------ * 'mAuthorizationType' - The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.------ * 'mApiKeyRequired' - A boolean flag specifying whether a valid 'ApiKey' is required to invoke this method.------ * 'mMethodIntegration' - Gets the method's integration responsible for passing the client-submitted request to the back end and performing necessary transformations to make the request compliant with the back end. __Example: __ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T213210Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true } ], "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:responses": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "0cjtch", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestTemplates": { "application/json": "{\n \"a\": \"$input.params('operand1')\",\n \"b\": \"$input.params('operand2')\", \n \"op\": \"$input.params('operator')\" \n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-west-2:lambda:path//2015-03-31/functions/arn:aws:lambda:us-west-2:123456789012:function:Calc/invocations", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.operator": "integration.response.body.op", "method.response.header.operand_2": "integration.response.body.b", "method.response.header.operand_1": "integration.response.body.a" }, "responseTemplates": { "application/json": "#set($res = $input.path('$'))\n{\n \"result\": \"$res.a, $res.b, $res.op => $res.c\",\n \"a\" : \"$res.a\",\n \"b\" : \"$res.b\",\n \"op\" : \"$res.op\",\n \"c\" : \"$res.c\"\n}" }, "selectionPattern": "", "statusCode": "200" } } }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-integration.html AWS CLI>-method- :: Method-method =- Method'- { _mMethodResponses = Nothing- , _mHttpMethod = Nothing- , _mRequestValidatorId = Nothing- , _mRequestModels = Nothing- , _mRequestParameters = Nothing- , _mAuthorizerId = Nothing- , _mOperationName = Nothing- , _mAuthorizationType = Nothing- , _mApiKeyRequired = Nothing- , _mMethodIntegration = Nothing- }----- | Gets a method response associated with a given HTTP status code. The collection of method responses are encapsulated in a key-value map, where the key is a response's HTTP status code and the value is a 'MethodResponse' resource that specifies the response returned to the caller from the back end through the integration response. __Example: Get a 200 OK response of a GET method__ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T215008Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.operator": false, "method.response.header.operand_2": false, "method.response.header.operand_1": false }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-method-response.html AWS CLI>-mMethodResponses :: Lens' Method (HashMap Text MethodResponse)-mMethodResponses = lens _mMethodResponses (\ s a -> s{_mMethodResponses = a}) . _Default . _Map;---- | The method's HTTP verb.-mHttpMethod :: Lens' Method (Maybe Text)-mHttpMethod = lens _mHttpMethod (\ s a -> s{_mHttpMethod = a});---- | The identifier of a 'RequestValidator' for request validation.-mRequestValidatorId :: Lens' Method (Maybe Text)-mRequestValidatorId = lens _mRequestValidatorId (\ s a -> s{_mRequestValidatorId = a});---- | A key-value map specifying data schemas, represented by 'Model' resources, (as the mapped value) of the request payloads of given content types (as the mapping key).-mRequestModels :: Lens' Method (HashMap Text Text)-mRequestModels = lens _mRequestModels (\ s a -> s{_mRequestModels = a}) . _Default . _Map;---- | A key-value map defining required or optional method request parameters that can be accepted by Amazon API Gateway. A key is a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or templates.-mRequestParameters :: Lens' Method (HashMap Text Bool)-mRequestParameters = lens _mRequestParameters (\ s a -> s{_mRequestParameters = a}) . _Default . _Map;---- | The identifier of an 'Authorizer' to use on this method. The @authorizationType@ must be @CUSTOM@ .-mAuthorizerId :: Lens' Method (Maybe Text)-mAuthorizerId = lens _mAuthorizerId (\ s a -> s{_mAuthorizerId = a});---- | A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example.-mOperationName :: Lens' Method (Maybe Text)-mOperationName = lens _mOperationName (\ s a -> s{_mOperationName = a});---- | The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.-mAuthorizationType :: Lens' Method (Maybe Text)-mAuthorizationType = lens _mAuthorizationType (\ s a -> s{_mAuthorizationType = a});---- | A boolean flag specifying whether a valid 'ApiKey' is required to invoke this method.-mApiKeyRequired :: Lens' Method (Maybe Bool)-mApiKeyRequired = lens _mApiKeyRequired (\ s a -> s{_mApiKeyRequired = a});---- | Gets the method's integration responsible for passing the client-submitted request to the back end and performing necessary transformations to make the request compliant with the back end. __Example: __ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T213210Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true } ], "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:responses": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "0cjtch", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestTemplates": { "application/json": "{\n \"a\": \"$input.params('operand1')\",\n \"b\": \"$input.params('operand2')\", \n \"op\": \"$input.params('operator')\" \n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-west-2:lambda:path//2015-03-31/functions/arn:aws:lambda:us-west-2:123456789012:function:Calc/invocations", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.operator": "integration.response.body.op", "method.response.header.operand_2": "integration.response.body.b", "method.response.header.operand_1": "integration.response.body.a" }, "responseTemplates": { "application/json": "#set($res = $input.path('$'))\n{\n \"result\": \"$res.a, $res.b, $res.op => $res.c\",\n \"a\" : \"$res.a\",\n \"b\" : \"$res.b\",\n \"op\" : \"$res.op\",\n \"c\" : \"$res.c\"\n}" }, "selectionPattern": "", "statusCode": "200" } } }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-integration.html AWS CLI>-mMethodIntegration :: Lens' Method (Maybe Integration)-mMethodIntegration = lens _mMethodIntegration (\ s a -> s{_mMethodIntegration = a});--instance FromJSON Method where- parseJSON- = withObject "Method"- (\ x ->- Method' <$>- (x .:? "methodResponses" .!= mempty) <*>- (x .:? "httpMethod")- <*> (x .:? "requestValidatorId")- <*> (x .:? "requestModels" .!= mempty)- <*> (x .:? "requestParameters" .!= mempty)- <*> (x .:? "authorizerId")- <*> (x .:? "operationName")- <*> (x .:? "authorizationType")- <*> (x .:? "apiKeyRequired")- <*> (x .:? "methodIntegration"))--instance Hashable Method where--instance NFData Method where---- | Represents a method response of a given HTTP status code returned to the client. The method response is passed from the back end through the associated integration response that can be transformed using a mapping template.--------------- __Example: A __MethodResponse__ instance of an API__--- __Request__--- The example request retrieves a __MethodResponse__ of the 200 status code.------ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160603T222952Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160603/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__--- The successful response returns @200 OK@ status and a payload as follows:------ @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" }@ @------ 'Method' , 'IntegrationResponse' , 'Integration' <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>------ /See:/ 'methodResponse' smart constructor.-data MethodResponse = MethodResponse'- { _mResponseModels :: !(Maybe (Map Text Text))- , _mStatusCode :: !(Maybe Text)- , _mResponseParameters :: !(Maybe (Map Text Bool))- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'MethodResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mResponseModels' - Specifies the 'Model' resources used for the response's content-type. Response models are represented as a key/value map, with a content-type as the key and a 'Model' name as the value.------ * 'mStatusCode' - The method response's status code.------ * 'mResponseParameters' - A key-value map specifying required or optional response parameters that Amazon API Gateway can send back to the caller. A key defines a method response header and the value specifies whether the associated method response header is required or not. The expression of the key must match the pattern @method.response.header.{name}@ , where @name@ is a valid and unique header name. Amazon API Gateway passes certain integration response data to the method response headers specified here according to the mapping you prescribe in the API's 'IntegrationResponse' . The integration response data that can be mapped include an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)-methodResponse- :: MethodResponse-methodResponse =- MethodResponse'- { _mResponseModels = Nothing- , _mStatusCode = Nothing- , _mResponseParameters = Nothing- }----- | Specifies the 'Model' resources used for the response's content-type. Response models are represented as a key/value map, with a content-type as the key and a 'Model' name as the value.-mResponseModels :: Lens' MethodResponse (HashMap Text Text)-mResponseModels = lens _mResponseModels (\ s a -> s{_mResponseModels = a}) . _Default . _Map;---- | The method response's status code.-mStatusCode :: Lens' MethodResponse (Maybe Text)-mStatusCode = lens _mStatusCode (\ s a -> s{_mStatusCode = a});---- | A key-value map specifying required or optional response parameters that Amazon API Gateway can send back to the caller. A key defines a method response header and the value specifies whether the associated method response header is required or not. The expression of the key must match the pattern @method.response.header.{name}@ , where @name@ is a valid and unique header name. Amazon API Gateway passes certain integration response data to the method response headers specified here according to the mapping you prescribe in the API's 'IntegrationResponse' . The integration response data that can be mapped include an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)-mResponseParameters :: Lens' MethodResponse (HashMap Text Bool)-mResponseParameters = lens _mResponseParameters (\ s a -> s{_mResponseParameters = a}) . _Default . _Map;--instance FromJSON MethodResponse where- parseJSON- = withObject "MethodResponse"- (\ x ->- MethodResponse' <$>- (x .:? "responseModels" .!= mempty) <*>- (x .:? "statusCode")- <*> (x .:? "responseParameters" .!= mempty))--instance Hashable MethodResponse where--instance NFData MethodResponse where---- | Specifies the method setting properties.------------ /See:/ 'methodSetting' smart constructor.-data MethodSetting = MethodSetting'- { _msCacheTtlInSeconds :: !(Maybe Int)- , _msDataTraceEnabled :: !(Maybe Bool)- , _msThrottlingBurstLimit :: !(Maybe Int)- , _msCacheDataEncrypted :: !(Maybe Bool)- , _msLoggingLevel :: !(Maybe Text)- , _msRequireAuthorizationForCacheControl :: !(Maybe Bool)- , _msCachingEnabled :: !(Maybe Bool)- , _msMetricsEnabled :: !(Maybe Bool)- , _msThrottlingRateLimit :: !(Maybe Double)- , _msUnauthorizedCacheControlHeaderStrategy :: !(Maybe UnauthorizedCacheControlHeaderStrategy)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'MethodSetting' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'msCacheTtlInSeconds' - Specifies the time to live (TTL), in seconds, for cached responses. The higher the TTL, the longer the response will be cached. The PATCH path for this setting is @/{method_setting_key}/caching/ttlInSeconds@ , and the value is an integer.------ * 'msDataTraceEnabled' - Specifies whether data trace logging is enabled for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/dataTrace@ , and the value is a Boolean.------ * 'msThrottlingBurstLimit' - Specifies the throttling burst limit. The PATCH path for this setting is @/{method_setting_key}/throttling/burstLimit@ , and the value is an integer.------ * 'msCacheDataEncrypted' - Specifies whether the cached responses are encrypted. The PATCH path for this setting is @/{method_setting_key}/caching/dataEncrypted@ , and the value is a Boolean.------ * 'msLoggingLevel' - Specifies the logging level for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/loglevel@ , and the available levels are @OFF@ , @ERROR@ , and @INFO@ .------ * 'msRequireAuthorizationForCacheControl' - Specifies whether authorization is required for a cache invalidation request. The PATCH path for this setting is @/{method_setting_key}/caching/requireAuthorizationForCacheControl@ , and the value is a Boolean.------ * 'msCachingEnabled' - Specifies whether responses should be cached and returned for requests. A cache cluster must be enabled on the stage for responses to be cached. The PATCH path for this setting is @/{method_setting_key}/caching/enabled@ , and the value is a Boolean.------ * 'msMetricsEnabled' - Specifies whether Amazon CloudWatch metrics are enabled for this method. The PATCH path for this setting is @/{method_setting_key}/metrics/enabled@ , and the value is a Boolean.------ * 'msThrottlingRateLimit' - Specifies the throttling rate limit. The PATCH path for this setting is @/{method_setting_key}/throttling/rateLimit@ , and the value is a double.------ * 'msUnauthorizedCacheControlHeaderStrategy' - Specifies how to handle unauthorized requests for cache invalidation. The PATCH path for this setting is @/{method_setting_key}/caching/unauthorizedCacheControlHeaderStrategy@ , and the available values are @FAIL_WITH_403@ , @SUCCEED_WITH_RESPONSE_HEADER@ , @SUCCEED_WITHOUT_RESPONSE_HEADER@ .-methodSetting- :: MethodSetting-methodSetting =- MethodSetting'- { _msCacheTtlInSeconds = Nothing- , _msDataTraceEnabled = Nothing- , _msThrottlingBurstLimit = Nothing- , _msCacheDataEncrypted = Nothing- , _msLoggingLevel = Nothing- , _msRequireAuthorizationForCacheControl = Nothing- , _msCachingEnabled = Nothing- , _msMetricsEnabled = Nothing- , _msThrottlingRateLimit = Nothing- , _msUnauthorizedCacheControlHeaderStrategy = Nothing- }----- | Specifies the time to live (TTL), in seconds, for cached responses. The higher the TTL, the longer the response will be cached. The PATCH path for this setting is @/{method_setting_key}/caching/ttlInSeconds@ , and the value is an integer.-msCacheTtlInSeconds :: Lens' MethodSetting (Maybe Int)-msCacheTtlInSeconds = lens _msCacheTtlInSeconds (\ s a -> s{_msCacheTtlInSeconds = a});---- | Specifies whether data trace logging is enabled for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/dataTrace@ , and the value is a Boolean.-msDataTraceEnabled :: Lens' MethodSetting (Maybe Bool)-msDataTraceEnabled = lens _msDataTraceEnabled (\ s a -> s{_msDataTraceEnabled = a});---- | Specifies the throttling burst limit. The PATCH path for this setting is @/{method_setting_key}/throttling/burstLimit@ , and the value is an integer.-msThrottlingBurstLimit :: Lens' MethodSetting (Maybe Int)-msThrottlingBurstLimit = lens _msThrottlingBurstLimit (\ s a -> s{_msThrottlingBurstLimit = a});---- | Specifies whether the cached responses are encrypted. The PATCH path for this setting is @/{method_setting_key}/caching/dataEncrypted@ , and the value is a Boolean.-msCacheDataEncrypted :: Lens' MethodSetting (Maybe Bool)-msCacheDataEncrypted = lens _msCacheDataEncrypted (\ s a -> s{_msCacheDataEncrypted = a});---- | Specifies the logging level for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/loglevel@ , and the available levels are @OFF@ , @ERROR@ , and @INFO@ .-msLoggingLevel :: Lens' MethodSetting (Maybe Text)-msLoggingLevel = lens _msLoggingLevel (\ s a -> s{_msLoggingLevel = a});---- | Specifies whether authorization is required for a cache invalidation request. The PATCH path for this setting is @/{method_setting_key}/caching/requireAuthorizationForCacheControl@ , and the value is a Boolean.-msRequireAuthorizationForCacheControl :: Lens' MethodSetting (Maybe Bool)-msRequireAuthorizationForCacheControl = lens _msRequireAuthorizationForCacheControl (\ s a -> s{_msRequireAuthorizationForCacheControl = a});---- | Specifies whether responses should be cached and returned for requests. A cache cluster must be enabled on the stage for responses to be cached. The PATCH path for this setting is @/{method_setting_key}/caching/enabled@ , and the value is a Boolean.-msCachingEnabled :: Lens' MethodSetting (Maybe Bool)-msCachingEnabled = lens _msCachingEnabled (\ s a -> s{_msCachingEnabled = a});---- | Specifies whether Amazon CloudWatch metrics are enabled for this method. The PATCH path for this setting is @/{method_setting_key}/metrics/enabled@ , and the value is a Boolean.-msMetricsEnabled :: Lens' MethodSetting (Maybe Bool)-msMetricsEnabled = lens _msMetricsEnabled (\ s a -> s{_msMetricsEnabled = a});---- | Specifies the throttling rate limit. The PATCH path for this setting is @/{method_setting_key}/throttling/rateLimit@ , and the value is a double.-msThrottlingRateLimit :: Lens' MethodSetting (Maybe Double)-msThrottlingRateLimit = lens _msThrottlingRateLimit (\ s a -> s{_msThrottlingRateLimit = a});---- | Specifies how to handle unauthorized requests for cache invalidation. The PATCH path for this setting is @/{method_setting_key}/caching/unauthorizedCacheControlHeaderStrategy@ , and the available values are @FAIL_WITH_403@ , @SUCCEED_WITH_RESPONSE_HEADER@ , @SUCCEED_WITHOUT_RESPONSE_HEADER@ .-msUnauthorizedCacheControlHeaderStrategy :: Lens' MethodSetting (Maybe UnauthorizedCacheControlHeaderStrategy)-msUnauthorizedCacheControlHeaderStrategy = lens _msUnauthorizedCacheControlHeaderStrategy (\ s a -> s{_msUnauthorizedCacheControlHeaderStrategy = a});--instance FromJSON MethodSetting where- parseJSON- = withObject "MethodSetting"- (\ x ->- MethodSetting' <$>- (x .:? "cacheTtlInSeconds") <*>- (x .:? "dataTraceEnabled")- <*> (x .:? "throttlingBurstLimit")- <*> (x .:? "cacheDataEncrypted")- <*> (x .:? "loggingLevel")- <*> (x .:? "requireAuthorizationForCacheControl")- <*> (x .:? "cachingEnabled")- <*> (x .:? "metricsEnabled")- <*> (x .:? "throttlingRateLimit")- <*> (x .:? "unauthorizedCacheControlHeaderStrategy"))--instance Hashable MethodSetting where--instance NFData MethodSetting where---- | Represents a summary of a 'Method' resource, given a particular date and time.------------ /See:/ 'methodSnapshot' smart constructor.-data MethodSnapshot = MethodSnapshot'- { _msAuthorizationType :: !(Maybe Text)- , _msApiKeyRequired :: !(Maybe Bool)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'MethodSnapshot' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'msAuthorizationType' - The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.------ * 'msApiKeyRequired' - Specifies whether the method requires a valid 'ApiKey' .-methodSnapshot- :: MethodSnapshot-methodSnapshot =- MethodSnapshot' {_msAuthorizationType = Nothing, _msApiKeyRequired = Nothing}----- | The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.-msAuthorizationType :: Lens' MethodSnapshot (Maybe Text)-msAuthorizationType = lens _msAuthorizationType (\ s a -> s{_msAuthorizationType = a});---- | Specifies whether the method requires a valid 'ApiKey' .-msApiKeyRequired :: Lens' MethodSnapshot (Maybe Bool)-msApiKeyRequired = lens _msApiKeyRequired (\ s a -> s{_msApiKeyRequired = a});--instance FromJSON MethodSnapshot where- parseJSON- = withObject "MethodSnapshot"- (\ x ->- MethodSnapshot' <$>- (x .:? "authorizationType") <*>- (x .:? "apiKeyRequired"))--instance Hashable MethodSnapshot where--instance NFData MethodSnapshot where---- | Represents the data structure of a method's request or response payload.--------- A request model defines the data structure of the client-supplied request payload. A response model defines the data structure of the response payload returned by the back end. Although not required, models are useful for mapping payloads between the front end and back end.------ A model is used for generating an API's SDK, validating the input request body, and creating a skeletal mapping template.------ 'Method' , 'MethodResponse' , <http://docs.aws.amazon.com/apigateway/latest/developerguide/models-mappings.html Models and Mappings>------ /See:/ 'model' smart constructor.-data Model = Model'- { _mSchema :: !(Maybe Text)- , _mName :: !(Maybe Text)- , _mId :: !(Maybe Text)- , _mDescription :: !(Maybe Text)- , _mContentType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Model' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mSchema' - The schema for the model. For @application/json@ models, this should be <http://json-schema.org/documentation.html JSON-schema draft v4> model. Do not include "\*/" characters in the description of any properties because such "\*/" characters may be interpreted as the closing marker for comments in some languages, such as Java or JavaScript, causing the installation of your API's SDK generated by API Gateway to fail.------ * 'mName' - The name of the model. Must be an alphanumeric string.------ * 'mId' - The identifier for the model resource.------ * 'mDescription' - The description of the model.------ * 'mContentType' - The content-type for the model.-model- :: Model-model =- Model'- { _mSchema = Nothing- , _mName = Nothing- , _mId = Nothing- , _mDescription = Nothing- , _mContentType = Nothing- }----- | The schema for the model. For @application/json@ models, this should be <http://json-schema.org/documentation.html JSON-schema draft v4> model. Do not include "\*/" characters in the description of any properties because such "\*/" characters may be interpreted as the closing marker for comments in some languages, such as Java or JavaScript, causing the installation of your API's SDK generated by API Gateway to fail.-mSchema :: Lens' Model (Maybe Text)-mSchema = lens _mSchema (\ s a -> s{_mSchema = a});---- | The name of the model. Must be an alphanumeric string.-mName :: Lens' Model (Maybe Text)-mName = lens _mName (\ s a -> s{_mName = a});---- | The identifier for the model resource.-mId :: Lens' Model (Maybe Text)-mId = lens _mId (\ s a -> s{_mId = a});---- | The description of the model.-mDescription :: Lens' Model (Maybe Text)-mDescription = lens _mDescription (\ s a -> s{_mDescription = a});---- | The content-type for the model.-mContentType :: Lens' Model (Maybe Text)-mContentType = lens _mContentType (\ s a -> s{_mContentType = a});--instance FromJSON Model where- parseJSON- = withObject "Model"- (\ x ->- Model' <$>- (x .:? "schema") <*> (x .:? "name") <*> (x .:? "id")- <*> (x .:? "description")- <*> (x .:? "contentType"))--instance Hashable Model where--instance NFData Model where---- | A single patch operation to apply to the specified resource. Please refer to http://tools.ietf.org/html/rfc6902#section-4 for an explanation of how each operation is used.------ /See:/ 'patchOperation' smart constructor.-data PatchOperation = PatchOperation'- { _poOp :: !(Maybe Op)- , _poPath :: !(Maybe Text)- , _poValue :: !(Maybe Text)- , _poFrom :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'PatchOperation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'poOp' - An update operation to be performed with this PATCH request. The valid value can be "add", "remove", or "replace". Not all valid operations are supported for a given resource. Support of the operations depends on specific operational contexts. Attempts to apply an unsupported operation on a resource will return an error message.------ * 'poPath' - The @op@ operation's target, as identified by a <https://tools.ietf.org/html/draft-ietf-appsawg-json-pointer-08 JSON Pointer> value that references a location within the targeted resource. For example, if the target resource has an updateable property of @{"name":"value"}@ , the path for this property is @/name@ . If the @name@ property value is a JSON object (e.g., @{"name": {"child/name": "child-value"}}@ ), the path for the @child/name@ property will be @/name/child~1name@ . Any slash ("/") character appearing in path names must be escaped with "~1", as shown in the example above. Each @op@ operation can have only one @path@ associated with it.------ * 'poValue' - The new target value of the update operation. When using AWS CLI to update a property of a JSON value, enclose the JSON object with a pair of single quotes in a Linux shell, e.g., '{"a": ...}'. In a Windows shell, see <http://docs.aws.amazon.com/cli/latest/userguide/cli-using-param.html#cli-using-param-json Using JSON for Parameters> .------ * 'poFrom' - Not supported.-patchOperation- :: PatchOperation-patchOperation =- PatchOperation'- {_poOp = Nothing, _poPath = Nothing, _poValue = Nothing, _poFrom = Nothing}----- | An update operation to be performed with this PATCH request. The valid value can be "add", "remove", or "replace". Not all valid operations are supported for a given resource. Support of the operations depends on specific operational contexts. Attempts to apply an unsupported operation on a resource will return an error message.-poOp :: Lens' PatchOperation (Maybe Op)-poOp = lens _poOp (\ s a -> s{_poOp = a});---- | The @op@ operation's target, as identified by a <https://tools.ietf.org/html/draft-ietf-appsawg-json-pointer-08 JSON Pointer> value that references a location within the targeted resource. For example, if the target resource has an updateable property of @{"name":"value"}@ , the path for this property is @/name@ . If the @name@ property value is a JSON object (e.g., @{"name": {"child/name": "child-value"}}@ ), the path for the @child/name@ property will be @/name/child~1name@ . Any slash ("/") character appearing in path names must be escaped with "~1", as shown in the example above. Each @op@ operation can have only one @path@ associated with it.-poPath :: Lens' PatchOperation (Maybe Text)-poPath = lens _poPath (\ s a -> s{_poPath = a});---- | The new target value of the update operation. When using AWS CLI to update a property of a JSON value, enclose the JSON object with a pair of single quotes in a Linux shell, e.g., '{"a": ...}'. In a Windows shell, see <http://docs.aws.amazon.com/cli/latest/userguide/cli-using-param.html#cli-using-param-json Using JSON for Parameters> .-poValue :: Lens' PatchOperation (Maybe Text)-poValue = lens _poValue (\ s a -> s{_poValue = a});---- | Not supported.-poFrom :: Lens' PatchOperation (Maybe Text)-poFrom = lens _poFrom (\ s a -> s{_poFrom = a});--instance Hashable PatchOperation where--instance NFData PatchOperation where--instance ToJSON PatchOperation where- toJSON PatchOperation'{..}- = object- (catMaybes- [("op" .=) <$> _poOp, ("path" .=) <$> _poPath,- ("value" .=) <$> _poValue, ("from" .=) <$> _poFrom])---- | Quotas configured for a usage plan.------------ /See:/ 'quotaSettings' smart constructor.-data QuotaSettings = QuotaSettings'- { _qsOffset :: !(Maybe Int)- , _qsPeriod :: !(Maybe QuotaPeriodType)- , _qsLimit :: !(Maybe Int)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'QuotaSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qsOffset' - The number of requests subtracted from the given limit in the initial time period.------ * 'qsPeriod' - The time period in which the limit applies. Valid values are "DAY", "WEEK" or "MONTH".------ * 'qsLimit' - The maximum number of requests that can be made in a given time period.-quotaSettings- :: QuotaSettings-quotaSettings =- QuotaSettings' {_qsOffset = Nothing, _qsPeriod = Nothing, _qsLimit = Nothing}----- | The number of requests subtracted from the given limit in the initial time period.-qsOffset :: Lens' QuotaSettings (Maybe Int)-qsOffset = lens _qsOffset (\ s a -> s{_qsOffset = a});---- | The time period in which the limit applies. Valid values are "DAY", "WEEK" or "MONTH".-qsPeriod :: Lens' QuotaSettings (Maybe QuotaPeriodType)-qsPeriod = lens _qsPeriod (\ s a -> s{_qsPeriod = a});---- | The maximum number of requests that can be made in a given time period.-qsLimit :: Lens' QuotaSettings (Maybe Int)-qsLimit = lens _qsLimit (\ s a -> s{_qsLimit = a});--instance FromJSON QuotaSettings where- parseJSON- = withObject "QuotaSettings"- (\ x ->- QuotaSettings' <$>- (x .:? "offset") <*> (x .:? "period") <*>- (x .:? "limit"))--instance Hashable QuotaSettings where--instance NFData QuotaSettings where--instance ToJSON QuotaSettings where- toJSON QuotaSettings'{..}- = object- (catMaybes- [("offset" .=) <$> _qsOffset,- ("period" .=) <$> _qsPeriod,- ("limit" .=) <$> _qsLimit])---- | A set of validation rules for incoming 'Method' requests.--------- In Swagger, a 'RequestValidator' of an API is defined by the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-swagger-extensions.html#api-gateway-swagger-extensions-request-validators.requestValidator.html x-amazon-apigateway-request-validators.requestValidator> object. It the referenced using the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-swagger-extensions.html#api-gateway-swagger-extensions-request-validator x-amazon-apigateway-request-validator> property.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-method-request-validation.html Enable Basic Request Validation in API Gateway>------ /See:/ 'requestValidator' smart constructor.-data RequestValidator = RequestValidator'- { _rvValidateRequestParameters :: !(Maybe Bool)- , _rvName :: !(Maybe Text)- , _rvValidateRequestBody :: !(Maybe Bool)- , _rvId :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RequestValidator' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rvValidateRequestParameters' - A Boolean flag to indicate whether to validate request parameters (@true@ ) or not (@false@ ).------ * 'rvName' - The name of this 'RequestValidator'------ * 'rvValidateRequestBody' - A Boolean flag to indicate whether to validate a request body according to the configured 'Model' schema.------ * 'rvId' - The identifier of this 'RequestValidator' .-requestValidator- :: RequestValidator-requestValidator =- RequestValidator'- { _rvValidateRequestParameters = Nothing- , _rvName = Nothing- , _rvValidateRequestBody = Nothing- , _rvId = Nothing- }----- | A Boolean flag to indicate whether to validate request parameters (@true@ ) or not (@false@ ).-rvValidateRequestParameters :: Lens' RequestValidator (Maybe Bool)-rvValidateRequestParameters = lens _rvValidateRequestParameters (\ s a -> s{_rvValidateRequestParameters = a});---- | The name of this 'RequestValidator'-rvName :: Lens' RequestValidator (Maybe Text)-rvName = lens _rvName (\ s a -> s{_rvName = a});---- | A Boolean flag to indicate whether to validate a request body according to the configured 'Model' schema.-rvValidateRequestBody :: Lens' RequestValidator (Maybe Bool)-rvValidateRequestBody = lens _rvValidateRequestBody (\ s a -> s{_rvValidateRequestBody = a});---- | The identifier of this 'RequestValidator' .-rvId :: Lens' RequestValidator (Maybe Text)-rvId = lens _rvId (\ s a -> s{_rvId = a});--instance FromJSON RequestValidator where- parseJSON- = withObject "RequestValidator"- (\ x ->- RequestValidator' <$>- (x .:? "validateRequestParameters") <*>- (x .:? "name")- <*> (x .:? "validateRequestBody")- <*> (x .:? "id"))--instance Hashable RequestValidator where--instance NFData RequestValidator where---- | Represents an API resource.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Create an API>------ /See:/ 'resource' smart constructor.-data Resource = Resource'- { _rPathPart :: !(Maybe Text)- , _rPath :: !(Maybe Text)- , _rId :: !(Maybe Text)- , _rResourceMethods :: !(Maybe (Map Text Method))- , _rParentId :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Resource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rPathPart' - The last path segment for this resource.------ * 'rPath' - The full path for this resource.------ * 'rId' - The resource's identifier.------ * 'rResourceMethods' - Gets an API resource's method of a given HTTP verb. The resource methods are a map of methods indexed by methods' HTTP verbs enabled on the resource. This method map is included in the @200 OK@ response of the @GET /restapis/{restapi_id}/resources/{resource_id}@ or @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ request. __Example: Get the GET method of an API resource__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20170223T031827Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20170223/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": false, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ If the @OPTIONS@ is enabled on the resource, you can follow the example here to get that method. Just replace the @GET@ of the last path segment in the request URL with @OPTIONS@ .------ * 'rParentId' - The parent resource's identifier.-resource- :: Resource-resource =- Resource'- { _rPathPart = Nothing- , _rPath = Nothing- , _rId = Nothing- , _rResourceMethods = Nothing- , _rParentId = Nothing- }----- | The last path segment for this resource.-rPathPart :: Lens' Resource (Maybe Text)-rPathPart = lens _rPathPart (\ s a -> s{_rPathPart = a});---- | The full path for this resource.-rPath :: Lens' Resource (Maybe Text)-rPath = lens _rPath (\ s a -> s{_rPath = a});---- | The resource's identifier.-rId :: Lens' Resource (Maybe Text)-rId = lens _rId (\ s a -> s{_rId = a});---- | Gets an API resource's method of a given HTTP verb. The resource methods are a map of methods indexed by methods' HTTP verbs enabled on the resource. This method map is included in the @200 OK@ response of the @GET /restapis/{restapi_id}/resources/{resource_id}@ or @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ request. __Example: Get the GET method of an API resource__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20170223T031827Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20170223/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": false, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ If the @OPTIONS@ is enabled on the resource, you can follow the example here to get that method. Just replace the @GET@ of the last path segment in the request URL with @OPTIONS@ .-rResourceMethods :: Lens' Resource (HashMap Text Method)-rResourceMethods = lens _rResourceMethods (\ s a -> s{_rResourceMethods = a}) . _Default . _Map;---- | The parent resource's identifier.-rParentId :: Lens' Resource (Maybe Text)-rParentId = lens _rParentId (\ s a -> s{_rParentId = a});--instance FromJSON Resource where- parseJSON- = withObject "Resource"- (\ x ->- Resource' <$>- (x .:? "pathPart") <*> (x .:? "path") <*>- (x .:? "id")- <*> (x .:? "resourceMethods" .!= mempty)- <*> (x .:? "parentId"))--instance Hashable Resource where--instance NFData Resource where---- | Represents a REST API.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Create an API>------ /See:/ 'restAPI' smart constructor.-data RestAPI = RestAPI'- { _raBinaryMediaTypes :: !(Maybe [Text])- , _raWarnings :: !(Maybe [Text])- , _raCreatedDate :: !(Maybe POSIX)- , _raName :: !(Maybe Text)- , _raVersion :: !(Maybe Text)- , _raId :: !(Maybe Text)- , _raEndpointConfiguration :: !(Maybe EndpointConfiguration)- , _raDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RestAPI' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'raBinaryMediaTypes' - The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads.------ * 'raWarnings' - The warning messages reported when @failonwarnings@ is turned on during API import.------ * 'raCreatedDate' - The timestamp when the API was created.------ * 'raName' - The API's name.------ * 'raVersion' - A version identifier for the API.------ * 'raId' - The API's identifier. This identifier is unique across all of your APIs in Amazon API Gateway.------ * 'raEndpointConfiguration' - The endpoint configuration of this 'RestApi' showing the endpoint types of the API.------ * 'raDescription' - The API's description.-restAPI- :: RestAPI-restAPI =- RestAPI'- { _raBinaryMediaTypes = Nothing- , _raWarnings = Nothing- , _raCreatedDate = Nothing- , _raName = Nothing- , _raVersion = Nothing- , _raId = Nothing- , _raEndpointConfiguration = Nothing- , _raDescription = Nothing- }----- | The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads.-raBinaryMediaTypes :: Lens' RestAPI [Text]-raBinaryMediaTypes = lens _raBinaryMediaTypes (\ s a -> s{_raBinaryMediaTypes = a}) . _Default . _Coerce;---- | The warning messages reported when @failonwarnings@ is turned on during API import.-raWarnings :: Lens' RestAPI [Text]-raWarnings = lens _raWarnings (\ s a -> s{_raWarnings = a}) . _Default . _Coerce;---- | The timestamp when the API was created.-raCreatedDate :: Lens' RestAPI (Maybe UTCTime)-raCreatedDate = lens _raCreatedDate (\ s a -> s{_raCreatedDate = a}) . mapping _Time;---- | The API's name.-raName :: Lens' RestAPI (Maybe Text)-raName = lens _raName (\ s a -> s{_raName = a});---- | A version identifier for the API.-raVersion :: Lens' RestAPI (Maybe Text)-raVersion = lens _raVersion (\ s a -> s{_raVersion = a});---- | The API's identifier. This identifier is unique across all of your APIs in Amazon API Gateway.-raId :: Lens' RestAPI (Maybe Text)-raId = lens _raId (\ s a -> s{_raId = a});---- | The endpoint configuration of this 'RestApi' showing the endpoint types of the API.-raEndpointConfiguration :: Lens' RestAPI (Maybe EndpointConfiguration)-raEndpointConfiguration = lens _raEndpointConfiguration (\ s a -> s{_raEndpointConfiguration = a});---- | The API's description.-raDescription :: Lens' RestAPI (Maybe Text)-raDescription = lens _raDescription (\ s a -> s{_raDescription = a});--instance FromJSON RestAPI where- parseJSON- = withObject "RestAPI"- (\ x ->- RestAPI' <$>- (x .:? "binaryMediaTypes" .!= mempty) <*>- (x .:? "warnings" .!= mempty)- <*> (x .:? "createdDate")- <*> (x .:? "name")- <*> (x .:? "version")- <*> (x .:? "id")- <*> (x .:? "endpointConfiguration")- <*> (x .:? "description"))--instance Hashable RestAPI where--instance NFData RestAPI where---- | A configuration property of an SDK type.------------ /See:/ 'sdkConfigurationProperty' smart constructor.-data SDKConfigurationProperty = SDKConfigurationProperty'- { _scpFriendlyName :: !(Maybe Text)- , _scpRequired :: !(Maybe Bool)- , _scpName :: !(Maybe Text)- , _scpDefaultValue :: !(Maybe Text)- , _scpDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'SDKConfigurationProperty' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scpFriendlyName' - The user-friendly name of an 'SdkType' configuration property.------ * 'scpRequired' - A boolean flag of an 'SdkType' configuration property to indicate if the associated SDK configuration property is required (@true@ ) or not (@false@ ).------ * 'scpName' - The name of a an 'SdkType' configuration property.------ * 'scpDefaultValue' - The default value of an 'SdkType' configuration property.------ * 'scpDescription' - The description of an 'SdkType' configuration property.-sdkConfigurationProperty- :: SDKConfigurationProperty-sdkConfigurationProperty =- SDKConfigurationProperty'- { _scpFriendlyName = Nothing- , _scpRequired = Nothing- , _scpName = Nothing- , _scpDefaultValue = Nothing- , _scpDescription = Nothing- }----- | The user-friendly name of an 'SdkType' configuration property.-scpFriendlyName :: Lens' SDKConfigurationProperty (Maybe Text)-scpFriendlyName = lens _scpFriendlyName (\ s a -> s{_scpFriendlyName = a});---- | A boolean flag of an 'SdkType' configuration property to indicate if the associated SDK configuration property is required (@true@ ) or not (@false@ ).-scpRequired :: Lens' SDKConfigurationProperty (Maybe Bool)-scpRequired = lens _scpRequired (\ s a -> s{_scpRequired = a});---- | The name of a an 'SdkType' configuration property.-scpName :: Lens' SDKConfigurationProperty (Maybe Text)-scpName = lens _scpName (\ s a -> s{_scpName = a});---- | The default value of an 'SdkType' configuration property.-scpDefaultValue :: Lens' SDKConfigurationProperty (Maybe Text)-scpDefaultValue = lens _scpDefaultValue (\ s a -> s{_scpDefaultValue = a});---- | The description of an 'SdkType' configuration property.-scpDescription :: Lens' SDKConfigurationProperty (Maybe Text)-scpDescription = lens _scpDescription (\ s a -> s{_scpDescription = a});--instance FromJSON SDKConfigurationProperty where- parseJSON- = withObject "SDKConfigurationProperty"- (\ x ->- SDKConfigurationProperty' <$>- (x .:? "friendlyName") <*> (x .:? "required") <*>- (x .:? "name")- <*> (x .:? "defaultValue")- <*> (x .:? "description"))--instance Hashable SDKConfigurationProperty where--instance NFData SDKConfigurationProperty where---- | A type of SDK that API Gateway can generate.------------ /See:/ 'sdkType' smart constructor.-data SDKType = SDKType'- { _stFriendlyName :: !(Maybe Text)- , _stConfigurationProperties :: !(Maybe [SDKConfigurationProperty])- , _stId :: !(Maybe Text)- , _stDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'SDKType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'stFriendlyName' - The user-friendly name of an 'SdkType' instance.------ * 'stConfigurationProperties' - A list of configuration properties of an 'SdkType' .------ * 'stId' - The identifier of an 'SdkType' instance.------ * 'stDescription' - The description of an 'SdkType' .-sdkType- :: SDKType-sdkType =- SDKType'- { _stFriendlyName = Nothing- , _stConfigurationProperties = Nothing- , _stId = Nothing- , _stDescription = Nothing- }----- | The user-friendly name of an 'SdkType' instance.-stFriendlyName :: Lens' SDKType (Maybe Text)-stFriendlyName = lens _stFriendlyName (\ s a -> s{_stFriendlyName = a});---- | A list of configuration properties of an 'SdkType' .-stConfigurationProperties :: Lens' SDKType [SDKConfigurationProperty]-stConfigurationProperties = lens _stConfigurationProperties (\ s a -> s{_stConfigurationProperties = a}) . _Default . _Coerce;---- | The identifier of an 'SdkType' instance.-stId :: Lens' SDKType (Maybe Text)-stId = lens _stId (\ s a -> s{_stId = a});---- | The description of an 'SdkType' .-stDescription :: Lens' SDKType (Maybe Text)-stDescription = lens _stDescription (\ s a -> s{_stDescription = a});--instance FromJSON SDKType where- parseJSON- = withObject "SDKType"- (\ x ->- SDKType' <$>- (x .:? "friendlyName") <*>- (x .:? "configurationProperties" .!= mempty)- <*> (x .:? "id")- <*> (x .:? "description"))--instance Hashable SDKType where--instance NFData SDKType where---- | Represents a unique identifier for a version of a deployed 'RestApi' that is callable by users.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-deploy-api.html Deploy an API>------ /See:/ 'stage' smart constructor.-data Stage = Stage'- { _sDeploymentId :: !(Maybe Text)- , _sVariables :: !(Maybe (Map Text Text))- , _sDocumentationVersion :: !(Maybe Text)- , _sClientCertificateId :: !(Maybe Text)- , _sCreatedDate :: !(Maybe POSIX)- , _sCacheClusterStatus :: !(Maybe CacheClusterStatus)- , _sMethodSettings :: !(Maybe (Map Text MethodSetting))- , _sLastUpdatedDate :: !(Maybe POSIX)- , _sCacheClusterSize :: !(Maybe CacheClusterSize)- , _sCacheClusterEnabled :: !(Maybe Bool)- , _sStageName :: !(Maybe Text)- , _sDescription :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Stage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sDeploymentId' - The identifier of the 'Deployment' that the stage points to.------ * 'sVariables' - A map that defines the stage variables for a 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .------ * 'sDocumentationVersion' - The version of the associated API documentation.------ * 'sClientCertificateId' - The identifier of a client certificate for an API stage.------ * 'sCreatedDate' - The timestamp when the stage was created.------ * 'sCacheClusterStatus' - The status of the cache cluster for the stage, if enabled.------ * 'sMethodSettings' - A map that defines the method settings for a 'Stage' resource. Keys (designated as @/{method_setting_key@ below) are method paths defined as @{resource_path}/{http_method}@ for an individual method override, or @/\*/\*@ for overriding all methods in the stage.------ * 'sLastUpdatedDate' - The timestamp when the stage last updated.------ * 'sCacheClusterSize' - The size of the cache cluster for the stage, if enabled.------ * 'sCacheClusterEnabled' - Specifies whether a cache cluster is enabled for the stage.------ * 'sStageName' - The name of the stage is the first path segment in the Uniform Resource Identifier (URI) of a call to Amazon API Gateway.------ * 'sDescription' - The stage's description.-stage- :: Stage-stage =- Stage'- { _sDeploymentId = Nothing- , _sVariables = Nothing- , _sDocumentationVersion = Nothing- , _sClientCertificateId = Nothing- , _sCreatedDate = Nothing- , _sCacheClusterStatus = Nothing- , _sMethodSettings = Nothing- , _sLastUpdatedDate = Nothing- , _sCacheClusterSize = Nothing- , _sCacheClusterEnabled = Nothing- , _sStageName = Nothing- , _sDescription = Nothing- }----- | The identifier of the 'Deployment' that the stage points to.-sDeploymentId :: Lens' Stage (Maybe Text)-sDeploymentId = lens _sDeploymentId (\ s a -> s{_sDeploymentId = a});---- | A map that defines the stage variables for a 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .-sVariables :: Lens' Stage (HashMap Text Text)-sVariables = lens _sVariables (\ s a -> s{_sVariables = a}) . _Default . _Map;---- | The version of the associated API documentation.-sDocumentationVersion :: Lens' Stage (Maybe Text)-sDocumentationVersion = lens _sDocumentationVersion (\ s a -> s{_sDocumentationVersion = a});---- | The identifier of a client certificate for an API stage.-sClientCertificateId :: Lens' Stage (Maybe Text)-sClientCertificateId = lens _sClientCertificateId (\ s a -> s{_sClientCertificateId = a});---- | The timestamp when the stage was created.-sCreatedDate :: Lens' Stage (Maybe UTCTime)-sCreatedDate = lens _sCreatedDate (\ s a -> s{_sCreatedDate = a}) . mapping _Time;---- | The status of the cache cluster for the stage, if enabled.-sCacheClusterStatus :: Lens' Stage (Maybe CacheClusterStatus)-sCacheClusterStatus = lens _sCacheClusterStatus (\ s a -> s{_sCacheClusterStatus = a});---- | A map that defines the method settings for a 'Stage' resource. Keys (designated as @/{method_setting_key@ below) are method paths defined as @{resource_path}/{http_method}@ for an individual method override, or @/\*/\*@ for overriding all methods in the stage.-sMethodSettings :: Lens' Stage (HashMap Text MethodSetting)-sMethodSettings = lens _sMethodSettings (\ s a -> s{_sMethodSettings = a}) . _Default . _Map;---- | The timestamp when the stage last updated.-sLastUpdatedDate :: Lens' Stage (Maybe UTCTime)-sLastUpdatedDate = lens _sLastUpdatedDate (\ s a -> s{_sLastUpdatedDate = a}) . mapping _Time;---- | The size of the cache cluster for the stage, if enabled.-sCacheClusterSize :: Lens' Stage (Maybe CacheClusterSize)-sCacheClusterSize = lens _sCacheClusterSize (\ s a -> s{_sCacheClusterSize = a});---- | Specifies whether a cache cluster is enabled for the stage.-sCacheClusterEnabled :: Lens' Stage (Maybe Bool)-sCacheClusterEnabled = lens _sCacheClusterEnabled (\ s a -> s{_sCacheClusterEnabled = a});---- | The name of the stage is the first path segment in the Uniform Resource Identifier (URI) of a call to Amazon API Gateway.-sStageName :: Lens' Stage (Maybe Text)-sStageName = lens _sStageName (\ s a -> s{_sStageName = a});---- | The stage's description.-sDescription :: Lens' Stage (Maybe Text)-sDescription = lens _sDescription (\ s a -> s{_sDescription = a});--instance FromJSON Stage where- parseJSON- = withObject "Stage"- (\ x ->- Stage' <$>- (x .:? "deploymentId") <*>- (x .:? "variables" .!= mempty)- <*> (x .:? "documentationVersion")- <*> (x .:? "clientCertificateId")- <*> (x .:? "createdDate")- <*> (x .:? "cacheClusterStatus")- <*> (x .:? "methodSettings" .!= mempty)- <*> (x .:? "lastUpdatedDate")- <*> (x .:? "cacheClusterSize")- <*> (x .:? "cacheClusterEnabled")- <*> (x .:? "stageName")- <*> (x .:? "description"))--instance Hashable Stage where--instance NFData Stage where---- | A reference to a unique stage identified in the format @{restApiId}/{stage}@ .------------ /See:/ 'stageKey' smart constructor.-data StageKey = StageKey'- { _skRestAPIId :: !(Maybe Text)- , _skStageName :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'StageKey' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'skRestAPIId' - The string identifier of the associated 'RestApi' .------ * 'skStageName' - The stage name associated with the stage key.-stageKey- :: StageKey-stageKey = StageKey' {_skRestAPIId = Nothing, _skStageName = Nothing}----- | The string identifier of the associated 'RestApi' .-skRestAPIId :: Lens' StageKey (Maybe Text)-skRestAPIId = lens _skRestAPIId (\ s a -> s{_skRestAPIId = a});---- | The stage name associated with the stage key.-skStageName :: Lens' StageKey (Maybe Text)-skStageName = lens _skStageName (\ s a -> s{_skStageName = a});--instance Hashable StageKey where--instance NFData StageKey where--instance ToJSON StageKey where- toJSON StageKey'{..}- = object- (catMaybes- [("restApiId" .=) <$> _skRestAPIId,- ("stageName" .=) <$> _skStageName])---- | The API request rate limits.------------ /See:/ 'throttleSettings' smart constructor.-data ThrottleSettings = ThrottleSettings'- { _tsBurstLimit :: !(Maybe Int)- , _tsRateLimit :: !(Maybe Double)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ThrottleSettings' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tsBurstLimit' - The API request burst limit, the maximum rate limit over a time ranging from one to a few seconds, depending upon whether the underlying token bucket is at its full capacity.------ * 'tsRateLimit' - The API request steady-state rate limit.-throttleSettings- :: ThrottleSettings-throttleSettings =- ThrottleSettings' {_tsBurstLimit = Nothing, _tsRateLimit = Nothing}----- | The API request burst limit, the maximum rate limit over a time ranging from one to a few seconds, depending upon whether the underlying token bucket is at its full capacity.-tsBurstLimit :: Lens' ThrottleSettings (Maybe Int)-tsBurstLimit = lens _tsBurstLimit (\ s a -> s{_tsBurstLimit = a});---- | The API request steady-state rate limit.-tsRateLimit :: Lens' ThrottleSettings (Maybe Double)-tsRateLimit = lens _tsRateLimit (\ s a -> s{_tsRateLimit = a});--instance FromJSON ThrottleSettings where- parseJSON- = withObject "ThrottleSettings"- (\ x ->- ThrottleSettings' <$>- (x .:? "burstLimit") <*> (x .:? "rateLimit"))--instance Hashable ThrottleSettings where--instance NFData ThrottleSettings where--instance ToJSON ThrottleSettings where- toJSON ThrottleSettings'{..}- = object- (catMaybes- [("burstLimit" .=) <$> _tsBurstLimit,- ("rateLimit" .=) <$> _tsRateLimit])---- | Represents the usage data of a usage plan.--------- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans> , <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-create-usage-plans-with-console.html#api-gateway-usage-plan-manage-usage Manage Usage in a Usage Plan>------ /See:/ 'usage' smart constructor.-data Usage = Usage'- { _uUsagePlanId :: !(Maybe Text)- , _uEndDate :: !(Maybe Text)- , _uItems :: !(Maybe (Map Text [[Integer]]))- , _uStartDate :: !(Maybe Text)- , _uPosition :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Usage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uUsagePlanId' - The plan Id associated with this usage data.------ * 'uEndDate' - The ending date of the usage data.------ * 'uItems' - The usage data, as daily logs of used and remaining quotas, over the specified time interval indexed over the API keys in a usage plan. For example, @{..., "values" : { "{api_key}" : [ [0, 100], [10, 90], [100, 10]]}@ , where @{api_key}@ stands for an API key value and the daily log entry is of the format @[used quota, remaining quota]@ .------ * 'uStartDate' - The starting date of the usage data.------ * 'uPosition' - Undocumented member.-usage- :: Usage-usage =- Usage'- { _uUsagePlanId = Nothing- , _uEndDate = Nothing- , _uItems = Nothing- , _uStartDate = Nothing- , _uPosition = Nothing- }----- | The plan Id associated with this usage data.-uUsagePlanId :: Lens' Usage (Maybe Text)-uUsagePlanId = lens _uUsagePlanId (\ s a -> s{_uUsagePlanId = a});---- | The ending date of the usage data.-uEndDate :: Lens' Usage (Maybe Text)-uEndDate = lens _uEndDate (\ s a -> s{_uEndDate = a});---- | The usage data, as daily logs of used and remaining quotas, over the specified time interval indexed over the API keys in a usage plan. For example, @{..., "values" : { "{api_key}" : [ [0, 100], [10, 90], [100, 10]]}@ , where @{api_key}@ stands for an API key value and the daily log entry is of the format @[used quota, remaining quota]@ .-uItems :: Lens' Usage (HashMap Text [[Integer]])-uItems = lens _uItems (\ s a -> s{_uItems = a}) . _Default . _Map;---- | The starting date of the usage data.-uStartDate :: Lens' Usage (Maybe Text)-uStartDate = lens _uStartDate (\ s a -> s{_uStartDate = a});---- | Undocumented member.-uPosition :: Lens' Usage (Maybe Text)-uPosition = lens _uPosition (\ s a -> s{_uPosition = a});--instance FromJSON Usage where- parseJSON- = withObject "Usage"- (\ x ->- Usage' <$>- (x .:? "usagePlanId") <*> (x .:? "endDate") <*>- (x .:? "values" .!= mempty)- <*> (x .:? "startDate")- <*> (x .:? "position"))--instance Hashable Usage where--instance NFData Usage where---- | Represents a usage plan than can specify who can assess associated API stages with specified request limits and quotas.--------- In a usage plan, you associate an API by specifying the API's Id and a stage name of the specified API. You add plan customers by adding API keys to the plan.------ <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans>------ /See:/ 'usagePlan' smart constructor.-data UsagePlan = UsagePlan'- { _upApiStages :: !(Maybe [APIStage])- , _upName :: !(Maybe Text)- , _upId :: !(Maybe Text)- , _upThrottle :: !(Maybe ThrottleSettings)- , _upQuota :: !(Maybe QuotaSettings)- , _upDescription :: !(Maybe Text)- , _upProductCode :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UsagePlan' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'upApiStages' - The associated API stages of a usage plan.------ * 'upName' - The name of a usage plan.------ * 'upId' - The identifier of a 'UsagePlan' resource.------ * 'upThrottle' - The request throttle limits of a usage plan.------ * 'upQuota' - The maximum number of permitted requests per a given unit time interval.------ * 'upDescription' - The description of a usage plan.------ * 'upProductCode' - The AWS Markeplace product identifier to associate with the usage plan as a SaaS product on AWS Marketplace.-usagePlan- :: UsagePlan-usagePlan =- UsagePlan'- { _upApiStages = Nothing- , _upName = Nothing- , _upId = Nothing- , _upThrottle = Nothing- , _upQuota = Nothing- , _upDescription = Nothing- , _upProductCode = Nothing- }----- | The associated API stages of a usage plan.-upApiStages :: Lens' UsagePlan [APIStage]-upApiStages = lens _upApiStages (\ s a -> s{_upApiStages = a}) . _Default . _Coerce;---- | The name of a usage plan.-upName :: Lens' UsagePlan (Maybe Text)-upName = lens _upName (\ s a -> s{_upName = a});---- | The identifier of a 'UsagePlan' resource.-upId :: Lens' UsagePlan (Maybe Text)-upId = lens _upId (\ s a -> s{_upId = a});---- | The request throttle limits of a usage plan.-upThrottle :: Lens' UsagePlan (Maybe ThrottleSettings)-upThrottle = lens _upThrottle (\ s a -> s{_upThrottle = a});---- | The maximum number of permitted requests per a given unit time interval.-upQuota :: Lens' UsagePlan (Maybe QuotaSettings)-upQuota = lens _upQuota (\ s a -> s{_upQuota = a});---- | The description of a usage plan.-upDescription :: Lens' UsagePlan (Maybe Text)-upDescription = lens _upDescription (\ s a -> s{_upDescription = a});---- | The AWS Markeplace product identifier to associate with the usage plan as a SaaS product on AWS Marketplace.-upProductCode :: Lens' UsagePlan (Maybe Text)-upProductCode = lens _upProductCode (\ s a -> s{_upProductCode = a});--instance FromJSON UsagePlan where- parseJSON- = withObject "UsagePlan"- (\ x ->- UsagePlan' <$>- (x .:? "apiStages" .!= mempty) <*> (x .:? "name") <*>- (x .:? "id")- <*> (x .:? "throttle")- <*> (x .:? "quota")- <*> (x .:? "description")- <*> (x .:? "productCode"))--instance Hashable UsagePlan where--instance NFData UsagePlan where---- | Represents a usage plan key to identify a plan customer.--------- To associate an API stage with a selected API key in a usage plan, you must create a UsagePlanKey resource to represent the selected 'ApiKey' .------ " <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans>------ /See:/ 'usagePlanKey' smart constructor.-data UsagePlanKey = UsagePlanKey'- { _upkValue :: !(Maybe Text)- , _upkName :: !(Maybe Text)- , _upkId :: !(Maybe Text)- , _upkType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UsagePlanKey' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'upkValue' - The value of a usage plan key.------ * 'upkName' - The name of a usage plan key.------ * 'upkId' - The Id of a usage plan key.------ * 'upkType' - The type of a usage plan key. Currently, the valid key type is @API_KEY@ .-usagePlanKey- :: UsagePlanKey-usagePlanKey =- UsagePlanKey'- { _upkValue = Nothing- , _upkName = Nothing- , _upkId = Nothing- , _upkType = Nothing- }----- | The value of a usage plan key.-upkValue :: Lens' UsagePlanKey (Maybe Text)-upkValue = lens _upkValue (\ s a -> s{_upkValue = a});---- | The name of a usage plan key.-upkName :: Lens' UsagePlanKey (Maybe Text)-upkName = lens _upkName (\ s a -> s{_upkName = a});---- | The Id of a usage plan key.-upkId :: Lens' UsagePlanKey (Maybe Text)-upkId = lens _upkId (\ s a -> s{_upkId = a});---- | The type of a usage plan key. Currently, the valid key type is @API_KEY@ .-upkType :: Lens' UsagePlanKey (Maybe Text)-upkType = lens _upkType (\ s a -> s{_upkType = a});--instance FromJSON UsagePlanKey where- parseJSON- = withObject "UsagePlanKey"- (\ x ->- UsagePlanKey' <$>- (x .:? "value") <*> (x .:? "name") <*> (x .:? "id")- <*> (x .:? "type"))--instance Hashable UsagePlanKey where--instance NFData UsagePlanKey where+-- 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.APIGateway.Types.Product where++import Network.AWS.APIGateway.Types.Sum+import Network.AWS.Lens+import Network.AWS.Prelude++-- | A resource that can be distributed to callers for executing 'Method' resources that require an API key. API keys can be mapped to any 'Stage' on any 'RestApi' , which indicates that the callers with the API key can make requests to that stage.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-api-keys.html Use API Keys>+--+-- /See:/ 'apiKey' smart constructor.+data APIKey = APIKey'+ { _akEnabled :: !(Maybe Bool)+ , _akValue :: !(Maybe Text)+ , _akCustomerId :: !(Maybe Text)+ , _akCreatedDate :: !(Maybe POSIX)+ , _akName :: !(Maybe Text)+ , _akId :: !(Maybe Text)+ , _akStageKeys :: !(Maybe [Text])+ , _akLastUpdatedDate :: !(Maybe POSIX)+ , _akDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'APIKey' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'akEnabled' - Specifies whether the API Key can be used by callers.+--+-- * 'akValue' - The value of the API Key.+--+-- * 'akCustomerId' - An AWS Marketplace customer identifier , when integrating with the AWS SaaS Marketplace.+--+-- * 'akCreatedDate' - The timestamp when the API Key was created.+--+-- * 'akName' - The name of the API Key.+--+-- * 'akId' - The identifier of the API Key.+--+-- * 'akStageKeys' - A list of 'Stage' resources that are associated with the 'ApiKey' resource.+--+-- * 'akLastUpdatedDate' - The timestamp when the API Key was last updated.+--+-- * 'akDescription' - The description of the API Key.+apiKey+ :: APIKey+apiKey =+ APIKey'+ { _akEnabled = Nothing+ , _akValue = Nothing+ , _akCustomerId = Nothing+ , _akCreatedDate = Nothing+ , _akName = Nothing+ , _akId = Nothing+ , _akStageKeys = Nothing+ , _akLastUpdatedDate = Nothing+ , _akDescription = Nothing+ }+++-- | Specifies whether the API Key can be used by callers.+akEnabled :: Lens' APIKey (Maybe Bool)+akEnabled = lens _akEnabled (\ s a -> s{_akEnabled = a})++-- | The value of the API Key.+akValue :: Lens' APIKey (Maybe Text)+akValue = lens _akValue (\ s a -> s{_akValue = a})++-- | An AWS Marketplace customer identifier , when integrating with the AWS SaaS Marketplace.+akCustomerId :: Lens' APIKey (Maybe Text)+akCustomerId = lens _akCustomerId (\ s a -> s{_akCustomerId = a})++-- | The timestamp when the API Key was created.+akCreatedDate :: Lens' APIKey (Maybe UTCTime)+akCreatedDate = lens _akCreatedDate (\ s a -> s{_akCreatedDate = a}) . mapping _Time++-- | The name of the API Key.+akName :: Lens' APIKey (Maybe Text)+akName = lens _akName (\ s a -> s{_akName = a})++-- | The identifier of the API Key.+akId :: Lens' APIKey (Maybe Text)+akId = lens _akId (\ s a -> s{_akId = a})++-- | A list of 'Stage' resources that are associated with the 'ApiKey' resource.+akStageKeys :: Lens' APIKey [Text]+akStageKeys = lens _akStageKeys (\ s a -> s{_akStageKeys = a}) . _Default . _Coerce++-- | The timestamp when the API Key was last updated.+akLastUpdatedDate :: Lens' APIKey (Maybe UTCTime)+akLastUpdatedDate = lens _akLastUpdatedDate (\ s a -> s{_akLastUpdatedDate = a}) . mapping _Time++-- | The description of the API Key.+akDescription :: Lens' APIKey (Maybe Text)+akDescription = lens _akDescription (\ s a -> s{_akDescription = a})++instance FromJSON APIKey where+ parseJSON+ = withObject "APIKey"+ (\ x ->+ APIKey' <$>+ (x .:? "enabled") <*> (x .:? "value") <*>+ (x .:? "customerId")+ <*> (x .:? "createdDate")+ <*> (x .:? "name")+ <*> (x .:? "id")+ <*> (x .:? "stageKeys" .!= mempty)+ <*> (x .:? "lastUpdatedDate")+ <*> (x .:? "description"))++instance Hashable APIKey where++instance NFData APIKey where++-- | API stage name of the associated API stage in a usage plan.+--+--+--+-- /See:/ 'apiStage' smart constructor.+data APIStage = APIStage'+ { _asStage :: !(Maybe Text)+ , _asApiId :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'APIStage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'asStage' - API stage name of the associated API stage in a usage plan.+--+-- * 'asApiId' - API Id of the associated API stage in a usage plan.+apiStage+ :: APIStage+apiStage = APIStage' {_asStage = Nothing, _asApiId = Nothing}+++-- | API stage name of the associated API stage in a usage plan.+asStage :: Lens' APIStage (Maybe Text)+asStage = lens _asStage (\ s a -> s{_asStage = a})++-- | API Id of the associated API stage in a usage plan.+asApiId :: Lens' APIStage (Maybe Text)+asApiId = lens _asApiId (\ s a -> s{_asApiId = a})++instance FromJSON APIStage where+ parseJSON+ = withObject "APIStage"+ (\ x ->+ APIStage' <$> (x .:? "stage") <*> (x .:? "apiId"))++instance Hashable APIStage where++instance NFData APIStage where++instance ToJSON APIStage where+ toJSON APIStage'{..}+ = object+ (catMaybes+ [("stage" .=) <$> _asStage,+ ("apiId" .=) <$> _asApiId])++-- | Access log settings, including the access log format and access log destination ARN.+--+--+--+-- /See:/ 'accessLogSettings' smart constructor.+data AccessLogSettings = AccessLogSettings'+ { _alsFormat :: !(Maybe Text)+ , _alsDestinationARN :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'AccessLogSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'alsFormat' - A single line format of the access logs of data, as specified by selected <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-mapping-template-reference.html#context-variable-reference > context variables> . The format must include at least @> context.requestId@ .+--+-- * 'alsDestinationARN' - The ARN of the CloudWatch Logs log group to receive access logs.+accessLogSettings+ :: AccessLogSettings+accessLogSettings =+ AccessLogSettings' {_alsFormat = Nothing, _alsDestinationARN = Nothing}+++-- | A single line format of the access logs of data, as specified by selected <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-mapping-template-reference.html#context-variable-reference > context variables> . The format must include at least @> context.requestId@ .+alsFormat :: Lens' AccessLogSettings (Maybe Text)+alsFormat = lens _alsFormat (\ s a -> s{_alsFormat = a})++-- | The ARN of the CloudWatch Logs log group to receive access logs.+alsDestinationARN :: Lens' AccessLogSettings (Maybe Text)+alsDestinationARN = lens _alsDestinationARN (\ s a -> s{_alsDestinationARN = a})++instance FromJSON AccessLogSettings where+ parseJSON+ = withObject "AccessLogSettings"+ (\ x ->+ AccessLogSettings' <$>+ (x .:? "format") <*> (x .:? "destinationArn"))++instance Hashable AccessLogSettings where++instance NFData AccessLogSettings where++-- | Represents an AWS account that is associated with API Gateway.+--+--+-- To view the account info, call @GET@ on this resource.+--+-- __Error Codes__+-- The following exception may be thrown when the request fails.+--+-- * UnauthorizedException * NotFoundException * TooManyRequestsException+--+-- For detailed error code information, including the corresponding HTTP Status Codes, see <http://docs.aws.amazon.com/apigateway/api-reference/handling-errors/#api-error-codes API Gateway Error Codes>+--+-- __Example: Get the information about an account.__+-- __Request__+-- @@GET /account HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160531T184618Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__+-- The successful response returns a @200 OK@ status code and a payload similar to the following:+--+-- @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/account-apigateway-{rel}.html", "name": "account", "templated": true }, "self": { "href": "/account" }, "account:update": { "href": "/account" } }, "cloudwatchRoleArn": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "throttleSettings": { "rateLimit": 500, "burstLimit": 1000 } } @ @ In addition to making the REST API call directly, you can use the AWS CLI and an AWS SDK to access this resource.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-limits.html API Gateway Limits> <http://docs.aws.amazon.com/apigateway/latest/developerguide/welcome.html Developer Guide> , <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-account.html AWS CLI>+--+-- /See:/ 'account' smart constructor.+data Account = Account'+ { _aApiKeyVersion :: !(Maybe Text)+ , _aCloudwatchRoleARN :: !(Maybe Text)+ , _aFeatures :: !(Maybe [Text])+ , _aThrottleSettings :: !(Maybe ThrottleSettings)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Account' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aApiKeyVersion' - The version of the API keys used for the account.+--+-- * 'aCloudwatchRoleARN' - The ARN of an Amazon CloudWatch role for the current 'Account' .+--+-- * 'aFeatures' - A list of features supported for the account. When usage plans are enabled, the features list will include an entry of @"UsagePlans"@ .+--+-- * 'aThrottleSettings' - Specifies the API request limits configured for the current 'Account' .+account+ :: Account+account =+ Account'+ { _aApiKeyVersion = Nothing+ , _aCloudwatchRoleARN = Nothing+ , _aFeatures = Nothing+ , _aThrottleSettings = Nothing+ }+++-- | The version of the API keys used for the account.+aApiKeyVersion :: Lens' Account (Maybe Text)+aApiKeyVersion = lens _aApiKeyVersion (\ s a -> s{_aApiKeyVersion = a})++-- | The ARN of an Amazon CloudWatch role for the current 'Account' .+aCloudwatchRoleARN :: Lens' Account (Maybe Text)+aCloudwatchRoleARN = lens _aCloudwatchRoleARN (\ s a -> s{_aCloudwatchRoleARN = a})++-- | A list of features supported for the account. When usage plans are enabled, the features list will include an entry of @"UsagePlans"@ .+aFeatures :: Lens' Account [Text]+aFeatures = lens _aFeatures (\ s a -> s{_aFeatures = a}) . _Default . _Coerce++-- | Specifies the API request limits configured for the current 'Account' .+aThrottleSettings :: Lens' Account (Maybe ThrottleSettings)+aThrottleSettings = lens _aThrottleSettings (\ s a -> s{_aThrottleSettings = a})++instance FromJSON Account where+ parseJSON+ = withObject "Account"+ (\ x ->+ Account' <$>+ (x .:? "apiKeyVersion") <*>+ (x .:? "cloudwatchRoleArn")+ <*> (x .:? "features" .!= mempty)+ <*> (x .:? "throttleSettings"))++instance Hashable Account where++instance NFData Account where++-- | Represents an authorization layer for methods. If enabled on a method, API Gateway will activate the authorizer when a client calls the method.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/use-custom-authorizer.html Enable custom authorization>+--+-- /See:/ 'authorizer' smart constructor.+data Authorizer = Authorizer'+ { _aAuthorizerURI :: !(Maybe Text)+ , _aIdentityValidationExpression :: !(Maybe Text)+ , _aProviderARNs :: !(Maybe [Text])+ , _aName :: !(Maybe Text)+ , _aId :: !(Maybe Text)+ , _aAuthorizerResultTtlInSeconds :: !(Maybe Int)+ , _aAuthType :: !(Maybe Text)+ , _aType :: !(Maybe AuthorizerType)+ , _aIdentitySource :: !(Maybe Text)+ , _aAuthorizerCredentials :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Authorizer' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'aAuthorizerURI' - Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ .+--+-- * 'aIdentityValidationExpression' - A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. API Gateway will match the @aud@ field of the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function when there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.+--+-- * 'aProviderARNs' - A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined.+--+-- * 'aName' - [Required] The name of the authorizer.+--+-- * 'aId' - The identifier for the authorizer resource.+--+-- * 'aAuthorizerResultTtlInSeconds' - The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour.+--+-- * 'aAuthType' - Optional customer-defined field, used in Swagger imports and exports without functional impact.+--+-- * 'aType' - The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool.+--+-- * 'aIdentitySource' - The identity source for which authorization is requested. * For a @TOKEN@ or @COGNITO_USER_POOLS@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional.+--+-- * 'aAuthorizerCredentials' - Specifies the required credentials as an IAM role for API Gateway to invoke the authorizer. To specify an IAM role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.+authorizer+ :: Authorizer+authorizer =+ Authorizer'+ { _aAuthorizerURI = Nothing+ , _aIdentityValidationExpression = Nothing+ , _aProviderARNs = Nothing+ , _aName = Nothing+ , _aId = Nothing+ , _aAuthorizerResultTtlInSeconds = Nothing+ , _aAuthType = Nothing+ , _aType = Nothing+ , _aIdentitySource = Nothing+ , _aAuthorizerCredentials = Nothing+ }+++-- | Specifies the authorizer's Uniform Resource Identifier (URI). For @TOKEN@ or @REQUEST@ authorizers, this must be a well-formed Lambda function URI, for example, @arn:aws:apigateway:us-west-2:lambda:path/2015-03-31/functions/arn:aws:lambda:us-west-2:{account_id}:function:{lambda_function_name}/invocations@ . In general, the URI has this form @arn:aws:apigateway:{region}:lambda:path/{service_api}@ , where @{region}@ is the same as the region hosting the Lambda function, @path@ indicates that the remaining substring in the URI should be treated as the path to the resource, including the initial @/@ . For Lambda functions, this is usually of the form @/2015-03-31/functions/[FunctionARN]/invocations@ .+aAuthorizerURI :: Lens' Authorizer (Maybe Text)+aAuthorizerURI = lens _aAuthorizerURI (\ s a -> s{_aAuthorizerURI = a})++-- | A validation expression for the incoming identity token. For @TOKEN@ authorizers, this value is a regular expression. API Gateway will match the @aud@ field of the incoming token from the client against the specified regular expression. It will invoke the authorizer's Lambda function when there is a match. Otherwise, it will return a 401 Unauthorized response without calling the Lambda function. The validation expression does not apply to the @REQUEST@ authorizer.+aIdentityValidationExpression :: Lens' Authorizer (Maybe Text)+aIdentityValidationExpression = lens _aIdentityValidationExpression (\ s a -> s{_aIdentityValidationExpression = a})++-- | A list of the Amazon Cognito user pool ARNs for the @COGNITO_USER_POOLS@ authorizer. Each element is of this format: @arn:aws:cognito-idp:{region}:{account_id}:userpool/{user_pool_id}@ . For a @TOKEN@ or @REQUEST@ authorizer, this is not defined.+aProviderARNs :: Lens' Authorizer [Text]+aProviderARNs = lens _aProviderARNs (\ s a -> s{_aProviderARNs = a}) . _Default . _Coerce++-- | [Required] The name of the authorizer.+aName :: Lens' Authorizer (Maybe Text)+aName = lens _aName (\ s a -> s{_aName = a})++-- | The identifier for the authorizer resource.+aId :: Lens' Authorizer (Maybe Text)+aId = lens _aId (\ s a -> s{_aId = a})++-- | The TTL in seconds of cached authorizer results. If it equals 0, authorization caching is disabled. If it is greater than 0, API Gateway will cache authorizer responses. If this field is not set, the default value is 300. The maximum value is 3600, or 1 hour.+aAuthorizerResultTtlInSeconds :: Lens' Authorizer (Maybe Int)+aAuthorizerResultTtlInSeconds = lens _aAuthorizerResultTtlInSeconds (\ s a -> s{_aAuthorizerResultTtlInSeconds = a})++-- | Optional customer-defined field, used in Swagger imports and exports without functional impact.+aAuthType :: Lens' Authorizer (Maybe Text)+aAuthType = lens _aAuthType (\ s a -> s{_aAuthType = a})++-- | The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool.+aType :: Lens' Authorizer (Maybe AuthorizerType)+aType = lens _aType (\ s a -> s{_aType = a})++-- | The identity source for which authorization is requested. * For a @TOKEN@ or @COGNITO_USER_POOLS@ authorizer, this is required and specifies the request header mapping expression for the custom header holding the authorization token submitted by the client. For example, if the token header name is @Auth@ , the header mapping expression is @method.request.header.Auth@ . * For the @REQUEST@ authorizer, this is required when authorization caching is enabled. The value is a comma-separated string of one or more mapping expressions of the specified request parameters. For example, if an @Auth@ header, a @Name@ query string parameter are defined as identity sources, this value is @method.request.header.Auth, method.request.querystring.Name@ . These parameters will be used to derive the authorization caching key and to perform runtime validation of the @REQUEST@ authorizer by verifying all of the identity-related request parameters are present, not null and non-empty. Only when this is true does the authorizer invoke the authorizer Lambda function, otherwise, it returns a 401 Unauthorized response without calling the Lambda function. The valid value is a string of comma-separated mapping expressions of the specified request parameters. When the authorization caching is not enabled, this property is optional.+aIdentitySource :: Lens' Authorizer (Maybe Text)+aIdentitySource = lens _aIdentitySource (\ s a -> s{_aIdentitySource = a})++-- | Specifies the required credentials as an IAM role for API Gateway to invoke the authorizer. To specify an IAM role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To use resource-based permissions on the Lambda function, specify null.+aAuthorizerCredentials :: Lens' Authorizer (Maybe Text)+aAuthorizerCredentials = lens _aAuthorizerCredentials (\ s a -> s{_aAuthorizerCredentials = a})++instance FromJSON Authorizer where+ parseJSON+ = withObject "Authorizer"+ (\ x ->+ Authorizer' <$>+ (x .:? "authorizerUri") <*>+ (x .:? "identityValidationExpression")+ <*> (x .:? "providerARNs" .!= mempty)+ <*> (x .:? "name")+ <*> (x .:? "id")+ <*> (x .:? "authorizerResultTtlInSeconds")+ <*> (x .:? "authType")+ <*> (x .:? "type")+ <*> (x .:? "identitySource")+ <*> (x .:? "authorizerCredentials"))++instance Hashable Authorizer where++instance NFData Authorizer where++-- | Represents the base path that callers of the API must provide as part of the URL after the domain name.+--+--+-- A custom domain name plus a @BasePathMapping@ specification identifies a deployed 'RestApi' in a given stage of the owner 'Account' .<http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-custom-domains.html Use Custom Domain Names>+--+-- /See:/ 'basePathMapping' smart constructor.+data BasePathMapping = BasePathMapping'+ { _bpmStage :: !(Maybe Text)+ , _bpmBasePath :: !(Maybe Text)+ , _bpmRestAPIId :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'BasePathMapping' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'bpmStage' - The name of the associated stage.+--+-- * 'bpmBasePath' - The base path name that callers of the API must provide as part of the URL after the domain name.+--+-- * 'bpmRestAPIId' - The string identifier of the associated 'RestApi' .+basePathMapping+ :: BasePathMapping+basePathMapping =+ BasePathMapping'+ {_bpmStage = Nothing, _bpmBasePath = Nothing, _bpmRestAPIId = Nothing}+++-- | The name of the associated stage.+bpmStage :: Lens' BasePathMapping (Maybe Text)+bpmStage = lens _bpmStage (\ s a -> s{_bpmStage = a})++-- | The base path name that callers of the API must provide as part of the URL after the domain name.+bpmBasePath :: Lens' BasePathMapping (Maybe Text)+bpmBasePath = lens _bpmBasePath (\ s a -> s{_bpmBasePath = a})++-- | The string identifier of the associated 'RestApi' .+bpmRestAPIId :: Lens' BasePathMapping (Maybe Text)+bpmRestAPIId = lens _bpmRestAPIId (\ s a -> s{_bpmRestAPIId = a})++instance FromJSON BasePathMapping where+ parseJSON+ = withObject "BasePathMapping"+ (\ x ->+ BasePathMapping' <$>+ (x .:? "stage") <*> (x .:? "basePath") <*>+ (x .:? "restApiId"))++instance Hashable BasePathMapping where++instance NFData BasePathMapping where++-- | Configuration settings of a canary deployment.+--+--+--+-- /See:/ 'canarySettings' smart constructor.+data CanarySettings = CanarySettings'+ { _csDeploymentId :: !(Maybe Text)+ , _csStageVariableOverrides :: !(Maybe (Map Text Text))+ , _csUseStageCache :: !(Maybe Bool)+ , _csPercentTraffic :: !(Maybe Double)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'CanarySettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'csDeploymentId' - The ID of the canary deployment.+--+-- * 'csStageVariableOverrides' - Stage variables overridden for a canary release deployment, including new stage variables introduced in the canary. These stage variables are represented as a string-to-string map between stage variable names and their values.+--+-- * 'csUseStageCache' - A Boolean flag to indicate whether the canary deployment uses the stage cache or not.+--+-- * 'csPercentTraffic' - The percent (0-100) of traffic diverted to a canary deployment.+canarySettings+ :: CanarySettings+canarySettings =+ CanarySettings'+ { _csDeploymentId = Nothing+ , _csStageVariableOverrides = Nothing+ , _csUseStageCache = Nothing+ , _csPercentTraffic = Nothing+ }+++-- | The ID of the canary deployment.+csDeploymentId :: Lens' CanarySettings (Maybe Text)+csDeploymentId = lens _csDeploymentId (\ s a -> s{_csDeploymentId = a})++-- | Stage variables overridden for a canary release deployment, including new stage variables introduced in the canary. These stage variables are represented as a string-to-string map between stage variable names and their values.+csStageVariableOverrides :: Lens' CanarySettings (HashMap Text Text)+csStageVariableOverrides = lens _csStageVariableOverrides (\ s a -> s{_csStageVariableOverrides = a}) . _Default . _Map++-- | A Boolean flag to indicate whether the canary deployment uses the stage cache or not.+csUseStageCache :: Lens' CanarySettings (Maybe Bool)+csUseStageCache = lens _csUseStageCache (\ s a -> s{_csUseStageCache = a})++-- | The percent (0-100) of traffic diverted to a canary deployment.+csPercentTraffic :: Lens' CanarySettings (Maybe Double)+csPercentTraffic = lens _csPercentTraffic (\ s a -> s{_csPercentTraffic = a})++instance FromJSON CanarySettings where+ parseJSON+ = withObject "CanarySettings"+ (\ x ->+ CanarySettings' <$>+ (x .:? "deploymentId") <*>+ (x .:? "stageVariableOverrides" .!= mempty)+ <*> (x .:? "useStageCache")+ <*> (x .:? "percentTraffic"))++instance Hashable CanarySettings where++instance NFData CanarySettings where++instance ToJSON CanarySettings where+ toJSON CanarySettings'{..}+ = object+ (catMaybes+ [("deploymentId" .=) <$> _csDeploymentId,+ ("stageVariableOverrides" .=) <$>+ _csStageVariableOverrides,+ ("useStageCache" .=) <$> _csUseStageCache,+ ("percentTraffic" .=) <$> _csPercentTraffic])++-- | Represents a client certificate used to configure client-side SSL authentication while sending requests to the integration endpoint.+--+--+-- Client certificates are used to authenticate an API by the backend server. To authenticate an API client (or user), use IAM roles and policies, a custom 'Authorizer' or an Amazon Cognito user pool.<http://docs.aws.amazon.com/apigateway/latest/developerguide/getting-started-client-side-ssl-authentication.html Use Client-Side Certificate>+--+-- /See:/ 'clientCertificate' smart constructor.+data ClientCertificate = ClientCertificate'+ { _ccPemEncodedCertificate :: !(Maybe Text)+ , _ccClientCertificateId :: !(Maybe Text)+ , _ccCreatedDate :: !(Maybe POSIX)+ , _ccExpirationDate :: !(Maybe POSIX)+ , _ccDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ClientCertificate' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ccPemEncodedCertificate' - The PEM-encoded public key of the client certificate, which can be used to configure certificate authentication in the integration endpoint .+--+-- * 'ccClientCertificateId' - The identifier of the client certificate.+--+-- * 'ccCreatedDate' - The timestamp when the client certificate was created.+--+-- * 'ccExpirationDate' - The timestamp when the client certificate will expire.+--+-- * 'ccDescription' - The description of the client certificate.+clientCertificate+ :: ClientCertificate+clientCertificate =+ ClientCertificate'+ { _ccPemEncodedCertificate = Nothing+ , _ccClientCertificateId = Nothing+ , _ccCreatedDate = Nothing+ , _ccExpirationDate = Nothing+ , _ccDescription = Nothing+ }+++-- | The PEM-encoded public key of the client certificate, which can be used to configure certificate authentication in the integration endpoint .+ccPemEncodedCertificate :: Lens' ClientCertificate (Maybe Text)+ccPemEncodedCertificate = lens _ccPemEncodedCertificate (\ s a -> s{_ccPemEncodedCertificate = a})++-- | The identifier of the client certificate.+ccClientCertificateId :: Lens' ClientCertificate (Maybe Text)+ccClientCertificateId = lens _ccClientCertificateId (\ s a -> s{_ccClientCertificateId = a})++-- | The timestamp when the client certificate was created.+ccCreatedDate :: Lens' ClientCertificate (Maybe UTCTime)+ccCreatedDate = lens _ccCreatedDate (\ s a -> s{_ccCreatedDate = a}) . mapping _Time++-- | The timestamp when the client certificate will expire.+ccExpirationDate :: Lens' ClientCertificate (Maybe UTCTime)+ccExpirationDate = lens _ccExpirationDate (\ s a -> s{_ccExpirationDate = a}) . mapping _Time++-- | The description of the client certificate.+ccDescription :: Lens' ClientCertificate (Maybe Text)+ccDescription = lens _ccDescription (\ s a -> s{_ccDescription = a})++instance FromJSON ClientCertificate where+ parseJSON+ = withObject "ClientCertificate"+ (\ x ->+ ClientCertificate' <$>+ (x .:? "pemEncodedCertificate") <*>+ (x .:? "clientCertificateId")+ <*> (x .:? "createdDate")+ <*> (x .:? "expirationDate")+ <*> (x .:? "description"))++instance Hashable ClientCertificate where++instance NFData ClientCertificate where++-- | An immutable representation of a 'RestApi' resource that can be called by users using 'Stages' . A deployment must be associated with a 'Stage' for it to be callable over the Internet.+--+--+-- To create a deployment, call @POST@ on the 'Deployments' resource of a 'RestApi' . To view, update, or delete a deployment, call @GET@ , @PATCH@ , or @DELETE@ on the specified deployment resource (@/restapis/{restapi_id}/deployments/{deployment_id}@ ).'RestApi' , 'Deployments' , 'Stage' , <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-deployment.html AWS CLI> , <https://aws.amazon.com/tools/ AWS SDKs>+--+-- /See:/ 'deployment' smart constructor.+data Deployment = Deployment'+ { _dApiSummary :: !(Maybe (Map Text (Map Text MethodSnapshot)))+ , _dCreatedDate :: !(Maybe POSIX)+ , _dId :: !(Maybe Text)+ , _dDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Deployment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dApiSummary' - A summary of the 'RestApi' at the date and time that the deployment resource was created.+--+-- * 'dCreatedDate' - The date and time that the deployment resource was created.+--+-- * 'dId' - The identifier for the deployment resource.+--+-- * 'dDescription' - The description for the deployment resource.+deployment+ :: Deployment+deployment =+ Deployment'+ { _dApiSummary = Nothing+ , _dCreatedDate = Nothing+ , _dId = Nothing+ , _dDescription = Nothing+ }+++-- | A summary of the 'RestApi' at the date and time that the deployment resource was created.+dApiSummary :: Lens' Deployment (HashMap Text (HashMap Text MethodSnapshot))+dApiSummary = lens _dApiSummary (\ s a -> s{_dApiSummary = a}) . _Default . _Map++-- | The date and time that the deployment resource was created.+dCreatedDate :: Lens' Deployment (Maybe UTCTime)+dCreatedDate = lens _dCreatedDate (\ s a -> s{_dCreatedDate = a}) . mapping _Time++-- | The identifier for the deployment resource.+dId :: Lens' Deployment (Maybe Text)+dId = lens _dId (\ s a -> s{_dId = a})++-- | The description for the deployment resource.+dDescription :: Lens' Deployment (Maybe Text)+dDescription = lens _dDescription (\ s a -> s{_dDescription = a})++instance FromJSON Deployment where+ parseJSON+ = withObject "Deployment"+ (\ x ->+ Deployment' <$>+ (x .:? "apiSummary" .!= mempty) <*>+ (x .:? "createdDate")+ <*> (x .:? "id")+ <*> (x .:? "description"))++instance Hashable Deployment where++instance NFData Deployment where++-- | The input configuration for a canary deployment.+--+--+--+-- /See:/ 'deploymentCanarySettings' smart constructor.+data DeploymentCanarySettings = DeploymentCanarySettings'+ { _dcsStageVariableOverrides :: !(Maybe (Map Text Text))+ , _dcsUseStageCache :: !(Maybe Bool)+ , _dcsPercentTraffic :: !(Maybe Double)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DeploymentCanarySettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dcsStageVariableOverrides' - A stage variable overrides used for the canary release deployment. They can override existing stage variables or add new stage variables for the canary release deployment. These stage variables are represented as a string-to-string map between stage variable names and their values.+--+-- * 'dcsUseStageCache' - A Boolean flag to indicate whether the canary release deployment uses the stage cache or not.+--+-- * 'dcsPercentTraffic' - The percentage (0.0-100.0) of traffic routed to the canary deployment.+deploymentCanarySettings+ :: DeploymentCanarySettings+deploymentCanarySettings =+ DeploymentCanarySettings'+ { _dcsStageVariableOverrides = Nothing+ , _dcsUseStageCache = Nothing+ , _dcsPercentTraffic = Nothing+ }+++-- | A stage variable overrides used for the canary release deployment. They can override existing stage variables or add new stage variables for the canary release deployment. These stage variables are represented as a string-to-string map between stage variable names and their values.+dcsStageVariableOverrides :: Lens' DeploymentCanarySettings (HashMap Text Text)+dcsStageVariableOverrides = lens _dcsStageVariableOverrides (\ s a -> s{_dcsStageVariableOverrides = a}) . _Default . _Map++-- | A Boolean flag to indicate whether the canary release deployment uses the stage cache or not.+dcsUseStageCache :: Lens' DeploymentCanarySettings (Maybe Bool)+dcsUseStageCache = lens _dcsUseStageCache (\ s a -> s{_dcsUseStageCache = a})++-- | The percentage (0.0-100.0) of traffic routed to the canary deployment.+dcsPercentTraffic :: Lens' DeploymentCanarySettings (Maybe Double)+dcsPercentTraffic = lens _dcsPercentTraffic (\ s a -> s{_dcsPercentTraffic = a})++instance Hashable DeploymentCanarySettings where++instance NFData DeploymentCanarySettings where++instance ToJSON DeploymentCanarySettings where+ toJSON DeploymentCanarySettings'{..}+ = object+ (catMaybes+ [("stageVariableOverrides" .=) <$>+ _dcsStageVariableOverrides,+ ("useStageCache" .=) <$> _dcsUseStageCache,+ ("percentTraffic" .=) <$> _dcsPercentTraffic])++-- | A documentation part for a targeted API entity.+--+--+-- A documentation part consists of a content map (@properties@ ) and a target (@location@ ). The target specifies an API entity to which the documentation content applies. The supported API entity types are @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Valid @location@ fields depend on the API entity type. All valid fields are not required.+--+-- The content map is a JSON string of API-specific key-value pairs. Although an API can use any shape for the content map, only the Swagger-compliant documentation fields will be injected into the associated API entity definition in the exported Swagger definition file.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , 'DocumentationParts'+--+-- /See:/ 'documentationPart' smart constructor.+data DocumentationPart = DocumentationPart'+ { _dpLocation :: !(Maybe DocumentationPartLocation)+ , _dpId :: !(Maybe Text)+ , _dpProperties :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DocumentationPart' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dpLocation' - The location of the API entity to which the documentation applies. Valid fields depend on the targeted API entity type. All the valid location fields are not required. If not explicitly specified, a valid location field is treated as a wildcard and associated documentation content may be inherited by matching entities, unless overridden.+--+-- * 'dpId' - The 'DocumentationPart' identifier, generated by API Gateway when the @DocumentationPart@ is created.+--+-- * 'dpProperties' - A content map of API-specific key-value pairs describing the targeted API entity. The map must be encoded as a JSON string, e.g., @"{ \"description\": \"The API does ...\" }"@ . Only Swagger-compliant documentation-related fields from the @properties@ map are exported and, hence, published as part of the API entity definitions, while the original documentation parts are exported in a Swagger extension of @x-amazon-apigateway-documentation@ .+documentationPart+ :: DocumentationPart+documentationPart =+ DocumentationPart'+ {_dpLocation = Nothing, _dpId = Nothing, _dpProperties = Nothing}+++-- | The location of the API entity to which the documentation applies. Valid fields depend on the targeted API entity type. All the valid location fields are not required. If not explicitly specified, a valid location field is treated as a wildcard and associated documentation content may be inherited by matching entities, unless overridden.+dpLocation :: Lens' DocumentationPart (Maybe DocumentationPartLocation)+dpLocation = lens _dpLocation (\ s a -> s{_dpLocation = a})++-- | The 'DocumentationPart' identifier, generated by API Gateway when the @DocumentationPart@ is created.+dpId :: Lens' DocumentationPart (Maybe Text)+dpId = lens _dpId (\ s a -> s{_dpId = a})++-- | A content map of API-specific key-value pairs describing the targeted API entity. The map must be encoded as a JSON string, e.g., @"{ \"description\": \"The API does ...\" }"@ . Only Swagger-compliant documentation-related fields from the @properties@ map are exported and, hence, published as part of the API entity definitions, while the original documentation parts are exported in a Swagger extension of @x-amazon-apigateway-documentation@ .+dpProperties :: Lens' DocumentationPart (Maybe Text)+dpProperties = lens _dpProperties (\ s a -> s{_dpProperties = a})++instance FromJSON DocumentationPart where+ parseJSON+ = withObject "DocumentationPart"+ (\ x ->+ DocumentationPart' <$>+ (x .:? "location") <*> (x .:? "id") <*>+ (x .:? "properties"))++instance Hashable DocumentationPart where++instance NFData DocumentationPart where++-- | Specifies the target API entity to which the documentation applies.+--+--+--+-- /See:/ 'documentationPartLocation' smart constructor.+data DocumentationPartLocation = DocumentationPartLocation'+ { _dplPath :: !(Maybe Text)+ , _dplName :: !(Maybe Text)+ , _dplMethod :: !(Maybe Text)+ , _dplStatusCode :: !(Maybe Text)+ , _dplType :: !DocumentationPartType+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DocumentationPartLocation' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dplPath' - The URL path of the target. It is a valid field for the API entity types of @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @/@ for the root resource. When an applicable child entity inherits the content of another entity of the same type with more general specifications of the other @location@ attributes, the child entity's @path@ attribute must match that of the parent entity as a prefix.+--+-- * 'dplName' - The name of the targeted API entity. It is a valid and required field for the API entity types of @AUTHORIZER@ , @MODEL@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ and @RESPONSE_HEADER@ . It is an invalid field for any other entity type.+--+-- * 'dplMethod' - The HTTP verb of a method. It is a valid field for the API entity types of @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any method. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @method@ attribute must match that of the parent entity exactly.+--+-- * 'dplStatusCode' - The HTTP status code of a response. It is a valid field for the API entity types of @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any status code. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @statusCode@ attribute must match that of the parent entity exactly.+--+-- * 'dplType' - [Required] The type of API entity to which the documentation content applies. Valid values are @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Content inheritance does not apply to any entity of the @API@ , @AUTHORIZER@ , @METHOD@ , @MODEL@ , @REQUEST_BODY@ , or @RESOURCE@ type.+documentationPartLocation+ :: DocumentationPartType -- ^ 'dplType'+ -> DocumentationPartLocation+documentationPartLocation pType_ =+ DocumentationPartLocation'+ { _dplPath = Nothing+ , _dplName = Nothing+ , _dplMethod = Nothing+ , _dplStatusCode = Nothing+ , _dplType = pType_+ }+++-- | The URL path of the target. It is a valid field for the API entity types of @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @/@ for the root resource. When an applicable child entity inherits the content of another entity of the same type with more general specifications of the other @location@ attributes, the child entity's @path@ attribute must match that of the parent entity as a prefix.+dplPath :: Lens' DocumentationPartLocation (Maybe Text)+dplPath = lens _dplPath (\ s a -> s{_dplPath = a})++-- | The name of the targeted API entity. It is a valid and required field for the API entity types of @AUTHORIZER@ , @MODEL@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ and @RESPONSE_HEADER@ . It is an invalid field for any other entity type.+dplName :: Lens' DocumentationPartLocation (Maybe Text)+dplName = lens _dplName (\ s a -> s{_dplName = a})++-- | The HTTP verb of a method. It is a valid field for the API entity types of @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any method. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @method@ attribute must match that of the parent entity exactly.+dplMethod :: Lens' DocumentationPartLocation (Maybe Text)+dplMethod = lens _dplMethod (\ s a -> s{_dplMethod = a})++-- | The HTTP status code of a response. It is a valid field for the API entity types of @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . The default value is @*@ for any status code. When an applicable child entity inherits the content of an entity of the same type with more general specifications of the other @location@ attributes, the child entity's @statusCode@ attribute must match that of the parent entity exactly.+dplStatusCode :: Lens' DocumentationPartLocation (Maybe Text)+dplStatusCode = lens _dplStatusCode (\ s a -> s{_dplStatusCode = a})++-- | [Required] The type of API entity to which the documentation content applies. Valid values are @API@ , @AUTHORIZER@ , @MODEL@ , @RESOURCE@ , @METHOD@ , @PATH_PARAMETER@ , @QUERY_PARAMETER@ , @REQUEST_HEADER@ , @REQUEST_BODY@ , @RESPONSE@ , @RESPONSE_HEADER@ , and @RESPONSE_BODY@ . Content inheritance does not apply to any entity of the @API@ , @AUTHORIZER@ , @METHOD@ , @MODEL@ , @REQUEST_BODY@ , or @RESOURCE@ type.+dplType :: Lens' DocumentationPartLocation DocumentationPartType+dplType = lens _dplType (\ s a -> s{_dplType = a})++instance FromJSON DocumentationPartLocation where+ parseJSON+ = withObject "DocumentationPartLocation"+ (\ x ->+ DocumentationPartLocation' <$>+ (x .:? "path") <*> (x .:? "name") <*>+ (x .:? "method")+ <*> (x .:? "statusCode")+ <*> (x .: "type"))++instance Hashable DocumentationPartLocation where++instance NFData DocumentationPartLocation where++instance ToJSON DocumentationPartLocation where+ toJSON DocumentationPartLocation'{..}+ = object+ (catMaybes+ [("path" .=) <$> _dplPath, ("name" .=) <$> _dplName,+ ("method" .=) <$> _dplMethod,+ ("statusCode" .=) <$> _dplStatusCode,+ Just ("type" .= _dplType)])++-- | A snapshot of the documentation of an API.+--+--+-- Publishing API documentation involves creating a documentation version associated with an API stage and exporting the versioned documentation to an external (e.g., Swagger) file.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-documenting-api.html Documenting an API> , 'DocumentationPart' , 'DocumentationVersions'+--+-- /See:/ 'documentationVersion' smart constructor.+data DocumentationVersion = DocumentationVersion'+ { _dvCreatedDate :: !(Maybe POSIX)+ , _dvVersion :: !(Maybe Text)+ , _dvDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DocumentationVersion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dvCreatedDate' - The date when the API documentation snapshot is created.+--+-- * 'dvVersion' - The version identifier of the API documentation snapshot.+--+-- * 'dvDescription' - The description of the API documentation snapshot.+documentationVersion+ :: DocumentationVersion+documentationVersion =+ DocumentationVersion'+ {_dvCreatedDate = Nothing, _dvVersion = Nothing, _dvDescription = Nothing}+++-- | The date when the API documentation snapshot is created.+dvCreatedDate :: Lens' DocumentationVersion (Maybe UTCTime)+dvCreatedDate = lens _dvCreatedDate (\ s a -> s{_dvCreatedDate = a}) . mapping _Time++-- | The version identifier of the API documentation snapshot.+dvVersion :: Lens' DocumentationVersion (Maybe Text)+dvVersion = lens _dvVersion (\ s a -> s{_dvVersion = a})++-- | The description of the API documentation snapshot.+dvDescription :: Lens' DocumentationVersion (Maybe Text)+dvDescription = lens _dvDescription (\ s a -> s{_dvDescription = a})++instance FromJSON DocumentationVersion where+ parseJSON+ = withObject "DocumentationVersion"+ (\ x ->+ DocumentationVersion' <$>+ (x .:? "createdDate") <*> (x .:? "version") <*>+ (x .:? "description"))++instance Hashable DocumentationVersion where++instance NFData DocumentationVersion where++-- | Represents a custom domain name as a user-friendly host name of an API ('RestApi' ).+--+--+-- When you deploy an API, API Gateway creates a default host name for the API. This default API host name is of the @{restapi-id}.execute-api.{region}.amazonaws.com@ format. With the default host name, you can access the API's root resource with the URL of @https://{restapi-id}.execute-api.{region}.amazonaws.com/{stage}/@ . When you set up a custom domain name of @apis.example.com@ for this API, you can then access the same resource using the URL of the @https://apis.examples.com/myApi@ , where @myApi@ is the base path mapping ('BasePathMapping' ) of your API under the custom domain name.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-custom-domains.html Set a Custom Host Name for an API>+--+-- /See:/ 'domainName' smart constructor.+data DomainName = DomainName'+ { _dnRegionalHostedZoneId :: !(Maybe Text)+ , _dnCertificateName :: !(Maybe Text)+ , _dnRegionalCertificateARN :: !(Maybe Text)+ , _dnCertificateARN :: !(Maybe Text)+ , _dnDistributionHostedZoneId :: !(Maybe Text)+ , _dnDomainName :: !(Maybe Text)+ , _dnRegionalCertificateName :: !(Maybe Text)+ , _dnRegionalDomainName :: !(Maybe Text)+ , _dnCertificateUploadDate :: !(Maybe POSIX)+ , _dnDistributionDomainName :: !(Maybe Text)+ , _dnEndpointConfiguration :: !(Maybe EndpointConfiguration)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'DomainName' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'dnRegionalHostedZoneId' - The region-specific Amazon Route 53 Hosted Zone ID of the regional endpoint. For more information, see <https://docs.aws.amazon.com/apigateway/latest/developerguide/apigateway-regional-api-custom-domain-create.html Set up a Regional Custom Domain Name> and <http://docs.aws.amazon.com/general/latest/gr/rande.html#apigateway_region AWS Regions and Endpoints for API Gateway> .+--+-- * 'dnCertificateName' - The name of the certificate that will be used by edge-optimized endpoint for this domain name.+--+-- * 'dnRegionalCertificateARN' - The reference to an AWS-managed certificate that will be used for validating the regional domain name. AWS Certificate Manager is the only supported source.+--+-- * 'dnCertificateARN' - The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source.+--+-- * 'dnDistributionHostedZoneId' - The region-agnostic Amazon Route 53 Hosted Zone ID of the edge-optimized endpoint. The valid value is @Z2FDTNDATAQYW2@ for all the regions. For more information, see <https://docs.aws.amazon.com/apigateway/latest/developerguide/apigateway-regional-api-custom-domain-create.html Set up a Regional Custom Domain Name> and <http://docs.aws.amazon.com/general/latest/gr/rande.html#apigateway_region AWS Regions and Endpoints for API Gateway> .+--+-- * 'dnDomainName' - The custom domain name as an API host name, for example, @my-api.example.com@ .+--+-- * 'dnRegionalCertificateName' - The name of the certificate that will be used for validating the regional domain name.+--+-- * 'dnRegionalDomainName' - The domain name associated with the regional endpoint for this custom domain name. You set up this association by adding a DNS record that points the custom domain name to this regional domain name. The regional domain name is returned by API Gateway when you create a regional endpoint.+--+-- * 'dnCertificateUploadDate' - The timestamp when the certificate that was used by edge-optimized endpoint for this domain name was uploaded.+--+-- * 'dnDistributionDomainName' - The domain name of the Amazon CloudFront distribution associated with this custom domain name for an edge-optimized endpoint. You set up this association when adding a DNS record pointing the custom domain name to this distribution name. For more information about CloudFront distributions, see the <http://aws.amazon.com/documentation/cloudfront/ Amazon CloudFront documentation> .+--+-- * 'dnEndpointConfiguration' - The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.+domainName+ :: DomainName+domainName =+ DomainName'+ { _dnRegionalHostedZoneId = Nothing+ , _dnCertificateName = Nothing+ , _dnRegionalCertificateARN = Nothing+ , _dnCertificateARN = Nothing+ , _dnDistributionHostedZoneId = Nothing+ , _dnDomainName = Nothing+ , _dnRegionalCertificateName = Nothing+ , _dnRegionalDomainName = Nothing+ , _dnCertificateUploadDate = Nothing+ , _dnDistributionDomainName = Nothing+ , _dnEndpointConfiguration = Nothing+ }+++-- | The region-specific Amazon Route 53 Hosted Zone ID of the regional endpoint. For more information, see <https://docs.aws.amazon.com/apigateway/latest/developerguide/apigateway-regional-api-custom-domain-create.html Set up a Regional Custom Domain Name> and <http://docs.aws.amazon.com/general/latest/gr/rande.html#apigateway_region AWS Regions and Endpoints for API Gateway> .+dnRegionalHostedZoneId :: Lens' DomainName (Maybe Text)+dnRegionalHostedZoneId = lens _dnRegionalHostedZoneId (\ s a -> s{_dnRegionalHostedZoneId = a})++-- | The name of the certificate that will be used by edge-optimized endpoint for this domain name.+dnCertificateName :: Lens' DomainName (Maybe Text)+dnCertificateName = lens _dnCertificateName (\ s a -> s{_dnCertificateName = a})++-- | The reference to an AWS-managed certificate that will be used for validating the regional domain name. AWS Certificate Manager is the only supported source.+dnRegionalCertificateARN :: Lens' DomainName (Maybe Text)+dnRegionalCertificateARN = lens _dnRegionalCertificateARN (\ s a -> s{_dnRegionalCertificateARN = a})++-- | The reference to an AWS-managed certificate that will be used by edge-optimized endpoint for this domain name. AWS Certificate Manager is the only supported source.+dnCertificateARN :: Lens' DomainName (Maybe Text)+dnCertificateARN = lens _dnCertificateARN (\ s a -> s{_dnCertificateARN = a})++-- | The region-agnostic Amazon Route 53 Hosted Zone ID of the edge-optimized endpoint. The valid value is @Z2FDTNDATAQYW2@ for all the regions. For more information, see <https://docs.aws.amazon.com/apigateway/latest/developerguide/apigateway-regional-api-custom-domain-create.html Set up a Regional Custom Domain Name> and <http://docs.aws.amazon.com/general/latest/gr/rande.html#apigateway_region AWS Regions and Endpoints for API Gateway> .+dnDistributionHostedZoneId :: Lens' DomainName (Maybe Text)+dnDistributionHostedZoneId = lens _dnDistributionHostedZoneId (\ s a -> s{_dnDistributionHostedZoneId = a})++-- | The custom domain name as an API host name, for example, @my-api.example.com@ .+dnDomainName :: Lens' DomainName (Maybe Text)+dnDomainName = lens _dnDomainName (\ s a -> s{_dnDomainName = a})++-- | The name of the certificate that will be used for validating the regional domain name.+dnRegionalCertificateName :: Lens' DomainName (Maybe Text)+dnRegionalCertificateName = lens _dnRegionalCertificateName (\ s a -> s{_dnRegionalCertificateName = a})++-- | The domain name associated with the regional endpoint for this custom domain name. You set up this association by adding a DNS record that points the custom domain name to this regional domain name. The regional domain name is returned by API Gateway when you create a regional endpoint.+dnRegionalDomainName :: Lens' DomainName (Maybe Text)+dnRegionalDomainName = lens _dnRegionalDomainName (\ s a -> s{_dnRegionalDomainName = a})++-- | The timestamp when the certificate that was used by edge-optimized endpoint for this domain name was uploaded.+dnCertificateUploadDate :: Lens' DomainName (Maybe UTCTime)+dnCertificateUploadDate = lens _dnCertificateUploadDate (\ s a -> s{_dnCertificateUploadDate = a}) . mapping _Time++-- | The domain name of the Amazon CloudFront distribution associated with this custom domain name for an edge-optimized endpoint. You set up this association when adding a DNS record pointing the custom domain name to this distribution name. For more information about CloudFront distributions, see the <http://aws.amazon.com/documentation/cloudfront/ Amazon CloudFront documentation> .+dnDistributionDomainName :: Lens' DomainName (Maybe Text)+dnDistributionDomainName = lens _dnDistributionDomainName (\ s a -> s{_dnDistributionDomainName = a})++-- | The endpoint configuration of this 'DomainName' showing the endpoint types of the domain name.+dnEndpointConfiguration :: Lens' DomainName (Maybe EndpointConfiguration)+dnEndpointConfiguration = lens _dnEndpointConfiguration (\ s a -> s{_dnEndpointConfiguration = a})++instance FromJSON DomainName where+ parseJSON+ = withObject "DomainName"+ (\ x ->+ DomainName' <$>+ (x .:? "regionalHostedZoneId") <*>+ (x .:? "certificateName")+ <*> (x .:? "regionalCertificateArn")+ <*> (x .:? "certificateArn")+ <*> (x .:? "distributionHostedZoneId")+ <*> (x .:? "domainName")+ <*> (x .:? "regionalCertificateName")+ <*> (x .:? "regionalDomainName")+ <*> (x .:? "certificateUploadDate")+ <*> (x .:? "distributionDomainName")+ <*> (x .:? "endpointConfiguration"))++instance Hashable DomainName where++instance NFData DomainName where++-- | The endpoint configuration to indicate the types of endpoints an API ('RestApi' ) or its custom domain name ('DomainName' ) has.+--+--+--+-- /See:/ 'endpointConfiguration' smart constructor.+newtype EndpointConfiguration = EndpointConfiguration'+ { _ecTypes :: Maybe [EndpointType]+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'EndpointConfiguration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ecTypes' - A list of endpoint types of an API ('RestApi' ) or its custom domain name ('DomainName' ). For an edge-optimized API and its custom domain name, the endpoint type is @"EDGE"@ . For a regional API and its custom domain name, the endpoint type is @REGIONAL@ .+endpointConfiguration+ :: EndpointConfiguration+endpointConfiguration = EndpointConfiguration' {_ecTypes = Nothing}+++-- | A list of endpoint types of an API ('RestApi' ) or its custom domain name ('DomainName' ). For an edge-optimized API and its custom domain name, the endpoint type is @"EDGE"@ . For a regional API and its custom domain name, the endpoint type is @REGIONAL@ .+ecTypes :: Lens' EndpointConfiguration [EndpointType]+ecTypes = lens _ecTypes (\ s a -> s{_ecTypes = a}) . _Default . _Coerce++instance FromJSON EndpointConfiguration where+ parseJSON+ = withObject "EndpointConfiguration"+ (\ x ->+ EndpointConfiguration' <$>+ (x .:? "types" .!= mempty))++instance Hashable EndpointConfiguration where++instance NFData EndpointConfiguration where++instance ToJSON EndpointConfiguration where+ toJSON EndpointConfiguration'{..}+ = object (catMaybes [("types" .=) <$> _ecTypes])++-- | A gateway response of a given response type and status code, with optional response parameters and mapping templates.+--+--+-- For more information about valid gateway response types, see <http://docs.aws.amazon.com/apigateway/latest/developerguide/supported-gateway-response-types.html Gateway Response Types Supported by API Gateway> __Example: Get a Gateway Response of a given response type__+-- __Request__+-- This example shows how to get a gateway response of the @MISSING_AUTHENTICATION_TOKEN@ type.+--+-- @@GET /restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN HTTP/1.1 Host: beta-apigateway.us-east-1.amazonaws.com Content-Type: application/json X-Amz-Date: 20170503T202516Z Authorization: AWS4-HMAC-SHA256 Credential={access-key-id}/20170503/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature=1b52460e3159c1a26cff29093855d50ea141c1c5b937528fecaf60f51129697a Cache-Control: no-cache Postman-Token: 3b2a1ce9-c848-2e26-2e2f-9c2caefbed45 @ @ The response type is specified as a URL path.+--+-- __Response__+-- The successful operation returns the @200 OK@ status code and a payload similar to the following:+--+-- @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-gatewayresponse-{rel}.html", "name": "gatewayresponse", "templated": true }, "self": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" }, "gatewayresponse:delete": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" }, "gatewayresponse:put": { "href": "/restapis/o81lxisefl/gatewayresponses/{response_type}", "templated": true }, "gatewayresponse:update": { "href": "/restapis/o81lxisefl/gatewayresponses/MISSING_AUTHENTICATION_TOKEN" } }, "defaultResponse": false, "responseParameters": { "gatewayresponse.header.x-request-path": "method.request.path.petId", "gatewayresponse.header.Access-Control-Allow-Origin": "'a.b.c'", "gatewayresponse.header.x-request-query": "method.request.querystring.q", "gatewayresponse.header.x-request-header": "method.request.header.Accept" }, "responseTemplates": { "application/json": "{\n \"message\": $context.error.messageString,\n \"type\": \"$context.error.responseType\",\n \"stage\": \"$context.stage\",\n \"resourcePath\": \"$context.resourcePath\",\n \"stageVariables.a\": \"$stageVariables.a\",\n \"statusCode\": \"'404'\"\n}" }, "responseType": "MISSING_AUTHENTICATION_TOKEN", "statusCode": "404" }@ @+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/customize-gateway-responses.html Customize Gateway Responses>+--+-- /See:/ 'gatewayResponse' smart constructor.+data GatewayResponse = GatewayResponse'+ { _gDefaultResponse :: !(Maybe Bool)+ , _gResponseTemplates :: !(Maybe (Map Text Text))+ , _gResponseType :: !(Maybe GatewayResponseType)+ , _gStatusCode :: !(Maybe Text)+ , _gResponseParameters :: !(Maybe (Map Text Text))+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GatewayResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gDefaultResponse' - A Boolean flag to indicate whether this 'GatewayResponse' is the default gateway response (@true@ ) or not (@false@ ). A default gateway response is one generated by API Gateway without any customization by an API developer.+--+-- * 'gResponseTemplates' - Response templates of the 'GatewayResponse' as a string-to-string map of key-value pairs.+--+-- * 'gResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE+--+-- * 'gStatusCode' - The HTTP status code for this 'GatewayResponse' .+--+-- * 'gResponseParameters' - Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs.+gatewayResponse+ :: GatewayResponse+gatewayResponse =+ GatewayResponse'+ { _gDefaultResponse = Nothing+ , _gResponseTemplates = Nothing+ , _gResponseType = Nothing+ , _gStatusCode = Nothing+ , _gResponseParameters = Nothing+ }+++-- | A Boolean flag to indicate whether this 'GatewayResponse' is the default gateway response (@true@ ) or not (@false@ ). A default gateway response is one generated by API Gateway without any customization by an API developer.+gDefaultResponse :: Lens' GatewayResponse (Maybe Bool)+gDefaultResponse = lens _gDefaultResponse (\ s a -> s{_gDefaultResponse = a})++-- | Response templates of the 'GatewayResponse' as a string-to-string map of key-value pairs.+gResponseTemplates :: Lens' GatewayResponse (HashMap Text Text)+gResponseTemplates = lens _gResponseTemplates (\ s a -> s{_gResponseTemplates = a}) . _Default . _Map++-- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE+gResponseType :: Lens' GatewayResponse (Maybe GatewayResponseType)+gResponseType = lens _gResponseType (\ s a -> s{_gResponseType = a})++-- | The HTTP status code for this 'GatewayResponse' .+gStatusCode :: Lens' GatewayResponse (Maybe Text)+gStatusCode = lens _gStatusCode (\ s a -> s{_gStatusCode = a})++-- | Response parameters (paths, query strings and headers) of the 'GatewayResponse' as a string-to-string map of key-value pairs.+gResponseParameters :: Lens' GatewayResponse (HashMap Text Text)+gResponseParameters = lens _gResponseParameters (\ s a -> s{_gResponseParameters = a}) . _Default . _Map++instance FromJSON GatewayResponse where+ parseJSON+ = withObject "GatewayResponse"+ (\ x ->+ GatewayResponse' <$>+ (x .:? "defaultResponse") <*>+ (x .:? "responseTemplates" .!= mempty)+ <*> (x .:? "responseType")+ <*> (x .:? "statusCode")+ <*> (x .:? "responseParameters" .!= mempty))++instance Hashable GatewayResponse where++instance NFData GatewayResponse where++-- | Represents an HTTP, HTTP_PROXY, AWS, AWS_PROXY, or Mock integration.+--+--+-- In the API Gateway console, the built-in Lambda integration is an AWS integration.<http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>+--+-- /See:/ 'integration' smart constructor.+data Integration = Integration'+ { _iHttpMethod :: !(Maybe Text)+ , _iRequestTemplates :: !(Maybe (Map Text Text))+ , _iCredentials :: !(Maybe Text)+ , _iConnectionId :: !(Maybe Text)+ , _iRequestParameters :: !(Maybe (Map Text Text))+ , _iContentHandling :: !(Maybe ContentHandlingStrategy)+ , _iPassthroughBehavior :: !(Maybe Text)+ , _iUri :: !(Maybe Text)+ , _iIntegrationResponses :: !(Maybe (Map Text IntegrationResponse))+ , _iCacheNamespace :: !(Maybe Text)+ , _iTimeoutInMillis :: !(Maybe Int)+ , _iType :: !(Maybe IntegrationType)+ , _iConnectionType :: !(Maybe ConnectionType)+ , _iCacheKeyParameters :: !(Maybe [Text])+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Integration' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'iHttpMethod' - Specifies the integration's HTTP method type.+--+-- * 'iRequestTemplates' - Represents a map of Velocity templates that are applied on the request payload based on the value of the Content-Type header sent by the client. The content type value is the key in this map, and the template (as a String) is the value.+--+-- * 'iCredentials' - Specifies the credentials required for the integration, if any. For AWS integrations, three options are available. To specify an IAM Role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To require that the caller's identity be passed through from the request, specify the string @arn:aws:iam::\*:user/\*@ . To use resource-based permissions on supported AWS services, specify null.+--+-- * 'iConnectionId' - The (<http://docs.aws.amazon.com/apigateway/api-reference/resource/vpc-link/#id @id@ > ) of the 'VpcLink' used for the integration when @connectionType=VPC_LINK@ and undefined, otherwise.+--+-- * 'iRequestParameters' - A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name.+--+-- * 'iContentHandling' - Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through.+--+-- * 'iPassthroughBehavior' - Specifies how the method request body of an unmapped content type will be passed through the integration request to the back end without transformation. A content type is unmapped if no mapping template is defined in the integration or the content type does not match any of the mapped content types, as specified in @requestTemplates@ . The valid value is one of the following: * @WHEN_NO_MATCH@ : passes the method request body through the integration request to the back end without transformation when the method request content type does not match any content type associated with the mapping templates defined in the integration request. * @WHEN_NO_TEMPLATES@ : passes the method request body through the integration request to the back end without transformation when no mapping template is defined in the integration request. If a template is defined when this option is selected, the method request of an unmapped content-type will be rejected with an HTTP @415 Unsupported Media Type@ response. * @NEVER@ : rejects the method request with an HTTP @415 Unsupported Media Type@ response when either the method request content type does not match any content type associated with the mapping templates defined in the integration request or no mapping template is defined in the integration request.+--+-- * 'iUri' - Specifies Uniform Resource Identifier (URI) of the integration endpoint. * For @HTTP@ or @HTTP_PROXY@ integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> , for either standard integration, where @connectionType@ is not @VPC_LINK@ , or private integration, where @connectionType@ is @VPC_LINK@ . For a private HTTP integration, the URI is not used for routing. * For @AWS@ or @AWS_PROXY@ integrations, the URI is of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:path|action/{service_api}@ . Here, @{Region}@ is the API Gateway region (e.g., @us-east-1@ ); @{service}@ is the name of the integrated AWS service (e.g., @s3@ ); and @{subdomain}@ is a designated subdomain supported by certain AWS service for fast host-name lookup. @action@ can be used for an AWS service action-based API, using an @Action={name}&{p1}={v1}&p2={v2}...@ query string. The ensuing @{service_api}@ refers to a supported action @{name}@ plus any required input parameters. Alternatively, @path@ can be used for an AWS service path-based API. The ensuing @service_api@ refers to the path to an AWS service resource, including the region of the integrated AWS service, if applicable. For example, for integration with the S3 API of @<http://docs.aws.amazon.com/AmazonS3/latest/API/RESTObjectGET.html GetObject> @ , the @uri@ can be either @arn:aws:apigateway:us-west-2:s3:action/GetObject&Bucket={bucket}&Key={key}@ or @arn:aws:apigateway:us-west-2:s3:path/{bucket}/{key}@+--+-- * 'iIntegrationResponses' - Specifies the integration's responses. __Example: Get integration responses of a method__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160607T191449Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160607/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__ The successful response returns @200 OK@ status and a payload as follows: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>+--+-- * 'iCacheNamespace' - Specifies the integration's cache namespace.+--+-- * 'iTimeoutInMillis' - Custom timeout between 50 and 29,000 milliseconds. The default value is 29,000 milliseconds or 29 seconds.+--+-- * 'iType' - Specifies an API method integration type. The valid value is one of the following: * @AWS@ : for integrating the API method request with an AWS service action, including the Lambda function-invoking action. With the Lambda function-invoking action, this is referred to as the Lambda custom integration. With any other AWS service action, this is known as AWS integration. * @AWS_PROXY@ : for integrating the API method request with the Lambda function-invoking action with the client request passed through as-is. This integration is also referred to as the Lambda proxy integration. * @HTTP@ : for integrating the API method request with an HTTP endpoint, including a private HTTP endpoint within a VPC. This integration is also referred to as the HTTP custom integration. * @HTTP_PROXY@ : for integrating the API method request with an HTTP endpoint, including a private HTTP endpoint within a VPC, with the client request passed through as-is. This is also referred to as the HTTP proxy integration. * @MOCK@ : for integrating the API method request with API Gateway as a "loop-back" endpoint without invoking any backend. For the HTTP and HTTP proxy integrations, each integration can specify a protocol (@http/https@ ), port and path. Standard 80 and 443 ports are supported as well as custom ports above 1024. An HTTP or HTTP proxy integration with a @connectionType@ of @VPC_LINK@ is referred to as a private integration and uses a 'VpcLink' to connect API Gateway to a network load balancer of a VPC.+--+-- * 'iConnectionType' - The type of the network connection to the integration endpoint. The valid value is @INTERNET@ for connections through the public routable internet or @VPC_LINK@ for private connections between API Gateway and a network load balancer in a VPC. The default value is @INTERNET@ .+--+-- * 'iCacheKeyParameters' - Specifies the integration's cache key parameters.+integration+ :: Integration+integration =+ Integration'+ { _iHttpMethod = Nothing+ , _iRequestTemplates = Nothing+ , _iCredentials = Nothing+ , _iConnectionId = Nothing+ , _iRequestParameters = Nothing+ , _iContentHandling = Nothing+ , _iPassthroughBehavior = Nothing+ , _iUri = Nothing+ , _iIntegrationResponses = Nothing+ , _iCacheNamespace = Nothing+ , _iTimeoutInMillis = Nothing+ , _iType = Nothing+ , _iConnectionType = Nothing+ , _iCacheKeyParameters = Nothing+ }+++-- | Specifies the integration's HTTP method type.+iHttpMethod :: Lens' Integration (Maybe Text)+iHttpMethod = lens _iHttpMethod (\ s a -> s{_iHttpMethod = a})++-- | Represents a map of Velocity templates that are applied on the request payload based on the value of the Content-Type header sent by the client. The content type value is the key in this map, and the template (as a String) is the value.+iRequestTemplates :: Lens' Integration (HashMap Text Text)+iRequestTemplates = lens _iRequestTemplates (\ s a -> s{_iRequestTemplates = a}) . _Default . _Map++-- | Specifies the credentials required for the integration, if any. For AWS integrations, three options are available. To specify an IAM Role for API Gateway to assume, use the role's Amazon Resource Name (ARN). To require that the caller's identity be passed through from the request, specify the string @arn:aws:iam::\*:user/\*@ . To use resource-based permissions on supported AWS services, specify null.+iCredentials :: Lens' Integration (Maybe Text)+iCredentials = lens _iCredentials (\ s a -> s{_iCredentials = a})++-- | The (<http://docs.aws.amazon.com/apigateway/api-reference/resource/vpc-link/#id @id@ > ) of the 'VpcLink' used for the integration when @connectionType=VPC_LINK@ and undefined, otherwise.+iConnectionId :: Lens' Integration (Maybe Text)+iConnectionId = lens _iConnectionId (\ s a -> s{_iConnectionId = a})++-- | A key-value map specifying request parameters that are passed from the method request to the back end. The key is an integration request parameter name and the associated value is a method request parameter value or static value that must be enclosed within single quotes and pre-encoded as required by the back end. The method request parameter value must match the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ must be a valid and unique method request parameter name.+iRequestParameters :: Lens' Integration (HashMap Text Text)+iRequestParameters = lens _iRequestParameters (\ s a -> s{_iRequestParameters = a}) . _Default . _Map++-- | Specifies how to handle request payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a request payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a request payload from a binary blob to a Base64-encoded string. If this property is not defined, the request payload will be passed through from the method request to integration request without modification, provided that the @passthroughBehaviors@ is configured to support payload pass-through.+iContentHandling :: Lens' Integration (Maybe ContentHandlingStrategy)+iContentHandling = lens _iContentHandling (\ s a -> s{_iContentHandling = a})++-- | Specifies how the method request body of an unmapped content type will be passed through the integration request to the back end without transformation. A content type is unmapped if no mapping template is defined in the integration or the content type does not match any of the mapped content types, as specified in @requestTemplates@ . The valid value is one of the following: * @WHEN_NO_MATCH@ : passes the method request body through the integration request to the back end without transformation when the method request content type does not match any content type associated with the mapping templates defined in the integration request. * @WHEN_NO_TEMPLATES@ : passes the method request body through the integration request to the back end without transformation when no mapping template is defined in the integration request. If a template is defined when this option is selected, the method request of an unmapped content-type will be rejected with an HTTP @415 Unsupported Media Type@ response. * @NEVER@ : rejects the method request with an HTTP @415 Unsupported Media Type@ response when either the method request content type does not match any content type associated with the mapping templates defined in the integration request or no mapping template is defined in the integration request.+iPassthroughBehavior :: Lens' Integration (Maybe Text)+iPassthroughBehavior = lens _iPassthroughBehavior (\ s a -> s{_iPassthroughBehavior = a})++-- | Specifies Uniform Resource Identifier (URI) of the integration endpoint. * For @HTTP@ or @HTTP_PROXY@ integrations, the URI must be a fully formed, encoded HTTP(S) URL according to the <https://en.wikipedia.org/wiki/Uniform_Resource_Identifier RFC-3986 specification> , for either standard integration, where @connectionType@ is not @VPC_LINK@ , or private integration, where @connectionType@ is @VPC_LINK@ . For a private HTTP integration, the URI is not used for routing. * For @AWS@ or @AWS_PROXY@ integrations, the URI is of the form @arn:aws:apigateway:{region}:{subdomain.service|service}:path|action/{service_api}@ . Here, @{Region}@ is the API Gateway region (e.g., @us-east-1@ ); @{service}@ is the name of the integrated AWS service (e.g., @s3@ ); and @{subdomain}@ is a designated subdomain supported by certain AWS service for fast host-name lookup. @action@ can be used for an AWS service action-based API, using an @Action={name}&{p1}={v1}&p2={v2}...@ query string. The ensuing @{service_api}@ refers to a supported action @{name}@ plus any required input parameters. Alternatively, @path@ can be used for an AWS service path-based API. The ensuing @service_api@ refers to the path to an AWS service resource, including the region of the integrated AWS service, if applicable. For example, for integration with the S3 API of @<http://docs.aws.amazon.com/AmazonS3/latest/API/RESTObjectGET.html GetObject> @ , the @uri@ can be either @arn:aws:apigateway:us-west-2:s3:action/GetObject&Bucket={bucket}&Key={key}@ or @arn:aws:apigateway:us-west-2:s3:path/{bucket}/{key}@+iUri :: Lens' Integration (Maybe Text)+iUri = lens _iUri (\ s a -> s{_iUri = a})++-- | Specifies the integration's responses. __Example: Get integration responses of a method__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160607T191449Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160607/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash} @ @ __Response__ The successful response returns @200 OK@ status and a payload as follows: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>+iIntegrationResponses :: Lens' Integration (HashMap Text IntegrationResponse)+iIntegrationResponses = lens _iIntegrationResponses (\ s a -> s{_iIntegrationResponses = a}) . _Default . _Map++-- | Specifies the integration's cache namespace.+iCacheNamespace :: Lens' Integration (Maybe Text)+iCacheNamespace = lens _iCacheNamespace (\ s a -> s{_iCacheNamespace = a})++-- | Custom timeout between 50 and 29,000 milliseconds. The default value is 29,000 milliseconds or 29 seconds.+iTimeoutInMillis :: Lens' Integration (Maybe Int)+iTimeoutInMillis = lens _iTimeoutInMillis (\ s a -> s{_iTimeoutInMillis = a})++-- | Specifies an API method integration type. The valid value is one of the following: * @AWS@ : for integrating the API method request with an AWS service action, including the Lambda function-invoking action. With the Lambda function-invoking action, this is referred to as the Lambda custom integration. With any other AWS service action, this is known as AWS integration. * @AWS_PROXY@ : for integrating the API method request with the Lambda function-invoking action with the client request passed through as-is. This integration is also referred to as the Lambda proxy integration. * @HTTP@ : for integrating the API method request with an HTTP endpoint, including a private HTTP endpoint within a VPC. This integration is also referred to as the HTTP custom integration. * @HTTP_PROXY@ : for integrating the API method request with an HTTP endpoint, including a private HTTP endpoint within a VPC, with the client request passed through as-is. This is also referred to as the HTTP proxy integration. * @MOCK@ : for integrating the API method request with API Gateway as a "loop-back" endpoint without invoking any backend. For the HTTP and HTTP proxy integrations, each integration can specify a protocol (@http/https@ ), port and path. Standard 80 and 443 ports are supported as well as custom ports above 1024. An HTTP or HTTP proxy integration with a @connectionType@ of @VPC_LINK@ is referred to as a private integration and uses a 'VpcLink' to connect API Gateway to a network load balancer of a VPC.+iType :: Lens' Integration (Maybe IntegrationType)+iType = lens _iType (\ s a -> s{_iType = a})++-- | The type of the network connection to the integration endpoint. The valid value is @INTERNET@ for connections through the public routable internet or @VPC_LINK@ for private connections between API Gateway and a network load balancer in a VPC. The default value is @INTERNET@ .+iConnectionType :: Lens' Integration (Maybe ConnectionType)+iConnectionType = lens _iConnectionType (\ s a -> s{_iConnectionType = a})++-- | Specifies the integration's cache key parameters.+iCacheKeyParameters :: Lens' Integration [Text]+iCacheKeyParameters = lens _iCacheKeyParameters (\ s a -> s{_iCacheKeyParameters = a}) . _Default . _Coerce++instance FromJSON Integration where+ parseJSON+ = withObject "Integration"+ (\ x ->+ Integration' <$>+ (x .:? "httpMethod") <*>+ (x .:? "requestTemplates" .!= mempty)+ <*> (x .:? "credentials")+ <*> (x .:? "connectionId")+ <*> (x .:? "requestParameters" .!= mempty)+ <*> (x .:? "contentHandling")+ <*> (x .:? "passthroughBehavior")+ <*> (x .:? "uri")+ <*> (x .:? "integrationResponses" .!= mempty)+ <*> (x .:? "cacheNamespace")+ <*> (x .:? "timeoutInMillis")+ <*> (x .:? "type")+ <*> (x .:? "connectionType")+ <*> (x .:? "cacheKeyParameters" .!= mempty))++instance Hashable Integration where++instance NFData Integration where++-- | Represents an integration response. The status code must map to an existing 'MethodResponse' , and parameters and templates can be used to transform the back-end response.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>+--+-- /See:/ 'integrationResponse' smart constructor.+data IntegrationResponse = IntegrationResponse'+ { _intContentHandling :: !(Maybe ContentHandlingStrategy)+ , _intResponseTemplates :: !(Maybe (Map Text Text))+ , _intSelectionPattern :: !(Maybe Text)+ , _intStatusCode :: !(Maybe Text)+ , _intResponseParameters :: !(Maybe (Map Text Text))+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'IntegrationResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'intContentHandling' - Specifies how to handle response payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a response payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a response payload from a binary blob to a Base64-encoded string. If this property is not defined, the response payload will be passed through from the integration response to the method response without modification.+--+-- * 'intResponseTemplates' - Specifies the templates used to transform the integration response body. Response templates are represented as a key/value map, with a content-type as the key and a template as the value.+--+-- * 'intSelectionPattern' - Specifies the regular expression (regex) pattern used to choose an integration response based on the response from the back end. For example, if the success response returns nothing and the error response returns some string, you could use the @.+@ regex to match error response. However, make sure that the error response does not contain any newline (@\n@ ) character in such cases. If the back end is an AWS Lambda function, the AWS Lambda function error header is matched. For all other HTTP and AWS back ends, the HTTP status code is matched.+--+-- * 'intStatusCode' - Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .+--+-- * 'intResponseParameters' - A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ is a valid and unique response header name and @JSON-expression@ is a valid JSON expression without the @> @ prefix.+integrationResponse+ :: IntegrationResponse+integrationResponse =+ IntegrationResponse'+ { _intContentHandling = Nothing+ , _intResponseTemplates = Nothing+ , _intSelectionPattern = Nothing+ , _intStatusCode = Nothing+ , _intResponseParameters = Nothing+ }+++-- | Specifies how to handle response payload content type conversions. Supported values are @CONVERT_TO_BINARY@ and @CONVERT_TO_TEXT@ , with the following behaviors: * @CONVERT_TO_BINARY@ : Converts a response payload from a Base64-encoded string to the corresponding binary blob. * @CONVERT_TO_TEXT@ : Converts a response payload from a binary blob to a Base64-encoded string. If this property is not defined, the response payload will be passed through from the integration response to the method response without modification.+intContentHandling :: Lens' IntegrationResponse (Maybe ContentHandlingStrategy)+intContentHandling = lens _intContentHandling (\ s a -> s{_intContentHandling = a})++-- | Specifies the templates used to transform the integration response body. Response templates are represented as a key/value map, with a content-type as the key and a template as the value.+intResponseTemplates :: Lens' IntegrationResponse (HashMap Text Text)+intResponseTemplates = lens _intResponseTemplates (\ s a -> s{_intResponseTemplates = a}) . _Default . _Map++-- | Specifies the regular expression (regex) pattern used to choose an integration response based on the response from the back end. For example, if the success response returns nothing and the error response returns some string, you could use the @.+@ regex to match error response. However, make sure that the error response does not contain any newline (@\n@ ) character in such cases. If the back end is an AWS Lambda function, the AWS Lambda function error header is matched. For all other HTTP and AWS back ends, the HTTP status code is matched.+intSelectionPattern :: Lens' IntegrationResponse (Maybe Text)+intSelectionPattern = lens _intSelectionPattern (\ s a -> s{_intSelectionPattern = a})++-- | Specifies the status code that is used to map the integration response to an existing 'MethodResponse' .+intStatusCode :: Lens' IntegrationResponse (Maybe Text)+intStatusCode = lens _intStatusCode (\ s a -> s{_intStatusCode = a})++-- | A key-value map specifying response parameters that are passed to the method response from the back end. The key is a method response header parameter name and the mapped value is an integration response header value, a static value enclosed within a pair of single quotes, or a JSON expression from the integration response body. The mapping key must match the pattern of @method.response.header.{name}@ , where @name@ is a valid and unique header name. The mapped non-static value must match the pattern of @integration.response.header.{name}@ or @integration.response.body.{JSON-expression}@ , where @name@ is a valid and unique response header name and @JSON-expression@ is a valid JSON expression without the @> @ prefix.+intResponseParameters :: Lens' IntegrationResponse (HashMap Text Text)+intResponseParameters = lens _intResponseParameters (\ s a -> s{_intResponseParameters = a}) . _Default . _Map++instance FromJSON IntegrationResponse where+ parseJSON+ = withObject "IntegrationResponse"+ (\ x ->+ IntegrationResponse' <$>+ (x .:? "contentHandling") <*>+ (x .:? "responseTemplates" .!= mempty)+ <*> (x .:? "selectionPattern")+ <*> (x .:? "statusCode")+ <*> (x .:? "responseParameters" .!= mempty))++instance Hashable IntegrationResponse where++instance NFData IntegrationResponse where++-- | Represents a client-facing interface by which the client calls the API to access back-end resources. A __Method__ resource is integrated with an 'Integration' resource. Both consist of a request and one or more responses. The method request takes the client input that is passed to the back end through the integration request. A method response returns the output from the back end to the client through an integration response. A method request is embodied in a __Method__ resource, whereas an integration request is embodied in an 'Integration' resource. On the other hand, a method response is represented by a 'MethodResponse' resource, whereas an integration response is represented by an 'IntegrationResponse' resource.+--+--+--+--+-- __Example: Retrive the GET method on a specified resource__+-- __Request__+-- The following example request retrieves the information about the GET method on an API resource (@3kzxbg5sa2@ ) of an API (@fugvjdxtri@ ).+--+-- @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160603T210259Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160603/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__+-- The successful response returns a @200 OK@ status code and a payload similar to the following:+--+-- @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": true, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E%23foreach(%24stream%20in%20%24input.path(%27%24.StreamNames%27))%3Cstream%3E%3Cname%3E%24stream%3C%2Fname%3E%3C%2Fstream%3E%23end%3C%2FkinesisStreams%3E\")" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ In the example above, the response template for the @200 OK@ response maps the JSON output from the @ListStreams@ action in the back end to an XML output. The mapping template is URL-encoded as @%3CkinesisStreams%3E%23foreach(%24stream%20in%20%24input.path(%27%24.StreamNames%27))%3Cstream%3E%3Cname%3E%24stream%3C%2Fname%3E%3C%2Fstream%3E%23end%3C%2FkinesisStreams%3E@ and the output is decoded using the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-mapping-template-reference.html#util-templat-reference > util.urlDecode()> helper function.+--+-- 'MethodResponse' , 'Integration' , 'IntegrationResponse' , 'Resource' , <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-method-settings.html Set up an API's method>+--+-- /See:/ 'method' smart constructor.+data Method = Method'+ { _mMethodResponses :: !(Maybe (Map Text MethodResponse))+ , _mHttpMethod :: !(Maybe Text)+ , _mAuthorizationScopes :: !(Maybe [Text])+ , _mRequestValidatorId :: !(Maybe Text)+ , _mRequestModels :: !(Maybe (Map Text Text))+ , _mRequestParameters :: !(Maybe (Map Text Bool))+ , _mAuthorizerId :: !(Maybe Text)+ , _mOperationName :: !(Maybe Text)+ , _mAuthorizationType :: !(Maybe Text)+ , _mApiKeyRequired :: !(Maybe Bool)+ , _mMethodIntegration :: !(Maybe Integration)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Method' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mMethodResponses' - Gets a method response associated with a given HTTP status code. The collection of method responses are encapsulated in a key-value map, where the key is a response's HTTP status code and the value is a 'MethodResponse' resource that specifies the response returned to the caller from the back end through the integration response. __Example: Get a 200 OK response of a GET method__ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T215008Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.operator": false, "method.response.header.operand_2": false, "method.response.header.operand_1": false }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-method-response.html AWS CLI>+--+-- * 'mHttpMethod' - The method's HTTP verb.+--+-- * 'mAuthorizationScopes' - A list of authorization scopes configured on the method. The scopes are used with a @COGNITO_USER_POOLS@ authorizer to authorize the method invocation. The authorization works by matching the method scopes against the scopes parsed from the access token in the incoming request. The method invocation is authorized if any method scopes matches a claimed scope in the access token. Otherwise, the invocation is not authorized. When the method scope is configured, the client must provide an access token instead of an identity token for authorization purposes.+--+-- * 'mRequestValidatorId' - The identifier of a 'RequestValidator' for request validation.+--+-- * 'mRequestModels' - A key-value map specifying data schemas, represented by 'Model' resources, (as the mapped value) of the request payloads of given content types (as the mapping key).+--+-- * 'mRequestParameters' - A key-value map defining required or optional method request parameters that can be accepted by API Gateway. A key is a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or templates.+--+-- * 'mAuthorizerId' - The identifier of an 'Authorizer' to use on this method. The @authorizationType@ must be @CUSTOM@ .+--+-- * 'mOperationName' - A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example.+--+-- * 'mAuthorizationType' - The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+--+-- * 'mApiKeyRequired' - A boolean flag specifying whether a valid 'ApiKey' is required to invoke this method.+--+-- * 'mMethodIntegration' - Gets the method's integration responsible for passing the client-submitted request to the back end and performing necessary transformations to make the request compliant with the back end. __Example: __ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T213210Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true } ], "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:responses": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "0cjtch", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestTemplates": { "application/json": "{\n \"a\": \"$input.params('operand1')\",\n \"b\": \"$input.params('operand2')\", \n \"op\": \"$input.params('operator')\" \n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-west-2:lambda:path//2015-03-31/functions/arn:aws:lambda:us-west-2:123456789012:function:Calc/invocations", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.operator": "integration.response.body.op", "method.response.header.operand_2": "integration.response.body.b", "method.response.header.operand_1": "integration.response.body.a" }, "responseTemplates": { "application/json": "#set($res = $input.path('$'))\n{\n \"result\": \"$res.a, $res.b, $res.op => $res.c\",\n \"a\" : \"$res.a\",\n \"b\" : \"$res.b\",\n \"op\" : \"$res.op\",\n \"c\" : \"$res.c\"\n}" }, "selectionPattern": "", "statusCode": "200" } } }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-integration.html AWS CLI>+method+ :: Method+method =+ Method'+ { _mMethodResponses = Nothing+ , _mHttpMethod = Nothing+ , _mAuthorizationScopes = Nothing+ , _mRequestValidatorId = Nothing+ , _mRequestModels = Nothing+ , _mRequestParameters = Nothing+ , _mAuthorizerId = Nothing+ , _mOperationName = Nothing+ , _mAuthorizationType = Nothing+ , _mApiKeyRequired = Nothing+ , _mMethodIntegration = Nothing+ }+++-- | Gets a method response associated with a given HTTP status code. The collection of method responses are encapsulated in a key-value map, where the key is a response's HTTP status code and the value is a 'MethodResponse' resource that specifies the response returned to the caller from the back end through the integration response. __Example: Get a 200 OK response of a GET method__ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T215008Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.operator": false, "method.response.header.operand_2": false, "method.response.header.operand_1": false }, "statusCode": "200" }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-method-response.html AWS CLI>+mMethodResponses :: Lens' Method (HashMap Text MethodResponse)+mMethodResponses = lens _mMethodResponses (\ s a -> s{_mMethodResponses = a}) . _Default . _Map++-- | The method's HTTP verb.+mHttpMethod :: Lens' Method (Maybe Text)+mHttpMethod = lens _mHttpMethod (\ s a -> s{_mHttpMethod = a})++-- | A list of authorization scopes configured on the method. The scopes are used with a @COGNITO_USER_POOLS@ authorizer to authorize the method invocation. The authorization works by matching the method scopes against the scopes parsed from the access token in the incoming request. The method invocation is authorized if any method scopes matches a claimed scope in the access token. Otherwise, the invocation is not authorized. When the method scope is configured, the client must provide an access token instead of an identity token for authorization purposes.+mAuthorizationScopes :: Lens' Method [Text]+mAuthorizationScopes = lens _mAuthorizationScopes (\ s a -> s{_mAuthorizationScopes = a}) . _Default . _Coerce++-- | The identifier of a 'RequestValidator' for request validation.+mRequestValidatorId :: Lens' Method (Maybe Text)+mRequestValidatorId = lens _mRequestValidatorId (\ s a -> s{_mRequestValidatorId = a})++-- | A key-value map specifying data schemas, represented by 'Model' resources, (as the mapped value) of the request payloads of given content types (as the mapping key).+mRequestModels :: Lens' Method (HashMap Text Text)+mRequestModels = lens _mRequestModels (\ s a -> s{_mRequestModels = a}) . _Default . _Map++-- | A key-value map defining required or optional method request parameters that can be accepted by API Gateway. A key is a method request parameter name matching the pattern of @method.request.{location}.{name}@ , where @location@ is @querystring@ , @path@ , or @header@ and @name@ is a valid and unique parameter name. The value associated with the key is a Boolean flag indicating whether the parameter is required (@true@ ) or optional (@false@ ). The method request parameter names defined here are available in 'Integration' to be mapped to integration request parameters or templates.+mRequestParameters :: Lens' Method (HashMap Text Bool)+mRequestParameters = lens _mRequestParameters (\ s a -> s{_mRequestParameters = a}) . _Default . _Map++-- | The identifier of an 'Authorizer' to use on this method. The @authorizationType@ must be @CUSTOM@ .+mAuthorizerId :: Lens' Method (Maybe Text)+mAuthorizerId = lens _mAuthorizerId (\ s a -> s{_mAuthorizerId = a})++-- | A human-friendly operation identifier for the method. For example, you can assign the @operationName@ of @ListPets@ for the @GET /pets@ method in <http://petstore-demo-endpoint.execute-api.com/petstore/pets PetStore> example.+mOperationName :: Lens' Method (Maybe Text)+mOperationName = lens _mOperationName (\ s a -> s{_mOperationName = a})++-- | The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+mAuthorizationType :: Lens' Method (Maybe Text)+mAuthorizationType = lens _mAuthorizationType (\ s a -> s{_mAuthorizationType = a})++-- | A boolean flag specifying whether a valid 'ApiKey' is required to invoke this method.+mApiKeyRequired :: Lens' Method (Maybe Bool)+mApiKeyRequired = lens _mApiKeyRequired (\ s a -> s{_mApiKeyRequired = a})++-- | Gets the method's integration responsible for passing the client-submitted request to the back end and performing necessary transformations to make the request compliant with the back end. __Example: __ __Request__ @@GET /restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com Content-Length: 117 X-Amz-Date: 20160613T213210Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160613/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ The successful response returns a @200 OK@ status code and a payload similar to the following: @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true } ], "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integration:responses": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "0cjtch", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestTemplates": { "application/json": "{\n \"a\": \"$input.params('operand1')\",\n \"b\": \"$input.params('operand2')\", \n \"op\": \"$input.params('operator')\" \n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-west-2:lambda:path//2015-03-31/functions/arn:aws:lambda:us-west-2:123456789012:function:Calc/invocations", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/uojnr9hd57/resources/0cjtch/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.operator": "integration.response.body.op", "method.response.header.operand_2": "integration.response.body.b", "method.response.header.operand_1": "integration.response.body.a" }, "responseTemplates": { "application/json": "#set($res = $input.path('$'))\n{\n \"result\": \"$res.a, $res.b, $res.op => $res.c\",\n \"a\" : \"$res.a\",\n \"b\" : \"$res.b\",\n \"op\" : \"$res.op\",\n \"c\" : \"$res.c\"\n}" }, "selectionPattern": "", "statusCode": "200" } } }@ @ <http://docs.aws.amazon.com/cli/latest/reference/apigateway/get-integration.html AWS CLI>+mMethodIntegration :: Lens' Method (Maybe Integration)+mMethodIntegration = lens _mMethodIntegration (\ s a -> s{_mMethodIntegration = a})++instance FromJSON Method where+ parseJSON+ = withObject "Method"+ (\ x ->+ Method' <$>+ (x .:? "methodResponses" .!= mempty) <*>+ (x .:? "httpMethod")+ <*> (x .:? "authorizationScopes" .!= mempty)+ <*> (x .:? "requestValidatorId")+ <*> (x .:? "requestModels" .!= mempty)+ <*> (x .:? "requestParameters" .!= mempty)+ <*> (x .:? "authorizerId")+ <*> (x .:? "operationName")+ <*> (x .:? "authorizationType")+ <*> (x .:? "apiKeyRequired")+ <*> (x .:? "methodIntegration"))++instance Hashable Method where++instance NFData Method where++-- | Represents a method response of a given HTTP status code returned to the client. The method response is passed from the back end through the associated integration response that can be transformed using a mapping template.+--+--+--+--+-- __Example: A __MethodResponse__ instance of an API__+-- __Request__+-- The example request retrieves a __MethodResponse__ of the 200 status code.+--+-- @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200 HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20160603T222952Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20160603/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__+-- The successful response returns @200 OK@ status and a payload as follows:+--+-- @@{ "_links": { "curies": { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true }, "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" }@ @+--+-- 'Method' , 'IntegrationResponse' , 'Integration' <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Creating an API>+--+-- /See:/ 'methodResponse' smart constructor.+data MethodResponse = MethodResponse'+ { _mResponseModels :: !(Maybe (Map Text Text))+ , _mStatusCode :: !(Maybe Text)+ , _mResponseParameters :: !(Maybe (Map Text Bool))+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'MethodResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mResponseModels' - Specifies the 'Model' resources used for the response's content-type. Response models are represented as a key/value map, with a content-type as the key and a 'Model' name as the value.+--+-- * 'mStatusCode' - The method response's status code.+--+-- * 'mResponseParameters' - A key-value map specifying required or optional response parameters that API Gateway can send back to the caller. A key defines a method response header and the value specifies whether the associated method response header is required or not. The expression of the key must match the pattern @method.response.header.{name}@ , where @name@ is a valid and unique header name. API Gateway passes certain integration response data to the method response headers specified here according to the mapping you prescribe in the API's 'IntegrationResponse' . The integration response data that can be mapped include an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)+methodResponse+ :: MethodResponse+methodResponse =+ MethodResponse'+ { _mResponseModels = Nothing+ , _mStatusCode = Nothing+ , _mResponseParameters = Nothing+ }+++-- | Specifies the 'Model' resources used for the response's content-type. Response models are represented as a key/value map, with a content-type as the key and a 'Model' name as the value.+mResponseModels :: Lens' MethodResponse (HashMap Text Text)+mResponseModels = lens _mResponseModels (\ s a -> s{_mResponseModels = a}) . _Default . _Map++-- | The method response's status code.+mStatusCode :: Lens' MethodResponse (Maybe Text)+mStatusCode = lens _mStatusCode (\ s a -> s{_mStatusCode = a})++-- | A key-value map specifying required or optional response parameters that API Gateway can send back to the caller. A key defines a method response header and the value specifies whether the associated method response header is required or not. The expression of the key must match the pattern @method.response.header.{name}@ , where @name@ is a valid and unique header name. API Gateway passes certain integration response data to the method response headers specified here according to the mapping you prescribe in the API's 'IntegrationResponse' . The integration response data that can be mapped include an integration response header expressed in @integration.response.header.{name}@ , a static value enclosed within a pair of single quotes (e.g., @'application/json'@ ), or a JSON expression from the back-end response payload in the form of @integration.response.body.{JSON-expression}@ , where @JSON-expression@ is a valid JSON expression without the @> @ prefix.)+mResponseParameters :: Lens' MethodResponse (HashMap Text Bool)+mResponseParameters = lens _mResponseParameters (\ s a -> s{_mResponseParameters = a}) . _Default . _Map++instance FromJSON MethodResponse where+ parseJSON+ = withObject "MethodResponse"+ (\ x ->+ MethodResponse' <$>+ (x .:? "responseModels" .!= mempty) <*>+ (x .:? "statusCode")+ <*> (x .:? "responseParameters" .!= mempty))++instance Hashable MethodResponse where++instance NFData MethodResponse where++-- | Specifies the method setting properties.+--+--+--+-- /See:/ 'methodSetting' smart constructor.+data MethodSetting = MethodSetting'+ { _msCacheTtlInSeconds :: !(Maybe Int)+ , _msDataTraceEnabled :: !(Maybe Bool)+ , _msThrottlingBurstLimit :: !(Maybe Int)+ , _msCacheDataEncrypted :: !(Maybe Bool)+ , _msLoggingLevel :: !(Maybe Text)+ , _msRequireAuthorizationForCacheControl :: !(Maybe Bool)+ , _msCachingEnabled :: !(Maybe Bool)+ , _msMetricsEnabled :: !(Maybe Bool)+ , _msThrottlingRateLimit :: !(Maybe Double)+ , _msUnauthorizedCacheControlHeaderStrategy :: !(Maybe UnauthorizedCacheControlHeaderStrategy)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'MethodSetting' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'msCacheTtlInSeconds' - Specifies the time to live (TTL), in seconds, for cached responses. The higher the TTL, the longer the response will be cached. The PATCH path for this setting is @/{method_setting_key}/caching/ttlInSeconds@ , and the value is an integer.+--+-- * 'msDataTraceEnabled' - Specifies whether data trace logging is enabled for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/dataTrace@ , and the value is a Boolean.+--+-- * 'msThrottlingBurstLimit' - Specifies the throttling burst limit. The PATCH path for this setting is @/{method_setting_key}/throttling/burstLimit@ , and the value is an integer.+--+-- * 'msCacheDataEncrypted' - Specifies whether the cached responses are encrypted. The PATCH path for this setting is @/{method_setting_key}/caching/dataEncrypted@ , and the value is a Boolean.+--+-- * 'msLoggingLevel' - Specifies the logging level for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/loglevel@ , and the available levels are @OFF@ , @ERROR@ , and @INFO@ .+--+-- * 'msRequireAuthorizationForCacheControl' - Specifies whether authorization is required for a cache invalidation request. The PATCH path for this setting is @/{method_setting_key}/caching/requireAuthorizationForCacheControl@ , and the value is a Boolean.+--+-- * 'msCachingEnabled' - Specifies whether responses should be cached and returned for requests. A cache cluster must be enabled on the stage for responses to be cached. The PATCH path for this setting is @/{method_setting_key}/caching/enabled@ , and the value is a Boolean.+--+-- * 'msMetricsEnabled' - Specifies whether Amazon CloudWatch metrics are enabled for this method. The PATCH path for this setting is @/{method_setting_key}/metrics/enabled@ , and the value is a Boolean.+--+-- * 'msThrottlingRateLimit' - Specifies the throttling rate limit. The PATCH path for this setting is @/{method_setting_key}/throttling/rateLimit@ , and the value is a double.+--+-- * 'msUnauthorizedCacheControlHeaderStrategy' - Specifies how to handle unauthorized requests for cache invalidation. The PATCH path for this setting is @/{method_setting_key}/caching/unauthorizedCacheControlHeaderStrategy@ , and the available values are @FAIL_WITH_403@ , @SUCCEED_WITH_RESPONSE_HEADER@ , @SUCCEED_WITHOUT_RESPONSE_HEADER@ .+methodSetting+ :: MethodSetting+methodSetting =+ MethodSetting'+ { _msCacheTtlInSeconds = Nothing+ , _msDataTraceEnabled = Nothing+ , _msThrottlingBurstLimit = Nothing+ , _msCacheDataEncrypted = Nothing+ , _msLoggingLevel = Nothing+ , _msRequireAuthorizationForCacheControl = Nothing+ , _msCachingEnabled = Nothing+ , _msMetricsEnabled = Nothing+ , _msThrottlingRateLimit = Nothing+ , _msUnauthorizedCacheControlHeaderStrategy = Nothing+ }+++-- | Specifies the time to live (TTL), in seconds, for cached responses. The higher the TTL, the longer the response will be cached. The PATCH path for this setting is @/{method_setting_key}/caching/ttlInSeconds@ , and the value is an integer.+msCacheTtlInSeconds :: Lens' MethodSetting (Maybe Int)+msCacheTtlInSeconds = lens _msCacheTtlInSeconds (\ s a -> s{_msCacheTtlInSeconds = a})++-- | Specifies whether data trace logging is enabled for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/dataTrace@ , and the value is a Boolean.+msDataTraceEnabled :: Lens' MethodSetting (Maybe Bool)+msDataTraceEnabled = lens _msDataTraceEnabled (\ s a -> s{_msDataTraceEnabled = a})++-- | Specifies the throttling burst limit. The PATCH path for this setting is @/{method_setting_key}/throttling/burstLimit@ , and the value is an integer.+msThrottlingBurstLimit :: Lens' MethodSetting (Maybe Int)+msThrottlingBurstLimit = lens _msThrottlingBurstLimit (\ s a -> s{_msThrottlingBurstLimit = a})++-- | Specifies whether the cached responses are encrypted. The PATCH path for this setting is @/{method_setting_key}/caching/dataEncrypted@ , and the value is a Boolean.+msCacheDataEncrypted :: Lens' MethodSetting (Maybe Bool)+msCacheDataEncrypted = lens _msCacheDataEncrypted (\ s a -> s{_msCacheDataEncrypted = a})++-- | Specifies the logging level for this method, which effects the log entries pushed to Amazon CloudWatch Logs. The PATCH path for this setting is @/{method_setting_key}/logging/loglevel@ , and the available levels are @OFF@ , @ERROR@ , and @INFO@ .+msLoggingLevel :: Lens' MethodSetting (Maybe Text)+msLoggingLevel = lens _msLoggingLevel (\ s a -> s{_msLoggingLevel = a})++-- | Specifies whether authorization is required for a cache invalidation request. The PATCH path for this setting is @/{method_setting_key}/caching/requireAuthorizationForCacheControl@ , and the value is a Boolean.+msRequireAuthorizationForCacheControl :: Lens' MethodSetting (Maybe Bool)+msRequireAuthorizationForCacheControl = lens _msRequireAuthorizationForCacheControl (\ s a -> s{_msRequireAuthorizationForCacheControl = a})++-- | Specifies whether responses should be cached and returned for requests. A cache cluster must be enabled on the stage for responses to be cached. The PATCH path for this setting is @/{method_setting_key}/caching/enabled@ , and the value is a Boolean.+msCachingEnabled :: Lens' MethodSetting (Maybe Bool)+msCachingEnabled = lens _msCachingEnabled (\ s a -> s{_msCachingEnabled = a})++-- | Specifies whether Amazon CloudWatch metrics are enabled for this method. The PATCH path for this setting is @/{method_setting_key}/metrics/enabled@ , and the value is a Boolean.+msMetricsEnabled :: Lens' MethodSetting (Maybe Bool)+msMetricsEnabled = lens _msMetricsEnabled (\ s a -> s{_msMetricsEnabled = a})++-- | Specifies the throttling rate limit. The PATCH path for this setting is @/{method_setting_key}/throttling/rateLimit@ , and the value is a double.+msThrottlingRateLimit :: Lens' MethodSetting (Maybe Double)+msThrottlingRateLimit = lens _msThrottlingRateLimit (\ s a -> s{_msThrottlingRateLimit = a})++-- | Specifies how to handle unauthorized requests for cache invalidation. The PATCH path for this setting is @/{method_setting_key}/caching/unauthorizedCacheControlHeaderStrategy@ , and the available values are @FAIL_WITH_403@ , @SUCCEED_WITH_RESPONSE_HEADER@ , @SUCCEED_WITHOUT_RESPONSE_HEADER@ .+msUnauthorizedCacheControlHeaderStrategy :: Lens' MethodSetting (Maybe UnauthorizedCacheControlHeaderStrategy)+msUnauthorizedCacheControlHeaderStrategy = lens _msUnauthorizedCacheControlHeaderStrategy (\ s a -> s{_msUnauthorizedCacheControlHeaderStrategy = a})++instance FromJSON MethodSetting where+ parseJSON+ = withObject "MethodSetting"+ (\ x ->+ MethodSetting' <$>+ (x .:? "cacheTtlInSeconds") <*>+ (x .:? "dataTraceEnabled")+ <*> (x .:? "throttlingBurstLimit")+ <*> (x .:? "cacheDataEncrypted")+ <*> (x .:? "loggingLevel")+ <*> (x .:? "requireAuthorizationForCacheControl")+ <*> (x .:? "cachingEnabled")+ <*> (x .:? "metricsEnabled")+ <*> (x .:? "throttlingRateLimit")+ <*> (x .:? "unauthorizedCacheControlHeaderStrategy"))++instance Hashable MethodSetting where++instance NFData MethodSetting where++-- | Represents a summary of a 'Method' resource, given a particular date and time.+--+--+--+-- /See:/ 'methodSnapshot' smart constructor.+data MethodSnapshot = MethodSnapshot'+ { _msAuthorizationType :: !(Maybe Text)+ , _msApiKeyRequired :: !(Maybe Bool)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'MethodSnapshot' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'msAuthorizationType' - The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+--+-- * 'msApiKeyRequired' - Specifies whether the method requires a valid 'ApiKey' .+methodSnapshot+ :: MethodSnapshot+methodSnapshot =+ MethodSnapshot' {_msAuthorizationType = Nothing, _msApiKeyRequired = Nothing}+++-- | The method's authorization type. Valid values are @NONE@ for open access, @AWS_IAM@ for using AWS IAM permissions, @CUSTOM@ for using a custom authorizer, or @COGNITO_USER_POOLS@ for using a Cognito user pool.+msAuthorizationType :: Lens' MethodSnapshot (Maybe Text)+msAuthorizationType = lens _msAuthorizationType (\ s a -> s{_msAuthorizationType = a})++-- | Specifies whether the method requires a valid 'ApiKey' .+msApiKeyRequired :: Lens' MethodSnapshot (Maybe Bool)+msApiKeyRequired = lens _msApiKeyRequired (\ s a -> s{_msApiKeyRequired = a})++instance FromJSON MethodSnapshot where+ parseJSON+ = withObject "MethodSnapshot"+ (\ x ->+ MethodSnapshot' <$>+ (x .:? "authorizationType") <*>+ (x .:? "apiKeyRequired"))++instance Hashable MethodSnapshot where++instance NFData MethodSnapshot where++-- | Represents the data structure of a method's request or response payload.+--+--+-- A request model defines the data structure of the client-supplied request payload. A response model defines the data structure of the response payload returned by the back end. Although not required, models are useful for mapping payloads between the front end and back end.+--+-- A model is used for generating an API's SDK, validating the input request body, and creating a skeletal mapping template.+--+-- 'Method' , 'MethodResponse' , <http://docs.aws.amazon.com/apigateway/latest/developerguide/models-mappings.html Models and Mappings>+--+-- /See:/ 'model' smart constructor.+data Model = Model'+ { _mSchema :: !(Maybe Text)+ , _mName :: !(Maybe Text)+ , _mId :: !(Maybe Text)+ , _mDescription :: !(Maybe Text)+ , _mContentType :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Model' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'mSchema' - The schema for the model. For @application/json@ models, this should be <https://tools.ietf.org/html/draft-zyp-json-schema-04 JSON schema draft 4> model. Do not include "\*/" characters in the description of any properties because such "\*/" characters may be interpreted as the closing marker for comments in some languages, such as Java or JavaScript, causing the installation of your API's SDK generated by API Gateway to fail.+--+-- * 'mName' - The name of the model. Must be an alphanumeric string.+--+-- * 'mId' - The identifier for the model resource.+--+-- * 'mDescription' - The description of the model.+--+-- * 'mContentType' - The content-type for the model.+model+ :: Model+model =+ Model'+ { _mSchema = Nothing+ , _mName = Nothing+ , _mId = Nothing+ , _mDescription = Nothing+ , _mContentType = Nothing+ }+++-- | The schema for the model. For @application/json@ models, this should be <https://tools.ietf.org/html/draft-zyp-json-schema-04 JSON schema draft 4> model. Do not include "\*/" characters in the description of any properties because such "\*/" characters may be interpreted as the closing marker for comments in some languages, such as Java or JavaScript, causing the installation of your API's SDK generated by API Gateway to fail.+mSchema :: Lens' Model (Maybe Text)+mSchema = lens _mSchema (\ s a -> s{_mSchema = a})++-- | The name of the model. Must be an alphanumeric string.+mName :: Lens' Model (Maybe Text)+mName = lens _mName (\ s a -> s{_mName = a})++-- | The identifier for the model resource.+mId :: Lens' Model (Maybe Text)+mId = lens _mId (\ s a -> s{_mId = a})++-- | The description of the model.+mDescription :: Lens' Model (Maybe Text)+mDescription = lens _mDescription (\ s a -> s{_mDescription = a})++-- | The content-type for the model.+mContentType :: Lens' Model (Maybe Text)+mContentType = lens _mContentType (\ s a -> s{_mContentType = a})++instance FromJSON Model where+ parseJSON+ = withObject "Model"+ (\ x ->+ Model' <$>+ (x .:? "schema") <*> (x .:? "name") <*> (x .:? "id")+ <*> (x .:? "description")+ <*> (x .:? "contentType"))++instance Hashable Model where++instance NFData Model where++-- | A single patch operation to apply to the specified resource. Please refer to http://tools.ietf.org/html/rfc6902#section-4 for an explanation of how each operation is used.+--+-- /See:/ 'patchOperation' smart constructor.+data PatchOperation = PatchOperation'+ { _poOp :: !(Maybe Op)+ , _poPath :: !(Maybe Text)+ , _poValue :: !(Maybe Text)+ , _poFrom :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'PatchOperation' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'poOp' - An update operation to be performed with this PATCH request. The valid value can be @add@ , @remove@ , @replace@ or @copy@ . Not all valid operations are supported for a given resource. Support of the operations depends on specific operational contexts. Attempts to apply an unsupported operation on a resource will return an error message.+--+-- * 'poPath' - The @op@ operation's target, as identified by a <https://tools.ietf.org/html/draft-ietf-appsawg-json-pointer-08 JSON Pointer> value that references a location within the targeted resource. For example, if the target resource has an updateable property of @{"name":"value"}@ , the path for this property is @/name@ . If the @name@ property value is a JSON object (e.g., @{"name": {"child/name": "child-value"}}@ ), the path for the @child/name@ property will be @/name/child~1name@ . Any slash ("/") character appearing in path names must be escaped with "~1", as shown in the example above. Each @op@ operation can have only one @path@ associated with it.+--+-- * 'poValue' - The new target value of the update operation. It is applicable for the @add@ or @replace@ operation. When using AWS CLI to update a property of a JSON value, enclose the JSON object with a pair of single quotes in a Linux shell, e.g., '{"a": ...}'. In a Windows shell, see <http://docs.aws.amazon.com/cli/latest/userguide/cli-using-param.html#cli-using-param-json Using JSON for Parameters> .+--+-- * 'poFrom' - The @copy@ update operation's source as identified by a @JSON-Pointer@ value referencing the location within the targeted resource to copy the value from. For example, to promote a canary deployment, you copy the canary deployment ID to the affiliated deployment ID by calling a PATCH request on a 'Stage' resource with @"op":"copy"@ , @"from":"/canarySettings/deploymentId"@ and @"path":"/deploymentId"@ .+patchOperation+ :: PatchOperation+patchOperation =+ PatchOperation'+ {_poOp = Nothing, _poPath = Nothing, _poValue = Nothing, _poFrom = Nothing}+++-- | An update operation to be performed with this PATCH request. The valid value can be @add@ , @remove@ , @replace@ or @copy@ . Not all valid operations are supported for a given resource. Support of the operations depends on specific operational contexts. Attempts to apply an unsupported operation on a resource will return an error message.+poOp :: Lens' PatchOperation (Maybe Op)+poOp = lens _poOp (\ s a -> s{_poOp = a})++-- | The @op@ operation's target, as identified by a <https://tools.ietf.org/html/draft-ietf-appsawg-json-pointer-08 JSON Pointer> value that references a location within the targeted resource. For example, if the target resource has an updateable property of @{"name":"value"}@ , the path for this property is @/name@ . If the @name@ property value is a JSON object (e.g., @{"name": {"child/name": "child-value"}}@ ), the path for the @child/name@ property will be @/name/child~1name@ . Any slash ("/") character appearing in path names must be escaped with "~1", as shown in the example above. Each @op@ operation can have only one @path@ associated with it.+poPath :: Lens' PatchOperation (Maybe Text)+poPath = lens _poPath (\ s a -> s{_poPath = a})++-- | The new target value of the update operation. It is applicable for the @add@ or @replace@ operation. When using AWS CLI to update a property of a JSON value, enclose the JSON object with a pair of single quotes in a Linux shell, e.g., '{"a": ...}'. In a Windows shell, see <http://docs.aws.amazon.com/cli/latest/userguide/cli-using-param.html#cli-using-param-json Using JSON for Parameters> .+poValue :: Lens' PatchOperation (Maybe Text)+poValue = lens _poValue (\ s a -> s{_poValue = a})++-- | The @copy@ update operation's source as identified by a @JSON-Pointer@ value referencing the location within the targeted resource to copy the value from. For example, to promote a canary deployment, you copy the canary deployment ID to the affiliated deployment ID by calling a PATCH request on a 'Stage' resource with @"op":"copy"@ , @"from":"/canarySettings/deploymentId"@ and @"path":"/deploymentId"@ .+poFrom :: Lens' PatchOperation (Maybe Text)+poFrom = lens _poFrom (\ s a -> s{_poFrom = a})++instance Hashable PatchOperation where++instance NFData PatchOperation where++instance ToJSON PatchOperation where+ toJSON PatchOperation'{..}+ = object+ (catMaybes+ [("op" .=) <$> _poOp, ("path" .=) <$> _poPath,+ ("value" .=) <$> _poValue, ("from" .=) <$> _poFrom])++-- | Quotas configured for a usage plan.+--+--+--+-- /See:/ 'quotaSettings' smart constructor.+data QuotaSettings = QuotaSettings'+ { _qsOffset :: !(Maybe Int)+ , _qsPeriod :: !(Maybe QuotaPeriodType)+ , _qsLimit :: !(Maybe Int)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'QuotaSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'qsOffset' - The number of requests subtracted from the given limit in the initial time period.+--+-- * 'qsPeriod' - The time period in which the limit applies. Valid values are "DAY", "WEEK" or "MONTH".+--+-- * 'qsLimit' - The maximum number of requests that can be made in a given time period.+quotaSettings+ :: QuotaSettings+quotaSettings =+ QuotaSettings' {_qsOffset = Nothing, _qsPeriod = Nothing, _qsLimit = Nothing}+++-- | The number of requests subtracted from the given limit in the initial time period.+qsOffset :: Lens' QuotaSettings (Maybe Int)+qsOffset = lens _qsOffset (\ s a -> s{_qsOffset = a})++-- | The time period in which the limit applies. Valid values are "DAY", "WEEK" or "MONTH".+qsPeriod :: Lens' QuotaSettings (Maybe QuotaPeriodType)+qsPeriod = lens _qsPeriod (\ s a -> s{_qsPeriod = a})++-- | The maximum number of requests that can be made in a given time period.+qsLimit :: Lens' QuotaSettings (Maybe Int)+qsLimit = lens _qsLimit (\ s a -> s{_qsLimit = a})++instance FromJSON QuotaSettings where+ parseJSON+ = withObject "QuotaSettings"+ (\ x ->+ QuotaSettings' <$>+ (x .:? "offset") <*> (x .:? "period") <*>+ (x .:? "limit"))++instance Hashable QuotaSettings where++instance NFData QuotaSettings where++instance ToJSON QuotaSettings where+ toJSON QuotaSettings'{..}+ = object+ (catMaybes+ [("offset" .=) <$> _qsOffset,+ ("period" .=) <$> _qsPeriod,+ ("limit" .=) <$> _qsLimit])++-- | A set of validation rules for incoming 'Method' requests.+--+--+-- In Swagger, a 'RequestValidator' of an API is defined by the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-swagger-extensions.html#api-gateway-swagger-extensions-request-validators.requestValidator.html x-amazon-apigateway-request-validators.requestValidator> object. It the referenced using the <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-swagger-extensions.html#api-gateway-swagger-extensions-request-validator x-amazon-apigateway-request-validator> property.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-method-request-validation.html Enable Basic Request Validation in API Gateway>+--+-- /See:/ 'requestValidator' smart constructor.+data RequestValidator = RequestValidator'+ { _rvValidateRequestParameters :: !(Maybe Bool)+ , _rvName :: !(Maybe Text)+ , _rvValidateRequestBody :: !(Maybe Bool)+ , _rvId :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'RequestValidator' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rvValidateRequestParameters' - A Boolean flag to indicate whether to validate request parameters (@true@ ) or not (@false@ ).+--+-- * 'rvName' - The name of this 'RequestValidator'+--+-- * 'rvValidateRequestBody' - A Boolean flag to indicate whether to validate a request body according to the configured 'Model' schema.+--+-- * 'rvId' - The identifier of this 'RequestValidator' .+requestValidator+ :: RequestValidator+requestValidator =+ RequestValidator'+ { _rvValidateRequestParameters = Nothing+ , _rvName = Nothing+ , _rvValidateRequestBody = Nothing+ , _rvId = Nothing+ }+++-- | A Boolean flag to indicate whether to validate request parameters (@true@ ) or not (@false@ ).+rvValidateRequestParameters :: Lens' RequestValidator (Maybe Bool)+rvValidateRequestParameters = lens _rvValidateRequestParameters (\ s a -> s{_rvValidateRequestParameters = a})++-- | The name of this 'RequestValidator'+rvName :: Lens' RequestValidator (Maybe Text)+rvName = lens _rvName (\ s a -> s{_rvName = a})++-- | A Boolean flag to indicate whether to validate a request body according to the configured 'Model' schema.+rvValidateRequestBody :: Lens' RequestValidator (Maybe Bool)+rvValidateRequestBody = lens _rvValidateRequestBody (\ s a -> s{_rvValidateRequestBody = a})++-- | The identifier of this 'RequestValidator' .+rvId :: Lens' RequestValidator (Maybe Text)+rvId = lens _rvId (\ s a -> s{_rvId = a})++instance FromJSON RequestValidator where+ parseJSON+ = withObject "RequestValidator"+ (\ x ->+ RequestValidator' <$>+ (x .:? "validateRequestParameters") <*>+ (x .:? "name")+ <*> (x .:? "validateRequestBody")+ <*> (x .:? "id"))++instance Hashable RequestValidator where++instance NFData RequestValidator where++-- | Represents an API resource.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Create an API>+--+-- /See:/ 'resource' smart constructor.+data Resource = Resource'+ { _rPathPart :: !(Maybe Text)+ , _rPath :: !(Maybe Text)+ , _rId :: !(Maybe Text)+ , _rResourceMethods :: !(Maybe (Map Text Method))+ , _rParentId :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Resource' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'rPathPart' - The last path segment for this resource.+--+-- * 'rPath' - The full path for this resource.+--+-- * 'rId' - The resource's identifier.+--+-- * 'rResourceMethods' - Gets an API resource's method of a given HTTP verb. The resource methods are a map of methods indexed by methods' HTTP verbs enabled on the resource. This method map is included in the @200 OK@ response of the @GET /restapis/{restapi_id}/resources/{resource_id}@ or @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ request. __Example: Get the GET method of an API resource__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20170223T031827Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20170223/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": false, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ If the @OPTIONS@ is enabled on the resource, you can follow the example here to get that method. Just replace the @GET@ of the last path segment in the request URL with @OPTIONS@ .+--+-- * 'rParentId' - The parent resource's identifier.+resource+ :: Resource+resource =+ Resource'+ { _rPathPart = Nothing+ , _rPath = Nothing+ , _rId = Nothing+ , _rResourceMethods = Nothing+ , _rParentId = Nothing+ }+++-- | The last path segment for this resource.+rPathPart :: Lens' Resource (Maybe Text)+rPathPart = lens _rPathPart (\ s a -> s{_rPathPart = a})++-- | The full path for this resource.+rPath :: Lens' Resource (Maybe Text)+rPath = lens _rPath (\ s a -> s{_rPath = a})++-- | The resource's identifier.+rId :: Lens' Resource (Maybe Text)+rId = lens _rId (\ s a -> s{_rId = a})++-- | Gets an API resource's method of a given HTTP verb. The resource methods are a map of methods indexed by methods' HTTP verbs enabled on the resource. This method map is included in the @200 OK@ response of the @GET /restapis/{restapi_id}/resources/{resource_id}@ or @GET /restapis/{restapi_id}/resources/{resource_id}?embed=methods@ request. __Example: Get the GET method of an API resource__ __Request__ @@GET /restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET HTTP/1.1 Content-Type: application/json Host: apigateway.us-east-1.amazonaws.com X-Amz-Date: 20170223T031827Z Authorization: AWS4-HMAC-SHA256 Credential={access_key_ID}/20170223/us-east-1/apigateway/aws4_request, SignedHeaders=content-type;host;x-amz-date, Signature={sig4_hash}@ @ __Response__ @@{ "_links": { "curies": [ { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-{rel}.html", "name": "integration", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-integration-response-{rel}.html", "name": "integrationresponse", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-{rel}.html", "name": "method", "templated": true }, { "href": "http://docs.aws.amazon.com/apigateway/latest/developerguide/restapi-method-response-{rel}.html", "name": "methodresponse", "templated": true } ], "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET", "name": "GET", "title": "GET" }, "integration:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "method:integration": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "method:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "method:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET" }, "methodresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/{status_code}", "templated": true } }, "apiKeyRequired": false, "authorizationType": "NONE", "httpMethod": "GET", "_embedded": { "method:integration": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integration:responses": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integration:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration" }, "integrationresponse:put": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/{status_code}", "templated": true } }, "cacheKeyParameters": [], "cacheNamespace": "3kzxbg5sa2", "credentials": "arn:aws:iam::123456789012:role/apigAwsProxyRole", "httpMethod": "POST", "passthroughBehavior": "WHEN_NO_MATCH", "requestParameters": { "integration.request.header.Content-Type": "'application/x-amz-json-1.1'" }, "requestTemplates": { "application/json": "{\n}" }, "type": "AWS", "uri": "arn:aws:apigateway:us-east-1:kinesis:action/ListStreams", "_embedded": { "integration:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200", "name": "200", "title": "200" }, "integrationresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" }, "integrationresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/integration/responses/200" } }, "responseParameters": { "method.response.header.Content-Type": "'application/xml'" }, "responseTemplates": { "application/json": "$util.urlDecode(\"%3CkinesisStreams%3E#foreach($stream in $input.path('$.StreamNames'))%3Cstream%3E%3Cname%3E$stream%3C/name%3E%3C/stream%3E#end%3C/kinesisStreams%3E\")\n" }, "statusCode": "200" } } }, "method:responses": { "_links": { "self": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200", "name": "200", "title": "200" }, "methodresponse:delete": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" }, "methodresponse:update": { "href": "/restapis/fugvjdxtri/resources/3kzxbg5sa2/methods/GET/responses/200" } }, "responseModels": { "application/json": "Empty" }, "responseParameters": { "method.response.header.Content-Type": false }, "statusCode": "200" } } }@ @ If the @OPTIONS@ is enabled on the resource, you can follow the example here to get that method. Just replace the @GET@ of the last path segment in the request URL with @OPTIONS@ .+rResourceMethods :: Lens' Resource (HashMap Text Method)+rResourceMethods = lens _rResourceMethods (\ s a -> s{_rResourceMethods = a}) . _Default . _Map++-- | The parent resource's identifier.+rParentId :: Lens' Resource (Maybe Text)+rParentId = lens _rParentId (\ s a -> s{_rParentId = a})++instance FromJSON Resource where+ parseJSON+ = withObject "Resource"+ (\ x ->+ Resource' <$>+ (x .:? "pathPart") <*> (x .:? "path") <*>+ (x .:? "id")+ <*> (x .:? "resourceMethods" .!= mempty)+ <*> (x .:? "parentId"))++instance Hashable Resource where++instance NFData Resource where++-- | Represents a REST API.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-create-api.html Create an API>+--+-- /See:/ 'restAPI' smart constructor.+data RestAPI = RestAPI'+ { _raMinimumCompressionSize :: !(Maybe Int)+ , _raBinaryMediaTypes :: !(Maybe [Text])+ , _raWarnings :: !(Maybe [Text])+ , _raCreatedDate :: !(Maybe POSIX)+ , _raName :: !(Maybe Text)+ , _raVersion :: !(Maybe Text)+ , _raApiKeySource :: !(Maybe APIKeySourceType)+ , _raId :: !(Maybe Text)+ , _raPolicy :: !(Maybe Text)+ , _raEndpointConfiguration :: !(Maybe EndpointConfiguration)+ , _raDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'RestAPI' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'raMinimumCompressionSize' - A nullable integer that is used to enable compression (with non-negative between 0 and 10485760 (10M) bytes, inclusive) or disable compression (with a null value) on an API. When compression is enabled, compression or decompression is not applied on the payload if the payload size is smaller than this value. Setting it to zero allows compression for any payload size.+--+-- * 'raBinaryMediaTypes' - The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads.+--+-- * 'raWarnings' - The warning messages reported when @failonwarnings@ is turned on during API import.+--+-- * 'raCreatedDate' - The timestamp when the API was created.+--+-- * 'raName' - The API's name.+--+-- * 'raVersion' - A version identifier for the API.+--+-- * 'raApiKeySource' - The source of the API key for metering requests according to a usage plan. Valid values are: * @HEADER@ to read the API key from the @X-API-Key@ header of a request. * @AUTHORIZER@ to read the API key from the @UsageIdentifierKey@ from a custom authorizer.+--+-- * 'raId' - The API's identifier. This identifier is unique across all of your APIs in API Gateway.+--+-- * 'raPolicy' - 'Method'+--+-- * 'raEndpointConfiguration' - The endpoint configuration of this 'RestApi' showing the endpoint types of the API.+--+-- * 'raDescription' - The API's description.+restAPI+ :: RestAPI+restAPI =+ RestAPI'+ { _raMinimumCompressionSize = Nothing+ , _raBinaryMediaTypes = Nothing+ , _raWarnings = Nothing+ , _raCreatedDate = Nothing+ , _raName = Nothing+ , _raVersion = Nothing+ , _raApiKeySource = Nothing+ , _raId = Nothing+ , _raPolicy = Nothing+ , _raEndpointConfiguration = Nothing+ , _raDescription = Nothing+ }+++-- | A nullable integer that is used to enable compression (with non-negative between 0 and 10485760 (10M) bytes, inclusive) or disable compression (with a null value) on an API. When compression is enabled, compression or decompression is not applied on the payload if the payload size is smaller than this value. Setting it to zero allows compression for any payload size.+raMinimumCompressionSize :: Lens' RestAPI (Maybe Int)+raMinimumCompressionSize = lens _raMinimumCompressionSize (\ s a -> s{_raMinimumCompressionSize = a})++-- | The list of binary media types supported by the 'RestApi' . By default, the 'RestApi' supports only UTF-8-encoded text payloads.+raBinaryMediaTypes :: Lens' RestAPI [Text]+raBinaryMediaTypes = lens _raBinaryMediaTypes (\ s a -> s{_raBinaryMediaTypes = a}) . _Default . _Coerce++-- | The warning messages reported when @failonwarnings@ is turned on during API import.+raWarnings :: Lens' RestAPI [Text]+raWarnings = lens _raWarnings (\ s a -> s{_raWarnings = a}) . _Default . _Coerce++-- | The timestamp when the API was created.+raCreatedDate :: Lens' RestAPI (Maybe UTCTime)+raCreatedDate = lens _raCreatedDate (\ s a -> s{_raCreatedDate = a}) . mapping _Time++-- | The API's name.+raName :: Lens' RestAPI (Maybe Text)+raName = lens _raName (\ s a -> s{_raName = a})++-- | A version identifier for the API.+raVersion :: Lens' RestAPI (Maybe Text)+raVersion = lens _raVersion (\ s a -> s{_raVersion = a})++-- | The source of the API key for metering requests according to a usage plan. Valid values are: * @HEADER@ to read the API key from the @X-API-Key@ header of a request. * @AUTHORIZER@ to read the API key from the @UsageIdentifierKey@ from a custom authorizer.+raApiKeySource :: Lens' RestAPI (Maybe APIKeySourceType)+raApiKeySource = lens _raApiKeySource (\ s a -> s{_raApiKeySource = a})++-- | The API's identifier. This identifier is unique across all of your APIs in API Gateway.+raId :: Lens' RestAPI (Maybe Text)+raId = lens _raId (\ s a -> s{_raId = a})++-- | 'Method'+raPolicy :: Lens' RestAPI (Maybe Text)+raPolicy = lens _raPolicy (\ s a -> s{_raPolicy = a})++-- | The endpoint configuration of this 'RestApi' showing the endpoint types of the API.+raEndpointConfiguration :: Lens' RestAPI (Maybe EndpointConfiguration)+raEndpointConfiguration = lens _raEndpointConfiguration (\ s a -> s{_raEndpointConfiguration = a})++-- | The API's description.+raDescription :: Lens' RestAPI (Maybe Text)+raDescription = lens _raDescription (\ s a -> s{_raDescription = a})++instance FromJSON RestAPI where+ parseJSON+ = withObject "RestAPI"+ (\ x ->+ RestAPI' <$>+ (x .:? "minimumCompressionSize") <*>+ (x .:? "binaryMediaTypes" .!= mempty)+ <*> (x .:? "warnings" .!= mempty)+ <*> (x .:? "createdDate")+ <*> (x .:? "name")+ <*> (x .:? "version")+ <*> (x .:? "apiKeySource")+ <*> (x .:? "id")+ <*> (x .:? "policy")+ <*> (x .:? "endpointConfiguration")+ <*> (x .:? "description"))++instance Hashable RestAPI where++instance NFData RestAPI where++-- | A configuration property of an SDK type.+--+--+--+-- /See:/ 'sdkConfigurationProperty' smart constructor.+data SDKConfigurationProperty = SDKConfigurationProperty'+ { _scpFriendlyName :: !(Maybe Text)+ , _scpRequired :: !(Maybe Bool)+ , _scpName :: !(Maybe Text)+ , _scpDefaultValue :: !(Maybe Text)+ , _scpDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'SDKConfigurationProperty' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'scpFriendlyName' - The user-friendly name of an 'SdkType' configuration property.+--+-- * 'scpRequired' - A boolean flag of an 'SdkType' configuration property to indicate if the associated SDK configuration property is required (@true@ ) or not (@false@ ).+--+-- * 'scpName' - The name of a an 'SdkType' configuration property.+--+-- * 'scpDefaultValue' - The default value of an 'SdkType' configuration property.+--+-- * 'scpDescription' - The description of an 'SdkType' configuration property.+sdkConfigurationProperty+ :: SDKConfigurationProperty+sdkConfigurationProperty =+ SDKConfigurationProperty'+ { _scpFriendlyName = Nothing+ , _scpRequired = Nothing+ , _scpName = Nothing+ , _scpDefaultValue = Nothing+ , _scpDescription = Nothing+ }+++-- | The user-friendly name of an 'SdkType' configuration property.+scpFriendlyName :: Lens' SDKConfigurationProperty (Maybe Text)+scpFriendlyName = lens _scpFriendlyName (\ s a -> s{_scpFriendlyName = a})++-- | A boolean flag of an 'SdkType' configuration property to indicate if the associated SDK configuration property is required (@true@ ) or not (@false@ ).+scpRequired :: Lens' SDKConfigurationProperty (Maybe Bool)+scpRequired = lens _scpRequired (\ s a -> s{_scpRequired = a})++-- | The name of a an 'SdkType' configuration property.+scpName :: Lens' SDKConfigurationProperty (Maybe Text)+scpName = lens _scpName (\ s a -> s{_scpName = a})++-- | The default value of an 'SdkType' configuration property.+scpDefaultValue :: Lens' SDKConfigurationProperty (Maybe Text)+scpDefaultValue = lens _scpDefaultValue (\ s a -> s{_scpDefaultValue = a})++-- | The description of an 'SdkType' configuration property.+scpDescription :: Lens' SDKConfigurationProperty (Maybe Text)+scpDescription = lens _scpDescription (\ s a -> s{_scpDescription = a})++instance FromJSON SDKConfigurationProperty where+ parseJSON+ = withObject "SDKConfigurationProperty"+ (\ x ->+ SDKConfigurationProperty' <$>+ (x .:? "friendlyName") <*> (x .:? "required") <*>+ (x .:? "name")+ <*> (x .:? "defaultValue")+ <*> (x .:? "description"))++instance Hashable SDKConfigurationProperty where++instance NFData SDKConfigurationProperty where++-- | A type of SDK that API Gateway can generate.+--+--+--+-- /See:/ 'sdkType' smart constructor.+data SDKType = SDKType'+ { _stFriendlyName :: !(Maybe Text)+ , _stConfigurationProperties :: !(Maybe [SDKConfigurationProperty])+ , _stId :: !(Maybe Text)+ , _stDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'SDKType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'stFriendlyName' - The user-friendly name of an 'SdkType' instance.+--+-- * 'stConfigurationProperties' - A list of configuration properties of an 'SdkType' .+--+-- * 'stId' - The identifier of an 'SdkType' instance.+--+-- * 'stDescription' - The description of an 'SdkType' .+sdkType+ :: SDKType+sdkType =+ SDKType'+ { _stFriendlyName = Nothing+ , _stConfigurationProperties = Nothing+ , _stId = Nothing+ , _stDescription = Nothing+ }+++-- | The user-friendly name of an 'SdkType' instance.+stFriendlyName :: Lens' SDKType (Maybe Text)+stFriendlyName = lens _stFriendlyName (\ s a -> s{_stFriendlyName = a})++-- | A list of configuration properties of an 'SdkType' .+stConfigurationProperties :: Lens' SDKType [SDKConfigurationProperty]+stConfigurationProperties = lens _stConfigurationProperties (\ s a -> s{_stConfigurationProperties = a}) . _Default . _Coerce++-- | The identifier of an 'SdkType' instance.+stId :: Lens' SDKType (Maybe Text)+stId = lens _stId (\ s a -> s{_stId = a})++-- | The description of an 'SdkType' .+stDescription :: Lens' SDKType (Maybe Text)+stDescription = lens _stDescription (\ s a -> s{_stDescription = a})++instance FromJSON SDKType where+ parseJSON+ = withObject "SDKType"+ (\ x ->+ SDKType' <$>+ (x .:? "friendlyName") <*>+ (x .:? "configurationProperties" .!= mempty)+ <*> (x .:? "id")+ <*> (x .:? "description"))++instance Hashable SDKType where++instance NFData SDKType where++-- | Represents a unique identifier for a version of a deployed 'RestApi' that is callable by users.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/how-to-deploy-api.html Deploy an API>+--+-- /See:/ 'stage' smart constructor.+data Stage = Stage'+ { _sDeploymentId :: !(Maybe Text)+ , _sVariables :: !(Maybe (Map Text Text))+ , _sAccessLogSettings :: !(Maybe AccessLogSettings)+ , _sDocumentationVersion :: !(Maybe Text)+ , _sClientCertificateId :: !(Maybe Text)+ , _sCreatedDate :: !(Maybe POSIX)+ , _sCacheClusterStatus :: !(Maybe CacheClusterStatus)+ , _sMethodSettings :: !(Maybe (Map Text MethodSetting))+ , _sLastUpdatedDate :: !(Maybe POSIX)+ , _sCacheClusterSize :: !(Maybe CacheClusterSize)+ , _sCanarySettings :: !(Maybe CanarySettings)+ , _sCacheClusterEnabled :: !(Maybe Bool)+ , _sStageName :: !(Maybe Text)+ , _sDescription :: !(Maybe Text)+ , _sTags :: !(Maybe (Map Text Text))+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Stage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'sDeploymentId' - The identifier of the 'Deployment' that the stage points to.+--+-- * 'sVariables' - A map that defines the stage variables for a 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .+--+-- * 'sAccessLogSettings' - Settings for logging access in this stage.+--+-- * 'sDocumentationVersion' - The version of the associated API documentation.+--+-- * 'sClientCertificateId' - The identifier of a client certificate for an API stage.+--+-- * 'sCreatedDate' - The timestamp when the stage was created.+--+-- * 'sCacheClusterStatus' - The status of the cache cluster for the stage, if enabled.+--+-- * 'sMethodSettings' - A map that defines the method settings for a 'Stage' resource. Keys (designated as @/{method_setting_key@ below) are method paths defined as @{resource_path}/{http_method}@ for an individual method override, or @/\*/\*@ for overriding all methods in the stage.+--+-- * 'sLastUpdatedDate' - The timestamp when the stage last updated.+--+-- * 'sCacheClusterSize' - The size of the cache cluster for the stage, if enabled.+--+-- * 'sCanarySettings' - Settings for the canary deployment in this stage.+--+-- * 'sCacheClusterEnabled' - Specifies whether a cache cluster is enabled for the stage.+--+-- * 'sStageName' - The name of the stage is the first path segment in the Uniform Resource Identifier (URI) of a call to API Gateway.+--+-- * 'sDescription' - The stage's description.+--+-- * 'sTags' - The collection of tags. Each tag element is associated with a given resource.+stage+ :: Stage+stage =+ Stage'+ { _sDeploymentId = Nothing+ , _sVariables = Nothing+ , _sAccessLogSettings = Nothing+ , _sDocumentationVersion = Nothing+ , _sClientCertificateId = Nothing+ , _sCreatedDate = Nothing+ , _sCacheClusterStatus = Nothing+ , _sMethodSettings = Nothing+ , _sLastUpdatedDate = Nothing+ , _sCacheClusterSize = Nothing+ , _sCanarySettings = Nothing+ , _sCacheClusterEnabled = Nothing+ , _sStageName = Nothing+ , _sDescription = Nothing+ , _sTags = Nothing+ }+++-- | The identifier of the 'Deployment' that the stage points to.+sDeploymentId :: Lens' Stage (Maybe Text)+sDeploymentId = lens _sDeploymentId (\ s a -> s{_sDeploymentId = a})++-- | A map that defines the stage variables for a 'Stage' resource. Variable names can have alphanumeric and underscore characters, and the values must match @[A-Za-z0-9-._~:/?#&=,]+@ .+sVariables :: Lens' Stage (HashMap Text Text)+sVariables = lens _sVariables (\ s a -> s{_sVariables = a}) . _Default . _Map++-- | Settings for logging access in this stage.+sAccessLogSettings :: Lens' Stage (Maybe AccessLogSettings)+sAccessLogSettings = lens _sAccessLogSettings (\ s a -> s{_sAccessLogSettings = a})++-- | The version of the associated API documentation.+sDocumentationVersion :: Lens' Stage (Maybe Text)+sDocumentationVersion = lens _sDocumentationVersion (\ s a -> s{_sDocumentationVersion = a})++-- | The identifier of a client certificate for an API stage.+sClientCertificateId :: Lens' Stage (Maybe Text)+sClientCertificateId = lens _sClientCertificateId (\ s a -> s{_sClientCertificateId = a})++-- | The timestamp when the stage was created.+sCreatedDate :: Lens' Stage (Maybe UTCTime)+sCreatedDate = lens _sCreatedDate (\ s a -> s{_sCreatedDate = a}) . mapping _Time++-- | The status of the cache cluster for the stage, if enabled.+sCacheClusterStatus :: Lens' Stage (Maybe CacheClusterStatus)+sCacheClusterStatus = lens _sCacheClusterStatus (\ s a -> s{_sCacheClusterStatus = a})++-- | A map that defines the method settings for a 'Stage' resource. Keys (designated as @/{method_setting_key@ below) are method paths defined as @{resource_path}/{http_method}@ for an individual method override, or @/\*/\*@ for overriding all methods in the stage.+sMethodSettings :: Lens' Stage (HashMap Text MethodSetting)+sMethodSettings = lens _sMethodSettings (\ s a -> s{_sMethodSettings = a}) . _Default . _Map++-- | The timestamp when the stage last updated.+sLastUpdatedDate :: Lens' Stage (Maybe UTCTime)+sLastUpdatedDate = lens _sLastUpdatedDate (\ s a -> s{_sLastUpdatedDate = a}) . mapping _Time++-- | The size of the cache cluster for the stage, if enabled.+sCacheClusterSize :: Lens' Stage (Maybe CacheClusterSize)+sCacheClusterSize = lens _sCacheClusterSize (\ s a -> s{_sCacheClusterSize = a})++-- | Settings for the canary deployment in this stage.+sCanarySettings :: Lens' Stage (Maybe CanarySettings)+sCanarySettings = lens _sCanarySettings (\ s a -> s{_sCanarySettings = a})++-- | Specifies whether a cache cluster is enabled for the stage.+sCacheClusterEnabled :: Lens' Stage (Maybe Bool)+sCacheClusterEnabled = lens _sCacheClusterEnabled (\ s a -> s{_sCacheClusterEnabled = a})++-- | The name of the stage is the first path segment in the Uniform Resource Identifier (URI) of a call to API Gateway.+sStageName :: Lens' Stage (Maybe Text)+sStageName = lens _sStageName (\ s a -> s{_sStageName = a})++-- | The stage's description.+sDescription :: Lens' Stage (Maybe Text)+sDescription = lens _sDescription (\ s a -> s{_sDescription = a})++-- | The collection of tags. Each tag element is associated with a given resource.+sTags :: Lens' Stage (HashMap Text Text)+sTags = lens _sTags (\ s a -> s{_sTags = a}) . _Default . _Map++instance FromJSON Stage where+ parseJSON+ = withObject "Stage"+ (\ x ->+ Stage' <$>+ (x .:? "deploymentId") <*>+ (x .:? "variables" .!= mempty)+ <*> (x .:? "accessLogSettings")+ <*> (x .:? "documentationVersion")+ <*> (x .:? "clientCertificateId")+ <*> (x .:? "createdDate")+ <*> (x .:? "cacheClusterStatus")+ <*> (x .:? "methodSettings" .!= mempty)+ <*> (x .:? "lastUpdatedDate")+ <*> (x .:? "cacheClusterSize")+ <*> (x .:? "canarySettings")+ <*> (x .:? "cacheClusterEnabled")+ <*> (x .:? "stageName")+ <*> (x .:? "description")+ <*> (x .:? "tags" .!= mempty))++instance Hashable Stage where++instance NFData Stage where++-- | A reference to a unique stage identified in the format @{restApiId}/{stage}@ .+--+--+--+-- /See:/ 'stageKey' smart constructor.+data StageKey = StageKey'+ { _skRestAPIId :: !(Maybe Text)+ , _skStageName :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'StageKey' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'skRestAPIId' - The string identifier of the associated 'RestApi' .+--+-- * 'skStageName' - The stage name associated with the stage key.+stageKey+ :: StageKey+stageKey = StageKey' {_skRestAPIId = Nothing, _skStageName = Nothing}+++-- | The string identifier of the associated 'RestApi' .+skRestAPIId :: Lens' StageKey (Maybe Text)+skRestAPIId = lens _skRestAPIId (\ s a -> s{_skRestAPIId = a})++-- | The stage name associated with the stage key.+skStageName :: Lens' StageKey (Maybe Text)+skStageName = lens _skStageName (\ s a -> s{_skStageName = a})++instance Hashable StageKey where++instance NFData StageKey where++instance ToJSON StageKey where+ toJSON StageKey'{..}+ = object+ (catMaybes+ [("restApiId" .=) <$> _skRestAPIId,+ ("stageName" .=) <$> _skStageName])++-- | The API request rate limits.+--+--+--+-- /See:/ 'throttleSettings' smart constructor.+data ThrottleSettings = ThrottleSettings'+ { _tsBurstLimit :: !(Maybe Int)+ , _tsRateLimit :: !(Maybe Double)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ThrottleSettings' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tsBurstLimit' - The API request burst limit, the maximum rate limit over a time ranging from one to a few seconds, depending upon whether the underlying token bucket is at its full capacity.+--+-- * 'tsRateLimit' - The API request steady-state rate limit.+throttleSettings+ :: ThrottleSettings+throttleSettings =+ ThrottleSettings' {_tsBurstLimit = Nothing, _tsRateLimit = Nothing}+++-- | The API request burst limit, the maximum rate limit over a time ranging from one to a few seconds, depending upon whether the underlying token bucket is at its full capacity.+tsBurstLimit :: Lens' ThrottleSettings (Maybe Int)+tsBurstLimit = lens _tsBurstLimit (\ s a -> s{_tsBurstLimit = a})++-- | The API request steady-state rate limit.+tsRateLimit :: Lens' ThrottleSettings (Maybe Double)+tsRateLimit = lens _tsRateLimit (\ s a -> s{_tsRateLimit = a})++instance FromJSON ThrottleSettings where+ parseJSON+ = withObject "ThrottleSettings"+ (\ x ->+ ThrottleSettings' <$>+ (x .:? "burstLimit") <*> (x .:? "rateLimit"))++instance Hashable ThrottleSettings where++instance NFData ThrottleSettings where++instance ToJSON ThrottleSettings where+ toJSON ThrottleSettings'{..}+ = object+ (catMaybes+ [("burstLimit" .=) <$> _tsBurstLimit,+ ("rateLimit" .=) <$> _tsRateLimit])++-- | Represents the usage data of a usage plan.+--+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans> , <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-create-usage-plans-with-console.html#api-gateway-usage-plan-manage-usage Manage Usage in a Usage Plan>+--+-- /See:/ 'usage' smart constructor.+data Usage = Usage'+ { _uUsagePlanId :: !(Maybe Text)+ , _uEndDate :: !(Maybe Text)+ , _uItems :: !(Maybe (Map Text [[Integer]]))+ , _uStartDate :: !(Maybe Text)+ , _uPosition :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'Usage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'uUsagePlanId' - The plan Id associated with this usage data.+--+-- * 'uEndDate' - The ending date of the usage data.+--+-- * 'uItems' - The usage data, as daily logs of used and remaining quotas, over the specified time interval indexed over the API keys in a usage plan. For example, @{..., "values" : { "{api_key}" : [ [0, 100], [10, 90], [100, 10]]}@ , where @{api_key}@ stands for an API key value and the daily log entry is of the format @[used quota, remaining quota]@ .+--+-- * 'uStartDate' - The starting date of the usage data.+--+-- * 'uPosition' - Undocumented member.+usage+ :: Usage+usage =+ Usage'+ { _uUsagePlanId = Nothing+ , _uEndDate = Nothing+ , _uItems = Nothing+ , _uStartDate = Nothing+ , _uPosition = Nothing+ }+++-- | The plan Id associated with this usage data.+uUsagePlanId :: Lens' Usage (Maybe Text)+uUsagePlanId = lens _uUsagePlanId (\ s a -> s{_uUsagePlanId = a})++-- | The ending date of the usage data.+uEndDate :: Lens' Usage (Maybe Text)+uEndDate = lens _uEndDate (\ s a -> s{_uEndDate = a})++-- | The usage data, as daily logs of used and remaining quotas, over the specified time interval indexed over the API keys in a usage plan. For example, @{..., "values" : { "{api_key}" : [ [0, 100], [10, 90], [100, 10]]}@ , where @{api_key}@ stands for an API key value and the daily log entry is of the format @[used quota, remaining quota]@ .+uItems :: Lens' Usage (HashMap Text [[Integer]])+uItems = lens _uItems (\ s a -> s{_uItems = a}) . _Default . _Map++-- | The starting date of the usage data.+uStartDate :: Lens' Usage (Maybe Text)+uStartDate = lens _uStartDate (\ s a -> s{_uStartDate = a})++-- | Undocumented member.+uPosition :: Lens' Usage (Maybe Text)+uPosition = lens _uPosition (\ s a -> s{_uPosition = a})++instance FromJSON Usage where+ parseJSON+ = withObject "Usage"+ (\ x ->+ Usage' <$>+ (x .:? "usagePlanId") <*> (x .:? "endDate") <*>+ (x .:? "values" .!= mempty)+ <*> (x .:? "startDate")+ <*> (x .:? "position"))++instance Hashable Usage where++instance NFData Usage where++-- | Represents a usage plan than can specify who can assess associated API stages with specified request limits and quotas.+--+--+-- In a usage plan, you associate an API by specifying the API's Id and a stage name of the specified API. You add plan customers by adding API keys to the plan.+--+-- <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans>+--+-- /See:/ 'usagePlan' smart constructor.+data UsagePlan = UsagePlan'+ { _upApiStages :: !(Maybe [APIStage])+ , _upName :: !(Maybe Text)+ , _upId :: !(Maybe Text)+ , _upThrottle :: !(Maybe ThrottleSettings)+ , _upQuota :: !(Maybe QuotaSettings)+ , _upDescription :: !(Maybe Text)+ , _upProductCode :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UsagePlan' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'upApiStages' - The associated API stages of a usage plan.+--+-- * 'upName' - The name of a usage plan.+--+-- * 'upId' - The identifier of a 'UsagePlan' resource.+--+-- * 'upThrottle' - The request throttle limits of a usage plan.+--+-- * 'upQuota' - The maximum number of permitted requests per a given unit time interval.+--+-- * 'upDescription' - The description of a usage plan.+--+-- * 'upProductCode' - The AWS Markeplace product identifier to associate with the usage plan as a SaaS product on AWS Marketplace.+usagePlan+ :: UsagePlan+usagePlan =+ UsagePlan'+ { _upApiStages = Nothing+ , _upName = Nothing+ , _upId = Nothing+ , _upThrottle = Nothing+ , _upQuota = Nothing+ , _upDescription = Nothing+ , _upProductCode = Nothing+ }+++-- | The associated API stages of a usage plan.+upApiStages :: Lens' UsagePlan [APIStage]+upApiStages = lens _upApiStages (\ s a -> s{_upApiStages = a}) . _Default . _Coerce++-- | The name of a usage plan.+upName :: Lens' UsagePlan (Maybe Text)+upName = lens _upName (\ s a -> s{_upName = a})++-- | The identifier of a 'UsagePlan' resource.+upId :: Lens' UsagePlan (Maybe Text)+upId = lens _upId (\ s a -> s{_upId = a})++-- | The request throttle limits of a usage plan.+upThrottle :: Lens' UsagePlan (Maybe ThrottleSettings)+upThrottle = lens _upThrottle (\ s a -> s{_upThrottle = a})++-- | The maximum number of permitted requests per a given unit time interval.+upQuota :: Lens' UsagePlan (Maybe QuotaSettings)+upQuota = lens _upQuota (\ s a -> s{_upQuota = a})++-- | The description of a usage plan.+upDescription :: Lens' UsagePlan (Maybe Text)+upDescription = lens _upDescription (\ s a -> s{_upDescription = a})++-- | The AWS Markeplace product identifier to associate with the usage plan as a SaaS product on AWS Marketplace.+upProductCode :: Lens' UsagePlan (Maybe Text)+upProductCode = lens _upProductCode (\ s a -> s{_upProductCode = a})++instance FromJSON UsagePlan where+ parseJSON+ = withObject "UsagePlan"+ (\ x ->+ UsagePlan' <$>+ (x .:? "apiStages" .!= mempty) <*> (x .:? "name") <*>+ (x .:? "id")+ <*> (x .:? "throttle")+ <*> (x .:? "quota")+ <*> (x .:? "description")+ <*> (x .:? "productCode"))++instance Hashable UsagePlan where++instance NFData UsagePlan where++-- | Represents a usage plan key to identify a plan customer.+--+--+-- To associate an API stage with a selected API key in a usage plan, you must create a UsagePlanKey resource to represent the selected 'ApiKey' .+--+-- " <http://docs.aws.amazon.com/apigateway/latest/developerguide/api-gateway-api-usage-plans.html Create and Use Usage Plans>+--+-- /See:/ 'usagePlanKey' smart constructor.+data UsagePlanKey = UsagePlanKey'+ { _upkValue :: !(Maybe Text)+ , _upkName :: !(Maybe Text)+ , _upkId :: !(Maybe Text)+ , _upkType :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UsagePlanKey' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'upkValue' - The value of a usage plan key.+--+-- * 'upkName' - The name of a usage plan key.+--+-- * 'upkId' - The Id of a usage plan key.+--+-- * 'upkType' - The type of a usage plan key. Currently, the valid key type is @API_KEY@ .+usagePlanKey+ :: UsagePlanKey+usagePlanKey =+ UsagePlanKey'+ { _upkValue = Nothing+ , _upkName = Nothing+ , _upkId = Nothing+ , _upkType = Nothing+ }+++-- | The value of a usage plan key.+upkValue :: Lens' UsagePlanKey (Maybe Text)+upkValue = lens _upkValue (\ s a -> s{_upkValue = a})++-- | The name of a usage plan key.+upkName :: Lens' UsagePlanKey (Maybe Text)+upkName = lens _upkName (\ s a -> s{_upkName = a})++-- | The Id of a usage plan key.+upkId :: Lens' UsagePlanKey (Maybe Text)+upkId = lens _upkId (\ s a -> s{_upkId = a})++-- | The type of a usage plan key. Currently, the valid key type is @API_KEY@ .+upkType :: Lens' UsagePlanKey (Maybe Text)+upkType = lens _upkType (\ s a -> s{_upkType = a})++instance FromJSON UsagePlanKey where+ parseJSON+ = withObject "UsagePlanKey"+ (\ x ->+ UsagePlanKey' <$>+ (x .:? "value") <*> (x .:? "name") <*> (x .:? "id")+ <*> (x .:? "type"))++instance Hashable UsagePlanKey where++instance NFData UsagePlanKey where++-- | A API Gateway VPC link for a 'RestApi' to access resources in an Amazon Virtual Private Cloud (VPC).+--+--+-- To enable access to a resource in an Amazon Virtual Private Cloud through Amazon API Gateway, you, as an API developer, create a 'VpcLink' resource targeted for one or more network load balancers of the VPC and then integrate an API method with a private integration that uses the 'VpcLink' . The private integration has an integration type of @HTTP@ or @HTTP_PROXY@ and has a connection type of @VPC_LINK@ . The integration uses the @connectionId@ property to identify the 'VpcLink' used.+--+--+--+--+-- /See:/ 'vpcLink' smart constructor.+data VPCLink = VPCLink'+ { _vlStatus :: !(Maybe VPCLinkStatus)+ , _vlTargetARNs :: !(Maybe [Text])+ , _vlName :: !(Maybe Text)+ , _vlStatusMessage :: !(Maybe Text)+ , _vlId :: !(Maybe Text)+ , _vlDescription :: !(Maybe Text)+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'VPCLink' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'vlStatus' - The status of the VPC link. The valid values are @AVAILABLE@ , @PENDING@ , @DELETING@ , or @FAILED@ . Deploying an API will wait if the status is @PENDING@ and will fail if the status is @DELETING@ .+--+-- * 'vlTargetARNs' - The ARNs of network load balancers of the VPC targeted by the VPC link. The network load balancers must be owned by the same AWS account of the API owner.+--+-- * 'vlName' - The name used to label and identify the VPC link.+--+-- * 'vlStatusMessage' - A description about the VPC link status.+--+-- * 'vlId' - The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+--+-- * 'vlDescription' - The description of the VPC link.+vpcLink+ :: VPCLink+vpcLink =+ VPCLink'+ { _vlStatus = Nothing+ , _vlTargetARNs = Nothing+ , _vlName = Nothing+ , _vlStatusMessage = Nothing+ , _vlId = Nothing+ , _vlDescription = Nothing+ }+++-- | The status of the VPC link. The valid values are @AVAILABLE@ , @PENDING@ , @DELETING@ , or @FAILED@ . Deploying an API will wait if the status is @PENDING@ and will fail if the status is @DELETING@ .+vlStatus :: Lens' VPCLink (Maybe VPCLinkStatus)+vlStatus = lens _vlStatus (\ s a -> s{_vlStatus = a})++-- | The ARNs of network load balancers of the VPC targeted by the VPC link. The network load balancers must be owned by the same AWS account of the API owner.+vlTargetARNs :: Lens' VPCLink [Text]+vlTargetARNs = lens _vlTargetARNs (\ s a -> s{_vlTargetARNs = a}) . _Default . _Coerce++-- | The name used to label and identify the VPC link.+vlName :: Lens' VPCLink (Maybe Text)+vlName = lens _vlName (\ s a -> s{_vlName = a})++-- | A description about the VPC link status.+vlStatusMessage :: Lens' VPCLink (Maybe Text)+vlStatusMessage = lens _vlStatusMessage (\ s a -> s{_vlStatusMessage = a})++-- | The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+vlId :: Lens' VPCLink (Maybe Text)+vlId = lens _vlId (\ s a -> s{_vlId = a})++-- | The description of the VPC link.+vlDescription :: Lens' VPCLink (Maybe Text)+vlDescription = lens _vlDescription (\ s a -> s{_vlDescription = a})++instance FromJSON VPCLink where+ parseJSON+ = withObject "VPCLink"+ (\ x ->+ VPCLink' <$>+ (x .:? "status") <*> (x .:? "targetArns" .!= mempty)+ <*> (x .:? "name")+ <*> (x .:? "statusMessage")+ <*> (x .:? "id")+ <*> (x .:? "description"))++instance Hashable VPCLink where++instance NFData VPCLink where
gen/Network/AWS/APIGateway/Types/Sum.hs view
@@ -9,7 +9,7 @@ -- | -- Module : Network.AWS.APIGateway.Types.Sum--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -19,6 +19,36 @@ import Network.AWS.Prelude +data APIKeySourceType+ = Authorizer+ | Header+ deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)+++instance FromText APIKeySourceType where+ parser = takeLowerText >>= \case+ "authorizer" -> pure Authorizer+ "header" -> pure Header+ e -> fromTextError $ "Failure parsing APIKeySourceType from value: '" <> e+ <> "'. Accepted values: authorizer, header"++instance ToText APIKeySourceType where+ toText = \case+ Authorizer -> "AUTHORIZER"+ Header -> "HEADER"++instance Hashable APIKeySourceType+instance NFData APIKeySourceType+instance ToByteString APIKeySourceType+instance ToQuery APIKeySourceType+instance ToHeader APIKeySourceType++instance ToJSON APIKeySourceType where+ toJSON = toJSONText++instance FromJSON APIKeySourceType where+ parseJSON = parseJSONText "APIKeySourceType"+ data APIKeysFormat = CSV deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)@@ -43,7 +73,7 @@ instance ToJSON APIKeysFormat where toJSON = toJSONText --- | [Required] The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool.+-- | The authorizer type. Valid values are @TOKEN@ for a Lambda function using a single authorization token submitted in a custom header, @REQUEST@ for a Lambda function using incoming request parameters, and @COGNITO_USER_POOLS@ for using an Amazon Cognito user pool. -- -- data AuthorizerType@@ -169,6 +199,36 @@ instance FromJSON CacheClusterStatus where parseJSON = parseJSONText "CacheClusterStatus" +data ConnectionType+ = Internet+ | VPCLink+ deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)+++instance FromText ConnectionType where+ parser = takeLowerText >>= \case+ "internet" -> pure Internet+ "vpc_link" -> pure VPCLink+ e -> fromTextError $ "Failure parsing ConnectionType from value: '" <> e+ <> "'. Accepted values: internet, vpc_link"++instance ToText ConnectionType where+ toText = \case+ Internet -> "INTERNET"+ VPCLink -> "VPC_LINK"++instance Hashable ConnectionType+instance NFData ConnectionType+instance ToByteString ConnectionType+instance ToQuery ConnectionType+instance ToHeader ConnectionType++instance ToJSON ConnectionType where+ toJSON = toJSONText++instance FromJSON ConnectionType where+ parseJSON = parseJSONText "ConnectionType"+ data ContentHandlingStrategy = ConvertToBinary | ConvertToText@@ -200,52 +260,52 @@ parseJSON = parseJSONText "ContentHandlingStrategy" data DocumentationPartType- = API- | Authorizer- | Method- | Model- | PathParameter- | QueryParameter- | RequestBody- | RequestHeader- | Resource- | Response- | ResponseBody- | ResponseHeader+ = DPTAPI+ | DPTAuthorizer+ | DPTMethod+ | DPTModel+ | DPTPathParameter+ | DPTQueryParameter+ | DPTRequestBody+ | DPTRequestHeader+ | DPTResource+ | DPTResponse+ | DPTResponseBody+ | DPTResponseHeader deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic) instance FromText DocumentationPartType where parser = takeLowerText >>= \case- "api" -> pure API- "authorizer" -> pure Authorizer- "method" -> pure Method- "model" -> pure Model- "path_parameter" -> pure PathParameter- "query_parameter" -> pure QueryParameter- "request_body" -> pure RequestBody- "request_header" -> pure RequestHeader- "resource" -> pure Resource- "response" -> pure Response- "response_body" -> pure ResponseBody- "response_header" -> pure ResponseHeader+ "api" -> pure DPTAPI+ "authorizer" -> pure DPTAuthorizer+ "method" -> pure DPTMethod+ "model" -> pure DPTModel+ "path_parameter" -> pure DPTPathParameter+ "query_parameter" -> pure DPTQueryParameter+ "request_body" -> pure DPTRequestBody+ "request_header" -> pure DPTRequestHeader+ "resource" -> pure DPTResource+ "response" -> pure DPTResponse+ "response_body" -> pure DPTResponseBody+ "response_header" -> pure DPTResponseHeader e -> fromTextError $ "Failure parsing DocumentationPartType from value: '" <> e <> "'. Accepted values: api, authorizer, method, model, path_parameter, query_parameter, request_body, request_header, resource, response, response_body, response_header" instance ToText DocumentationPartType where toText = \case- API -> "API"- Authorizer -> "AUTHORIZER"- Method -> "METHOD"- Model -> "MODEL"- PathParameter -> "PATH_PARAMETER"- QueryParameter -> "QUERY_PARAMETER"- RequestBody -> "REQUEST_BODY"- RequestHeader -> "REQUEST_HEADER"- Resource -> "RESOURCE"- Response -> "RESPONSE"- ResponseBody -> "RESPONSE_BODY"- ResponseHeader -> "RESPONSE_HEADER"+ DPTAPI -> "API"+ DPTAuthorizer -> "AUTHORIZER"+ DPTMethod -> "METHOD"+ DPTModel -> "MODEL"+ DPTPathParameter -> "PATH_PARAMETER"+ DPTQueryParameter -> "QUERY_PARAMETER"+ DPTRequestBody -> "REQUEST_BODY"+ DPTRequestHeader -> "REQUEST_HEADER"+ DPTResource -> "RESOURCE"+ DPTResponse -> "RESPONSE"+ DPTResponseBody -> "RESPONSE_BODY"+ DPTResponseHeader -> "RESPONSE_HEADER" instance Hashable DocumentationPartType instance NFData DocumentationPartType@@ -376,7 +436,7 @@ instance FromJSON GatewayResponseType where parseJSON = parseJSONText "GatewayResponseType" --- | The integration type. The valid value is @HTTP@ for integrating with an HTTP back end, @AWS@ for any AWS service endpoints, @MOCK@ for testing without actually invoking the back end, @HTTP_PROXY@ for integrating with the HTTP proxy integration, or @AWS_PROXY@ for integrating with the Lambda proxy integration type.+-- | The integration type. The valid value is @HTTP@ for integrating an API method with an HTTP backend; @AWS@ with any AWS service endpoints; @MOCK@ for testing without actually invoking the backend; @HTTP_PROXY@ for integrating with the HTTP proxy integration; @AWS_PROXY@ for integrating with the Lambda proxy integration. -- -- data IntegrationType@@ -418,6 +478,33 @@ instance FromJSON IntegrationType where parseJSON = parseJSONText "IntegrationType" +data LocationStatusType+ = Documented+ | Undocumented+ deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)+++instance FromText LocationStatusType where+ parser = takeLowerText >>= \case+ "documented" -> pure Documented+ "undocumented" -> pure Undocumented+ e -> fromTextError $ "Failure parsing LocationStatusType from value: '" <> e+ <> "'. Accepted values: documented, undocumented"++instance ToText LocationStatusType where+ toText = \case+ Documented -> "DOCUMENTED"+ Undocumented -> "UNDOCUMENTED"++instance Hashable LocationStatusType+instance NFData LocationStatusType+instance ToByteString LocationStatusType+instance ToQuery LocationStatusType+instance ToHeader LocationStatusType++instance ToJSON LocationStatusType where+ toJSON = toJSONText+ data Op = Add | Copy@@ -546,3 +633,36 @@ instance FromJSON UnauthorizedCacheControlHeaderStrategy where parseJSON = parseJSONText "UnauthorizedCacheControlHeaderStrategy"++data VPCLinkStatus+ = VLSAvailable+ | VLSDeleting+ | VLSFailed+ | VLSPending+ deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)+++instance FromText VPCLinkStatus where+ parser = takeLowerText >>= \case+ "available" -> pure VLSAvailable+ "deleting" -> pure VLSDeleting+ "failed" -> pure VLSFailed+ "pending" -> pure VLSPending+ e -> fromTextError $ "Failure parsing VPCLinkStatus from value: '" <> e+ <> "'. Accepted values: available, deleting, failed, pending"++instance ToText VPCLinkStatus where+ toText = \case+ VLSAvailable -> "AVAILABLE"+ VLSDeleting -> "DELETING"+ VLSFailed -> "FAILED"+ VLSPending -> "PENDING"++instance Hashable VPCLinkStatus+instance NFData VPCLinkStatus+instance ToByteString VPCLinkStatus+instance ToQuery VPCLinkStatus+instance ToHeader VPCLinkStatus++instance FromJSON VPCLinkStatus where+ parseJSON = parseJSONText "VPCLinkStatus"
+ gen/Network/AWS/APIGateway/UntagResource.hs view
@@ -0,0 +1,115 @@+{-# 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.APIGateway.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 a tag from a given resource.+--+--+module Network.AWS.APIGateway.UntagResource+ (+ -- * Creating a Request+ untagResource+ , UntagResource+ -- * Request Lenses+ , urResourceARN+ , urTagKeys++ -- * Destructuring the Response+ , untagResourceResponse+ , UntagResourceResponse+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Removes a tag from a given resource.+--+--+--+-- /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' - [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+--+-- * 'urTagKeys' - [Required] The Tag keys to delete.+untagResource+ :: Text -- ^ 'urResourceARN'+ -> UntagResource+untagResource pResourceARN_ =+ UntagResource' {_urResourceARN = pResourceARN_, _urTagKeys = mempty}+++-- | [Required] The ARN of a resource that can be tagged. The resource ARN must be URL-encoded. At present, 'Stage' is the only taggable resource.+urResourceARN :: Lens' UntagResource Text+urResourceARN = lens _urResourceARN (\ s a -> s{_urResourceARN = a})++-- | [Required] The Tag keys to delete.+urTagKeys :: Lens' UntagResource [Text]+urTagKeys = lens _urTagKeys (\ s a -> s{_urTagKeys = a}) . _Coerce++instance AWSRequest UntagResource where+ type Rs UntagResource = UntagResourceResponse+ request = delete apiGateway+ response = receiveNull UntagResourceResponse'++instance Hashable UntagResource where++instance NFData UntagResource where++instance ToHeaders UntagResource where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToPath UntagResource where+ toPath UntagResource'{..}+ = mconcat ["/tags/", toBS _urResourceARN]++instance ToQuery UntagResource where+ toQuery UntagResource'{..}+ = mconcat+ ["tagKeys" =: toQueryList "member" _urTagKeys]++-- | /See:/ 'untagResourceResponse' smart constructor.+data UntagResourceResponse =+ UntagResourceResponse'+ deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UntagResourceResponse' with the minimum fields required to make a request.+--+untagResourceResponse+ :: UntagResourceResponse+untagResourceResponse = UntagResourceResponse'+++instance NFData UntagResourceResponse where
gen/Network/AWS/APIGateway/UpdateAPIKey.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateAPIKey--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -69,7 +69,7 @@ -- -- * 'uakPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uakApiKey' - The identifier of the 'ApiKey' resource to be updated.+-- * 'uakApiKey' - [Required] The identifier of the 'ApiKey' resource to be updated. updateAPIKey :: Text -- ^ 'uakApiKey' -> UpdateAPIKey@@ -79,11 +79,11 @@ -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uakPatchOperations :: Lens' UpdateAPIKey [PatchOperation]-uakPatchOperations = lens _uakPatchOperations (\ s a -> s{_uakPatchOperations = a}) . _Default . _Coerce;+uakPatchOperations = lens _uakPatchOperations (\ s a -> s{_uakPatchOperations = a}) . _Default . _Coerce --- | The identifier of the 'ApiKey' resource to be updated.+-- | [Required] The identifier of the 'ApiKey' resource to be updated. uakApiKey :: Lens' UpdateAPIKey Text-uakApiKey = lens _uakApiKey (\ s a -> s{_uakApiKey = a});+uakApiKey = lens _uakApiKey (\ s a -> s{_uakApiKey = a}) instance AWSRequest UpdateAPIKey where type Rs UpdateAPIKey = APIKey
gen/Network/AWS/APIGateway/UpdateAccount.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateAccount--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -46,7 +46,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to change information about the current 'Account' resource.+-- | Requests API Gateway to change information about the current 'Account' resource. -- -- --@@ -68,7 +68,7 @@ -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uaPatchOperations :: Lens' UpdateAccount [PatchOperation]-uaPatchOperations = lens _uaPatchOperations (\ s a -> s{_uaPatchOperations = a}) . _Default . _Coerce;+uaPatchOperations = lens _uaPatchOperations (\ s a -> s{_uaPatchOperations = a}) . _Default . _Coerce instance AWSRequest UpdateAccount where type Rs UpdateAccount = Account
gen/Network/AWS/APIGateway/UpdateAuthorizer.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateAuthorizer--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -73,32 +73,32 @@ -- -- * 'uaaPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uaaRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'uaaRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'uaaAuthorizerId' - The identifier of the 'Authorizer' resource.+-- * 'uaaAuthorizerId' - [Required] The identifier of the 'Authorizer' resource. updateAuthorizer :: Text -- ^ 'uaaRestAPIId' -> Text -- ^ 'uaaAuthorizerId' -> UpdateAuthorizer updateAuthorizer pRestAPIId_ pAuthorizerId_ = UpdateAuthorizer'- { _uaaPatchOperations = Nothing- , _uaaRestAPIId = pRestAPIId_- , _uaaAuthorizerId = pAuthorizerId_- }+ { _uaaPatchOperations = Nothing+ , _uaaRestAPIId = pRestAPIId_+ , _uaaAuthorizerId = pAuthorizerId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uaaPatchOperations :: Lens' UpdateAuthorizer [PatchOperation]-uaaPatchOperations = lens _uaaPatchOperations (\ s a -> s{_uaaPatchOperations = a}) . _Default . _Coerce;+uaaPatchOperations = lens _uaaPatchOperations (\ s a -> s{_uaaPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . uaaRestAPIId :: Lens' UpdateAuthorizer Text-uaaRestAPIId = lens _uaaRestAPIId (\ s a -> s{_uaaRestAPIId = a});+uaaRestAPIId = lens _uaaRestAPIId (\ s a -> s{_uaaRestAPIId = a}) --- | The identifier of the 'Authorizer' resource.+-- | [Required] The identifier of the 'Authorizer' resource. uaaAuthorizerId :: Lens' UpdateAuthorizer Text-uaaAuthorizerId = lens _uaaAuthorizerId (\ s a -> s{_uaaAuthorizerId = a});+uaaAuthorizerId = lens _uaaAuthorizerId (\ s a -> s{_uaaAuthorizerId = a}) instance AWSRequest UpdateAuthorizer where type Rs UpdateAuthorizer = Authorizer
gen/Network/AWS/APIGateway/UpdateBasePathMapping.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateBasePathMapping--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -65,32 +65,32 @@ -- -- * 'ubpmPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'ubpmDomainName' - The domain name of the 'BasePathMapping' resource to change.+-- * 'ubpmDomainName' - [Required] The domain name of the 'BasePathMapping' resource to change. ----- * 'ubpmBasePath' - The base path of the 'BasePathMapping' resource to change.+-- * 'ubpmBasePath' - [Required] The base path of the 'BasePathMapping' resource to change. updateBasePathMapping :: Text -- ^ 'ubpmDomainName' -> Text -- ^ 'ubpmBasePath' -> UpdateBasePathMapping updateBasePathMapping pDomainName_ pBasePath_ = UpdateBasePathMapping'- { _ubpmPatchOperations = Nothing- , _ubpmDomainName = pDomainName_- , _ubpmBasePath = pBasePath_- }+ { _ubpmPatchOperations = Nothing+ , _ubpmDomainName = pDomainName_+ , _ubpmBasePath = pBasePath_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. ubpmPatchOperations :: Lens' UpdateBasePathMapping [PatchOperation]-ubpmPatchOperations = lens _ubpmPatchOperations (\ s a -> s{_ubpmPatchOperations = a}) . _Default . _Coerce;+ubpmPatchOperations = lens _ubpmPatchOperations (\ s a -> s{_ubpmPatchOperations = a}) . _Default . _Coerce --- | The domain name of the 'BasePathMapping' resource to change.+-- | [Required] The domain name of the 'BasePathMapping' resource to change. ubpmDomainName :: Lens' UpdateBasePathMapping Text-ubpmDomainName = lens _ubpmDomainName (\ s a -> s{_ubpmDomainName = a});+ubpmDomainName = lens _ubpmDomainName (\ s a -> s{_ubpmDomainName = a}) --- | The base path of the 'BasePathMapping' resource to change.+-- | [Required] The base path of the 'BasePathMapping' resource to change. ubpmBasePath :: Lens' UpdateBasePathMapping Text-ubpmBasePath = lens _ubpmBasePath (\ s a -> s{_ubpmBasePath = a});+ubpmBasePath = lens _ubpmBasePath (\ s a -> s{_ubpmBasePath = a}) instance AWSRequest UpdateBasePathMapping where type Rs UpdateBasePathMapping = BasePathMapping
gen/Network/AWS/APIGateway/UpdateClientCertificate.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateClientCertificate--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -65,24 +65,24 @@ -- -- * 'uccPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uccClientCertificateId' - The identifier of the 'ClientCertificate' resource to be updated.+-- * 'uccClientCertificateId' - [Required] The identifier of the 'ClientCertificate' resource to be updated. updateClientCertificate :: Text -- ^ 'uccClientCertificateId' -> UpdateClientCertificate updateClientCertificate pClientCertificateId_ = UpdateClientCertificate'- { _uccPatchOperations = Nothing- , _uccClientCertificateId = pClientCertificateId_- }+ { _uccPatchOperations = Nothing+ , _uccClientCertificateId = pClientCertificateId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uccPatchOperations :: Lens' UpdateClientCertificate [PatchOperation]-uccPatchOperations = lens _uccPatchOperations (\ s a -> s{_uccPatchOperations = a}) . _Default . _Coerce;+uccPatchOperations = lens _uccPatchOperations (\ s a -> s{_uccPatchOperations = a}) . _Default . _Coerce --- | The identifier of the 'ClientCertificate' resource to be updated.+-- | [Required] The identifier of the 'ClientCertificate' resource to be updated. uccClientCertificateId :: Lens' UpdateClientCertificate Text-uccClientCertificateId = lens _uccClientCertificateId (\ s a -> s{_uccClientCertificateId = a});+uccClientCertificateId = lens _uccClientCertificateId (\ s a -> s{_uccClientCertificateId = a}) instance AWSRequest UpdateClientCertificate where type Rs UpdateClientCertificate = ClientCertificate
gen/Network/AWS/APIGateway/UpdateDeployment.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateDeployment--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -48,7 +48,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to change information about a 'Deployment' resource.+-- | Requests API Gateway to change information about a 'Deployment' resource. -- -- --@@ -66,7 +66,7 @@ -- -- * 'udPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'udRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'udRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'udDeploymentId' - The replacement identifier for the 'Deployment' resource to change information about. updateDeployment@@ -75,23 +75,23 @@ -> UpdateDeployment updateDeployment pRestAPIId_ pDeploymentId_ = UpdateDeployment'- { _udPatchOperations = Nothing- , _udRestAPIId = pRestAPIId_- , _udDeploymentId = pDeploymentId_- }+ { _udPatchOperations = Nothing+ , _udRestAPIId = pRestAPIId_+ , _udDeploymentId = pDeploymentId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. udPatchOperations :: Lens' UpdateDeployment [PatchOperation]-udPatchOperations = lens _udPatchOperations (\ s a -> s{_udPatchOperations = a}) . _Default . _Coerce;+udPatchOperations = lens _udPatchOperations (\ s a -> s{_udPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . udRestAPIId :: Lens' UpdateDeployment Text-udRestAPIId = lens _udRestAPIId (\ s a -> s{_udRestAPIId = a});+udRestAPIId = lens _udRestAPIId (\ s a -> s{_udRestAPIId = a}) -- | The replacement identifier for the 'Deployment' resource to change information about. udDeploymentId :: Lens' UpdateDeployment Text-udDeploymentId = lens _udDeploymentId (\ s a -> s{_udDeploymentId = a});+udDeploymentId = lens _udDeploymentId (\ s a -> s{_udDeploymentId = a}) instance AWSRequest UpdateDeployment where type Rs UpdateDeployment = Deployment
gen/Network/AWS/APIGateway/UpdateDocumentationPart.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateDocumentationPart--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -72,23 +72,23 @@ -> UpdateDocumentationPart updateDocumentationPart pRestAPIId_ pDocumentationPartId_ = UpdateDocumentationPart'- { _udpPatchOperations = Nothing- , _udpRestAPIId = pRestAPIId_- , _udpDocumentationPartId = pDocumentationPartId_- }+ { _udpPatchOperations = Nothing+ , _udpRestAPIId = pRestAPIId_+ , _udpDocumentationPartId = pDocumentationPartId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. udpPatchOperations :: Lens' UpdateDocumentationPart [PatchOperation]-udpPatchOperations = lens _udpPatchOperations (\ s a -> s{_udpPatchOperations = a}) . _Default . _Coerce;+udpPatchOperations = lens _udpPatchOperations (\ s a -> s{_udpPatchOperations = a}) . _Default . _Coerce -- | [Required] The string identifier of the associated 'RestApi' . udpRestAPIId :: Lens' UpdateDocumentationPart Text-udpRestAPIId = lens _udpRestAPIId (\ s a -> s{_udpRestAPIId = a});+udpRestAPIId = lens _udpRestAPIId (\ s a -> s{_udpRestAPIId = a}) -- | [Required] The identifier of the to-be-updated documentation part. udpDocumentationPartId :: Lens' UpdateDocumentationPart Text-udpDocumentationPartId = lens _udpDocumentationPartId (\ s a -> s{_udpDocumentationPartId = a});+udpDocumentationPartId = lens _udpDocumentationPartId (\ s a -> s{_udpDocumentationPartId = a}) instance AWSRequest UpdateDocumentationPart where type Rs UpdateDocumentationPart = DocumentationPart
gen/Network/AWS/APIGateway/UpdateDocumentationVersion.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateDocumentationVersion--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -72,23 +72,23 @@ -> UpdateDocumentationVersion updateDocumentationVersion pRestAPIId_ pDocumentationVersion_ = UpdateDocumentationVersion'- { _udvPatchOperations = Nothing- , _udvRestAPIId = pRestAPIId_- , _udvDocumentationVersion = pDocumentationVersion_- }+ { _udvPatchOperations = Nothing+ , _udvRestAPIId = pRestAPIId_+ , _udvDocumentationVersion = pDocumentationVersion_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. udvPatchOperations :: Lens' UpdateDocumentationVersion [PatchOperation]-udvPatchOperations = lens _udvPatchOperations (\ s a -> s{_udvPatchOperations = a}) . _Default . _Coerce;+udvPatchOperations = lens _udvPatchOperations (\ s a -> s{_udvPatchOperations = a}) . _Default . _Coerce -- | [Required] The string identifier of the associated 'RestApi' .. udvRestAPIId :: Lens' UpdateDocumentationVersion Text-udvRestAPIId = lens _udvRestAPIId (\ s a -> s{_udvRestAPIId = a});+udvRestAPIId = lens _udvRestAPIId (\ s a -> s{_udvRestAPIId = a}) -- | [Required] The version identifier of the to-be-updated documentation version. udvDocumentationVersion :: Lens' UpdateDocumentationVersion Text-udvDocumentationVersion = lens _udvDocumentationVersion (\ s a -> s{_udvDocumentationVersion = a});+udvDocumentationVersion = lens _udvDocumentationVersion (\ s a -> s{_udvDocumentationVersion = a}) instance AWSRequest UpdateDocumentationVersion where type Rs UpdateDocumentationVersion =
gen/Network/AWS/APIGateway/UpdateDomainName.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateDomainName--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -34,9 +34,11 @@ , domainName , DomainName -- * Response Lenses+ , dnRegionalHostedZoneId , dnCertificateName , dnRegionalCertificateARN , dnCertificateARN+ , dnDistributionHostedZoneId , dnDomainName , dnRegionalCertificateName , dnRegionalDomainName@@ -69,22 +71,22 @@ -- -- * 'udnPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'udnDomainName' - The name of the 'DomainName' resource to be changed.+-- * 'udnDomainName' - [Required] The name of the 'DomainName' resource to be changed. updateDomainName :: Text -- ^ 'udnDomainName' -> UpdateDomainName updateDomainName pDomainName_ = UpdateDomainName'- {_udnPatchOperations = Nothing, _udnDomainName = pDomainName_}+ {_udnPatchOperations = Nothing, _udnDomainName = pDomainName_} -- | A list of update operations to be applied to the specified resource and in the order specified in this list. udnPatchOperations :: Lens' UpdateDomainName [PatchOperation]-udnPatchOperations = lens _udnPatchOperations (\ s a -> s{_udnPatchOperations = a}) . _Default . _Coerce;+udnPatchOperations = lens _udnPatchOperations (\ s a -> s{_udnPatchOperations = a}) . _Default . _Coerce --- | The name of the 'DomainName' resource to be changed.+-- | [Required] The name of the 'DomainName' resource to be changed. udnDomainName :: Lens' UpdateDomainName Text-udnDomainName = lens _udnDomainName (\ s a -> s{_udnDomainName = a});+udnDomainName = lens _udnDomainName (\ s a -> s{_udnDomainName = a}) instance AWSRequest UpdateDomainName where type Rs UpdateDomainName = DomainName
gen/Network/AWS/APIGateway/UpdateGatewayResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateGatewayResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,32 +67,32 @@ -- -- * 'ugPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'ugRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'ugRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'ugResponseType' - The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- * 'ugResponseType' - [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE updateGatewayResponse :: Text -- ^ 'ugRestAPIId' -> GatewayResponseType -- ^ 'ugResponseType' -> UpdateGatewayResponse updateGatewayResponse pRestAPIId_ pResponseType_ = UpdateGatewayResponse'- { _ugPatchOperations = Nothing- , _ugRestAPIId = pRestAPIId_- , _ugResponseType = pResponseType_- }+ { _ugPatchOperations = Nothing+ , _ugRestAPIId = pRestAPIId_+ , _ugResponseType = pResponseType_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. ugPatchOperations :: Lens' UpdateGatewayResponse [PatchOperation]-ugPatchOperations = lens _ugPatchOperations (\ s a -> s{_ugPatchOperations = a}) . _Default . _Coerce;+ugPatchOperations = lens _ugPatchOperations (\ s a -> s{_ugPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . ugRestAPIId :: Lens' UpdateGatewayResponse Text-ugRestAPIId = lens _ugRestAPIId (\ s a -> s{_ugRestAPIId = a});+ugRestAPIId = lens _ugRestAPIId (\ s a -> s{_ugRestAPIId = a}) --- | The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPES+-- | [Required] The response type of the associated 'GatewayResponse' . Valid values are * ACCESS_DENIED * API_CONFIGURATION_ERROR * AUTHORIZER_FAILURE * AUTHORIZER_CONFIGURATION_ERROR * BAD_REQUEST_PARAMETERS * BAD_REQUEST_BODY * DEFAULT_4XX * DEFAULT_5XX * EXPIRED_TOKEN * INVALID_SIGNATURE * INTEGRATION_FAILURE * INTEGRATION_TIMEOUT * INVALID_API_KEY * MISSING_AUTHENTICATION_TOKEN * QUOTA_EXCEEDED * REQUEST_TOO_LARGE * RESOURCE_NOT_FOUND * THROTTLED * UNAUTHORIZED * UNSUPPORTED_MEDIA_TYPE ugResponseType :: Lens' UpdateGatewayResponse GatewayResponseType-ugResponseType = lens _ugResponseType (\ s a -> s{_ugResponseType = a});+ugResponseType = lens _ugResponseType (\ s a -> s{_ugResponseType = a}) instance AWSRequest UpdateGatewayResponse where type Rs UpdateGatewayResponse = GatewayResponse
gen/Network/AWS/APIGateway/UpdateIntegration.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateIntegration--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -39,13 +39,16 @@ , iHttpMethod , iRequestTemplates , iCredentials+ , iConnectionId , iRequestParameters , iContentHandling , iPassthroughBehavior , iUri , iIntegrationResponses , iCacheNamespace+ , iTimeoutInMillis , iType+ , iConnectionType , iCacheKeyParameters ) where @@ -75,11 +78,11 @@ -- -- * 'updPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'updRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'updRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'updResourceId' - Represents an update integration request's resource identifier.+-- * 'updResourceId' - [Required] Represents an update integration request's resource identifier. ----- * 'updHttpMethod' - Represents an update integration request's HTTP method.+-- * 'updHttpMethod' - [Required] Represents an update integration request's HTTP method. updateIntegration :: Text -- ^ 'updRestAPIId' -> Text -- ^ 'updResourceId'@@ -87,28 +90,28 @@ -> UpdateIntegration updateIntegration pRestAPIId_ pResourceId_ pHttpMethod_ = UpdateIntegration'- { _updPatchOperations = Nothing- , _updRestAPIId = pRestAPIId_- , _updResourceId = pResourceId_- , _updHttpMethod = pHttpMethod_- }+ { _updPatchOperations = Nothing+ , _updRestAPIId = pRestAPIId_+ , _updResourceId = pResourceId_+ , _updHttpMethod = pHttpMethod_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. updPatchOperations :: Lens' UpdateIntegration [PatchOperation]-updPatchOperations = lens _updPatchOperations (\ s a -> s{_updPatchOperations = a}) . _Default . _Coerce;+updPatchOperations = lens _updPatchOperations (\ s a -> s{_updPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . updRestAPIId :: Lens' UpdateIntegration Text-updRestAPIId = lens _updRestAPIId (\ s a -> s{_updRestAPIId = a});+updRestAPIId = lens _updRestAPIId (\ s a -> s{_updRestAPIId = a}) --- | Represents an update integration request's resource identifier.+-- | [Required] Represents an update integration request's resource identifier. updResourceId :: Lens' UpdateIntegration Text-updResourceId = lens _updResourceId (\ s a -> s{_updResourceId = a});+updResourceId = lens _updResourceId (\ s a -> s{_updResourceId = a}) --- | Represents an update integration request's HTTP method.+-- | [Required] Represents an update integration request's HTTP method. updHttpMethod :: Lens' UpdateIntegration Text-updHttpMethod = lens _updHttpMethod (\ s a -> s{_updHttpMethod = a});+updHttpMethod = lens _updHttpMethod (\ s a -> s{_updHttpMethod = a}) instance AWSRequest UpdateIntegration where type Rs UpdateIntegration = Integration
gen/Network/AWS/APIGateway/UpdateIntegrationResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateIntegrationResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -71,13 +71,13 @@ -- -- * 'uiPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uiRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'uiRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'uiResourceId' - Specifies an update integration response request's resource identifier.+-- * 'uiResourceId' - [Required] Specifies an update integration response request's resource identifier. ----- * 'uiHttpMethod' - Specifies an update integration response request's HTTP method.+-- * 'uiHttpMethod' - [Required] Specifies an update integration response request's HTTP method. ----- * 'uiStatusCode' - Specifies an update integration response request's status code.+-- * 'uiStatusCode' - [Required] Specifies an update integration response request's status code. updateIntegrationResponse :: Text -- ^ 'uiRestAPIId' -> Text -- ^ 'uiResourceId'@@ -86,33 +86,33 @@ -> UpdateIntegrationResponse updateIntegrationResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = UpdateIntegrationResponse'- { _uiPatchOperations = Nothing- , _uiRestAPIId = pRestAPIId_- , _uiResourceId = pResourceId_- , _uiHttpMethod = pHttpMethod_- , _uiStatusCode = pStatusCode_- }+ { _uiPatchOperations = Nothing+ , _uiRestAPIId = pRestAPIId_+ , _uiResourceId = pResourceId_+ , _uiHttpMethod = pHttpMethod_+ , _uiStatusCode = pStatusCode_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uiPatchOperations :: Lens' UpdateIntegrationResponse [PatchOperation]-uiPatchOperations = lens _uiPatchOperations (\ s a -> s{_uiPatchOperations = a}) . _Default . _Coerce;+uiPatchOperations = lens _uiPatchOperations (\ s a -> s{_uiPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . uiRestAPIId :: Lens' UpdateIntegrationResponse Text-uiRestAPIId = lens _uiRestAPIId (\ s a -> s{_uiRestAPIId = a});+uiRestAPIId = lens _uiRestAPIId (\ s a -> s{_uiRestAPIId = a}) --- | Specifies an update integration response request's resource identifier.+-- | [Required] Specifies an update integration response request's resource identifier. uiResourceId :: Lens' UpdateIntegrationResponse Text-uiResourceId = lens _uiResourceId (\ s a -> s{_uiResourceId = a});+uiResourceId = lens _uiResourceId (\ s a -> s{_uiResourceId = a}) --- | Specifies an update integration response request's HTTP method.+-- | [Required] Specifies an update integration response request's HTTP method. uiHttpMethod :: Lens' UpdateIntegrationResponse Text-uiHttpMethod = lens _uiHttpMethod (\ s a -> s{_uiHttpMethod = a});+uiHttpMethod = lens _uiHttpMethod (\ s a -> s{_uiHttpMethod = a}) --- | Specifies an update integration response request's status code.+-- | [Required] Specifies an update integration response request's status code. uiStatusCode :: Lens' UpdateIntegrationResponse Text-uiStatusCode = lens _uiStatusCode (\ s a -> s{_uiStatusCode = a});+uiStatusCode = lens _uiStatusCode (\ s a -> s{_uiStatusCode = a}) instance AWSRequest UpdateIntegrationResponse where type Rs UpdateIntegrationResponse =
gen/Network/AWS/APIGateway/UpdateMethod.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateMethod--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -38,6 +38,7 @@ -- * Response Lenses , mMethodResponses , mHttpMethod+ , mAuthorizationScopes , mRequestValidatorId , mRequestModels , mRequestParameters@@ -74,11 +75,11 @@ -- -- * 'ummPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'ummRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'ummRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'ummResourceId' - The 'Resource' identifier for the 'Method' resource.+-- * 'ummResourceId' - [Required] The 'Resource' identifier for the 'Method' resource. ----- * 'ummHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'ummHttpMethod' - [Required] The HTTP verb of the 'Method' resource. updateMethod :: Text -- ^ 'ummRestAPIId' -> Text -- ^ 'ummResourceId'@@ -86,28 +87,28 @@ -> UpdateMethod updateMethod pRestAPIId_ pResourceId_ pHttpMethod_ = UpdateMethod'- { _ummPatchOperations = Nothing- , _ummRestAPIId = pRestAPIId_- , _ummResourceId = pResourceId_- , _ummHttpMethod = pHttpMethod_- }+ { _ummPatchOperations = Nothing+ , _ummRestAPIId = pRestAPIId_+ , _ummResourceId = pResourceId_+ , _ummHttpMethod = pHttpMethod_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. ummPatchOperations :: Lens' UpdateMethod [PatchOperation]-ummPatchOperations = lens _ummPatchOperations (\ s a -> s{_ummPatchOperations = a}) . _Default . _Coerce;+ummPatchOperations = lens _ummPatchOperations (\ s a -> s{_ummPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . ummRestAPIId :: Lens' UpdateMethod Text-ummRestAPIId = lens _ummRestAPIId (\ s a -> s{_ummRestAPIId = a});+ummRestAPIId = lens _ummRestAPIId (\ s a -> s{_ummRestAPIId = a}) --- | The 'Resource' identifier for the 'Method' resource.+-- | [Required] The 'Resource' identifier for the 'Method' resource. ummResourceId :: Lens' UpdateMethod Text-ummResourceId = lens _ummResourceId (\ s a -> s{_ummResourceId = a});+ummResourceId = lens _ummResourceId (\ s a -> s{_ummResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. ummHttpMethod :: Lens' UpdateMethod Text-ummHttpMethod = lens _ummHttpMethod (\ s a -> s{_ummHttpMethod = a});+ummHttpMethod = lens _ummHttpMethod (\ s a -> s{_ummHttpMethod = a}) instance AWSRequest UpdateMethod where type Rs UpdateMethod = Method
gen/Network/AWS/APIGateway/UpdateMethodResponse.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateMethodResponse--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -69,13 +69,13 @@ -- -- * 'umPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'umRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'umRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'umResourceId' - The 'Resource' identifier for the 'MethodResponse' resource.+-- * 'umResourceId' - [Required] The 'Resource' identifier for the 'MethodResponse' resource. ----- * 'umHttpMethod' - The HTTP verb of the 'Method' resource.+-- * 'umHttpMethod' - [Required] The HTTP verb of the 'Method' resource. ----- * 'umStatusCode' - The status code for the 'MethodResponse' resource.+-- * 'umStatusCode' - [Required] The status code for the 'MethodResponse' resource. updateMethodResponse :: Text -- ^ 'umRestAPIId' -> Text -- ^ 'umResourceId'@@ -84,33 +84,33 @@ -> UpdateMethodResponse updateMethodResponse pRestAPIId_ pResourceId_ pHttpMethod_ pStatusCode_ = UpdateMethodResponse'- { _umPatchOperations = Nothing- , _umRestAPIId = pRestAPIId_- , _umResourceId = pResourceId_- , _umHttpMethod = pHttpMethod_- , _umStatusCode = pStatusCode_- }+ { _umPatchOperations = Nothing+ , _umRestAPIId = pRestAPIId_+ , _umResourceId = pResourceId_+ , _umHttpMethod = pHttpMethod_+ , _umStatusCode = pStatusCode_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. umPatchOperations :: Lens' UpdateMethodResponse [PatchOperation]-umPatchOperations = lens _umPatchOperations (\ s a -> s{_umPatchOperations = a}) . _Default . _Coerce;+umPatchOperations = lens _umPatchOperations (\ s a -> s{_umPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . umRestAPIId :: Lens' UpdateMethodResponse Text-umRestAPIId = lens _umRestAPIId (\ s a -> s{_umRestAPIId = a});+umRestAPIId = lens _umRestAPIId (\ s a -> s{_umRestAPIId = a}) --- | The 'Resource' identifier for the 'MethodResponse' resource.+-- | [Required] The 'Resource' identifier for the 'MethodResponse' resource. umResourceId :: Lens' UpdateMethodResponse Text-umResourceId = lens _umResourceId (\ s a -> s{_umResourceId = a});+umResourceId = lens _umResourceId (\ s a -> s{_umResourceId = a}) --- | The HTTP verb of the 'Method' resource.+-- | [Required] The HTTP verb of the 'Method' resource. umHttpMethod :: Lens' UpdateMethodResponse Text-umHttpMethod = lens _umHttpMethod (\ s a -> s{_umHttpMethod = a});+umHttpMethod = lens _umHttpMethod (\ s a -> s{_umHttpMethod = a}) --- | The status code for the 'MethodResponse' resource.+-- | [Required] The status code for the 'MethodResponse' resource. umStatusCode :: Lens' UpdateMethodResponse Text-umStatusCode = lens _umStatusCode (\ s a -> s{_umStatusCode = a});+umStatusCode = lens _umStatusCode (\ s a -> s{_umStatusCode = a}) instance AWSRequest UpdateMethodResponse where type Rs UpdateMethodResponse = MethodResponse
gen/Network/AWS/APIGateway/UpdateModel.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateModel--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,32 +67,32 @@ -- -- * 'uPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'uRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'uModelName' - The name of the model to update.+-- * 'uModelName' - [Required] The name of the model to update. updateModel :: Text -- ^ 'uRestAPIId' -> Text -- ^ 'uModelName' -> UpdateModel updateModel pRestAPIId_ pModelName_ = UpdateModel'- { _uPatchOperations = Nothing- , _uRestAPIId = pRestAPIId_- , _uModelName = pModelName_- }+ { _uPatchOperations = Nothing+ , _uRestAPIId = pRestAPIId_+ , _uModelName = pModelName_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uPatchOperations :: Lens' UpdateModel [PatchOperation]-uPatchOperations = lens _uPatchOperations (\ s a -> s{_uPatchOperations = a}) . _Default . _Coerce;+uPatchOperations = lens _uPatchOperations (\ s a -> s{_uPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . uRestAPIId :: Lens' UpdateModel Text-uRestAPIId = lens _uRestAPIId (\ s a -> s{_uRestAPIId = a});+uRestAPIId = lens _uRestAPIId (\ s a -> s{_uRestAPIId = a}) --- | The name of the model to update.+-- | [Required] The name of the model to update. uModelName :: Lens' UpdateModel Text-uModelName = lens _uModelName (\ s a -> s{_uModelName = a});+uModelName = lens _uModelName (\ s a -> s{_uModelName = a}) instance AWSRequest UpdateModel where type Rs UpdateModel = Model
gen/Network/AWS/APIGateway/UpdateRequestValidator.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateRequestValidator--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -66,7 +66,7 @@ -- -- * 'urvPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'urvRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'urvRestAPIId' - [Required] The string identifier of the associated 'RestApi' . -- -- * 'urvRequestValidatorId' - [Required] The identifier of 'RequestValidator' to be updated. updateRequestValidator@@ -75,23 +75,23 @@ -> UpdateRequestValidator updateRequestValidator pRestAPIId_ pRequestValidatorId_ = UpdateRequestValidator'- { _urvPatchOperations = Nothing- , _urvRestAPIId = pRestAPIId_- , _urvRequestValidatorId = pRequestValidatorId_- }+ { _urvPatchOperations = Nothing+ , _urvRestAPIId = pRestAPIId_+ , _urvRequestValidatorId = pRequestValidatorId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. urvPatchOperations :: Lens' UpdateRequestValidator [PatchOperation]-urvPatchOperations = lens _urvPatchOperations (\ s a -> s{_urvPatchOperations = a}) . _Default . _Coerce;+urvPatchOperations = lens _urvPatchOperations (\ s a -> s{_urvPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . urvRestAPIId :: Lens' UpdateRequestValidator Text-urvRestAPIId = lens _urvRestAPIId (\ s a -> s{_urvRestAPIId = a});+urvRestAPIId = lens _urvRestAPIId (\ s a -> s{_urvRestAPIId = a}) -- | [Required] The identifier of 'RequestValidator' to be updated. urvRequestValidatorId :: Lens' UpdateRequestValidator Text-urvRequestValidatorId = lens _urvRequestValidatorId (\ s a -> s{_urvRequestValidatorId = a});+urvRequestValidatorId = lens _urvRequestValidatorId (\ s a -> s{_urvRequestValidatorId = a}) instance AWSRequest UpdateRequestValidator where type Rs UpdateRequestValidator = RequestValidator
gen/Network/AWS/APIGateway/UpdateResource.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateResource--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,32 +67,32 @@ -- -- * 'urPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'urRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'urRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'urResourceId' - The identifier of the 'Resource' resource.+-- * 'urResourceId' - [Required] The identifier of the 'Resource' resource. updateResource :: Text -- ^ 'urRestAPIId' -> Text -- ^ 'urResourceId' -> UpdateResource updateResource pRestAPIId_ pResourceId_ = UpdateResource'- { _urPatchOperations = Nothing- , _urRestAPIId = pRestAPIId_- , _urResourceId = pResourceId_- }+ { _urPatchOperations = Nothing+ , _urRestAPIId = pRestAPIId_+ , _urResourceId = pResourceId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. urPatchOperations :: Lens' UpdateResource [PatchOperation]-urPatchOperations = lens _urPatchOperations (\ s a -> s{_urPatchOperations = a}) . _Default . _Coerce;+urPatchOperations = lens _urPatchOperations (\ s a -> s{_urPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . urRestAPIId :: Lens' UpdateResource Text-urRestAPIId = lens _urRestAPIId (\ s a -> s{_urRestAPIId = a});+urRestAPIId = lens _urRestAPIId (\ s a -> s{_urRestAPIId = a}) --- | The identifier of the 'Resource' resource.+-- | [Required] The identifier of the 'Resource' resource. urResourceId :: Lens' UpdateResource Text-urResourceId = lens _urResourceId (\ s a -> s{_urResourceId = a});+urResourceId = lens _urResourceId (\ s a -> s{_urResourceId = a}) instance AWSRequest UpdateResource where type Rs UpdateResource = Resource
gen/Network/AWS/APIGateway/UpdateRestAPI.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateRestAPI--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -34,12 +34,15 @@ , restAPI , RestAPI -- * Response Lenses+ , raMinimumCompressionSize , raBinaryMediaTypes , raWarnings , raCreatedDate , raName , raVersion+ , raApiKeySource , raId+ , raPolicy , raEndpointConfiguration , raDescription ) where@@ -68,7 +71,7 @@ -- -- * 'uraPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uraRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'uraRestAPIId' - [Required] The string identifier of the associated 'RestApi' . updateRestAPI :: Text -- ^ 'uraRestAPIId' -> UpdateRestAPI@@ -78,11 +81,11 @@ -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uraPatchOperations :: Lens' UpdateRestAPI [PatchOperation]-uraPatchOperations = lens _uraPatchOperations (\ s a -> s{_uraPatchOperations = a}) . _Default . _Coerce;+uraPatchOperations = lens _uraPatchOperations (\ s a -> s{_uraPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . uraRestAPIId :: Lens' UpdateRestAPI Text-uraRestAPIId = lens _uraRestAPIId (\ s a -> s{_uraRestAPIId = a});+uraRestAPIId = lens _uraRestAPIId (\ s a -> s{_uraRestAPIId = a}) instance AWSRequest UpdateRestAPI where type Rs UpdateRestAPI = RestAPI
gen/Network/AWS/APIGateway/UpdateStage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateStage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -37,6 +37,7 @@ -- * Response Lenses , sDeploymentId , sVariables+ , sAccessLogSettings , sDocumentationVersion , sClientCertificateId , sCreatedDate@@ -44,9 +45,11 @@ , sMethodSettings , sLastUpdatedDate , sCacheClusterSize+ , sCanarySettings , sCacheClusterEnabled , sStageName , sDescription+ , sTags ) where import Network.AWS.APIGateway.Types@@ -56,7 +59,7 @@ import Network.AWS.Request import Network.AWS.Response --- | Requests Amazon API Gateway to change information about a 'Stage' resource.+-- | Requests API Gateway to change information about a 'Stage' resource. -- -- --@@ -74,32 +77,32 @@ -- -- * 'usPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'usRestAPIId' - The string identifier of the associated 'RestApi' .+-- * 'usRestAPIId' - [Required] The string identifier of the associated 'RestApi' . ----- * 'usStageName' - The name of the 'Stage' resource to change information about.+-- * 'usStageName' - [Required] The name of the 'Stage' resource to change information about. updateStage :: Text -- ^ 'usRestAPIId' -> Text -- ^ 'usStageName' -> UpdateStage updateStage pRestAPIId_ pStageName_ = UpdateStage'- { _usPatchOperations = Nothing- , _usRestAPIId = pRestAPIId_- , _usStageName = pStageName_- }+ { _usPatchOperations = Nothing+ , _usRestAPIId = pRestAPIId_+ , _usStageName = pStageName_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. usPatchOperations :: Lens' UpdateStage [PatchOperation]-usPatchOperations = lens _usPatchOperations (\ s a -> s{_usPatchOperations = a}) . _Default . _Coerce;+usPatchOperations = lens _usPatchOperations (\ s a -> s{_usPatchOperations = a}) . _Default . _Coerce --- | The string identifier of the associated 'RestApi' .+-- | [Required] The string identifier of the associated 'RestApi' . usRestAPIId :: Lens' UpdateStage Text-usRestAPIId = lens _usRestAPIId (\ s a -> s{_usRestAPIId = a});+usRestAPIId = lens _usRestAPIId (\ s a -> s{_usRestAPIId = a}) --- | The name of the 'Stage' resource to change information about.+-- | [Required] The name of the 'Stage' resource to change information about. usStageName :: Lens' UpdateStage Text-usStageName = lens _usStageName (\ s a -> s{_usStageName = a});+usStageName = lens _usStageName (\ s a -> s{_usStageName = a}) instance AWSRequest UpdateStage where type Rs UpdateStage = Stage
gen/Network/AWS/APIGateway/UpdateUsage.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateUsage--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,32 +67,32 @@ -- -- * 'uuPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uuUsagePlanId' - The Id of the usage plan associated with the usage data.+-- * 'uuUsagePlanId' - [Required] The Id of the usage plan associated with the usage data. ----- * 'uuKeyId' - The identifier of the API key associated with the usage plan in which a temporary extension is granted to the remaining quota.+-- * 'uuKeyId' - [Required] The identifier of the API key associated with the usage plan in which a temporary extension is granted to the remaining quota. updateUsage :: Text -- ^ 'uuUsagePlanId' -> Text -- ^ 'uuKeyId' -> UpdateUsage updateUsage pUsagePlanId_ pKeyId_ = UpdateUsage'- { _uuPatchOperations = Nothing- , _uuUsagePlanId = pUsagePlanId_- , _uuKeyId = pKeyId_- }+ { _uuPatchOperations = Nothing+ , _uuUsagePlanId = pUsagePlanId_+ , _uuKeyId = pKeyId_+ } -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uuPatchOperations :: Lens' UpdateUsage [PatchOperation]-uuPatchOperations = lens _uuPatchOperations (\ s a -> s{_uuPatchOperations = a}) . _Default . _Coerce;+uuPatchOperations = lens _uuPatchOperations (\ s a -> s{_uuPatchOperations = a}) . _Default . _Coerce --- | The Id of the usage plan associated with the usage data.+-- | [Required] The Id of the usage plan associated with the usage data. uuUsagePlanId :: Lens' UpdateUsage Text-uuUsagePlanId = lens _uuUsagePlanId (\ s a -> s{_uuUsagePlanId = a});+uuUsagePlanId = lens _uuUsagePlanId (\ s a -> s{_uuUsagePlanId = a}) --- | The identifier of the API key associated with the usage plan in which a temporary extension is granted to the remaining quota.+-- | [Required] The identifier of the API key associated with the usage plan in which a temporary extension is granted to the remaining quota. uuKeyId :: Lens' UpdateUsage Text-uuKeyId = lens _uuKeyId (\ s a -> s{_uuKeyId = a});+uuKeyId = lens _uuKeyId (\ s a -> s{_uuKeyId = a}) instance AWSRequest UpdateUsage where type Rs UpdateUsage = Usage
gen/Network/AWS/APIGateway/UpdateUsagePlan.hs view
@@ -12,7 +12,7 @@ -- | -- Module : Network.AWS.APIGateway.UpdateUsagePlan--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -67,22 +67,22 @@ -- -- * 'uupPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list. ----- * 'uupUsagePlanId' - The Id of the to-be-updated usage plan.+-- * 'uupUsagePlanId' - [Required] The Id of the to-be-updated usage plan. updateUsagePlan :: Text -- ^ 'uupUsagePlanId' -> UpdateUsagePlan updateUsagePlan pUsagePlanId_ = UpdateUsagePlan'- {_uupPatchOperations = Nothing, _uupUsagePlanId = pUsagePlanId_}+ {_uupPatchOperations = Nothing, _uupUsagePlanId = pUsagePlanId_} -- | A list of update operations to be applied to the specified resource and in the order specified in this list. uupPatchOperations :: Lens' UpdateUsagePlan [PatchOperation]-uupPatchOperations = lens _uupPatchOperations (\ s a -> s{_uupPatchOperations = a}) . _Default . _Coerce;+uupPatchOperations = lens _uupPatchOperations (\ s a -> s{_uupPatchOperations = a}) . _Default . _Coerce --- | The Id of the to-be-updated usage plan.+-- | [Required] The Id of the to-be-updated usage plan. uupUsagePlanId :: Lens' UpdateUsagePlan Text-uupUsagePlanId = lens _uupUsagePlanId (\ s a -> s{_uupUsagePlanId = a});+uupUsagePlanId = lens _uupUsagePlanId (\ s a -> s{_uupUsagePlanId = a}) instance AWSRequest UpdateUsagePlan where type Rs UpdateUsagePlan = UsagePlan
+ gen/Network/AWS/APIGateway/UpdateVPCLink.hs view
@@ -0,0 +1,111 @@+{-# 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.APIGateway.UpdateVPCLink+-- 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 an existing 'VpcLink' of a specified identifier.+--+--+module Network.AWS.APIGateway.UpdateVPCLink+ (+ -- * Creating a Request+ updateVPCLink+ , UpdateVPCLink+ -- * Request Lenses+ , uvlPatchOperations+ , uvlVpcLinkId++ -- * Destructuring the Response+ , vpcLink+ , VPCLink+ -- * Response Lenses+ , vlStatus+ , vlTargetARNs+ , vlName+ , vlStatusMessage+ , vlId+ , vlDescription+ ) where++import Network.AWS.APIGateway.Types+import Network.AWS.APIGateway.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response++-- | Updates an existing 'VpcLink' of a specified identifier.+--+--+--+-- /See:/ 'updateVPCLink' smart constructor.+data UpdateVPCLink = UpdateVPCLink'+ { _uvlPatchOperations :: !(Maybe [PatchOperation])+ , _uvlVpcLinkId :: !Text+ } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UpdateVPCLink' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'uvlPatchOperations' - A list of update operations to be applied to the specified resource and in the order specified in this list.+--+-- * 'uvlVpcLinkId' - [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+updateVPCLink+ :: Text -- ^ 'uvlVpcLinkId'+ -> UpdateVPCLink+updateVPCLink pVpcLinkId_ =+ UpdateVPCLink' {_uvlPatchOperations = Nothing, _uvlVpcLinkId = pVpcLinkId_}+++-- | A list of update operations to be applied to the specified resource and in the order specified in this list.+uvlPatchOperations :: Lens' UpdateVPCLink [PatchOperation]+uvlPatchOperations = lens _uvlPatchOperations (\ s a -> s{_uvlPatchOperations = a}) . _Default . _Coerce++-- | [Required] The identifier of the 'VpcLink' . It is used in an 'Integration' to reference this 'VpcLink' .+uvlVpcLinkId :: Lens' UpdateVPCLink Text+uvlVpcLinkId = lens _uvlVpcLinkId (\ s a -> s{_uvlVpcLinkId = a})++instance AWSRequest UpdateVPCLink where+ type Rs UpdateVPCLink = VPCLink+ request = patchJSON apiGateway+ response = receiveJSON (\ s h x -> eitherParseJSON x)++instance Hashable UpdateVPCLink where++instance NFData UpdateVPCLink where++instance ToHeaders UpdateVPCLink where+ toHeaders+ = const+ (mconcat+ ["Accept" =# ("application/json" :: ByteString)])++instance ToJSON UpdateVPCLink where+ toJSON UpdateVPCLink'{..}+ = object+ (catMaybes+ [("patchOperations" .=) <$> _uvlPatchOperations])++instance ToPath UpdateVPCLink where+ toPath UpdateVPCLink'{..}+ = mconcat ["/vpclinks/", toBS _uvlVpcLinkId]++instance ToQuery UpdateVPCLink where+ toQuery = const mempty
gen/Network/AWS/APIGateway/Waiters.hs view
@@ -7,7 +7,7 @@ -- | -- Module : Network.AWS.APIGateway.Waiters--- Copyright : (c) 2013-2017 Brendan Hay+-- 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
test/Main.hs view
@@ -2,7 +2,7 @@ -- | -- Module : Main--- Copyright : (c) 2013-2017 Brendan Hay+-- 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
test/Test/AWS/APIGateway.hs view
@@ -2,7 +2,7 @@ {-# LANGUAGE TemplateHaskell #-} -- Module : Test.AWS.APIGateway--- Copyright : (c) 2013-2016 Brendan Hay+-- 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
test/Test/AWS/APIGateway/Internal.hs view
@@ -3,7 +3,7 @@ {-# OPTIONS_GHC -fno-warn-unused-imports #-} -- Module : Test.AWS.APIGateway.Internal--- Copyright : (c) 2013-2016 Brendan Hay+-- 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
test/Test/AWS/Gen/APIGateway.hs view
@@ -5,7 +5,7 @@ -- | -- Module : Test.AWS.Gen.APIGateway--- Copyright : (c) 2013-2017 Brendan Hay+-- 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@@ -37,6 +37,9 @@ -- , requestGetDeployment $ -- getDeployment --+-- , requestGetTags $+-- getTags+-- -- , requestDeleteGatewayResponse $ -- deleteGatewayResponse --@@ -97,6 +100,9 @@ -- , requestCreateDeployment $ -- createDeployment --+-- , requestGetVPCLinks $+-- getVPCLinks+-- -- , requestCreateBasePathMapping $ -- createBasePathMapping --@@ -136,6 +142,9 @@ -- , requestGetUsage $ -- getUsage --+-- , requestGetVPCLink $+-- getVPCLink+-- -- , requestCreateModel $ -- createModel --@@ -202,6 +211,9 @@ -- , requestGetDomainName $ -- getDomainName --+-- , requestCreateVPCLink $+-- createVPCLink+-- -- , requestDeleteDocumentationPart $ -- deleteDocumentationPart --@@ -220,6 +232,12 @@ -- , requestGetUsagePlanKeys $ -- getUsagePlanKeys --+-- , requestDeleteVPCLink $+-- deleteVPCLink+--+-- , requestUpdateVPCLink $+-- updateVPCLink+-- -- , requestFlushStageCache $ -- flushStageCache --@@ -307,12 +325,18 @@ -- , requestDeleteAuthorizer $ -- deleteAuthorizer --+-- , requestTagResource $+-- tagResource+-- -- , requestCreateStage $ -- createStage -- -- , requestDeleteUsagePlanKey $ -- deleteUsagePlanKey --+-- , requestUntagResource $+-- untagResource+-- -- , requestCreateAPIKey $ -- createAPIKey --@@ -376,6 +400,9 @@ -- , responseGetDeployment $ -- deployment --+-- , responseGetTags $+-- getTagsResponse+-- -- , responseDeleteGatewayResponse $ -- deleteGatewayResponseResponse --@@ -436,6 +463,9 @@ -- , responseCreateDeployment $ -- deployment --+-- , responseGetVPCLinks $+-- getVPCLinksResponse+-- -- , responseCreateBasePathMapping $ -- basePathMapping --@@ -475,6 +505,9 @@ -- , responseGetUsage $ -- usage --+-- , responseGetVPCLink $+-- vpcLink+-- -- , responseCreateModel $ -- model --@@ -541,6 +574,9 @@ -- , responseGetDomainName $ -- domainName --+-- , responseCreateVPCLink $+-- vpcLink+-- -- , responseDeleteDocumentationPart $ -- deleteDocumentationPartResponse --@@ -559,6 +595,12 @@ -- , responseGetUsagePlanKeys $ -- getUsagePlanKeysResponse --+-- , responseDeleteVPCLink $+-- deleteVPCLinkResponse+--+-- , responseUpdateVPCLink $+-- vpcLink+-- -- , responseFlushStageCache $ -- flushStageCacheResponse --@@ -646,12 +688,18 @@ -- , responseDeleteAuthorizer $ -- deleteAuthorizerResponse --+-- , responseTagResource $+-- tagResourceResponse+-- -- , responseCreateStage $ -- stage -- -- , responseDeleteUsagePlanKey $ -- deleteUsagePlanKeyResponse --+-- , responseUntagResource $+-- untagResourceResponse+-- -- , responseCreateAPIKey $ -- apiKey --@@ -723,6 +771,11 @@ "GetDeployment" "fixture/GetDeployment.yaml" +requestGetTags :: GetTags -> TestTree+requestGetTags = req+ "GetTags"+ "fixture/GetTags.yaml"+ requestDeleteGatewayResponse :: DeleteGatewayResponse -> TestTree requestDeleteGatewayResponse = req "DeleteGatewayResponse"@@ -823,6 +876,11 @@ "CreateDeployment" "fixture/CreateDeployment.yaml" +requestGetVPCLinks :: GetVPCLinks -> TestTree+requestGetVPCLinks = req+ "GetVPCLinks"+ "fixture/GetVPCLinks.yaml"+ requestCreateBasePathMapping :: CreateBasePathMapping -> TestTree requestCreateBasePathMapping = req "CreateBasePathMapping"@@ -888,6 +946,11 @@ "GetUsage" "fixture/GetUsage.yaml" +requestGetVPCLink :: GetVPCLink -> TestTree+requestGetVPCLink = req+ "GetVPCLink"+ "fixture/GetVPCLink.yaml"+ requestCreateModel :: CreateModel -> TestTree requestCreateModel = req "CreateModel"@@ -998,6 +1061,11 @@ "GetDomainName" "fixture/GetDomainName.yaml" +requestCreateVPCLink :: CreateVPCLink -> TestTree+requestCreateVPCLink = req+ "CreateVPCLink"+ "fixture/CreateVPCLink.yaml"+ requestDeleteDocumentationPart :: DeleteDocumentationPart -> TestTree requestDeleteDocumentationPart = req "DeleteDocumentationPart"@@ -1028,6 +1096,16 @@ "GetUsagePlanKeys" "fixture/GetUsagePlanKeys.yaml" +requestDeleteVPCLink :: DeleteVPCLink -> TestTree+requestDeleteVPCLink = req+ "DeleteVPCLink"+ "fixture/DeleteVPCLink.yaml"++requestUpdateVPCLink :: UpdateVPCLink -> TestTree+requestUpdateVPCLink = req+ "UpdateVPCLink"+ "fixture/UpdateVPCLink.yaml"+ requestFlushStageCache :: FlushStageCache -> TestTree requestFlushStageCache = req "FlushStageCache"@@ -1173,6 +1251,11 @@ "DeleteAuthorizer" "fixture/DeleteAuthorizer.yaml" +requestTagResource :: TagResource -> TestTree+requestTagResource = req+ "TagResource"+ "fixture/TagResource.yaml"+ requestCreateStage :: CreateStage -> TestTree requestCreateStage = req "CreateStage"@@ -1183,6 +1266,11 @@ "DeleteUsagePlanKey" "fixture/DeleteUsagePlanKey.yaml" +requestUntagResource :: UntagResource -> TestTree+requestUntagResource = req+ "UntagResource"+ "fixture/UntagResource.yaml"+ requestCreateAPIKey :: CreateAPIKey -> TestTree requestCreateAPIKey = req "CreateAPIKey"@@ -1291,6 +1379,13 @@ apiGateway (Proxy :: Proxy GetDeployment) +responseGetTags :: GetTagsResponse -> TestTree+responseGetTags = res+ "GetTagsResponse"+ "fixture/GetTagsResponse.proto"+ apiGateway+ (Proxy :: Proxy GetTags)+ responseDeleteGatewayResponse :: DeleteGatewayResponseResponse -> TestTree responseDeleteGatewayResponse = res "DeleteGatewayResponseResponse"@@ -1431,6 +1526,13 @@ apiGateway (Proxy :: Proxy CreateDeployment) +responseGetVPCLinks :: GetVPCLinksResponse -> TestTree+responseGetVPCLinks = res+ "GetVPCLinksResponse"+ "fixture/GetVPCLinksResponse.proto"+ apiGateway+ (Proxy :: Proxy GetVPCLinks)+ responseCreateBasePathMapping :: BasePathMapping -> TestTree responseCreateBasePathMapping = res "CreateBasePathMappingResponse"@@ -1522,6 +1624,13 @@ apiGateway (Proxy :: Proxy GetUsage) +responseGetVPCLink :: VPCLink -> TestTree+responseGetVPCLink = res+ "GetVPCLinkResponse"+ "fixture/GetVPCLinkResponse.proto"+ apiGateway+ (Proxy :: Proxy GetVPCLink)+ responseCreateModel :: Model -> TestTree responseCreateModel = res "CreateModelResponse"@@ -1676,6 +1785,13 @@ apiGateway (Proxy :: Proxy GetDomainName) +responseCreateVPCLink :: VPCLink -> TestTree+responseCreateVPCLink = res+ "CreateVPCLinkResponse"+ "fixture/CreateVPCLinkResponse.proto"+ apiGateway+ (Proxy :: Proxy CreateVPCLink)+ responseDeleteDocumentationPart :: DeleteDocumentationPartResponse -> TestTree responseDeleteDocumentationPart = res "DeleteDocumentationPartResponse"@@ -1718,6 +1834,20 @@ apiGateway (Proxy :: Proxy GetUsagePlanKeys) +responseDeleteVPCLink :: DeleteVPCLinkResponse -> TestTree+responseDeleteVPCLink = res+ "DeleteVPCLinkResponse"+ "fixture/DeleteVPCLinkResponse.proto"+ apiGateway+ (Proxy :: Proxy DeleteVPCLink)++responseUpdateVPCLink :: VPCLink -> TestTree+responseUpdateVPCLink = res+ "UpdateVPCLinkResponse"+ "fixture/UpdateVPCLinkResponse.proto"+ apiGateway+ (Proxy :: Proxy UpdateVPCLink)+ responseFlushStageCache :: FlushStageCacheResponse -> TestTree responseFlushStageCache = res "FlushStageCacheResponse"@@ -1921,6 +2051,13 @@ apiGateway (Proxy :: Proxy DeleteAuthorizer) +responseTagResource :: TagResourceResponse -> TestTree+responseTagResource = res+ "TagResourceResponse"+ "fixture/TagResourceResponse.proto"+ apiGateway+ (Proxy :: Proxy TagResource)+ responseCreateStage :: Stage -> TestTree responseCreateStage = res "CreateStageResponse"@@ -1934,6 +2071,13 @@ "fixture/DeleteUsagePlanKeyResponse.proto" apiGateway (Proxy :: Proxy DeleteUsagePlanKey)++responseUntagResource :: UntagResourceResponse -> TestTree+responseUntagResource = res+ "UntagResourceResponse"+ "fixture/UntagResourceResponse.proto"+ apiGateway+ (Proxy :: Proxy UntagResource) responseCreateAPIKey :: APIKey -> TestTree responseCreateAPIKey = res