{-# 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.MacieV2.GetFindingsFilter
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves the criteria and other settings for a findings filter.
module Amazonka.MacieV2.GetFindingsFilter
  ( -- * Creating a Request
    GetFindingsFilter (..),
    newGetFindingsFilter,

    -- * Request Lenses
    getFindingsFilter_id,

    -- * Destructuring the Response
    GetFindingsFilterResponse (..),
    newGetFindingsFilterResponse,

    -- * Response Lenses
    getFindingsFilterResponse_action,
    getFindingsFilterResponse_arn,
    getFindingsFilterResponse_description,
    getFindingsFilterResponse_findingCriteria,
    getFindingsFilterResponse_id,
    getFindingsFilterResponse_name,
    getFindingsFilterResponse_position,
    getFindingsFilterResponse_tags,
    getFindingsFilterResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.MacieV2.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newGetFindingsFilter' smart constructor.
data GetFindingsFilter = GetFindingsFilter'
  { -- | The unique identifier for the Amazon Macie resource that the request
    -- applies to.
    GetFindingsFilter -> Text
id :: Prelude.Text
  }
  deriving (GetFindingsFilter -> GetFindingsFilter -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetFindingsFilter -> GetFindingsFilter -> Bool
$c/= :: GetFindingsFilter -> GetFindingsFilter -> Bool
== :: GetFindingsFilter -> GetFindingsFilter -> Bool
$c== :: GetFindingsFilter -> GetFindingsFilter -> Bool
Prelude.Eq, ReadPrec [GetFindingsFilter]
ReadPrec GetFindingsFilter
Int -> ReadS GetFindingsFilter
ReadS [GetFindingsFilter]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetFindingsFilter]
$creadListPrec :: ReadPrec [GetFindingsFilter]
readPrec :: ReadPrec GetFindingsFilter
$creadPrec :: ReadPrec GetFindingsFilter
readList :: ReadS [GetFindingsFilter]
$creadList :: ReadS [GetFindingsFilter]
readsPrec :: Int -> ReadS GetFindingsFilter
$creadsPrec :: Int -> ReadS GetFindingsFilter
Prelude.Read, Int -> GetFindingsFilter -> ShowS
[GetFindingsFilter] -> ShowS
GetFindingsFilter -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetFindingsFilter] -> ShowS
$cshowList :: [GetFindingsFilter] -> ShowS
show :: GetFindingsFilter -> String
$cshow :: GetFindingsFilter -> String
showsPrec :: Int -> GetFindingsFilter -> ShowS
$cshowsPrec :: Int -> GetFindingsFilter -> ShowS
Prelude.Show, forall x. Rep GetFindingsFilter x -> GetFindingsFilter
forall x. GetFindingsFilter -> Rep GetFindingsFilter x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetFindingsFilter x -> GetFindingsFilter
$cfrom :: forall x. GetFindingsFilter -> Rep GetFindingsFilter x
Prelude.Generic)

-- |
-- Create a value of 'GetFindingsFilter' 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:
--
-- 'id', 'getFindingsFilter_id' - The unique identifier for the Amazon Macie resource that the request
-- applies to.
newGetFindingsFilter ::
  -- | 'id'
  Prelude.Text ->
  GetFindingsFilter
newGetFindingsFilter :: Text -> GetFindingsFilter
newGetFindingsFilter Text
pId_ =
  GetFindingsFilter' {$sel:id:GetFindingsFilter' :: Text
id = Text
pId_}

-- | The unique identifier for the Amazon Macie resource that the request
-- applies to.
getFindingsFilter_id :: Lens.Lens' GetFindingsFilter Prelude.Text
getFindingsFilter_id :: Lens' GetFindingsFilter Text
getFindingsFilter_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilter' {Text
id :: Text
$sel:id:GetFindingsFilter' :: GetFindingsFilter -> Text
id} -> Text
id) (\s :: GetFindingsFilter
s@GetFindingsFilter' {} Text
a -> GetFindingsFilter
s {$sel:id:GetFindingsFilter' :: Text
id = Text
a} :: GetFindingsFilter)

instance Core.AWSRequest GetFindingsFilter where
  type
    AWSResponse GetFindingsFilter =
      GetFindingsFilterResponse
  request :: (Service -> Service)
-> GetFindingsFilter -> Request GetFindingsFilter
request Service -> Service
overrides =
    forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetFindingsFilter
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse GetFindingsFilter)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
      ( \Int
s ResponseHeaders
h Object
x ->
          Maybe FindingsFilterAction
-> Maybe Text
-> Maybe Text
-> Maybe FindingCriteria
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe (HashMap Text Text)
-> Int
-> GetFindingsFilterResponse
GetFindingsFilterResponse'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"action")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"arn")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"description")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"findingCriteria")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"id")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"name")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"position")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"tags" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance Prelude.Hashable GetFindingsFilter where
  hashWithSalt :: Int -> GetFindingsFilter -> Int
hashWithSalt Int
_salt GetFindingsFilter' {Text
id :: Text
$sel:id:GetFindingsFilter' :: GetFindingsFilter -> Text
..} =
    Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
id

instance Prelude.NFData GetFindingsFilter where
  rnf :: GetFindingsFilter -> ()
rnf GetFindingsFilter' {Text
id :: Text
$sel:id:GetFindingsFilter' :: GetFindingsFilter -> Text
..} = forall a. NFData a => a -> ()
Prelude.rnf Text
id

instance Data.ToHeaders GetFindingsFilter where
  toHeaders :: GetFindingsFilter -> ResponseHeaders
toHeaders =
    forall a b. a -> b -> a
Prelude.const
      ( forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ HeaderName
"Content-Type"
              forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
                          Prelude.ByteString
                      )
          ]
      )

instance Data.ToPath GetFindingsFilter where
  toPath :: GetFindingsFilter -> ByteString
toPath GetFindingsFilter' {Text
id :: Text
$sel:id:GetFindingsFilter' :: GetFindingsFilter -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat [ByteString
"/findingsfilters/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
id]

instance Data.ToQuery GetFindingsFilter where
  toQuery :: GetFindingsFilter -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newGetFindingsFilterResponse' smart constructor.
data GetFindingsFilterResponse = GetFindingsFilterResponse'
  { -- | The action that\'s performed on findings that match the filter criteria
    -- (findingCriteria). Possible values are: ARCHIVE, suppress (automatically
    -- archive) the findings; and, NOOP, don\'t perform any action on the
    -- findings.
    GetFindingsFilterResponse -> Maybe FindingsFilterAction
action :: Prelude.Maybe FindingsFilterAction,
    -- | The Amazon Resource Name (ARN) of the filter.
    GetFindingsFilterResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
    -- | The custom description of the filter.
    GetFindingsFilterResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
    -- | The criteria that\'s used to filter findings.
    GetFindingsFilterResponse -> Maybe FindingCriteria
findingCriteria :: Prelude.Maybe FindingCriteria,
    -- | The unique identifier for the filter.
    GetFindingsFilterResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
    -- | The custom name of the filter.
    GetFindingsFilterResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
    -- | The position of the filter in the list of saved filters on the Amazon
    -- Macie console. This value also determines the order in which the filter
    -- is applied to findings, relative to other filters that are also applied
    -- to the findings.
    GetFindingsFilterResponse -> Maybe Int
position :: Prelude.Maybe Prelude.Int,
    -- | A map of key-value pairs that specifies which tags (keys and values) are
    -- associated with the filter.
    GetFindingsFilterResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
    -- | The response's http status code.
    GetFindingsFilterResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (GetFindingsFilterResponse -> GetFindingsFilterResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetFindingsFilterResponse -> GetFindingsFilterResponse -> Bool
$c/= :: GetFindingsFilterResponse -> GetFindingsFilterResponse -> Bool
== :: GetFindingsFilterResponse -> GetFindingsFilterResponse -> Bool
$c== :: GetFindingsFilterResponse -> GetFindingsFilterResponse -> Bool
Prelude.Eq, ReadPrec [GetFindingsFilterResponse]
ReadPrec GetFindingsFilterResponse
Int -> ReadS GetFindingsFilterResponse
ReadS [GetFindingsFilterResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetFindingsFilterResponse]
$creadListPrec :: ReadPrec [GetFindingsFilterResponse]
readPrec :: ReadPrec GetFindingsFilterResponse
$creadPrec :: ReadPrec GetFindingsFilterResponse
readList :: ReadS [GetFindingsFilterResponse]
$creadList :: ReadS [GetFindingsFilterResponse]
readsPrec :: Int -> ReadS GetFindingsFilterResponse
$creadsPrec :: Int -> ReadS GetFindingsFilterResponse
Prelude.Read, Int -> GetFindingsFilterResponse -> ShowS
[GetFindingsFilterResponse] -> ShowS
GetFindingsFilterResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetFindingsFilterResponse] -> ShowS
$cshowList :: [GetFindingsFilterResponse] -> ShowS
show :: GetFindingsFilterResponse -> String
$cshow :: GetFindingsFilterResponse -> String
showsPrec :: Int -> GetFindingsFilterResponse -> ShowS
$cshowsPrec :: Int -> GetFindingsFilterResponse -> ShowS
Prelude.Show, forall x.
Rep GetFindingsFilterResponse x -> GetFindingsFilterResponse
forall x.
GetFindingsFilterResponse -> Rep GetFindingsFilterResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetFindingsFilterResponse x -> GetFindingsFilterResponse
$cfrom :: forall x.
GetFindingsFilterResponse -> Rep GetFindingsFilterResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetFindingsFilterResponse' 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:
--
-- 'action', 'getFindingsFilterResponse_action' - The action that\'s performed on findings that match the filter criteria
-- (findingCriteria). Possible values are: ARCHIVE, suppress (automatically
-- archive) the findings; and, NOOP, don\'t perform any action on the
-- findings.
--
-- 'arn', 'getFindingsFilterResponse_arn' - The Amazon Resource Name (ARN) of the filter.
--
-- 'description', 'getFindingsFilterResponse_description' - The custom description of the filter.
--
-- 'findingCriteria', 'getFindingsFilterResponse_findingCriteria' - The criteria that\'s used to filter findings.
--
-- 'id', 'getFindingsFilterResponse_id' - The unique identifier for the filter.
--
-- 'name', 'getFindingsFilterResponse_name' - The custom name of the filter.
--
-- 'position', 'getFindingsFilterResponse_position' - The position of the filter in the list of saved filters on the Amazon
-- Macie console. This value also determines the order in which the filter
-- is applied to findings, relative to other filters that are also applied
-- to the findings.
--
-- 'tags', 'getFindingsFilterResponse_tags' - A map of key-value pairs that specifies which tags (keys and values) are
-- associated with the filter.
--
-- 'httpStatus', 'getFindingsFilterResponse_httpStatus' - The response's http status code.
newGetFindingsFilterResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  GetFindingsFilterResponse
newGetFindingsFilterResponse :: Int -> GetFindingsFilterResponse
newGetFindingsFilterResponse Int
pHttpStatus_ =
  GetFindingsFilterResponse'
    { $sel:action:GetFindingsFilterResponse' :: Maybe FindingsFilterAction
action =
        forall a. Maybe a
Prelude.Nothing,
      $sel:arn:GetFindingsFilterResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
      $sel:description:GetFindingsFilterResponse' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
      $sel:findingCriteria:GetFindingsFilterResponse' :: Maybe FindingCriteria
findingCriteria = forall a. Maybe a
Prelude.Nothing,
      $sel:id:GetFindingsFilterResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
      $sel:name:GetFindingsFilterResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
      $sel:position:GetFindingsFilterResponse' :: Maybe Int
position = forall a. Maybe a
Prelude.Nothing,
      $sel:tags:GetFindingsFilterResponse' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:GetFindingsFilterResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The action that\'s performed on findings that match the filter criteria
-- (findingCriteria). Possible values are: ARCHIVE, suppress (automatically
-- archive) the findings; and, NOOP, don\'t perform any action on the
-- findings.
getFindingsFilterResponse_action :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe FindingsFilterAction)
getFindingsFilterResponse_action :: Lens' GetFindingsFilterResponse (Maybe FindingsFilterAction)
getFindingsFilterResponse_action = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe FindingsFilterAction
action :: Maybe FindingsFilterAction
$sel:action:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe FindingsFilterAction
action} -> Maybe FindingsFilterAction
action) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe FindingsFilterAction
a -> GetFindingsFilterResponse
s {$sel:action:GetFindingsFilterResponse' :: Maybe FindingsFilterAction
action = Maybe FindingsFilterAction
a} :: GetFindingsFilterResponse)

-- | The Amazon Resource Name (ARN) of the filter.
getFindingsFilterResponse_arn :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe Prelude.Text)
getFindingsFilterResponse_arn :: Lens' GetFindingsFilterResponse (Maybe Text)
getFindingsFilterResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe Text
a -> GetFindingsFilterResponse
s {$sel:arn:GetFindingsFilterResponse' :: Maybe Text
arn = Maybe Text
a} :: GetFindingsFilterResponse)

-- | The custom description of the filter.
getFindingsFilterResponse_description :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe Prelude.Text)
getFindingsFilterResponse_description :: Lens' GetFindingsFilterResponse (Maybe Text)
getFindingsFilterResponse_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe Text
description :: Maybe Text
$sel:description:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe Text
a -> GetFindingsFilterResponse
s {$sel:description:GetFindingsFilterResponse' :: Maybe Text
description = Maybe Text
a} :: GetFindingsFilterResponse)

-- | The criteria that\'s used to filter findings.
getFindingsFilterResponse_findingCriteria :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe FindingCriteria)
getFindingsFilterResponse_findingCriteria :: Lens' GetFindingsFilterResponse (Maybe FindingCriteria)
getFindingsFilterResponse_findingCriteria = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe FindingCriteria
findingCriteria :: Maybe FindingCriteria
$sel:findingCriteria:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe FindingCriteria
findingCriteria} -> Maybe FindingCriteria
findingCriteria) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe FindingCriteria
a -> GetFindingsFilterResponse
s {$sel:findingCriteria:GetFindingsFilterResponse' :: Maybe FindingCriteria
findingCriteria = Maybe FindingCriteria
a} :: GetFindingsFilterResponse)

-- | The unique identifier for the filter.
getFindingsFilterResponse_id :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe Prelude.Text)
getFindingsFilterResponse_id :: Lens' GetFindingsFilterResponse (Maybe Text)
getFindingsFilterResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe Text
id :: Maybe Text
$sel:id:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe Text
a -> GetFindingsFilterResponse
s {$sel:id:GetFindingsFilterResponse' :: Maybe Text
id = Maybe Text
a} :: GetFindingsFilterResponse)

-- | The custom name of the filter.
getFindingsFilterResponse_name :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe Prelude.Text)
getFindingsFilterResponse_name :: Lens' GetFindingsFilterResponse (Maybe Text)
getFindingsFilterResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe Text
name :: Maybe Text
$sel:name:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe Text
a -> GetFindingsFilterResponse
s {$sel:name:GetFindingsFilterResponse' :: Maybe Text
name = Maybe Text
a} :: GetFindingsFilterResponse)

-- | The position of the filter in the list of saved filters on the Amazon
-- Macie console. This value also determines the order in which the filter
-- is applied to findings, relative to other filters that are also applied
-- to the findings.
getFindingsFilterResponse_position :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe Prelude.Int)
getFindingsFilterResponse_position :: Lens' GetFindingsFilterResponse (Maybe Int)
getFindingsFilterResponse_position = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe Int
position :: Maybe Int
$sel:position:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Int
position} -> Maybe Int
position) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe Int
a -> GetFindingsFilterResponse
s {$sel:position:GetFindingsFilterResponse' :: Maybe Int
position = Maybe Int
a} :: GetFindingsFilterResponse)

-- | A map of key-value pairs that specifies which tags (keys and values) are
-- associated with the filter.
getFindingsFilterResponse_tags :: Lens.Lens' GetFindingsFilterResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
getFindingsFilterResponse_tags :: Lens' GetFindingsFilterResponse (Maybe (HashMap Text Text))
getFindingsFilterResponse_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Maybe (HashMap Text Text)
a -> GetFindingsFilterResponse
s {$sel:tags:GetFindingsFilterResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: GetFindingsFilterResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | The response's http status code.
getFindingsFilterResponse_httpStatus :: Lens.Lens' GetFindingsFilterResponse Prelude.Int
getFindingsFilterResponse_httpStatus :: Lens' GetFindingsFilterResponse Int
getFindingsFilterResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetFindingsFilterResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetFindingsFilterResponse
s@GetFindingsFilterResponse' {} Int
a -> GetFindingsFilterResponse
s {$sel:httpStatus:GetFindingsFilterResponse' :: Int
httpStatus = Int
a} :: GetFindingsFilterResponse)

instance Prelude.NFData GetFindingsFilterResponse where
  rnf :: GetFindingsFilterResponse -> ()
rnf GetFindingsFilterResponse' {Int
Maybe Int
Maybe Text
Maybe (HashMap Text Text)
Maybe FindingCriteria
Maybe FindingsFilterAction
httpStatus :: Int
tags :: Maybe (HashMap Text Text)
position :: Maybe Int
name :: Maybe Text
id :: Maybe Text
findingCriteria :: Maybe FindingCriteria
description :: Maybe Text
arn :: Maybe Text
action :: Maybe FindingsFilterAction
$sel:httpStatus:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Int
$sel:tags:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe (HashMap Text Text)
$sel:position:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Int
$sel:name:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
$sel:id:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
$sel:findingCriteria:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe FindingCriteria
$sel:description:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
$sel:arn:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe Text
$sel:action:GetFindingsFilterResponse' :: GetFindingsFilterResponse -> Maybe FindingsFilterAction
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe FindingsFilterAction
action
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe FindingCriteria
findingCriteria
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
id
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
position
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
tags
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus