Skip to content

Commit

Permalink
Generating new amazonka-elasticsearch library
Browse files Browse the repository at this point in the history
  • Loading branch information
brendanhay committed May 16, 2018
1 parent b91adfd commit cab4982
Show file tree
Hide file tree
Showing 28 changed files with 1,697 additions and 265 deletions.
3 changes: 3 additions & 0 deletions amazonka-elasticsearch/amazonka-elasticsearch.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -53,10 +53,13 @@ library
, Network.AWS.ElasticSearch.DescribeElasticsearchDomainConfig
, Network.AWS.ElasticSearch.DescribeElasticsearchDomains
, Network.AWS.ElasticSearch.DescribeElasticsearchInstanceTypeLimits
, Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstanceOfferings
, Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstances
, Network.AWS.ElasticSearch.ListDomainNames
, Network.AWS.ElasticSearch.ListElasticsearchInstanceTypes
, Network.AWS.ElasticSearch.ListElasticsearchVersions
, Network.AWS.ElasticSearch.ListTags
, Network.AWS.ElasticSearch.PurchaseReservedElasticsearchInstanceOffering
, Network.AWS.ElasticSearch.RemoveTags
, Network.AWS.ElasticSearch.Types
, Network.AWS.ElasticSearch.UpdateElasticsearchDomainConfig
Expand Down
Original file line number Diff line number Diff line change
@@ -0,0 +1,10 @@
---
method: GET
headers:
Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/es/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?
Host: es.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:
''
Empty file.
Original file line number Diff line number Diff line change
@@ -0,0 +1,10 @@
---
method: GET
headers:
Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/es/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?
Host: es.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:
''
Empty file.
Original file line number Diff line number Diff line change
@@ -0,0 +1,10 @@
---
method: POST
headers:
Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/es/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?
Host: es.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:
''
Empty file.
84 changes: 82 additions & 2 deletions amazonka-elasticsearch/gen/Network/AWS/ElasticSearch.hs
Original file line number Diff line number Diff line change
Expand Up @@ -64,7 +64,7 @@ module Network.AWS.ElasticSearch
-- ** DescribeElasticsearchDomains
, module Network.AWS.ElasticSearch.DescribeElasticsearchDomains

-- ** ListElasticsearchInstanceTypes
-- ** ListElasticsearchInstanceTypes (Paginated)
, module Network.AWS.ElasticSearch.ListElasticsearchInstanceTypes

-- ** DeleteElasticsearchServiceRole
Expand All @@ -85,15 +85,24 @@ module Network.AWS.ElasticSearch
-- ** DeleteElasticsearchDomain
, module Network.AWS.ElasticSearch.DeleteElasticsearchDomain

-- ** PurchaseReservedElasticsearchInstanceOffering
, module Network.AWS.ElasticSearch.PurchaseReservedElasticsearchInstanceOffering

-- ** DescribeReservedElasticsearchInstances
, module Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstances

-- ** UpdateElasticsearchDomainConfig
, module Network.AWS.ElasticSearch.UpdateElasticsearchDomainConfig

-- ** ListElasticsearchVersions
-- ** ListElasticsearchVersions (Paginated)
, module Network.AWS.ElasticSearch.ListElasticsearchVersions

-- ** AddTags
, module Network.AWS.ElasticSearch.AddTags

-- ** DescribeReservedElasticsearchInstanceOfferings
, module Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstanceOfferings

-- ** ListTags
, module Network.AWS.ElasticSearch.ListTags

Expand All @@ -108,6 +117,9 @@ module Network.AWS.ElasticSearch
-- ** OptionState
, OptionState (..)

-- ** ReservedElasticsearchInstancePaymentOption
, ReservedElasticsearchInstancePaymentOption (..)

-- ** VolumeType
, VolumeType (..)

Expand All @@ -129,6 +141,20 @@ module Network.AWS.ElasticSearch
, aosOptions
, aosStatus

-- ** CognitoOptions
, CognitoOptions
, cognitoOptions
, coIdentityPoolId
, coEnabled
, coUserPoolId
, coRoleARN

-- ** CognitoOptionsStatus
, CognitoOptionsStatus
, cognitoOptionsStatus
, cosOptions
, cosStatus

-- ** DomainInfo
, DomainInfo
, domainInfo
Expand Down Expand Up @@ -172,6 +198,8 @@ module Network.AWS.ElasticSearch
, edcLogPublishingOptions
, edcElasticsearchClusterConfig
, edcSnapshotOptions
, edcCognitoOptions
, edcEncryptionAtRestOptions
, edcVPCOptions
, edcAdvancedOptions
, edcElasticsearchVersion
Expand All @@ -184,6 +212,8 @@ module Network.AWS.ElasticSearch
, edsLogPublishingOptions
, edsCreated
, edsSnapshotOptions
, edsCognitoOptions
, edsEncryptionAtRestOptions
, edsDeleted
, edsVPCOptions
, edsEndpoints
Expand All @@ -202,6 +232,18 @@ module Network.AWS.ElasticSearch
, evsOptions
, evsStatus

-- ** EncryptionAtRestOptions
, EncryptionAtRestOptions
, encryptionAtRestOptions
, earoEnabled
, earoKMSKeyId

-- ** EncryptionAtRestOptionsStatus
, EncryptionAtRestOptionsStatus
, encryptionAtRestOptionsStatus
, earosOptions
, earosStatus

-- ** InstanceCountLimits
, InstanceCountLimits
, instanceCountLimits
Expand Down Expand Up @@ -241,6 +283,41 @@ module Network.AWS.ElasticSearch
, osUpdateDate
, osState

-- ** RecurringCharge
, RecurringCharge
, recurringCharge
, rcRecurringChargeFrequency
, rcRecurringChargeAmount

-- ** ReservedElasticsearchInstance
, ReservedElasticsearchInstance
, reservedElasticsearchInstance
, reiState
, reiCurrencyCode
, reiStartTime
, reiReservedElasticsearchInstanceOfferingId
, reiReservedElasticsearchInstanceId
, reiElasticsearchInstanceCount
, reiReservationName
, reiElasticsearchInstanceType
, reiRecurringCharges
, reiUsagePrice
, reiFixedPrice
, reiDuration
, reiPaymentOption

-- ** ReservedElasticsearchInstanceOffering
, ReservedElasticsearchInstanceOffering
, reservedElasticsearchInstanceOffering
, reioCurrencyCode
, reioReservedElasticsearchInstanceOfferingId
, reioElasticsearchInstanceType
, reioRecurringCharges
, reioUsagePrice
, reioFixedPrice
, reioDuration
, reioPaymentOption

-- ** SnapshotOptions
, SnapshotOptions
, snapshotOptions
Expand Down Expand Up @@ -300,10 +377,13 @@ import Network.AWS.ElasticSearch.DescribeElasticsearchDomain
import Network.AWS.ElasticSearch.DescribeElasticsearchDomainConfig
import Network.AWS.ElasticSearch.DescribeElasticsearchDomains
import Network.AWS.ElasticSearch.DescribeElasticsearchInstanceTypeLimits
import Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstanceOfferings
import Network.AWS.ElasticSearch.DescribeReservedElasticsearchInstances
import Network.AWS.ElasticSearch.ListDomainNames
import Network.AWS.ElasticSearch.ListElasticsearchInstanceTypes
import Network.AWS.ElasticSearch.ListElasticsearchVersions
import Network.AWS.ElasticSearch.ListTags
import Network.AWS.ElasticSearch.PurchaseReservedElasticsearchInstanceOffering
import Network.AWS.ElasticSearch.RemoveTags
import Network.AWS.ElasticSearch.Types
import Network.AWS.ElasticSearch.UpdateElasticsearchDomainConfig
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -68,11 +68,11 @@ addTags pARN_ = AddTags' {_atARN = pARN_, _atTagList = mempty}

-- | Specify the @ARN@ for which you want to add the tags.
atARN :: Lens' AddTags Text
atARN = lens _atARN (\ s a -> s{_atARN = a});
atARN = lens _atARN (\ s a -> s{_atARN = a})

-- | List of @Tag@ that need to be added for the Elasticsearch domain.
atTagList :: Lens' AddTags [Tag]
atTagList = lens _atTagList (\ s a -> s{_atTagList = a}) . _Coerce;
atTagList = lens _atTagList (\ s a -> s{_atTagList = a}) . _Coerce

instance AWSRequest AddTags where
type Rs AddTags = AddTagsResponse
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -32,6 +32,8 @@ module Network.AWS.ElasticSearch.CreateElasticsearchDomain
, cedLogPublishingOptions
, cedElasticsearchClusterConfig
, cedSnapshotOptions
, cedCognitoOptions
, cedEncryptionAtRestOptions
, cedVPCOptions
, cedAdvancedOptions
, cedElasticsearchVersion
Expand Down Expand Up @@ -59,6 +61,8 @@ data CreateElasticsearchDomain = CreateElasticsearchDomain'
, _cedLogPublishingOptions :: !(Maybe (Map LogType LogPublishingOption))
, _cedElasticsearchClusterConfig :: !(Maybe ElasticsearchClusterConfig)
, _cedSnapshotOptions :: !(Maybe SnapshotOptions)
, _cedCognitoOptions :: !(Maybe CognitoOptions)
, _cedEncryptionAtRestOptions :: !(Maybe EncryptionAtRestOptions)
, _cedVPCOptions :: !(Maybe VPCOptions)
, _cedAdvancedOptions :: !(Maybe (Map Text Text))
, _cedElasticsearchVersion :: !(Maybe Text)
Expand All @@ -80,6 +84,10 @@ data CreateElasticsearchDomain = CreateElasticsearchDomain'
--
-- * 'cedSnapshotOptions' - Option to set time, in UTC format, of the daily automated snapshot. Default value is 0 hours.
--
-- * 'cedCognitoOptions' - Options to specify the Cognito user and identity pools for Kibana authentication. For more information, see <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-cognito-auth.html Amazon Cognito Authentication for Kibana> .
--
-- * 'cedEncryptionAtRestOptions' - Specifies the Encryption At Rest Options.
--
-- * 'cedVPCOptions' - Options to specify the subnets and security groups for VPC endpoint. For more information, see <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-vpc.html#es-creating-vpc Creating a VPC> in /VPC Endpoints for Amazon Elasticsearch Service Domains/
--
-- * 'cedAdvancedOptions' - Option to allow references to indices in an HTTP request body. Must be @false@ when configuring access to individual sub-resources. By default, the value is @true@ . See <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-createupdatedomains.html#es-createdomain-configure-advanced-options Configuration Advanced Options> for more information.
Expand All @@ -92,53 +100,63 @@ createElasticsearchDomain
-> CreateElasticsearchDomain
createElasticsearchDomain pDomainName_ =
CreateElasticsearchDomain'
{ _cedEBSOptions = Nothing
, _cedAccessPolicies = Nothing
, _cedLogPublishingOptions = Nothing
, _cedElasticsearchClusterConfig = Nothing
, _cedSnapshotOptions = Nothing
, _cedVPCOptions = Nothing
, _cedAdvancedOptions = Nothing
, _cedElasticsearchVersion = Nothing
, _cedDomainName = pDomainName_
}
{ _cedEBSOptions = Nothing
, _cedAccessPolicies = Nothing
, _cedLogPublishingOptions = Nothing
, _cedElasticsearchClusterConfig = Nothing
, _cedSnapshotOptions = Nothing
, _cedCognitoOptions = Nothing
, _cedEncryptionAtRestOptions = Nothing
, _cedVPCOptions = Nothing
, _cedAdvancedOptions = Nothing
, _cedElasticsearchVersion = Nothing
, _cedDomainName = pDomainName_
}


-- | Options to enable, disable and specify the type and size of EBS storage volumes.
cedEBSOptions :: Lens' CreateElasticsearchDomain (Maybe EBSOptions)
cedEBSOptions = lens _cedEBSOptions (\ s a -> s{_cedEBSOptions = a});
cedEBSOptions = lens _cedEBSOptions (\ s a -> s{_cedEBSOptions = a})

-- | IAM access policy as a JSON-formatted string.
cedAccessPolicies :: Lens' CreateElasticsearchDomain (Maybe Text)
cedAccessPolicies = lens _cedAccessPolicies (\ s a -> s{_cedAccessPolicies = a});
cedAccessPolicies = lens _cedAccessPolicies (\ s a -> s{_cedAccessPolicies = a})

-- | Map of @LogType@ and @LogPublishingOption@ , each containing options to publish a given type of Elasticsearch log.
cedLogPublishingOptions :: Lens' CreateElasticsearchDomain (HashMap LogType LogPublishingOption)
cedLogPublishingOptions = lens _cedLogPublishingOptions (\ s a -> s{_cedLogPublishingOptions = a}) . _Default . _Map;
cedLogPublishingOptions = lens _cedLogPublishingOptions (\ s a -> s{_cedLogPublishingOptions = a}) . _Default . _Map

-- | Configuration options for an Elasticsearch domain. Specifies the instance type and number of instances in the domain cluster.
cedElasticsearchClusterConfig :: Lens' CreateElasticsearchDomain (Maybe ElasticsearchClusterConfig)
cedElasticsearchClusterConfig = lens _cedElasticsearchClusterConfig (\ s a -> s{_cedElasticsearchClusterConfig = a});
cedElasticsearchClusterConfig = lens _cedElasticsearchClusterConfig (\ s a -> s{_cedElasticsearchClusterConfig = a})

-- | Option to set time, in UTC format, of the daily automated snapshot. Default value is 0 hours.
cedSnapshotOptions :: Lens' CreateElasticsearchDomain (Maybe SnapshotOptions)
cedSnapshotOptions = lens _cedSnapshotOptions (\ s a -> s{_cedSnapshotOptions = a});
cedSnapshotOptions = lens _cedSnapshotOptions (\ s a -> s{_cedSnapshotOptions = a})

-- | Options to specify the Cognito user and identity pools for Kibana authentication. For more information, see <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-cognito-auth.html Amazon Cognito Authentication for Kibana> .
cedCognitoOptions :: Lens' CreateElasticsearchDomain (Maybe CognitoOptions)
cedCognitoOptions = lens _cedCognitoOptions (\ s a -> s{_cedCognitoOptions = a})

-- | Specifies the Encryption At Rest Options.
cedEncryptionAtRestOptions :: Lens' CreateElasticsearchDomain (Maybe EncryptionAtRestOptions)
cedEncryptionAtRestOptions = lens _cedEncryptionAtRestOptions (\ s a -> s{_cedEncryptionAtRestOptions = a})

-- | Options to specify the subnets and security groups for VPC endpoint. For more information, see <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-vpc.html#es-creating-vpc Creating a VPC> in /VPC Endpoints for Amazon Elasticsearch Service Domains/
cedVPCOptions :: Lens' CreateElasticsearchDomain (Maybe VPCOptions)
cedVPCOptions = lens _cedVPCOptions (\ s a -> s{_cedVPCOptions = a});
cedVPCOptions = lens _cedVPCOptions (\ s a -> s{_cedVPCOptions = a})

-- | Option to allow references to indices in an HTTP request body. Must be @false@ when configuring access to individual sub-resources. By default, the value is @true@ . See <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-createupdatedomains.html#es-createdomain-configure-advanced-options Configuration Advanced Options> for more information.
cedAdvancedOptions :: Lens' CreateElasticsearchDomain (HashMap Text Text)
cedAdvancedOptions = lens _cedAdvancedOptions (\ s a -> s{_cedAdvancedOptions = a}) . _Default . _Map;
cedAdvancedOptions = lens _cedAdvancedOptions (\ s a -> s{_cedAdvancedOptions = a}) . _Default . _Map

-- | String of format X.Y to specify version for the Elasticsearch domain eg. "1.5" or "2.3". For more information, see <http://docs.aws.amazon.com/elasticsearch-service/latest/developerguide/es-createupdatedomains.html#es-createdomains Creating Elasticsearch Domains> in the /Amazon Elasticsearch Service Developer Guide/ .
cedElasticsearchVersion :: Lens' CreateElasticsearchDomain (Maybe Text)
cedElasticsearchVersion = lens _cedElasticsearchVersion (\ s a -> s{_cedElasticsearchVersion = a});
cedElasticsearchVersion = lens _cedElasticsearchVersion (\ s a -> s{_cedElasticsearchVersion = a})

-- | The name of the Elasticsearch domain that you are creating. Domain names are unique across the domains owned by an account within an AWS region. Domain names must start with a letter or number and can contain the following characters: a-z (lowercase), 0-9, and - (hyphen).
cedDomainName :: Lens' CreateElasticsearchDomain Text
cedDomainName = lens _cedDomainName (\ s a -> s{_cedDomainName = a});
cedDomainName = lens _cedDomainName (\ s a -> s{_cedDomainName = a})

instance AWSRequest CreateElasticsearchDomain where
type Rs CreateElasticsearchDomain =
Expand Down Expand Up @@ -168,6 +186,9 @@ instance ToJSON CreateElasticsearchDomain where
("ElasticsearchClusterConfig" .=) <$>
_cedElasticsearchClusterConfig,
("SnapshotOptions" .=) <$> _cedSnapshotOptions,
("CognitoOptions" .=) <$> _cedCognitoOptions,
("EncryptionAtRestOptions" .=) <$>
_cedEncryptionAtRestOptions,
("VPCOptions" .=) <$> _cedVPCOptions,
("AdvancedOptions" .=) <$> _cedAdvancedOptions,
("ElasticsearchVersion" .=) <$>
Expand Down Expand Up @@ -203,16 +224,16 @@ createElasticsearchDomainResponse
-> CreateElasticsearchDomainResponse
createElasticsearchDomainResponse pResponseStatus_ =
CreateElasticsearchDomainResponse'
{_cedrsDomainStatus = Nothing, _cedrsResponseStatus = pResponseStatus_}
{_cedrsDomainStatus = Nothing, _cedrsResponseStatus = pResponseStatus_}


-- | The status of the newly created Elasticsearch domain.
cedrsDomainStatus :: Lens' CreateElasticsearchDomainResponse (Maybe ElasticsearchDomainStatus)
cedrsDomainStatus = lens _cedrsDomainStatus (\ s a -> s{_cedrsDomainStatus = a});
cedrsDomainStatus = lens _cedrsDomainStatus (\ s a -> s{_cedrsDomainStatus = a})

-- | -- | The response status code.
cedrsResponseStatus :: Lens' CreateElasticsearchDomainResponse Int
cedrsResponseStatus = lens _cedrsResponseStatus (\ s a -> s{_cedrsResponseStatus = a});
cedrsResponseStatus = lens _cedrsResponseStatus (\ s a -> s{_cedrsResponseStatus = a})

instance NFData CreateElasticsearchDomainResponse
where
Original file line number Diff line number Diff line change
Expand Up @@ -68,7 +68,7 @@ deleteElasticsearchDomain pDomainName_ =

-- | The name of the Elasticsearch domain that you want to permanently delete.
dDomainName :: Lens' DeleteElasticsearchDomain Text
dDomainName = lens _dDomainName (\ s a -> s{_dDomainName = a});
dDomainName = lens _dDomainName (\ s a -> s{_dDomainName = a})

instance AWSRequest DeleteElasticsearchDomain where
type Rs DeleteElasticsearchDomain =
Expand Down Expand Up @@ -118,16 +118,16 @@ deleteElasticsearchDomainResponse
-> DeleteElasticsearchDomainResponse
deleteElasticsearchDomainResponse pResponseStatus_ =
DeleteElasticsearchDomainResponse'
{_delrsDomainStatus = Nothing, _delrsResponseStatus = pResponseStatus_}
{_delrsDomainStatus = Nothing, _delrsResponseStatus = pResponseStatus_}


-- | The status of the Elasticsearch domain being deleted.
delrsDomainStatus :: Lens' DeleteElasticsearchDomainResponse (Maybe ElasticsearchDomainStatus)
delrsDomainStatus = lens _delrsDomainStatus (\ s a -> s{_delrsDomainStatus = a});
delrsDomainStatus = lens _delrsDomainStatus (\ s a -> s{_delrsDomainStatus = a})

-- | -- | The response status code.
delrsResponseStatus :: Lens' DeleteElasticsearchDomainResponse Int
delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a});
delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a})

instance NFData DeleteElasticsearchDomainResponse
where
Loading

0 comments on commit cab4982

Please sign in to comment.