{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.CloudFront.Types.ConflictingAlias -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.CloudFront.Types.ConflictingAlias where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude -- | An alias (also called a CNAME) and the CloudFront distribution and -- Amazon Web Services account ID that it\'s associated with. The -- distribution and account IDs are partially hidden, which allows you to -- identify the distributions and accounts that you own, but helps to -- protect the information of ones that you don\'t own. -- -- /See:/ 'newConflictingAlias' smart constructor. data ConflictingAlias = ConflictingAlias' { -- | The (partially hidden) ID of the Amazon Web Services account that owns -- the distribution that\'s associated with the alias. accountId :: Prelude.Maybe Prelude.Text, -- | An alias (also called a CNAME). alias :: Prelude.Maybe Prelude.Text, -- | The (partially hidden) ID of the CloudFront distribution associated with -- the alias. distributionId :: Prelude.Maybe Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'ConflictingAlias' 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: -- -- 'accountId', 'conflictingAlias_accountId' - The (partially hidden) ID of the Amazon Web Services account that owns -- the distribution that\'s associated with the alias. -- -- 'alias', 'conflictingAlias_alias' - An alias (also called a CNAME). -- -- 'distributionId', 'conflictingAlias_distributionId' - The (partially hidden) ID of the CloudFront distribution associated with -- the alias. newConflictingAlias :: ConflictingAlias newConflictingAlias = ConflictingAlias' { accountId = Prelude.Nothing, alias = Prelude.Nothing, distributionId = Prelude.Nothing } -- | The (partially hidden) ID of the Amazon Web Services account that owns -- the distribution that\'s associated with the alias. conflictingAlias_accountId :: Lens.Lens' ConflictingAlias (Prelude.Maybe Prelude.Text) conflictingAlias_accountId = Lens.lens (\ConflictingAlias' {accountId} -> accountId) (\s@ConflictingAlias' {} a -> s {accountId = a} :: ConflictingAlias) -- | An alias (also called a CNAME). conflictingAlias_alias :: Lens.Lens' ConflictingAlias (Prelude.Maybe Prelude.Text) conflictingAlias_alias = Lens.lens (\ConflictingAlias' {alias} -> alias) (\s@ConflictingAlias' {} a -> s {alias = a} :: ConflictingAlias) -- | The (partially hidden) ID of the CloudFront distribution associated with -- the alias. conflictingAlias_distributionId :: Lens.Lens' ConflictingAlias (Prelude.Maybe Prelude.Text) conflictingAlias_distributionId = Lens.lens (\ConflictingAlias' {distributionId} -> distributionId) (\s@ConflictingAlias' {} a -> s {distributionId = a} :: ConflictingAlias) instance Data.FromXML ConflictingAlias where parseXML x = ConflictingAlias' Prelude.<$> (x Data..@? "AccountId") Prelude.<*> (x Data..@? "Alias") Prelude.<*> (x Data..@? "DistributionId") instance Prelude.Hashable ConflictingAlias where hashWithSalt _salt ConflictingAlias' {..} = _salt `Prelude.hashWithSalt` accountId `Prelude.hashWithSalt` alias `Prelude.hashWithSalt` distributionId instance Prelude.NFData ConflictingAlias where rnf ConflictingAlias' {..} = Prelude.rnf accountId `Prelude.seq` Prelude.rnf alias `Prelude.seq` Prelude.rnf distributionId