module Stratosphere.EC2.IPAM ( module Exports, IPAM(..), mkIPAM ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.EC2.IPAM.IpamOperatingRegionProperty as Exports import {-# SOURCE #-} Stratosphere.EC2.IPAM.IpamOrganizationalUnitExclusionProperty as Exports import Stratosphere.ResourceProperties import Stratosphere.Tag import Stratosphere.Value data IPAM = -- | See: IPAM {haddock_workaround_ :: (), -- | See: defaultResourceDiscoveryOrganizationalUnitExclusions :: (Prelude.Maybe [IpamOrganizationalUnitExclusionProperty]), -- | See: description :: (Prelude.Maybe (Value Prelude.Text)), -- | See: enablePrivateGua :: (Prelude.Maybe (Value Prelude.Bool)), -- | See: meteredAccount :: (Prelude.Maybe (Value Prelude.Text)), -- | See: operatingRegions :: (Prelude.Maybe [IpamOperatingRegionProperty]), -- | See: tags :: (Prelude.Maybe [Tag]), -- | See: tier :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkIPAM :: IPAM mkIPAM = IPAM {haddock_workaround_ = (), defaultResourceDiscoveryOrganizationalUnitExclusions = Prelude.Nothing, description = Prelude.Nothing, enablePrivateGua = Prelude.Nothing, meteredAccount = Prelude.Nothing, operatingRegions = Prelude.Nothing, tags = Prelude.Nothing, tier = Prelude.Nothing} instance ToResourceProperties IPAM where toResourceProperties IPAM {..} = ResourceProperties {awsType = "AWS::EC2::IPAM", supportsTags = Prelude.True, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "DefaultResourceDiscoveryOrganizationalUnitExclusions" Prelude.<$> defaultResourceDiscoveryOrganizationalUnitExclusions, (JSON..=) "Description" Prelude.<$> description, (JSON..=) "EnablePrivateGua" Prelude.<$> enablePrivateGua, (JSON..=) "MeteredAccount" Prelude.<$> meteredAccount, (JSON..=) "OperatingRegions" Prelude.<$> operatingRegions, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "Tier" Prelude.<$> tier])} instance JSON.ToJSON IPAM where toJSON IPAM {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "DefaultResourceDiscoveryOrganizationalUnitExclusions" Prelude.<$> defaultResourceDiscoveryOrganizationalUnitExclusions, (JSON..=) "Description" Prelude.<$> description, (JSON..=) "EnablePrivateGua" Prelude.<$> enablePrivateGua, (JSON..=) "MeteredAccount" Prelude.<$> meteredAccount, (JSON..=) "OperatingRegions" Prelude.<$> operatingRegions, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "Tier" Prelude.<$> tier])) instance Property "DefaultResourceDiscoveryOrganizationalUnitExclusions" IPAM where type PropertyType "DefaultResourceDiscoveryOrganizationalUnitExclusions" IPAM = [IpamOrganizationalUnitExclusionProperty] set newValue IPAM {..} = IPAM {defaultResourceDiscoveryOrganizationalUnitExclusions = Prelude.pure newValue, ..} instance Property "Description" IPAM where type PropertyType "Description" IPAM = Value Prelude.Text set newValue IPAM {..} = IPAM {description = Prelude.pure newValue, ..} instance Property "EnablePrivateGua" IPAM where type PropertyType "EnablePrivateGua" IPAM = Value Prelude.Bool set newValue IPAM {..} = IPAM {enablePrivateGua = Prelude.pure newValue, ..} instance Property "MeteredAccount" IPAM where type PropertyType "MeteredAccount" IPAM = Value Prelude.Text set newValue IPAM {..} = IPAM {meteredAccount = Prelude.pure newValue, ..} instance Property "OperatingRegions" IPAM where type PropertyType "OperatingRegions" IPAM = [IpamOperatingRegionProperty] set newValue IPAM {..} = IPAM {operatingRegions = Prelude.pure newValue, ..} instance Property "Tags" IPAM where type PropertyType "Tags" IPAM = [Tag] set newValue IPAM {..} = IPAM {tags = Prelude.pure newValue, ..} instance Property "Tier" IPAM where type PropertyType "Tier" IPAM = Value Prelude.Text set newValue IPAM {..} = IPAM {tier = Prelude.pure newValue, ..}