{-# 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 #-}
module Amazonka.CloudDirectory.Types.BatchReadSuccessfulResponse where
import Amazonka.CloudDirectory.Types.BatchGetLinkAttributesResponse
import Amazonka.CloudDirectory.Types.BatchGetObjectAttributesResponse
import Amazonka.CloudDirectory.Types.BatchGetObjectInformationResponse
import Amazonka.CloudDirectory.Types.BatchListAttachedIndicesResponse
import Amazonka.CloudDirectory.Types.BatchListIncomingTypedLinksResponse
import Amazonka.CloudDirectory.Types.BatchListIndexResponse
import Amazonka.CloudDirectory.Types.BatchListObjectAttributesResponse
import Amazonka.CloudDirectory.Types.BatchListObjectChildrenResponse
import Amazonka.CloudDirectory.Types.BatchListObjectParentPathsResponse
import Amazonka.CloudDirectory.Types.BatchListObjectParentsResponse
import Amazonka.CloudDirectory.Types.BatchListObjectPoliciesResponse
import Amazonka.CloudDirectory.Types.BatchListOutgoingTypedLinksResponse
import Amazonka.CloudDirectory.Types.BatchListPolicyAttachmentsResponse
import Amazonka.CloudDirectory.Types.BatchLookupPolicyResponse
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
data BatchReadSuccessfulResponse = BatchReadSuccessfulResponse'
{
BatchReadSuccessfulResponse -> Maybe BatchGetLinkAttributesResponse
getLinkAttributes :: Prelude.Maybe BatchGetLinkAttributesResponse,
BatchReadSuccessfulResponse
-> Maybe BatchGetObjectAttributesResponse
getObjectAttributes :: Prelude.Maybe BatchGetObjectAttributesResponse,
BatchReadSuccessfulResponse
-> Maybe BatchGetObjectInformationResponse
getObjectInformation :: Prelude.Maybe BatchGetObjectInformationResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListAttachedIndicesResponse
listAttachedIndices :: Prelude.Maybe BatchListAttachedIndicesResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks :: Prelude.Maybe BatchListIncomingTypedLinksResponse,
BatchReadSuccessfulResponse -> Maybe BatchListIndexResponse
listIndex :: Prelude.Maybe BatchListIndexResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListObjectAttributesResponse
listObjectAttributes :: Prelude.Maybe BatchListObjectAttributesResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListObjectChildrenResponse
listObjectChildren :: Prelude.Maybe BatchListObjectChildrenResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListObjectParentPathsResponse
listObjectParentPaths :: Prelude.Maybe BatchListObjectParentPathsResponse,
BatchReadSuccessfulResponse -> Maybe BatchListObjectParentsResponse
listObjectParents :: Prelude.Maybe BatchListObjectParentsResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListObjectPoliciesResponse
listObjectPolicies :: Prelude.Maybe BatchListObjectPoliciesResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks :: Prelude.Maybe BatchListOutgoingTypedLinksResponse,
BatchReadSuccessfulResponse
-> Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments :: Prelude.Maybe BatchListPolicyAttachmentsResponse,
BatchReadSuccessfulResponse -> Maybe BatchLookupPolicyResponse
lookupPolicy :: Prelude.Maybe BatchLookupPolicyResponse
}
deriving (BatchReadSuccessfulResponse -> BatchReadSuccessfulResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BatchReadSuccessfulResponse -> BatchReadSuccessfulResponse -> Bool
$c/= :: BatchReadSuccessfulResponse -> BatchReadSuccessfulResponse -> Bool
== :: BatchReadSuccessfulResponse -> BatchReadSuccessfulResponse -> Bool
$c== :: BatchReadSuccessfulResponse -> BatchReadSuccessfulResponse -> Bool
Prelude.Eq, ReadPrec [BatchReadSuccessfulResponse]
ReadPrec BatchReadSuccessfulResponse
Int -> ReadS BatchReadSuccessfulResponse
ReadS [BatchReadSuccessfulResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [BatchReadSuccessfulResponse]
$creadListPrec :: ReadPrec [BatchReadSuccessfulResponse]
readPrec :: ReadPrec BatchReadSuccessfulResponse
$creadPrec :: ReadPrec BatchReadSuccessfulResponse
readList :: ReadS [BatchReadSuccessfulResponse]
$creadList :: ReadS [BatchReadSuccessfulResponse]
readsPrec :: Int -> ReadS BatchReadSuccessfulResponse
$creadsPrec :: Int -> ReadS BatchReadSuccessfulResponse
Prelude.Read, Int -> BatchReadSuccessfulResponse -> ShowS
[BatchReadSuccessfulResponse] -> ShowS
BatchReadSuccessfulResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BatchReadSuccessfulResponse] -> ShowS
$cshowList :: [BatchReadSuccessfulResponse] -> ShowS
show :: BatchReadSuccessfulResponse -> String
$cshow :: BatchReadSuccessfulResponse -> String
showsPrec :: Int -> BatchReadSuccessfulResponse -> ShowS
$cshowsPrec :: Int -> BatchReadSuccessfulResponse -> ShowS
Prelude.Show, forall x.
Rep BatchReadSuccessfulResponse x -> BatchReadSuccessfulResponse
forall x.
BatchReadSuccessfulResponse -> Rep BatchReadSuccessfulResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep BatchReadSuccessfulResponse x -> BatchReadSuccessfulResponse
$cfrom :: forall x.
BatchReadSuccessfulResponse -> Rep BatchReadSuccessfulResponse x
Prelude.Generic)
newBatchReadSuccessfulResponse ::
BatchReadSuccessfulResponse
newBatchReadSuccessfulResponse :: BatchReadSuccessfulResponse
newBatchReadSuccessfulResponse =
BatchReadSuccessfulResponse'
{ $sel:getLinkAttributes:BatchReadSuccessfulResponse' :: Maybe BatchGetLinkAttributesResponse
getLinkAttributes =
forall a. Maybe a
Prelude.Nothing,
$sel:getObjectAttributes:BatchReadSuccessfulResponse' :: Maybe BatchGetObjectAttributesResponse
getObjectAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:getObjectInformation:BatchReadSuccessfulResponse' :: Maybe BatchGetObjectInformationResponse
getObjectInformation = forall a. Maybe a
Prelude.Nothing,
$sel:listAttachedIndices:BatchReadSuccessfulResponse' :: Maybe BatchListAttachedIndicesResponse
listAttachedIndices = forall a. Maybe a
Prelude.Nothing,
$sel:listIncomingTypedLinks:BatchReadSuccessfulResponse' :: Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks = forall a. Maybe a
Prelude.Nothing,
$sel:listIndex:BatchReadSuccessfulResponse' :: Maybe BatchListIndexResponse
listIndex = forall a. Maybe a
Prelude.Nothing,
$sel:listObjectAttributes:BatchReadSuccessfulResponse' :: Maybe BatchListObjectAttributesResponse
listObjectAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:listObjectChildren:BatchReadSuccessfulResponse' :: Maybe BatchListObjectChildrenResponse
listObjectChildren = forall a. Maybe a
Prelude.Nothing,
$sel:listObjectParentPaths:BatchReadSuccessfulResponse' :: Maybe BatchListObjectParentPathsResponse
listObjectParentPaths = forall a. Maybe a
Prelude.Nothing,
$sel:listObjectParents:BatchReadSuccessfulResponse' :: Maybe BatchListObjectParentsResponse
listObjectParents = forall a. Maybe a
Prelude.Nothing,
$sel:listObjectPolicies:BatchReadSuccessfulResponse' :: Maybe BatchListObjectPoliciesResponse
listObjectPolicies = forall a. Maybe a
Prelude.Nothing,
$sel:listOutgoingTypedLinks:BatchReadSuccessfulResponse' :: Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks = forall a. Maybe a
Prelude.Nothing,
$sel:listPolicyAttachments:BatchReadSuccessfulResponse' :: Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments = forall a. Maybe a
Prelude.Nothing,
$sel:lookupPolicy:BatchReadSuccessfulResponse' :: Maybe BatchLookupPolicyResponse
lookupPolicy = forall a. Maybe a
Prelude.Nothing
}
batchReadSuccessfulResponse_getLinkAttributes :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchGetLinkAttributesResponse)
batchReadSuccessfulResponse_getLinkAttributes :: Lens'
BatchReadSuccessfulResponse (Maybe BatchGetLinkAttributesResponse)
batchReadSuccessfulResponse_getLinkAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchGetLinkAttributesResponse
getLinkAttributes :: Maybe BatchGetLinkAttributesResponse
$sel:getLinkAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchGetLinkAttributesResponse
getLinkAttributes} -> Maybe BatchGetLinkAttributesResponse
getLinkAttributes) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchGetLinkAttributesResponse
a -> BatchReadSuccessfulResponse
s {$sel:getLinkAttributes:BatchReadSuccessfulResponse' :: Maybe BatchGetLinkAttributesResponse
getLinkAttributes = Maybe BatchGetLinkAttributesResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_getObjectAttributes :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchGetObjectAttributesResponse)
batchReadSuccessfulResponse_getObjectAttributes :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchGetObjectAttributesResponse)
batchReadSuccessfulResponse_getObjectAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchGetObjectAttributesResponse
getObjectAttributes :: Maybe BatchGetObjectAttributesResponse
$sel:getObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectAttributesResponse
getObjectAttributes} -> Maybe BatchGetObjectAttributesResponse
getObjectAttributes) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchGetObjectAttributesResponse
a -> BatchReadSuccessfulResponse
s {$sel:getObjectAttributes:BatchReadSuccessfulResponse' :: Maybe BatchGetObjectAttributesResponse
getObjectAttributes = Maybe BatchGetObjectAttributesResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_getObjectInformation :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchGetObjectInformationResponse)
batchReadSuccessfulResponse_getObjectInformation :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchGetObjectInformationResponse)
batchReadSuccessfulResponse_getObjectInformation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchGetObjectInformationResponse
getObjectInformation :: Maybe BatchGetObjectInformationResponse
$sel:getObjectInformation:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectInformationResponse
getObjectInformation} -> Maybe BatchGetObjectInformationResponse
getObjectInformation) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchGetObjectInformationResponse
a -> BatchReadSuccessfulResponse
s {$sel:getObjectInformation:BatchReadSuccessfulResponse' :: Maybe BatchGetObjectInformationResponse
getObjectInformation = Maybe BatchGetObjectInformationResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listAttachedIndices :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListAttachedIndicesResponse)
batchReadSuccessfulResponse_listAttachedIndices :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListAttachedIndicesResponse)
batchReadSuccessfulResponse_listAttachedIndices = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListAttachedIndicesResponse
listAttachedIndices :: Maybe BatchListAttachedIndicesResponse
$sel:listAttachedIndices:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListAttachedIndicesResponse
listAttachedIndices} -> Maybe BatchListAttachedIndicesResponse
listAttachedIndices) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListAttachedIndicesResponse
a -> BatchReadSuccessfulResponse
s {$sel:listAttachedIndices:BatchReadSuccessfulResponse' :: Maybe BatchListAttachedIndicesResponse
listAttachedIndices = Maybe BatchListAttachedIndicesResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listIncomingTypedLinks :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListIncomingTypedLinksResponse)
batchReadSuccessfulResponse_listIncomingTypedLinks :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListIncomingTypedLinksResponse)
batchReadSuccessfulResponse_listIncomingTypedLinks = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks :: Maybe BatchListIncomingTypedLinksResponse
$sel:listIncomingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks} -> Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListIncomingTypedLinksResponse
a -> BatchReadSuccessfulResponse
s {$sel:listIncomingTypedLinks:BatchReadSuccessfulResponse' :: Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks = Maybe BatchListIncomingTypedLinksResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listIndex :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListIndexResponse)
batchReadSuccessfulResponse_listIndex :: Lens' BatchReadSuccessfulResponse (Maybe BatchListIndexResponse)
batchReadSuccessfulResponse_listIndex = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListIndexResponse
listIndex :: Maybe BatchListIndexResponse
$sel:listIndex:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListIndexResponse
listIndex} -> Maybe BatchListIndexResponse
listIndex) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListIndexResponse
a -> BatchReadSuccessfulResponse
s {$sel:listIndex:BatchReadSuccessfulResponse' :: Maybe BatchListIndexResponse
listIndex = Maybe BatchListIndexResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listObjectAttributes :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListObjectAttributesResponse)
batchReadSuccessfulResponse_listObjectAttributes :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListObjectAttributesResponse)
batchReadSuccessfulResponse_listObjectAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListObjectAttributesResponse
listObjectAttributes :: Maybe BatchListObjectAttributesResponse
$sel:listObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectAttributesResponse
listObjectAttributes} -> Maybe BatchListObjectAttributesResponse
listObjectAttributes) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListObjectAttributesResponse
a -> BatchReadSuccessfulResponse
s {$sel:listObjectAttributes:BatchReadSuccessfulResponse' :: Maybe BatchListObjectAttributesResponse
listObjectAttributes = Maybe BatchListObjectAttributesResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listObjectChildren :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListObjectChildrenResponse)
batchReadSuccessfulResponse_listObjectChildren :: Lens'
BatchReadSuccessfulResponse (Maybe BatchListObjectChildrenResponse)
batchReadSuccessfulResponse_listObjectChildren = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListObjectChildrenResponse
listObjectChildren :: Maybe BatchListObjectChildrenResponse
$sel:listObjectChildren:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectChildrenResponse
listObjectChildren} -> Maybe BatchListObjectChildrenResponse
listObjectChildren) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListObjectChildrenResponse
a -> BatchReadSuccessfulResponse
s {$sel:listObjectChildren:BatchReadSuccessfulResponse' :: Maybe BatchListObjectChildrenResponse
listObjectChildren = Maybe BatchListObjectChildrenResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listObjectParentPaths :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListObjectParentPathsResponse)
batchReadSuccessfulResponse_listObjectParentPaths :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListObjectParentPathsResponse)
batchReadSuccessfulResponse_listObjectParentPaths = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListObjectParentPathsResponse
listObjectParentPaths :: Maybe BatchListObjectParentPathsResponse
$sel:listObjectParentPaths:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectParentPathsResponse
listObjectParentPaths} -> Maybe BatchListObjectParentPathsResponse
listObjectParentPaths) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListObjectParentPathsResponse
a -> BatchReadSuccessfulResponse
s {$sel:listObjectParentPaths:BatchReadSuccessfulResponse' :: Maybe BatchListObjectParentPathsResponse
listObjectParentPaths = Maybe BatchListObjectParentPathsResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listObjectParents :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListObjectParentsResponse)
batchReadSuccessfulResponse_listObjectParents :: Lens'
BatchReadSuccessfulResponse (Maybe BatchListObjectParentsResponse)
batchReadSuccessfulResponse_listObjectParents = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListObjectParentsResponse
listObjectParents :: Maybe BatchListObjectParentsResponse
$sel:listObjectParents:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListObjectParentsResponse
listObjectParents} -> Maybe BatchListObjectParentsResponse
listObjectParents) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListObjectParentsResponse
a -> BatchReadSuccessfulResponse
s {$sel:listObjectParents:BatchReadSuccessfulResponse' :: Maybe BatchListObjectParentsResponse
listObjectParents = Maybe BatchListObjectParentsResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listObjectPolicies :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListObjectPoliciesResponse)
batchReadSuccessfulResponse_listObjectPolicies :: Lens'
BatchReadSuccessfulResponse (Maybe BatchListObjectPoliciesResponse)
batchReadSuccessfulResponse_listObjectPolicies = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListObjectPoliciesResponse
listObjectPolicies :: Maybe BatchListObjectPoliciesResponse
$sel:listObjectPolicies:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectPoliciesResponse
listObjectPolicies} -> Maybe BatchListObjectPoliciesResponse
listObjectPolicies) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListObjectPoliciesResponse
a -> BatchReadSuccessfulResponse
s {$sel:listObjectPolicies:BatchReadSuccessfulResponse' :: Maybe BatchListObjectPoliciesResponse
listObjectPolicies = Maybe BatchListObjectPoliciesResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listOutgoingTypedLinks :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListOutgoingTypedLinksResponse)
batchReadSuccessfulResponse_listOutgoingTypedLinks :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListOutgoingTypedLinksResponse)
batchReadSuccessfulResponse_listOutgoingTypedLinks = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks :: Maybe BatchListOutgoingTypedLinksResponse
$sel:listOutgoingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks} -> Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListOutgoingTypedLinksResponse
a -> BatchReadSuccessfulResponse
s {$sel:listOutgoingTypedLinks:BatchReadSuccessfulResponse' :: Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks = Maybe BatchListOutgoingTypedLinksResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_listPolicyAttachments :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchListPolicyAttachmentsResponse)
batchReadSuccessfulResponse_listPolicyAttachments :: Lens'
BatchReadSuccessfulResponse
(Maybe BatchListPolicyAttachmentsResponse)
batchReadSuccessfulResponse_listPolicyAttachments = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments :: Maybe BatchListPolicyAttachmentsResponse
$sel:listPolicyAttachments:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments} -> Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchListPolicyAttachmentsResponse
a -> BatchReadSuccessfulResponse
s {$sel:listPolicyAttachments:BatchReadSuccessfulResponse' :: Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments = Maybe BatchListPolicyAttachmentsResponse
a} :: BatchReadSuccessfulResponse)
batchReadSuccessfulResponse_lookupPolicy :: Lens.Lens' BatchReadSuccessfulResponse (Prelude.Maybe BatchLookupPolicyResponse)
batchReadSuccessfulResponse_lookupPolicy :: Lens' BatchReadSuccessfulResponse (Maybe BatchLookupPolicyResponse)
batchReadSuccessfulResponse_lookupPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BatchReadSuccessfulResponse' {Maybe BatchLookupPolicyResponse
lookupPolicy :: Maybe BatchLookupPolicyResponse
$sel:lookupPolicy:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchLookupPolicyResponse
lookupPolicy} -> Maybe BatchLookupPolicyResponse
lookupPolicy) (\s :: BatchReadSuccessfulResponse
s@BatchReadSuccessfulResponse' {} Maybe BatchLookupPolicyResponse
a -> BatchReadSuccessfulResponse
s {$sel:lookupPolicy:BatchReadSuccessfulResponse' :: Maybe BatchLookupPolicyResponse
lookupPolicy = Maybe BatchLookupPolicyResponse
a} :: BatchReadSuccessfulResponse)
instance Data.FromJSON BatchReadSuccessfulResponse where
parseJSON :: Value -> Parser BatchReadSuccessfulResponse
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"BatchReadSuccessfulResponse"
( \Object
x ->
Maybe BatchGetLinkAttributesResponse
-> Maybe BatchGetObjectAttributesResponse
-> Maybe BatchGetObjectInformationResponse
-> Maybe BatchListAttachedIndicesResponse
-> Maybe BatchListIncomingTypedLinksResponse
-> Maybe BatchListIndexResponse
-> Maybe BatchListObjectAttributesResponse
-> Maybe BatchListObjectChildrenResponse
-> Maybe BatchListObjectParentPathsResponse
-> Maybe BatchListObjectParentsResponse
-> Maybe BatchListObjectPoliciesResponse
-> Maybe BatchListOutgoingTypedLinksResponse
-> Maybe BatchListPolicyAttachmentsResponse
-> Maybe BatchLookupPolicyResponse
-> BatchReadSuccessfulResponse
BatchReadSuccessfulResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GetLinkAttributes")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GetObjectAttributes")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GetObjectInformation")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListAttachedIndices")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListIncomingTypedLinks")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListIndex")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListObjectAttributes")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListObjectChildren")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListObjectParentPaths")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListObjectParents")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListObjectPolicies")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListOutgoingTypedLinks")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ListPolicyAttachments")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LookupPolicy")
)
instance Prelude.Hashable BatchReadSuccessfulResponse where
hashWithSalt :: Int -> BatchReadSuccessfulResponse -> Int
hashWithSalt Int
_salt BatchReadSuccessfulResponse' {Maybe BatchListObjectChildrenResponse
Maybe BatchListObjectPoliciesResponse
Maybe BatchListPolicyAttachmentsResponse
Maybe BatchListObjectParentsResponse
Maybe BatchListObjectParentPathsResponse
Maybe BatchLookupPolicyResponse
Maybe BatchGetObjectInformationResponse
Maybe BatchListIndexResponse
Maybe BatchListAttachedIndicesResponse
Maybe BatchListObjectAttributesResponse
Maybe BatchGetObjectAttributesResponse
Maybe BatchGetLinkAttributesResponse
Maybe BatchListOutgoingTypedLinksResponse
Maybe BatchListIncomingTypedLinksResponse
lookupPolicy :: Maybe BatchLookupPolicyResponse
listPolicyAttachments :: Maybe BatchListPolicyAttachmentsResponse
listOutgoingTypedLinks :: Maybe BatchListOutgoingTypedLinksResponse
listObjectPolicies :: Maybe BatchListObjectPoliciesResponse
listObjectParents :: Maybe BatchListObjectParentsResponse
listObjectParentPaths :: Maybe BatchListObjectParentPathsResponse
listObjectChildren :: Maybe BatchListObjectChildrenResponse
listObjectAttributes :: Maybe BatchListObjectAttributesResponse
listIndex :: Maybe BatchListIndexResponse
listIncomingTypedLinks :: Maybe BatchListIncomingTypedLinksResponse
listAttachedIndices :: Maybe BatchListAttachedIndicesResponse
getObjectInformation :: Maybe BatchGetObjectInformationResponse
getObjectAttributes :: Maybe BatchGetObjectAttributesResponse
getLinkAttributes :: Maybe BatchGetLinkAttributesResponse
$sel:lookupPolicy:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchLookupPolicyResponse
$sel:listPolicyAttachments:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListPolicyAttachmentsResponse
$sel:listOutgoingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListOutgoingTypedLinksResponse
$sel:listObjectPolicies:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectPoliciesResponse
$sel:listObjectParents:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListObjectParentsResponse
$sel:listObjectParentPaths:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectParentPathsResponse
$sel:listObjectChildren:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectChildrenResponse
$sel:listObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectAttributesResponse
$sel:listIndex:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListIndexResponse
$sel:listIncomingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListIncomingTypedLinksResponse
$sel:listAttachedIndices:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListAttachedIndicesResponse
$sel:getObjectInformation:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectInformationResponse
$sel:getObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectAttributesResponse
$sel:getLinkAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchGetLinkAttributesResponse
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchGetLinkAttributesResponse
getLinkAttributes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchGetObjectAttributesResponse
getObjectAttributes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchGetObjectInformationResponse
getObjectInformation
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListAttachedIndicesResponse
listAttachedIndices
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListIndexResponse
listIndex
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListObjectAttributesResponse
listObjectAttributes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListObjectChildrenResponse
listObjectChildren
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListObjectParentPathsResponse
listObjectParentPaths
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListObjectParentsResponse
listObjectParents
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListObjectPoliciesResponse
listObjectPolicies
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchLookupPolicyResponse
lookupPolicy
instance Prelude.NFData BatchReadSuccessfulResponse where
rnf :: BatchReadSuccessfulResponse -> ()
rnf BatchReadSuccessfulResponse' {Maybe BatchListObjectChildrenResponse
Maybe BatchListObjectPoliciesResponse
Maybe BatchListPolicyAttachmentsResponse
Maybe BatchListObjectParentsResponse
Maybe BatchListObjectParentPathsResponse
Maybe BatchLookupPolicyResponse
Maybe BatchGetObjectInformationResponse
Maybe BatchListIndexResponse
Maybe BatchListAttachedIndicesResponse
Maybe BatchListObjectAttributesResponse
Maybe BatchGetObjectAttributesResponse
Maybe BatchGetLinkAttributesResponse
Maybe BatchListOutgoingTypedLinksResponse
Maybe BatchListIncomingTypedLinksResponse
lookupPolicy :: Maybe BatchLookupPolicyResponse
listPolicyAttachments :: Maybe BatchListPolicyAttachmentsResponse
listOutgoingTypedLinks :: Maybe BatchListOutgoingTypedLinksResponse
listObjectPolicies :: Maybe BatchListObjectPoliciesResponse
listObjectParents :: Maybe BatchListObjectParentsResponse
listObjectParentPaths :: Maybe BatchListObjectParentPathsResponse
listObjectChildren :: Maybe BatchListObjectChildrenResponse
listObjectAttributes :: Maybe BatchListObjectAttributesResponse
listIndex :: Maybe BatchListIndexResponse
listIncomingTypedLinks :: Maybe BatchListIncomingTypedLinksResponse
listAttachedIndices :: Maybe BatchListAttachedIndicesResponse
getObjectInformation :: Maybe BatchGetObjectInformationResponse
getObjectAttributes :: Maybe BatchGetObjectAttributesResponse
getLinkAttributes :: Maybe BatchGetLinkAttributesResponse
$sel:lookupPolicy:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchLookupPolicyResponse
$sel:listPolicyAttachments:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListPolicyAttachmentsResponse
$sel:listOutgoingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListOutgoingTypedLinksResponse
$sel:listObjectPolicies:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectPoliciesResponse
$sel:listObjectParents:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListObjectParentsResponse
$sel:listObjectParentPaths:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectParentPathsResponse
$sel:listObjectChildren:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectChildrenResponse
$sel:listObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListObjectAttributesResponse
$sel:listIndex:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchListIndexResponse
$sel:listIncomingTypedLinks:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListIncomingTypedLinksResponse
$sel:listAttachedIndices:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchListAttachedIndicesResponse
$sel:getObjectInformation:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectInformationResponse
$sel:getObjectAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse
-> Maybe BatchGetObjectAttributesResponse
$sel:getLinkAttributes:BatchReadSuccessfulResponse' :: BatchReadSuccessfulResponse -> Maybe BatchGetLinkAttributesResponse
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchGetLinkAttributesResponse
getLinkAttributes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchGetObjectAttributesResponse
getObjectAttributes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchGetObjectInformationResponse
getObjectInformation
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListAttachedIndicesResponse
listAttachedIndices
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListIncomingTypedLinksResponse
listIncomingTypedLinks
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListIndexResponse
listIndex
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListObjectAttributesResponse
listObjectAttributes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListObjectChildrenResponse
listObjectChildren
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListObjectParentPathsResponse
listObjectParentPaths
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListObjectParentsResponse
listObjectParents
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListObjectPoliciesResponse
listObjectPolicies
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListOutgoingTypedLinksResponse
listOutgoingTypedLinks
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchListPolicyAttachmentsResponse
listPolicyAttachments
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchLookupPolicyResponse
lookupPolicy