{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.EC2.DescribeReservedInstancesOfferings -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Describes Reserved Instance offerings that are available for purchase. -- With Reserved Instances, you purchase the right to launch instances for -- a period of time. During that time period, you do not receive -- insufficient capacity errors, and you pay a lower usage rate than the -- rate charged for On-Demand instances for the actual time used. -- -- If you have listed your own Reserved Instances for sale in the Reserved -- Instance Marketplace, they will be excluded from these results. This is -- to ensure that you do not purchase your own Reserved Instances. -- -- For more information, see -- -- in the /Amazon EC2 User Guide/. -- -- This operation returns paginated results. module Amazonka.EC2.DescribeReservedInstancesOfferings ( -- * Creating a Request DescribeReservedInstancesOfferings (..), newDescribeReservedInstancesOfferings, -- * Request Lenses describeReservedInstancesOfferings_availabilityZone, describeReservedInstancesOfferings_dryRun, describeReservedInstancesOfferings_filters, describeReservedInstancesOfferings_includeMarketplace, describeReservedInstancesOfferings_instanceTenancy, describeReservedInstancesOfferings_instanceType, describeReservedInstancesOfferings_maxDuration, describeReservedInstancesOfferings_maxInstanceCount, describeReservedInstancesOfferings_maxResults, describeReservedInstancesOfferings_minDuration, describeReservedInstancesOfferings_nextToken, describeReservedInstancesOfferings_offeringClass, describeReservedInstancesOfferings_offeringType, describeReservedInstancesOfferings_productDescription, describeReservedInstancesOfferings_reservedInstancesOfferingIds, -- * Destructuring the Response DescribeReservedInstancesOfferingsResponse (..), newDescribeReservedInstancesOfferingsResponse, -- * Response Lenses describeReservedInstancesOfferingsResponse_nextToken, describeReservedInstancesOfferingsResponse_reservedInstancesOfferings, describeReservedInstancesOfferingsResponse_httpStatus, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.EC2.Types import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | Contains the parameters for DescribeReservedInstancesOfferings. -- -- /See:/ 'newDescribeReservedInstancesOfferings' smart constructor. data DescribeReservedInstancesOfferings = DescribeReservedInstancesOfferings' { -- | The Availability Zone in which the Reserved Instance can be used. availabilityZone :: Prelude.Maybe Prelude.Text, -- | Checks whether you have the required permissions for the action, without -- actually making the request, and provides an error response. If you have -- the required permissions, the error response is @DryRunOperation@. -- Otherwise, it is @UnauthorizedOperation@. dryRun :: Prelude.Maybe Prelude.Bool, -- | One or more filters. -- -- - @availability-zone@ - The Availability Zone where the Reserved -- Instance can be used. -- -- - @duration@ - The duration of the Reserved Instance (for example, one -- year or three years), in seconds (@31536000@ | @94608000@). -- -- - @fixed-price@ - The purchase price of the Reserved Instance (for -- example, 9800.0). -- -- - @instance-type@ - The instance type that is covered by the -- reservation. -- -- - @marketplace@ - Set to @true@ to show only Reserved Instance -- Marketplace offerings. When this filter is not used, which is the -- default behavior, all offerings from both Amazon Web Services and -- the Reserved Instance Marketplace are listed. -- -- - @product-description@ - The Reserved Instance product platform -- description. Instances that include @(Amazon VPC)@ in the product -- platform description will only be displayed to EC2-Classic account -- holders and are for use with Amazon VPC. (@Linux\/UNIX@ | -- @Linux\/UNIX (Amazon VPC)@ | @SUSE Linux@ | -- @SUSE Linux (Amazon VPC)@ | @Red Hat Enterprise Linux@ | -- @Red Hat Enterprise Linux (Amazon VPC)@ | -- @Red Hat Enterprise Linux with HA (Amazon VPC)@ | @Windows@ | -- @Windows (Amazon VPC)@ | @Windows with SQL Server Standard@ | -- @Windows with SQL Server Standard (Amazon VPC)@ | -- @Windows with SQL Server Web@ | -- @ Windows with SQL Server Web (Amazon VPC)@ | -- @Windows with SQL Server Enterprise@ | -- @Windows with SQL Server Enterprise (Amazon VPC)@) -- -- - @reserved-instances-offering-id@ - The Reserved Instances offering -- ID. -- -- - @scope@ - The scope of the Reserved Instance (@Availability Zone@ or -- @Region@). -- -- - @usage-price@ - The usage price of the Reserved Instance, per hour -- (for example, 0.84). filters :: Prelude.Maybe [Filter], -- | Include Reserved Instance Marketplace offerings in the response. includeMarketplace :: Prelude.Maybe Prelude.Bool, -- | The tenancy of the instances covered by the reservation. A Reserved -- Instance with a tenancy of @dedicated@ is applied to instances that run -- in a VPC on single-tenant hardware (i.e., Dedicated Instances). -- -- __Important:__ The @host@ value cannot be used with this parameter. Use -- the @default@ or @dedicated@ values only. -- -- Default: @default@ instanceTenancy :: Prelude.Maybe Tenancy, -- | The instance type that the reservation will cover (for example, -- @m1.small@). For more information, see -- -- in the /Amazon EC2 User Guide/. instanceType :: Prelude.Maybe InstanceType, -- | The maximum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 94608000 (3 years) maxDuration :: Prelude.Maybe Prelude.Integer, -- | The maximum number of instances to filter when searching for offerings. -- -- Default: 20 maxInstanceCount :: Prelude.Maybe Prelude.Int, -- | The maximum number of results to return for the request in a single -- page. The remaining results of the initial request can be seen by -- sending another request with the returned @NextToken@ value. The maximum -- is 100. -- -- Default: 100 maxResults :: Prelude.Maybe Prelude.Int, -- | The minimum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 2592000 (1 month) minDuration :: Prelude.Maybe Prelude.Integer, -- | The token to retrieve the next page of results. nextToken :: Prelude.Maybe Prelude.Text, -- | The offering class of the Reserved Instance. Can be @standard@ or -- @convertible@. offeringClass :: Prelude.Maybe OfferingClassType, -- | The Reserved Instance offering type. If you are using tools that predate -- the 2011-11-01 API version, you only have access to the -- @Medium Utilization@ Reserved Instance offering type. offeringType :: Prelude.Maybe OfferingTypeValues, -- | The Reserved Instance product platform description. Instances that -- include @(Amazon VPC)@ in the description are for use with Amazon VPC. productDescription :: Prelude.Maybe RIProductDescription, -- | One or more Reserved Instances offering IDs. reservedInstancesOfferingIds :: Prelude.Maybe [Prelude.Text] } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'DescribeReservedInstancesOfferings' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'availabilityZone', 'describeReservedInstancesOfferings_availabilityZone' - The Availability Zone in which the Reserved Instance can be used. -- -- 'dryRun', 'describeReservedInstancesOfferings_dryRun' - Checks whether you have the required permissions for the action, without -- actually making the request, and provides an error response. If you have -- the required permissions, the error response is @DryRunOperation@. -- Otherwise, it is @UnauthorizedOperation@. -- -- 'filters', 'describeReservedInstancesOfferings_filters' - One or more filters. -- -- - @availability-zone@ - The Availability Zone where the Reserved -- Instance can be used. -- -- - @duration@ - The duration of the Reserved Instance (for example, one -- year or three years), in seconds (@31536000@ | @94608000@). -- -- - @fixed-price@ - The purchase price of the Reserved Instance (for -- example, 9800.0). -- -- - @instance-type@ - The instance type that is covered by the -- reservation. -- -- - @marketplace@ - Set to @true@ to show only Reserved Instance -- Marketplace offerings. When this filter is not used, which is the -- default behavior, all offerings from both Amazon Web Services and -- the Reserved Instance Marketplace are listed. -- -- - @product-description@ - The Reserved Instance product platform -- description. Instances that include @(Amazon VPC)@ in the product -- platform description will only be displayed to EC2-Classic account -- holders and are for use with Amazon VPC. (@Linux\/UNIX@ | -- @Linux\/UNIX (Amazon VPC)@ | @SUSE Linux@ | -- @SUSE Linux (Amazon VPC)@ | @Red Hat Enterprise Linux@ | -- @Red Hat Enterprise Linux (Amazon VPC)@ | -- @Red Hat Enterprise Linux with HA (Amazon VPC)@ | @Windows@ | -- @Windows (Amazon VPC)@ | @Windows with SQL Server Standard@ | -- @Windows with SQL Server Standard (Amazon VPC)@ | -- @Windows with SQL Server Web@ | -- @ Windows with SQL Server Web (Amazon VPC)@ | -- @Windows with SQL Server Enterprise@ | -- @Windows with SQL Server Enterprise (Amazon VPC)@) -- -- - @reserved-instances-offering-id@ - The Reserved Instances offering -- ID. -- -- - @scope@ - The scope of the Reserved Instance (@Availability Zone@ or -- @Region@). -- -- - @usage-price@ - The usage price of the Reserved Instance, per hour -- (for example, 0.84). -- -- 'includeMarketplace', 'describeReservedInstancesOfferings_includeMarketplace' - Include Reserved Instance Marketplace offerings in the response. -- -- 'instanceTenancy', 'describeReservedInstancesOfferings_instanceTenancy' - The tenancy of the instances covered by the reservation. A Reserved -- Instance with a tenancy of @dedicated@ is applied to instances that run -- in a VPC on single-tenant hardware (i.e., Dedicated Instances). -- -- __Important:__ The @host@ value cannot be used with this parameter. Use -- the @default@ or @dedicated@ values only. -- -- Default: @default@ -- -- 'instanceType', 'describeReservedInstancesOfferings_instanceType' - The instance type that the reservation will cover (for example, -- @m1.small@). For more information, see -- -- in the /Amazon EC2 User Guide/. -- -- 'maxDuration', 'describeReservedInstancesOfferings_maxDuration' - The maximum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 94608000 (3 years) -- -- 'maxInstanceCount', 'describeReservedInstancesOfferings_maxInstanceCount' - The maximum number of instances to filter when searching for offerings. -- -- Default: 20 -- -- 'maxResults', 'describeReservedInstancesOfferings_maxResults' - The maximum number of results to return for the request in a single -- page. The remaining results of the initial request can be seen by -- sending another request with the returned @NextToken@ value. The maximum -- is 100. -- -- Default: 100 -- -- 'minDuration', 'describeReservedInstancesOfferings_minDuration' - The minimum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 2592000 (1 month) -- -- 'nextToken', 'describeReservedInstancesOfferings_nextToken' - The token to retrieve the next page of results. -- -- 'offeringClass', 'describeReservedInstancesOfferings_offeringClass' - The offering class of the Reserved Instance. Can be @standard@ or -- @convertible@. -- -- 'offeringType', 'describeReservedInstancesOfferings_offeringType' - The Reserved Instance offering type. If you are using tools that predate -- the 2011-11-01 API version, you only have access to the -- @Medium Utilization@ Reserved Instance offering type. -- -- 'productDescription', 'describeReservedInstancesOfferings_productDescription' - The Reserved Instance product platform description. Instances that -- include @(Amazon VPC)@ in the description are for use with Amazon VPC. -- -- 'reservedInstancesOfferingIds', 'describeReservedInstancesOfferings_reservedInstancesOfferingIds' - One or more Reserved Instances offering IDs. newDescribeReservedInstancesOfferings :: DescribeReservedInstancesOfferings newDescribeReservedInstancesOfferings = DescribeReservedInstancesOfferings' { availabilityZone = Prelude.Nothing, dryRun = Prelude.Nothing, filters = Prelude.Nothing, includeMarketplace = Prelude.Nothing, instanceTenancy = Prelude.Nothing, instanceType = Prelude.Nothing, maxDuration = Prelude.Nothing, maxInstanceCount = Prelude.Nothing, maxResults = Prelude.Nothing, minDuration = Prelude.Nothing, nextToken = Prelude.Nothing, offeringClass = Prelude.Nothing, offeringType = Prelude.Nothing, productDescription = Prelude.Nothing, reservedInstancesOfferingIds = Prelude.Nothing } -- | The Availability Zone in which the Reserved Instance can be used. describeReservedInstancesOfferings_availabilityZone :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Text) describeReservedInstancesOfferings_availabilityZone = Lens.lens (\DescribeReservedInstancesOfferings' {availabilityZone} -> availabilityZone) (\s@DescribeReservedInstancesOfferings' {} a -> s {availabilityZone = a} :: DescribeReservedInstancesOfferings) -- | Checks whether you have the required permissions for the action, without -- actually making the request, and provides an error response. If you have -- the required permissions, the error response is @DryRunOperation@. -- Otherwise, it is @UnauthorizedOperation@. describeReservedInstancesOfferings_dryRun :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Bool) describeReservedInstancesOfferings_dryRun = Lens.lens (\DescribeReservedInstancesOfferings' {dryRun} -> dryRun) (\s@DescribeReservedInstancesOfferings' {} a -> s {dryRun = a} :: DescribeReservedInstancesOfferings) -- | One or more filters. -- -- - @availability-zone@ - The Availability Zone where the Reserved -- Instance can be used. -- -- - @duration@ - The duration of the Reserved Instance (for example, one -- year or three years), in seconds (@31536000@ | @94608000@). -- -- - @fixed-price@ - The purchase price of the Reserved Instance (for -- example, 9800.0). -- -- - @instance-type@ - The instance type that is covered by the -- reservation. -- -- - @marketplace@ - Set to @true@ to show only Reserved Instance -- Marketplace offerings. When this filter is not used, which is the -- default behavior, all offerings from both Amazon Web Services and -- the Reserved Instance Marketplace are listed. -- -- - @product-description@ - The Reserved Instance product platform -- description. Instances that include @(Amazon VPC)@ in the product -- platform description will only be displayed to EC2-Classic account -- holders and are for use with Amazon VPC. (@Linux\/UNIX@ | -- @Linux\/UNIX (Amazon VPC)@ | @SUSE Linux@ | -- @SUSE Linux (Amazon VPC)@ | @Red Hat Enterprise Linux@ | -- @Red Hat Enterprise Linux (Amazon VPC)@ | -- @Red Hat Enterprise Linux with HA (Amazon VPC)@ | @Windows@ | -- @Windows (Amazon VPC)@ | @Windows with SQL Server Standard@ | -- @Windows with SQL Server Standard (Amazon VPC)@ | -- @Windows with SQL Server Web@ | -- @ Windows with SQL Server Web (Amazon VPC)@ | -- @Windows with SQL Server Enterprise@ | -- @Windows with SQL Server Enterprise (Amazon VPC)@) -- -- - @reserved-instances-offering-id@ - The Reserved Instances offering -- ID. -- -- - @scope@ - The scope of the Reserved Instance (@Availability Zone@ or -- @Region@). -- -- - @usage-price@ - The usage price of the Reserved Instance, per hour -- (for example, 0.84). describeReservedInstancesOfferings_filters :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe [Filter]) describeReservedInstancesOfferings_filters = Lens.lens (\DescribeReservedInstancesOfferings' {filters} -> filters) (\s@DescribeReservedInstancesOfferings' {} a -> s {filters = a} :: DescribeReservedInstancesOfferings) Prelude.. Lens.mapping Lens.coerced -- | Include Reserved Instance Marketplace offerings in the response. describeReservedInstancesOfferings_includeMarketplace :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Bool) describeReservedInstancesOfferings_includeMarketplace = Lens.lens (\DescribeReservedInstancesOfferings' {includeMarketplace} -> includeMarketplace) (\s@DescribeReservedInstancesOfferings' {} a -> s {includeMarketplace = a} :: DescribeReservedInstancesOfferings) -- | The tenancy of the instances covered by the reservation. A Reserved -- Instance with a tenancy of @dedicated@ is applied to instances that run -- in a VPC on single-tenant hardware (i.e., Dedicated Instances). -- -- __Important:__ The @host@ value cannot be used with this parameter. Use -- the @default@ or @dedicated@ values only. -- -- Default: @default@ describeReservedInstancesOfferings_instanceTenancy :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Tenancy) describeReservedInstancesOfferings_instanceTenancy = Lens.lens (\DescribeReservedInstancesOfferings' {instanceTenancy} -> instanceTenancy) (\s@DescribeReservedInstancesOfferings' {} a -> s {instanceTenancy = a} :: DescribeReservedInstancesOfferings) -- | The instance type that the reservation will cover (for example, -- @m1.small@). For more information, see -- -- in the /Amazon EC2 User Guide/. describeReservedInstancesOfferings_instanceType :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe InstanceType) describeReservedInstancesOfferings_instanceType = Lens.lens (\DescribeReservedInstancesOfferings' {instanceType} -> instanceType) (\s@DescribeReservedInstancesOfferings' {} a -> s {instanceType = a} :: DescribeReservedInstancesOfferings) -- | The maximum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 94608000 (3 years) describeReservedInstancesOfferings_maxDuration :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Integer) describeReservedInstancesOfferings_maxDuration = Lens.lens (\DescribeReservedInstancesOfferings' {maxDuration} -> maxDuration) (\s@DescribeReservedInstancesOfferings' {} a -> s {maxDuration = a} :: DescribeReservedInstancesOfferings) -- | The maximum number of instances to filter when searching for offerings. -- -- Default: 20 describeReservedInstancesOfferings_maxInstanceCount :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Int) describeReservedInstancesOfferings_maxInstanceCount = Lens.lens (\DescribeReservedInstancesOfferings' {maxInstanceCount} -> maxInstanceCount) (\s@DescribeReservedInstancesOfferings' {} a -> s {maxInstanceCount = a} :: DescribeReservedInstancesOfferings) -- | The maximum number of results to return for the request in a single -- page. The remaining results of the initial request can be seen by -- sending another request with the returned @NextToken@ value. The maximum -- is 100. -- -- Default: 100 describeReservedInstancesOfferings_maxResults :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Int) describeReservedInstancesOfferings_maxResults = Lens.lens (\DescribeReservedInstancesOfferings' {maxResults} -> maxResults) (\s@DescribeReservedInstancesOfferings' {} a -> s {maxResults = a} :: DescribeReservedInstancesOfferings) -- | The minimum duration (in seconds) to filter when searching for -- offerings. -- -- Default: 2592000 (1 month) describeReservedInstancesOfferings_minDuration :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Integer) describeReservedInstancesOfferings_minDuration = Lens.lens (\DescribeReservedInstancesOfferings' {minDuration} -> minDuration) (\s@DescribeReservedInstancesOfferings' {} a -> s {minDuration = a} :: DescribeReservedInstancesOfferings) -- | The token to retrieve the next page of results. describeReservedInstancesOfferings_nextToken :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe Prelude.Text) describeReservedInstancesOfferings_nextToken = Lens.lens (\DescribeReservedInstancesOfferings' {nextToken} -> nextToken) (\s@DescribeReservedInstancesOfferings' {} a -> s {nextToken = a} :: DescribeReservedInstancesOfferings) -- | The offering class of the Reserved Instance. Can be @standard@ or -- @convertible@. describeReservedInstancesOfferings_offeringClass :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe OfferingClassType) describeReservedInstancesOfferings_offeringClass = Lens.lens (\DescribeReservedInstancesOfferings' {offeringClass} -> offeringClass) (\s@DescribeReservedInstancesOfferings' {} a -> s {offeringClass = a} :: DescribeReservedInstancesOfferings) -- | The Reserved Instance offering type. If you are using tools that predate -- the 2011-11-01 API version, you only have access to the -- @Medium Utilization@ Reserved Instance offering type. describeReservedInstancesOfferings_offeringType :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe OfferingTypeValues) describeReservedInstancesOfferings_offeringType = Lens.lens (\DescribeReservedInstancesOfferings' {offeringType} -> offeringType) (\s@DescribeReservedInstancesOfferings' {} a -> s {offeringType = a} :: DescribeReservedInstancesOfferings) -- | The Reserved Instance product platform description. Instances that -- include @(Amazon VPC)@ in the description are for use with Amazon VPC. describeReservedInstancesOfferings_productDescription :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe RIProductDescription) describeReservedInstancesOfferings_productDescription = Lens.lens (\DescribeReservedInstancesOfferings' {productDescription} -> productDescription) (\s@DescribeReservedInstancesOfferings' {} a -> s {productDescription = a} :: DescribeReservedInstancesOfferings) -- | One or more Reserved Instances offering IDs. describeReservedInstancesOfferings_reservedInstancesOfferingIds :: Lens.Lens' DescribeReservedInstancesOfferings (Prelude.Maybe [Prelude.Text]) describeReservedInstancesOfferings_reservedInstancesOfferingIds = Lens.lens (\DescribeReservedInstancesOfferings' {reservedInstancesOfferingIds} -> reservedInstancesOfferingIds) (\s@DescribeReservedInstancesOfferings' {} a -> s {reservedInstancesOfferingIds = a} :: DescribeReservedInstancesOfferings) Prelude.. Lens.mapping Lens.coerced instance Core.AWSPager DescribeReservedInstancesOfferings where page rq rs | Core.stop ( rs Lens.^? describeReservedInstancesOfferingsResponse_nextToken Prelude.. Lens._Just ) = Prelude.Nothing | Core.stop ( rs Lens.^? describeReservedInstancesOfferingsResponse_reservedInstancesOfferings Prelude.. Lens._Just ) = Prelude.Nothing | Prelude.otherwise = Prelude.Just Prelude.$ rq Prelude.& describeReservedInstancesOfferings_nextToken Lens..~ rs Lens.^? describeReservedInstancesOfferingsResponse_nextToken Prelude.. Lens._Just instance Core.AWSRequest DescribeReservedInstancesOfferings where type AWSResponse DescribeReservedInstancesOfferings = DescribeReservedInstancesOfferingsResponse request overrides = Request.postQuery (overrides defaultService) response = Response.receiveXML ( \s h x -> DescribeReservedInstancesOfferingsResponse' Prelude.<$> (x Data..@? "nextToken") Prelude.<*> ( x Data..@? "reservedInstancesOfferingsSet" Core..!@ Prelude.mempty Prelude.>>= Core.may (Data.parseXMLList "item") ) Prelude.<*> (Prelude.pure (Prelude.fromEnum s)) ) instance Prelude.Hashable DescribeReservedInstancesOfferings where hashWithSalt _salt DescribeReservedInstancesOfferings' {..} = _salt `Prelude.hashWithSalt` availabilityZone `Prelude.hashWithSalt` dryRun `Prelude.hashWithSalt` filters `Prelude.hashWithSalt` includeMarketplace `Prelude.hashWithSalt` instanceTenancy `Prelude.hashWithSalt` instanceType `Prelude.hashWithSalt` maxDuration `Prelude.hashWithSalt` maxInstanceCount `Prelude.hashWithSalt` maxResults `Prelude.hashWithSalt` minDuration `Prelude.hashWithSalt` nextToken `Prelude.hashWithSalt` offeringClass `Prelude.hashWithSalt` offeringType `Prelude.hashWithSalt` productDescription `Prelude.hashWithSalt` reservedInstancesOfferingIds instance Prelude.NFData DescribeReservedInstancesOfferings where rnf DescribeReservedInstancesOfferings' {..} = Prelude.rnf availabilityZone `Prelude.seq` Prelude.rnf dryRun `Prelude.seq` Prelude.rnf filters `Prelude.seq` Prelude.rnf includeMarketplace `Prelude.seq` Prelude.rnf instanceTenancy `Prelude.seq` Prelude.rnf instanceType `Prelude.seq` Prelude.rnf maxDuration `Prelude.seq` Prelude.rnf maxInstanceCount `Prelude.seq` Prelude.rnf maxResults `Prelude.seq` Prelude.rnf minDuration `Prelude.seq` Prelude.rnf nextToken `Prelude.seq` Prelude.rnf offeringClass `Prelude.seq` Prelude.rnf offeringType `Prelude.seq` Prelude.rnf productDescription `Prelude.seq` Prelude.rnf reservedInstancesOfferingIds instance Data.ToHeaders DescribeReservedInstancesOfferings where toHeaders = Prelude.const Prelude.mempty instance Data.ToPath DescribeReservedInstancesOfferings where toPath = Prelude.const "/" instance Data.ToQuery DescribeReservedInstancesOfferings where toQuery DescribeReservedInstancesOfferings' {..} = Prelude.mconcat [ "Action" Data.=: ( "DescribeReservedInstancesOfferings" :: Prelude.ByteString ), "Version" Data.=: ("2016-11-15" :: Prelude.ByteString), "AvailabilityZone" Data.=: availabilityZone, "DryRun" Data.=: dryRun, Data.toQuery (Data.toQueryList "Filter" Prelude.<$> filters), "IncludeMarketplace" Data.=: includeMarketplace, "InstanceTenancy" Data.=: instanceTenancy, "InstanceType" Data.=: instanceType, "MaxDuration" Data.=: maxDuration, "MaxInstanceCount" Data.=: maxInstanceCount, "MaxResults" Data.=: maxResults, "MinDuration" Data.=: minDuration, "NextToken" Data.=: nextToken, "OfferingClass" Data.=: offeringClass, "OfferingType" Data.=: offeringType, "ProductDescription" Data.=: productDescription, Data.toQuery ( Data.toQueryList "ReservedInstancesOfferingId" Prelude.<$> reservedInstancesOfferingIds ) ] -- | Contains the output of DescribeReservedInstancesOfferings. -- -- /See:/ 'newDescribeReservedInstancesOfferingsResponse' smart constructor. data DescribeReservedInstancesOfferingsResponse = DescribeReservedInstancesOfferingsResponse' { -- | The token to use to retrieve the next page of results. This value is -- @null@ when there are no more results to return. nextToken :: Prelude.Maybe Prelude.Text, -- | A list of Reserved Instances offerings. reservedInstancesOfferings :: Prelude.Maybe [ReservedInstancesOffering], -- | The response's http status code. httpStatus :: Prelude.Int } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'DescribeReservedInstancesOfferingsResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'nextToken', 'describeReservedInstancesOfferingsResponse_nextToken' - The token to use to retrieve the next page of results. This value is -- @null@ when there are no more results to return. -- -- 'reservedInstancesOfferings', 'describeReservedInstancesOfferingsResponse_reservedInstancesOfferings' - A list of Reserved Instances offerings. -- -- 'httpStatus', 'describeReservedInstancesOfferingsResponse_httpStatus' - The response's http status code. newDescribeReservedInstancesOfferingsResponse :: -- | 'httpStatus' Prelude.Int -> DescribeReservedInstancesOfferingsResponse newDescribeReservedInstancesOfferingsResponse pHttpStatus_ = DescribeReservedInstancesOfferingsResponse' { nextToken = Prelude.Nothing, reservedInstancesOfferings = Prelude.Nothing, httpStatus = pHttpStatus_ } -- | The token to use to retrieve the next page of results. This value is -- @null@ when there are no more results to return. describeReservedInstancesOfferingsResponse_nextToken :: Lens.Lens' DescribeReservedInstancesOfferingsResponse (Prelude.Maybe Prelude.Text) describeReservedInstancesOfferingsResponse_nextToken = Lens.lens (\DescribeReservedInstancesOfferingsResponse' {nextToken} -> nextToken) (\s@DescribeReservedInstancesOfferingsResponse' {} a -> s {nextToken = a} :: DescribeReservedInstancesOfferingsResponse) -- | A list of Reserved Instances offerings. describeReservedInstancesOfferingsResponse_reservedInstancesOfferings :: Lens.Lens' DescribeReservedInstancesOfferingsResponse (Prelude.Maybe [ReservedInstancesOffering]) describeReservedInstancesOfferingsResponse_reservedInstancesOfferings = Lens.lens (\DescribeReservedInstancesOfferingsResponse' {reservedInstancesOfferings} -> reservedInstancesOfferings) (\s@DescribeReservedInstancesOfferingsResponse' {} a -> s {reservedInstancesOfferings = a} :: DescribeReservedInstancesOfferingsResponse) Prelude.. Lens.mapping Lens.coerced -- | The response's http status code. describeReservedInstancesOfferingsResponse_httpStatus :: Lens.Lens' DescribeReservedInstancesOfferingsResponse Prelude.Int describeReservedInstancesOfferingsResponse_httpStatus = Lens.lens (\DescribeReservedInstancesOfferingsResponse' {httpStatus} -> httpStatus) (\s@DescribeReservedInstancesOfferingsResponse' {} a -> s {httpStatus = a} :: DescribeReservedInstancesOfferingsResponse) instance Prelude.NFData DescribeReservedInstancesOfferingsResponse where rnf DescribeReservedInstancesOfferingsResponse' {..} = Prelude.rnf nextToken `Prelude.seq` Prelude.rnf reservedInstancesOfferings `Prelude.seq` Prelude.rnf httpStatus