{-# 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.SSM.GetOpsMetadata
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- View operational metadata related to an application in Application
-- Manager.
module Amazonka.SSM.GetOpsMetadata
  ( -- * Creating a Request
    GetOpsMetadata (..),
    newGetOpsMetadata,

    -- * Request Lenses
    getOpsMetadata_maxResults,
    getOpsMetadata_nextToken,
    getOpsMetadata_opsMetadataArn,

    -- * Destructuring the Response
    GetOpsMetadataResponse (..),
    newGetOpsMetadataResponse,

    -- * Response Lenses
    getOpsMetadataResponse_metadata,
    getOpsMetadataResponse_nextToken,
    getOpsMetadataResponse_resourceId,
    getOpsMetadataResponse_httpStatus,
  )
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
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SSM.Types

-- | /See:/ 'newGetOpsMetadata' smart constructor.
data GetOpsMetadata = GetOpsMetadata'
  { -- | The maximum number of items to return for this call. The call also
    -- returns a token that you can specify in a subsequent call to get the
    -- next set of results.
    GetOpsMetadata -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | A token to start the list. Use this token to get the next set of
    -- results.
    GetOpsMetadata -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The Amazon Resource Name (ARN) of an OpsMetadata Object to view.
    GetOpsMetadata -> Text
opsMetadataArn :: Prelude.Text
  }
  deriving (GetOpsMetadata -> GetOpsMetadata -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetOpsMetadata -> GetOpsMetadata -> Bool
$c/= :: GetOpsMetadata -> GetOpsMetadata -> Bool
== :: GetOpsMetadata -> GetOpsMetadata -> Bool
$c== :: GetOpsMetadata -> GetOpsMetadata -> Bool
Prelude.Eq, ReadPrec [GetOpsMetadata]
ReadPrec GetOpsMetadata
Int -> ReadS GetOpsMetadata
ReadS [GetOpsMetadata]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetOpsMetadata]
$creadListPrec :: ReadPrec [GetOpsMetadata]
readPrec :: ReadPrec GetOpsMetadata
$creadPrec :: ReadPrec GetOpsMetadata
readList :: ReadS [GetOpsMetadata]
$creadList :: ReadS [GetOpsMetadata]
readsPrec :: Int -> ReadS GetOpsMetadata
$creadsPrec :: Int -> ReadS GetOpsMetadata
Prelude.Read, Int -> GetOpsMetadata -> ShowS
[GetOpsMetadata] -> ShowS
GetOpsMetadata -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetOpsMetadata] -> ShowS
$cshowList :: [GetOpsMetadata] -> ShowS
show :: GetOpsMetadata -> String
$cshow :: GetOpsMetadata -> String
showsPrec :: Int -> GetOpsMetadata -> ShowS
$cshowsPrec :: Int -> GetOpsMetadata -> ShowS
Prelude.Show, forall x. Rep GetOpsMetadata x -> GetOpsMetadata
forall x. GetOpsMetadata -> Rep GetOpsMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetOpsMetadata x -> GetOpsMetadata
$cfrom :: forall x. GetOpsMetadata -> Rep GetOpsMetadata x
Prelude.Generic)

-- |
-- Create a value of 'GetOpsMetadata' 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:
--
-- 'maxResults', 'getOpsMetadata_maxResults' - The maximum number of items to return for this call. The call also
-- returns a token that you can specify in a subsequent call to get the
-- next set of results.
--
-- 'nextToken', 'getOpsMetadata_nextToken' - A token to start the list. Use this token to get the next set of
-- results.
--
-- 'opsMetadataArn', 'getOpsMetadata_opsMetadataArn' - The Amazon Resource Name (ARN) of an OpsMetadata Object to view.
newGetOpsMetadata ::
  -- | 'opsMetadataArn'
  Prelude.Text ->
  GetOpsMetadata
newGetOpsMetadata :: Text -> GetOpsMetadata
newGetOpsMetadata Text
pOpsMetadataArn_ =
  GetOpsMetadata'
    { $sel:maxResults:GetOpsMetadata' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:GetOpsMetadata' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:opsMetadataArn:GetOpsMetadata' :: Text
opsMetadataArn = Text
pOpsMetadataArn_
    }

-- | The maximum number of items to return for this call. The call also
-- returns a token that you can specify in a subsequent call to get the
-- next set of results.
getOpsMetadata_maxResults :: Lens.Lens' GetOpsMetadata (Prelude.Maybe Prelude.Natural)
getOpsMetadata_maxResults :: Lens' GetOpsMetadata (Maybe Natural)
getOpsMetadata_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadata' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetOpsMetadata' :: GetOpsMetadata -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetOpsMetadata
s@GetOpsMetadata' {} Maybe Natural
a -> GetOpsMetadata
s {$sel:maxResults:GetOpsMetadata' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetOpsMetadata)

-- | A token to start the list. Use this token to get the next set of
-- results.
getOpsMetadata_nextToken :: Lens.Lens' GetOpsMetadata (Prelude.Maybe Prelude.Text)
getOpsMetadata_nextToken :: Lens' GetOpsMetadata (Maybe Text)
getOpsMetadata_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadata' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetOpsMetadata' :: GetOpsMetadata -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetOpsMetadata
s@GetOpsMetadata' {} Maybe Text
a -> GetOpsMetadata
s {$sel:nextToken:GetOpsMetadata' :: Maybe Text
nextToken = Maybe Text
a} :: GetOpsMetadata)

-- | The Amazon Resource Name (ARN) of an OpsMetadata Object to view.
getOpsMetadata_opsMetadataArn :: Lens.Lens' GetOpsMetadata Prelude.Text
getOpsMetadata_opsMetadataArn :: Lens' GetOpsMetadata Text
getOpsMetadata_opsMetadataArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadata' {Text
opsMetadataArn :: Text
$sel:opsMetadataArn:GetOpsMetadata' :: GetOpsMetadata -> Text
opsMetadataArn} -> Text
opsMetadataArn) (\s :: GetOpsMetadata
s@GetOpsMetadata' {} Text
a -> GetOpsMetadata
s {$sel:opsMetadataArn:GetOpsMetadata' :: Text
opsMetadataArn = Text
a} :: GetOpsMetadata)

instance Core.AWSRequest GetOpsMetadata where
  type
    AWSResponse GetOpsMetadata =
      GetOpsMetadataResponse
  request :: (Service -> Service) -> GetOpsMetadata -> Request GetOpsMetadata
request Service -> Service
overrides =
    forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetOpsMetadata
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse GetOpsMetadata)))
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 (HashMap Text MetadataValue)
-> Maybe Text -> Maybe Text -> Int -> GetOpsMetadataResponse
GetOpsMetadataResponse'
            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
"Metadata" 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.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextToken")
            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
"ResourceId")
            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 GetOpsMetadata where
  hashWithSalt :: Int -> GetOpsMetadata -> Int
hashWithSalt Int
_salt GetOpsMetadata' {Maybe Natural
Maybe Text
Text
opsMetadataArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:opsMetadataArn:GetOpsMetadata' :: GetOpsMetadata -> Text
$sel:nextToken:GetOpsMetadata' :: GetOpsMetadata -> Maybe Text
$sel:maxResults:GetOpsMetadata' :: GetOpsMetadata -> Maybe Natural
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
opsMetadataArn

instance Prelude.NFData GetOpsMetadata where
  rnf :: GetOpsMetadata -> ()
rnf GetOpsMetadata' {Maybe Natural
Maybe Text
Text
opsMetadataArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:opsMetadataArn:GetOpsMetadata' :: GetOpsMetadata -> Text
$sel:nextToken:GetOpsMetadata' :: GetOpsMetadata -> Maybe Text
$sel:maxResults:GetOpsMetadata' :: GetOpsMetadata -> Maybe Natural
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
opsMetadataArn

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

instance Data.ToJSON GetOpsMetadata where
  toJSON :: GetOpsMetadata -> Value
toJSON GetOpsMetadata' {Maybe Natural
Maybe Text
Text
opsMetadataArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:opsMetadataArn:GetOpsMetadata' :: GetOpsMetadata -> Text
$sel:nextToken:GetOpsMetadata' :: GetOpsMetadata -> Maybe Text
$sel:maxResults:GetOpsMetadata' :: GetOpsMetadata -> Maybe Natural
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"MaxResults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
maxResults,
            (Key
"NextToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
            forall a. a -> Maybe a
Prelude.Just
              (Key
"OpsMetadataArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
opsMetadataArn)
          ]
      )

instance Data.ToPath GetOpsMetadata where
  toPath :: GetOpsMetadata -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

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

-- | /See:/ 'newGetOpsMetadataResponse' smart constructor.
data GetOpsMetadataResponse = GetOpsMetadataResponse'
  { -- | OpsMetadata for an Application Manager application.
    GetOpsMetadataResponse -> Maybe (HashMap Text MetadataValue)
metadata :: Prelude.Maybe (Prelude.HashMap Prelude.Text MetadataValue),
    -- | The token for the next set of items to return. Use this token to get the
    -- next set of results.
    GetOpsMetadataResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The resource ID of the Application Manager application.
    GetOpsMetadataResponse -> Maybe Text
resourceId :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    GetOpsMetadataResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (GetOpsMetadataResponse -> GetOpsMetadataResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetOpsMetadataResponse -> GetOpsMetadataResponse -> Bool
$c/= :: GetOpsMetadataResponse -> GetOpsMetadataResponse -> Bool
== :: GetOpsMetadataResponse -> GetOpsMetadataResponse -> Bool
$c== :: GetOpsMetadataResponse -> GetOpsMetadataResponse -> Bool
Prelude.Eq, ReadPrec [GetOpsMetadataResponse]
ReadPrec GetOpsMetadataResponse
Int -> ReadS GetOpsMetadataResponse
ReadS [GetOpsMetadataResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetOpsMetadataResponse]
$creadListPrec :: ReadPrec [GetOpsMetadataResponse]
readPrec :: ReadPrec GetOpsMetadataResponse
$creadPrec :: ReadPrec GetOpsMetadataResponse
readList :: ReadS [GetOpsMetadataResponse]
$creadList :: ReadS [GetOpsMetadataResponse]
readsPrec :: Int -> ReadS GetOpsMetadataResponse
$creadsPrec :: Int -> ReadS GetOpsMetadataResponse
Prelude.Read, Int -> GetOpsMetadataResponse -> ShowS
[GetOpsMetadataResponse] -> ShowS
GetOpsMetadataResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetOpsMetadataResponse] -> ShowS
$cshowList :: [GetOpsMetadataResponse] -> ShowS
show :: GetOpsMetadataResponse -> String
$cshow :: GetOpsMetadataResponse -> String
showsPrec :: Int -> GetOpsMetadataResponse -> ShowS
$cshowsPrec :: Int -> GetOpsMetadataResponse -> ShowS
Prelude.Show, forall x. Rep GetOpsMetadataResponse x -> GetOpsMetadataResponse
forall x. GetOpsMetadataResponse -> Rep GetOpsMetadataResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetOpsMetadataResponse x -> GetOpsMetadataResponse
$cfrom :: forall x. GetOpsMetadataResponse -> Rep GetOpsMetadataResponse x
Prelude.Generic)

-- |
-- Create a value of 'GetOpsMetadataResponse' 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:
--
-- 'metadata', 'getOpsMetadataResponse_metadata' - OpsMetadata for an Application Manager application.
--
-- 'nextToken', 'getOpsMetadataResponse_nextToken' - The token for the next set of items to return. Use this token to get the
-- next set of results.
--
-- 'resourceId', 'getOpsMetadataResponse_resourceId' - The resource ID of the Application Manager application.
--
-- 'httpStatus', 'getOpsMetadataResponse_httpStatus' - The response's http status code.
newGetOpsMetadataResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  GetOpsMetadataResponse
newGetOpsMetadataResponse :: Int -> GetOpsMetadataResponse
newGetOpsMetadataResponse Int
pHttpStatus_ =
  GetOpsMetadataResponse'
    { $sel:metadata:GetOpsMetadataResponse' :: Maybe (HashMap Text MetadataValue)
metadata = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:GetOpsMetadataResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:resourceId:GetOpsMetadataResponse' :: Maybe Text
resourceId = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:GetOpsMetadataResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | OpsMetadata for an Application Manager application.
getOpsMetadataResponse_metadata :: Lens.Lens' GetOpsMetadataResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text MetadataValue))
getOpsMetadataResponse_metadata :: Lens' GetOpsMetadataResponse (Maybe (HashMap Text MetadataValue))
getOpsMetadataResponse_metadata = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadataResponse' {Maybe (HashMap Text MetadataValue)
metadata :: Maybe (HashMap Text MetadataValue)
$sel:metadata:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe (HashMap Text MetadataValue)
metadata} -> Maybe (HashMap Text MetadataValue)
metadata) (\s :: GetOpsMetadataResponse
s@GetOpsMetadataResponse' {} Maybe (HashMap Text MetadataValue)
a -> GetOpsMetadataResponse
s {$sel:metadata:GetOpsMetadataResponse' :: Maybe (HashMap Text MetadataValue)
metadata = Maybe (HashMap Text MetadataValue)
a} :: GetOpsMetadataResponse) 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 token for the next set of items to return. Use this token to get the
-- next set of results.
getOpsMetadataResponse_nextToken :: Lens.Lens' GetOpsMetadataResponse (Prelude.Maybe Prelude.Text)
getOpsMetadataResponse_nextToken :: Lens' GetOpsMetadataResponse (Maybe Text)
getOpsMetadataResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadataResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetOpsMetadataResponse
s@GetOpsMetadataResponse' {} Maybe Text
a -> GetOpsMetadataResponse
s {$sel:nextToken:GetOpsMetadataResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetOpsMetadataResponse)

-- | The resource ID of the Application Manager application.
getOpsMetadataResponse_resourceId :: Lens.Lens' GetOpsMetadataResponse (Prelude.Maybe Prelude.Text)
getOpsMetadataResponse_resourceId :: Lens' GetOpsMetadataResponse (Maybe Text)
getOpsMetadataResponse_resourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetOpsMetadataResponse' {Maybe Text
resourceId :: Maybe Text
$sel:resourceId:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe Text
resourceId} -> Maybe Text
resourceId) (\s :: GetOpsMetadataResponse
s@GetOpsMetadataResponse' {} Maybe Text
a -> GetOpsMetadataResponse
s {$sel:resourceId:GetOpsMetadataResponse' :: Maybe Text
resourceId = Maybe Text
a} :: GetOpsMetadataResponse)

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

instance Prelude.NFData GetOpsMetadataResponse where
  rnf :: GetOpsMetadataResponse -> ()
rnf GetOpsMetadataResponse' {Int
Maybe Text
Maybe (HashMap Text MetadataValue)
httpStatus :: Int
resourceId :: Maybe Text
nextToken :: Maybe Text
metadata :: Maybe (HashMap Text MetadataValue)
$sel:httpStatus:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Int
$sel:resourceId:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe Text
$sel:nextToken:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe Text
$sel:metadata:GetOpsMetadataResponse' :: GetOpsMetadataResponse -> Maybe (HashMap Text MetadataValue)
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text MetadataValue)
metadata
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus