{-# 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.EC2.Types.TransitGatewayPrefixListReference
-- 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.EC2.Types.TransitGatewayPrefixListReference where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Internal
import Amazonka.EC2.Types.TransitGatewayPrefixListAttachment
import Amazonka.EC2.Types.TransitGatewayPrefixListReferenceState
import qualified Amazonka.Prelude as Prelude

-- | Describes a prefix list reference.
--
-- /See:/ 'newTransitGatewayPrefixListReference' smart constructor.
data TransitGatewayPrefixListReference = TransitGatewayPrefixListReference'
  { -- | Indicates whether traffic that matches this route is dropped.
    TransitGatewayPrefixListReference -> Maybe Bool
blackhole :: Prelude.Maybe Prelude.Bool,
    -- | The ID of the prefix list.
    TransitGatewayPrefixListReference -> Maybe Text
prefixListId :: Prelude.Maybe Prelude.Text,
    -- | The ID of the prefix list owner.
    TransitGatewayPrefixListReference -> Maybe Text
prefixListOwnerId :: Prelude.Maybe Prelude.Text,
    -- | The state of the prefix list reference.
    TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListReferenceState
state :: Prelude.Maybe TransitGatewayPrefixListReferenceState,
    -- | Information about the transit gateway attachment.
    TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment :: Prelude.Maybe TransitGatewayPrefixListAttachment,
    -- | The ID of the transit gateway route table.
    TransitGatewayPrefixListReference -> Maybe Text
transitGatewayRouteTableId :: Prelude.Maybe Prelude.Text
  }
  deriving (TransitGatewayPrefixListReference
-> TransitGatewayPrefixListReference -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TransitGatewayPrefixListReference
-> TransitGatewayPrefixListReference -> Bool
$c/= :: TransitGatewayPrefixListReference
-> TransitGatewayPrefixListReference -> Bool
== :: TransitGatewayPrefixListReference
-> TransitGatewayPrefixListReference -> Bool
$c== :: TransitGatewayPrefixListReference
-> TransitGatewayPrefixListReference -> Bool
Prelude.Eq, ReadPrec [TransitGatewayPrefixListReference]
ReadPrec TransitGatewayPrefixListReference
Int -> ReadS TransitGatewayPrefixListReference
ReadS [TransitGatewayPrefixListReference]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [TransitGatewayPrefixListReference]
$creadListPrec :: ReadPrec [TransitGatewayPrefixListReference]
readPrec :: ReadPrec TransitGatewayPrefixListReference
$creadPrec :: ReadPrec TransitGatewayPrefixListReference
readList :: ReadS [TransitGatewayPrefixListReference]
$creadList :: ReadS [TransitGatewayPrefixListReference]
readsPrec :: Int -> ReadS TransitGatewayPrefixListReference
$creadsPrec :: Int -> ReadS TransitGatewayPrefixListReference
Prelude.Read, Int -> TransitGatewayPrefixListReference -> ShowS
[TransitGatewayPrefixListReference] -> ShowS
TransitGatewayPrefixListReference -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TransitGatewayPrefixListReference] -> ShowS
$cshowList :: [TransitGatewayPrefixListReference] -> ShowS
show :: TransitGatewayPrefixListReference -> String
$cshow :: TransitGatewayPrefixListReference -> String
showsPrec :: Int -> TransitGatewayPrefixListReference -> ShowS
$cshowsPrec :: Int -> TransitGatewayPrefixListReference -> ShowS
Prelude.Show, forall x.
Rep TransitGatewayPrefixListReference x
-> TransitGatewayPrefixListReference
forall x.
TransitGatewayPrefixListReference
-> Rep TransitGatewayPrefixListReference x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep TransitGatewayPrefixListReference x
-> TransitGatewayPrefixListReference
$cfrom :: forall x.
TransitGatewayPrefixListReference
-> Rep TransitGatewayPrefixListReference x
Prelude.Generic)

-- |
-- Create a value of 'TransitGatewayPrefixListReference' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'blackhole', 'transitGatewayPrefixListReference_blackhole' - Indicates whether traffic that matches this route is dropped.
--
-- 'prefixListId', 'transitGatewayPrefixListReference_prefixListId' - The ID of the prefix list.
--
-- 'prefixListOwnerId', 'transitGatewayPrefixListReference_prefixListOwnerId' - The ID of the prefix list owner.
--
-- 'state', 'transitGatewayPrefixListReference_state' - The state of the prefix list reference.
--
-- 'transitGatewayAttachment', 'transitGatewayPrefixListReference_transitGatewayAttachment' - Information about the transit gateway attachment.
--
-- 'transitGatewayRouteTableId', 'transitGatewayPrefixListReference_transitGatewayRouteTableId' - The ID of the transit gateway route table.
newTransitGatewayPrefixListReference ::
  TransitGatewayPrefixListReference
newTransitGatewayPrefixListReference :: TransitGatewayPrefixListReference
newTransitGatewayPrefixListReference =
  TransitGatewayPrefixListReference'
    { $sel:blackhole:TransitGatewayPrefixListReference' :: Maybe Bool
blackhole =
        forall a. Maybe a
Prelude.Nothing,
      $sel:prefixListId:TransitGatewayPrefixListReference' :: Maybe Text
prefixListId = forall a. Maybe a
Prelude.Nothing,
      $sel:prefixListOwnerId:TransitGatewayPrefixListReference' :: Maybe Text
prefixListOwnerId = forall a. Maybe a
Prelude.Nothing,
      $sel:state:TransitGatewayPrefixListReference' :: Maybe TransitGatewayPrefixListReferenceState
state = forall a. Maybe a
Prelude.Nothing,
      $sel:transitGatewayAttachment:TransitGatewayPrefixListReference' :: Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment =
        forall a. Maybe a
Prelude.Nothing,
      $sel:transitGatewayRouteTableId:TransitGatewayPrefixListReference' :: Maybe Text
transitGatewayRouteTableId =
        forall a. Maybe a
Prelude.Nothing
    }

-- | Indicates whether traffic that matches this route is dropped.
transitGatewayPrefixListReference_blackhole :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe Prelude.Bool)
transitGatewayPrefixListReference_blackhole :: Lens' TransitGatewayPrefixListReference (Maybe Bool)
transitGatewayPrefixListReference_blackhole = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe Bool
blackhole :: Maybe Bool
$sel:blackhole:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Bool
blackhole} -> Maybe Bool
blackhole) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe Bool
a -> TransitGatewayPrefixListReference
s {$sel:blackhole:TransitGatewayPrefixListReference' :: Maybe Bool
blackhole = Maybe Bool
a} :: TransitGatewayPrefixListReference)

-- | The ID of the prefix list.
transitGatewayPrefixListReference_prefixListId :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe Prelude.Text)
transitGatewayPrefixListReference_prefixListId :: Lens' TransitGatewayPrefixListReference (Maybe Text)
transitGatewayPrefixListReference_prefixListId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe Text
prefixListId :: Maybe Text
$sel:prefixListId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
prefixListId} -> Maybe Text
prefixListId) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe Text
a -> TransitGatewayPrefixListReference
s {$sel:prefixListId:TransitGatewayPrefixListReference' :: Maybe Text
prefixListId = Maybe Text
a} :: TransitGatewayPrefixListReference)

-- | The ID of the prefix list owner.
transitGatewayPrefixListReference_prefixListOwnerId :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe Prelude.Text)
transitGatewayPrefixListReference_prefixListOwnerId :: Lens' TransitGatewayPrefixListReference (Maybe Text)
transitGatewayPrefixListReference_prefixListOwnerId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe Text
prefixListOwnerId :: Maybe Text
$sel:prefixListOwnerId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
prefixListOwnerId} -> Maybe Text
prefixListOwnerId) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe Text
a -> TransitGatewayPrefixListReference
s {$sel:prefixListOwnerId:TransitGatewayPrefixListReference' :: Maybe Text
prefixListOwnerId = Maybe Text
a} :: TransitGatewayPrefixListReference)

-- | The state of the prefix list reference.
transitGatewayPrefixListReference_state :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe TransitGatewayPrefixListReferenceState)
transitGatewayPrefixListReference_state :: Lens'
  TransitGatewayPrefixListReference
  (Maybe TransitGatewayPrefixListReferenceState)
transitGatewayPrefixListReference_state = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe TransitGatewayPrefixListReferenceState
state :: Maybe TransitGatewayPrefixListReferenceState
$sel:state:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListReferenceState
state} -> Maybe TransitGatewayPrefixListReferenceState
state) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe TransitGatewayPrefixListReferenceState
a -> TransitGatewayPrefixListReference
s {$sel:state:TransitGatewayPrefixListReference' :: Maybe TransitGatewayPrefixListReferenceState
state = Maybe TransitGatewayPrefixListReferenceState
a} :: TransitGatewayPrefixListReference)

-- | Information about the transit gateway attachment.
transitGatewayPrefixListReference_transitGatewayAttachment :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe TransitGatewayPrefixListAttachment)
transitGatewayPrefixListReference_transitGatewayAttachment :: Lens'
  TransitGatewayPrefixListReference
  (Maybe TransitGatewayPrefixListAttachment)
transitGatewayPrefixListReference_transitGatewayAttachment = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment :: Maybe TransitGatewayPrefixListAttachment
$sel:transitGatewayAttachment:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment} -> Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe TransitGatewayPrefixListAttachment
a -> TransitGatewayPrefixListReference
s {$sel:transitGatewayAttachment:TransitGatewayPrefixListReference' :: Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment = Maybe TransitGatewayPrefixListAttachment
a} :: TransitGatewayPrefixListReference)

-- | The ID of the transit gateway route table.
transitGatewayPrefixListReference_transitGatewayRouteTableId :: Lens.Lens' TransitGatewayPrefixListReference (Prelude.Maybe Prelude.Text)
transitGatewayPrefixListReference_transitGatewayRouteTableId :: Lens' TransitGatewayPrefixListReference (Maybe Text)
transitGatewayPrefixListReference_transitGatewayRouteTableId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\TransitGatewayPrefixListReference' {Maybe Text
transitGatewayRouteTableId :: Maybe Text
$sel:transitGatewayRouteTableId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
transitGatewayRouteTableId} -> Maybe Text
transitGatewayRouteTableId) (\s :: TransitGatewayPrefixListReference
s@TransitGatewayPrefixListReference' {} Maybe Text
a -> TransitGatewayPrefixListReference
s {$sel:transitGatewayRouteTableId:TransitGatewayPrefixListReference' :: Maybe Text
transitGatewayRouteTableId = Maybe Text
a} :: TransitGatewayPrefixListReference)

instance
  Data.FromXML
    TransitGatewayPrefixListReference
  where
  parseXML :: [Node] -> Either String TransitGatewayPrefixListReference
parseXML [Node]
x =
    Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe TransitGatewayPrefixListReferenceState
-> Maybe TransitGatewayPrefixListAttachment
-> Maybe Text
-> TransitGatewayPrefixListReference
TransitGatewayPrefixListReference'
      forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"blackhole")
      forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"prefixListId")
      forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"prefixListOwnerId")
      forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"state")
      forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"transitGatewayAttachment")
      forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"transitGatewayRouteTableId")

instance
  Prelude.Hashable
    TransitGatewayPrefixListReference
  where
  hashWithSalt :: Int -> TransitGatewayPrefixListReference -> Int
hashWithSalt
    Int
_salt
    TransitGatewayPrefixListReference' {Maybe Bool
Maybe Text
Maybe TransitGatewayPrefixListAttachment
Maybe TransitGatewayPrefixListReferenceState
transitGatewayRouteTableId :: Maybe Text
transitGatewayAttachment :: Maybe TransitGatewayPrefixListAttachment
state :: Maybe TransitGatewayPrefixListReferenceState
prefixListOwnerId :: Maybe Text
prefixListId :: Maybe Text
blackhole :: Maybe Bool
$sel:transitGatewayRouteTableId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:transitGatewayAttachment:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListAttachment
$sel:state:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListReferenceState
$sel:prefixListOwnerId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:prefixListId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:blackhole:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Bool
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
blackhole
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
prefixListId
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
prefixListOwnerId
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TransitGatewayPrefixListReferenceState
state
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
transitGatewayRouteTableId

instance
  Prelude.NFData
    TransitGatewayPrefixListReference
  where
  rnf :: TransitGatewayPrefixListReference -> ()
rnf TransitGatewayPrefixListReference' {Maybe Bool
Maybe Text
Maybe TransitGatewayPrefixListAttachment
Maybe TransitGatewayPrefixListReferenceState
transitGatewayRouteTableId :: Maybe Text
transitGatewayAttachment :: Maybe TransitGatewayPrefixListAttachment
state :: Maybe TransitGatewayPrefixListReferenceState
prefixListOwnerId :: Maybe Text
prefixListId :: Maybe Text
blackhole :: Maybe Bool
$sel:transitGatewayRouteTableId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:transitGatewayAttachment:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListAttachment
$sel:state:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference
-> Maybe TransitGatewayPrefixListReferenceState
$sel:prefixListOwnerId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:prefixListId:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Text
$sel:blackhole:TransitGatewayPrefixListReference' :: TransitGatewayPrefixListReference -> Maybe Bool
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
blackhole
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
prefixListId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
prefixListOwnerId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TransitGatewayPrefixListReferenceState
state
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TransitGatewayPrefixListAttachment
transitGatewayAttachment
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
transitGatewayRouteTableId