{-# 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 #-}
module Amazonka.CloudFormation.DescribeType
(
DescribeType (..),
newDescribeType,
describeType_arn,
describeType_publicVersionNumber,
describeType_publisherId,
describeType_type,
describeType_typeName,
describeType_versionId,
DescribeTypeResponse (..),
newDescribeTypeResponse,
describeTypeResponse_arn,
describeTypeResponse_autoUpdate,
describeTypeResponse_configurationSchema,
describeTypeResponse_defaultVersionId,
describeTypeResponse_deprecatedStatus,
describeTypeResponse_description,
describeTypeResponse_documentationUrl,
describeTypeResponse_executionRoleArn,
describeTypeResponse_isActivated,
describeTypeResponse_isDefaultVersion,
describeTypeResponse_lastUpdated,
describeTypeResponse_latestPublicVersion,
describeTypeResponse_loggingConfig,
describeTypeResponse_originalTypeArn,
describeTypeResponse_originalTypeName,
describeTypeResponse_provisioningType,
describeTypeResponse_publicVersionNumber,
describeTypeResponse_publisherId,
describeTypeResponse_requiredActivatedTypes,
describeTypeResponse_schema,
describeTypeResponse_sourceUrl,
describeTypeResponse_timeCreated,
describeTypeResponse_type,
describeTypeResponse_typeName,
describeTypeResponse_typeTestsStatus,
describeTypeResponse_typeTestsStatusDescription,
describeTypeResponse_visibility,
describeTypeResponse_httpStatus,
)
where
import Amazonka.CloudFormation.Types
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
data DescribeType = DescribeType'
{
DescribeType -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
DescribeType -> Maybe Text
publicVersionNumber :: Prelude.Maybe Prelude.Text,
DescribeType -> Maybe Text
publisherId :: Prelude.Maybe Prelude.Text,
DescribeType -> Maybe RegistryType
type' :: Prelude.Maybe RegistryType,
DescribeType -> Maybe Text
typeName :: Prelude.Maybe Prelude.Text,
DescribeType -> Maybe Text
versionId :: Prelude.Maybe Prelude.Text
}
deriving (DescribeType -> DescribeType -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeType -> DescribeType -> Bool
$c/= :: DescribeType -> DescribeType -> Bool
== :: DescribeType -> DescribeType -> Bool
$c== :: DescribeType -> DescribeType -> Bool
Prelude.Eq, ReadPrec [DescribeType]
ReadPrec DescribeType
Int -> ReadS DescribeType
ReadS [DescribeType]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeType]
$creadListPrec :: ReadPrec [DescribeType]
readPrec :: ReadPrec DescribeType
$creadPrec :: ReadPrec DescribeType
readList :: ReadS [DescribeType]
$creadList :: ReadS [DescribeType]
readsPrec :: Int -> ReadS DescribeType
$creadsPrec :: Int -> ReadS DescribeType
Prelude.Read, Int -> DescribeType -> ShowS
[DescribeType] -> ShowS
DescribeType -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeType] -> ShowS
$cshowList :: [DescribeType] -> ShowS
show :: DescribeType -> String
$cshow :: DescribeType -> String
showsPrec :: Int -> DescribeType -> ShowS
$cshowsPrec :: Int -> DescribeType -> ShowS
Prelude.Show, forall x. Rep DescribeType x -> DescribeType
forall x. DescribeType -> Rep DescribeType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeType x -> DescribeType
$cfrom :: forall x. DescribeType -> Rep DescribeType x
Prelude.Generic)
newDescribeType ::
DescribeType
newDescribeType :: DescribeType
newDescribeType =
DescribeType'
{ $sel:arn:DescribeType' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:publicVersionNumber:DescribeType' :: Maybe Text
publicVersionNumber = forall a. Maybe a
Prelude.Nothing,
$sel:publisherId:DescribeType' :: Maybe Text
publisherId = forall a. Maybe a
Prelude.Nothing,
$sel:type':DescribeType' :: Maybe RegistryType
type' = forall a. Maybe a
Prelude.Nothing,
$sel:typeName:DescribeType' :: Maybe Text
typeName = forall a. Maybe a
Prelude.Nothing,
$sel:versionId:DescribeType' :: Maybe Text
versionId = forall a. Maybe a
Prelude.Nothing
}
describeType_arn :: Lens.Lens' DescribeType (Prelude.Maybe Prelude.Text)
describeType_arn :: Lens' DescribeType (Maybe Text)
describeType_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe Text
arn :: Maybe Text
$sel:arn:DescribeType' :: DescribeType -> Maybe Text
arn} -> Maybe Text
arn) (\s :: DescribeType
s@DescribeType' {} Maybe Text
a -> DescribeType
s {$sel:arn:DescribeType' :: Maybe Text
arn = Maybe Text
a} :: DescribeType)
describeType_publicVersionNumber :: Lens.Lens' DescribeType (Prelude.Maybe Prelude.Text)
describeType_publicVersionNumber :: Lens' DescribeType (Maybe Text)
describeType_publicVersionNumber = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe Text
publicVersionNumber :: Maybe Text
$sel:publicVersionNumber:DescribeType' :: DescribeType -> Maybe Text
publicVersionNumber} -> Maybe Text
publicVersionNumber) (\s :: DescribeType
s@DescribeType' {} Maybe Text
a -> DescribeType
s {$sel:publicVersionNumber:DescribeType' :: Maybe Text
publicVersionNumber = Maybe Text
a} :: DescribeType)
describeType_publisherId :: Lens.Lens' DescribeType (Prelude.Maybe Prelude.Text)
describeType_publisherId :: Lens' DescribeType (Maybe Text)
describeType_publisherId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe Text
publisherId :: Maybe Text
$sel:publisherId:DescribeType' :: DescribeType -> Maybe Text
publisherId} -> Maybe Text
publisherId) (\s :: DescribeType
s@DescribeType' {} Maybe Text
a -> DescribeType
s {$sel:publisherId:DescribeType' :: Maybe Text
publisherId = Maybe Text
a} :: DescribeType)
describeType_type :: Lens.Lens' DescribeType (Prelude.Maybe RegistryType)
describeType_type :: Lens' DescribeType (Maybe RegistryType)
describeType_type = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe RegistryType
type' :: Maybe RegistryType
$sel:type':DescribeType' :: DescribeType -> Maybe RegistryType
type'} -> Maybe RegistryType
type') (\s :: DescribeType
s@DescribeType' {} Maybe RegistryType
a -> DescribeType
s {$sel:type':DescribeType' :: Maybe RegistryType
type' = Maybe RegistryType
a} :: DescribeType)
describeType_typeName :: Lens.Lens' DescribeType (Prelude.Maybe Prelude.Text)
describeType_typeName :: Lens' DescribeType (Maybe Text)
describeType_typeName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe Text
typeName :: Maybe Text
$sel:typeName:DescribeType' :: DescribeType -> Maybe Text
typeName} -> Maybe Text
typeName) (\s :: DescribeType
s@DescribeType' {} Maybe Text
a -> DescribeType
s {$sel:typeName:DescribeType' :: Maybe Text
typeName = Maybe Text
a} :: DescribeType)
describeType_versionId :: Lens.Lens' DescribeType (Prelude.Maybe Prelude.Text)
describeType_versionId :: Lens' DescribeType (Maybe Text)
describeType_versionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeType' {Maybe Text
versionId :: Maybe Text
$sel:versionId:DescribeType' :: DescribeType -> Maybe Text
versionId} -> Maybe Text
versionId) (\s :: DescribeType
s@DescribeType' {} Maybe Text
a -> DescribeType
s {$sel:versionId:DescribeType' :: Maybe Text
versionId = Maybe Text
a} :: DescribeType)
instance Core.AWSRequest DescribeType where
type AWSResponse DescribeType = DescribeTypeResponse
request :: (Service -> Service) -> DescribeType -> Request DescribeType
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DescribeType
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse DescribeType)))
response =
forall (m :: * -> *) a.
MonadResource m =>
Text
-> (Int
-> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXMLWrapper
Text
"DescribeTypeResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe Text
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe DeprecatedStatus
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Bool
-> Maybe Bool
-> Maybe ISO8601
-> Maybe Text
-> Maybe LoggingConfig
-> Maybe Text
-> Maybe Text
-> Maybe ProvisioningType
-> Maybe Text
-> Maybe Text
-> Maybe [RequiredActivatedType]
-> Maybe Text
-> Maybe Text
-> Maybe ISO8601
-> Maybe RegistryType
-> Maybe Text
-> Maybe TypeTestsStatus
-> Maybe Text
-> Maybe Visibility
-> Int
-> DescribeTypeResponse
DescribeTypeResponse'
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
"Arn")
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
"AutoUpdate")
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
"ConfigurationSchema")
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
"DefaultVersionId")
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
"DeprecatedStatus")
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
"Description")
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
"DocumentationUrl")
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
"ExecutionRoleArn")
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
"IsActivated")
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
"IsDefaultVersion")
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
"LastUpdated")
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
"LatestPublicVersion")
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
"LoggingConfig")
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
"OriginalTypeArn")
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
"OriginalTypeName")
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
"ProvisioningType")
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
"PublicVersionNumber")
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
"PublisherId")
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
"RequiredActivatedTypes"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"member")
)
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
"Schema")
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
"SourceUrl")
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
"TimeCreated")
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
"Type")
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
"TypeName")
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
"TypeTestsStatus")
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
"TypeTestsStatusDescription")
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
"Visibility")
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 DescribeType where
hashWithSalt :: Int -> DescribeType -> Int
hashWithSalt Int
_salt DescribeType' {Maybe Text
Maybe RegistryType
versionId :: Maybe Text
typeName :: Maybe Text
type' :: Maybe RegistryType
publisherId :: Maybe Text
publicVersionNumber :: Maybe Text
arn :: Maybe Text
$sel:versionId:DescribeType' :: DescribeType -> Maybe Text
$sel:typeName:DescribeType' :: DescribeType -> Maybe Text
$sel:type':DescribeType' :: DescribeType -> Maybe RegistryType
$sel:publisherId:DescribeType' :: DescribeType -> Maybe Text
$sel:publicVersionNumber:DescribeType' :: DescribeType -> Maybe Text
$sel:arn:DescribeType' :: DescribeType -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
arn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
publicVersionNumber
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
publisherId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RegistryType
type'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
typeName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
versionId
instance Prelude.NFData DescribeType where
rnf :: DescribeType -> ()
rnf DescribeType' {Maybe Text
Maybe RegistryType
versionId :: Maybe Text
typeName :: Maybe Text
type' :: Maybe RegistryType
publisherId :: Maybe Text
publicVersionNumber :: Maybe Text
arn :: Maybe Text
$sel:versionId:DescribeType' :: DescribeType -> Maybe Text
$sel:typeName:DescribeType' :: DescribeType -> Maybe Text
$sel:type':DescribeType' :: DescribeType -> Maybe RegistryType
$sel:publisherId:DescribeType' :: DescribeType -> Maybe Text
$sel:publicVersionNumber:DescribeType' :: DescribeType -> Maybe Text
$sel:arn:DescribeType' :: DescribeType -> Maybe Text
..} =
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
publicVersionNumber
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
publisherId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RegistryType
type'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
typeName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
versionId
instance Data.ToHeaders DescribeType where
toHeaders :: DescribeType -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DescribeType where
toPath :: DescribeType -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeType where
toQuery :: DescribeType -> QueryString
toQuery DescribeType' {Maybe Text
Maybe RegistryType
versionId :: Maybe Text
typeName :: Maybe Text
type' :: Maybe RegistryType
publisherId :: Maybe Text
publicVersionNumber :: Maybe Text
arn :: Maybe Text
$sel:versionId:DescribeType' :: DescribeType -> Maybe Text
$sel:typeName:DescribeType' :: DescribeType -> Maybe Text
$sel:type':DescribeType' :: DescribeType -> Maybe RegistryType
$sel:publisherId:DescribeType' :: DescribeType -> Maybe Text
$sel:publicVersionNumber:DescribeType' :: DescribeType -> Maybe Text
$sel:arn:DescribeType' :: DescribeType -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"DescribeType" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2010-05-15" :: Prelude.ByteString),
ByteString
"Arn" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
arn,
ByteString
"PublicVersionNumber" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
publicVersionNumber,
ByteString
"PublisherId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
publisherId,
ByteString
"Type" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe RegistryType
type',
ByteString
"TypeName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
typeName,
ByteString
"VersionId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
versionId
]
data DescribeTypeResponse = DescribeTypeResponse'
{
DescribeTypeResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Bool
autoUpdate :: Prelude.Maybe Prelude.Bool,
DescribeTypeResponse -> Maybe Text
configurationSchema :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
defaultVersionId :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe DeprecatedStatus
deprecatedStatus :: Prelude.Maybe DeprecatedStatus,
DescribeTypeResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
documentationUrl :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
executionRoleArn :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Bool
isActivated :: Prelude.Maybe Prelude.Bool,
DescribeTypeResponse -> Maybe Bool
isDefaultVersion :: Prelude.Maybe Prelude.Bool,
DescribeTypeResponse -> Maybe ISO8601
lastUpdated :: Prelude.Maybe Data.ISO8601,
DescribeTypeResponse -> Maybe Text
latestPublicVersion :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe LoggingConfig
loggingConfig :: Prelude.Maybe LoggingConfig,
DescribeTypeResponse -> Maybe Text
originalTypeArn :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
originalTypeName :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe ProvisioningType
provisioningType :: Prelude.Maybe ProvisioningType,
DescribeTypeResponse -> Maybe Text
publicVersionNumber :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
publisherId :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe [RequiredActivatedType]
requiredActivatedTypes :: Prelude.Maybe [RequiredActivatedType],
DescribeTypeResponse -> Maybe Text
schema :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Text
sourceUrl :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe ISO8601
timeCreated :: Prelude.Maybe Data.ISO8601,
DescribeTypeResponse -> Maybe RegistryType
type' :: Prelude.Maybe RegistryType,
DescribeTypeResponse -> Maybe Text
typeName :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe TypeTestsStatus
typeTestsStatus :: Prelude.Maybe TypeTestsStatus,
DescribeTypeResponse -> Maybe Text
typeTestsStatusDescription :: Prelude.Maybe Prelude.Text,
DescribeTypeResponse -> Maybe Visibility
visibility :: Prelude.Maybe Visibility,
DescribeTypeResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeTypeResponse -> DescribeTypeResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeTypeResponse -> DescribeTypeResponse -> Bool
$c/= :: DescribeTypeResponse -> DescribeTypeResponse -> Bool
== :: DescribeTypeResponse -> DescribeTypeResponse -> Bool
$c== :: DescribeTypeResponse -> DescribeTypeResponse -> Bool
Prelude.Eq, ReadPrec [DescribeTypeResponse]
ReadPrec DescribeTypeResponse
Int -> ReadS DescribeTypeResponse
ReadS [DescribeTypeResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeTypeResponse]
$creadListPrec :: ReadPrec [DescribeTypeResponse]
readPrec :: ReadPrec DescribeTypeResponse
$creadPrec :: ReadPrec DescribeTypeResponse
readList :: ReadS [DescribeTypeResponse]
$creadList :: ReadS [DescribeTypeResponse]
readsPrec :: Int -> ReadS DescribeTypeResponse
$creadsPrec :: Int -> ReadS DescribeTypeResponse
Prelude.Read, Int -> DescribeTypeResponse -> ShowS
[DescribeTypeResponse] -> ShowS
DescribeTypeResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeTypeResponse] -> ShowS
$cshowList :: [DescribeTypeResponse] -> ShowS
show :: DescribeTypeResponse -> String
$cshow :: DescribeTypeResponse -> String
showsPrec :: Int -> DescribeTypeResponse -> ShowS
$cshowsPrec :: Int -> DescribeTypeResponse -> ShowS
Prelude.Show, forall x. Rep DescribeTypeResponse x -> DescribeTypeResponse
forall x. DescribeTypeResponse -> Rep DescribeTypeResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeTypeResponse x -> DescribeTypeResponse
$cfrom :: forall x. DescribeTypeResponse -> Rep DescribeTypeResponse x
Prelude.Generic)
newDescribeTypeResponse ::
Prelude.Int ->
DescribeTypeResponse
newDescribeTypeResponse :: Int -> DescribeTypeResponse
newDescribeTypeResponse Int
pHttpStatus_ =
DescribeTypeResponse'
{ $sel:arn:DescribeTypeResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:autoUpdate:DescribeTypeResponse' :: Maybe Bool
autoUpdate = forall a. Maybe a
Prelude.Nothing,
$sel:configurationSchema:DescribeTypeResponse' :: Maybe Text
configurationSchema = forall a. Maybe a
Prelude.Nothing,
$sel:defaultVersionId:DescribeTypeResponse' :: Maybe Text
defaultVersionId = forall a. Maybe a
Prelude.Nothing,
$sel:deprecatedStatus:DescribeTypeResponse' :: Maybe DeprecatedStatus
deprecatedStatus = forall a. Maybe a
Prelude.Nothing,
$sel:description:DescribeTypeResponse' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:documentationUrl:DescribeTypeResponse' :: Maybe Text
documentationUrl = forall a. Maybe a
Prelude.Nothing,
$sel:executionRoleArn:DescribeTypeResponse' :: Maybe Text
executionRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:isActivated:DescribeTypeResponse' :: Maybe Bool
isActivated = forall a. Maybe a
Prelude.Nothing,
$sel:isDefaultVersion:DescribeTypeResponse' :: Maybe Bool
isDefaultVersion = forall a. Maybe a
Prelude.Nothing,
$sel:lastUpdated:DescribeTypeResponse' :: Maybe ISO8601
lastUpdated = forall a. Maybe a
Prelude.Nothing,
$sel:latestPublicVersion:DescribeTypeResponse' :: Maybe Text
latestPublicVersion = forall a. Maybe a
Prelude.Nothing,
$sel:loggingConfig:DescribeTypeResponse' :: Maybe LoggingConfig
loggingConfig = forall a. Maybe a
Prelude.Nothing,
$sel:originalTypeArn:DescribeTypeResponse' :: Maybe Text
originalTypeArn = forall a. Maybe a
Prelude.Nothing,
$sel:originalTypeName:DescribeTypeResponse' :: Maybe Text
originalTypeName = forall a. Maybe a
Prelude.Nothing,
$sel:provisioningType:DescribeTypeResponse' :: Maybe ProvisioningType
provisioningType = forall a. Maybe a
Prelude.Nothing,
$sel:publicVersionNumber:DescribeTypeResponse' :: Maybe Text
publicVersionNumber = forall a. Maybe a
Prelude.Nothing,
$sel:publisherId:DescribeTypeResponse' :: Maybe Text
publisherId = forall a. Maybe a
Prelude.Nothing,
$sel:requiredActivatedTypes:DescribeTypeResponse' :: Maybe [RequiredActivatedType]
requiredActivatedTypes = forall a. Maybe a
Prelude.Nothing,
$sel:schema:DescribeTypeResponse' :: Maybe Text
schema = forall a. Maybe a
Prelude.Nothing,
$sel:sourceUrl:DescribeTypeResponse' :: Maybe Text
sourceUrl = forall a. Maybe a
Prelude.Nothing,
$sel:timeCreated:DescribeTypeResponse' :: Maybe ISO8601
timeCreated = forall a. Maybe a
Prelude.Nothing,
$sel:type':DescribeTypeResponse' :: Maybe RegistryType
type' = forall a. Maybe a
Prelude.Nothing,
$sel:typeName:DescribeTypeResponse' :: Maybe Text
typeName = forall a. Maybe a
Prelude.Nothing,
$sel:typeTestsStatus:DescribeTypeResponse' :: Maybe TypeTestsStatus
typeTestsStatus = forall a. Maybe a
Prelude.Nothing,
$sel:typeTestsStatusDescription:DescribeTypeResponse' :: Maybe Text
typeTestsStatusDescription = forall a. Maybe a
Prelude.Nothing,
$sel:visibility:DescribeTypeResponse' :: Maybe Visibility
visibility = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeTypeResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeTypeResponse_arn :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_arn :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:arn:DescribeTypeResponse' :: Maybe Text
arn = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_autoUpdate :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Bool)
describeTypeResponse_autoUpdate :: Lens' DescribeTypeResponse (Maybe Bool)
describeTypeResponse_autoUpdate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Bool
autoUpdate :: Maybe Bool
$sel:autoUpdate:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
autoUpdate} -> Maybe Bool
autoUpdate) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Bool
a -> DescribeTypeResponse
s {$sel:autoUpdate:DescribeTypeResponse' :: Maybe Bool
autoUpdate = Maybe Bool
a} :: DescribeTypeResponse)
describeTypeResponse_configurationSchema :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_configurationSchema :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_configurationSchema = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
configurationSchema :: Maybe Text
$sel:configurationSchema:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
configurationSchema} -> Maybe Text
configurationSchema) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:configurationSchema:DescribeTypeResponse' :: Maybe Text
configurationSchema = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_defaultVersionId :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_defaultVersionId :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_defaultVersionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
defaultVersionId :: Maybe Text
$sel:defaultVersionId:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
defaultVersionId} -> Maybe Text
defaultVersionId) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:defaultVersionId:DescribeTypeResponse' :: Maybe Text
defaultVersionId = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_deprecatedStatus :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe DeprecatedStatus)
describeTypeResponse_deprecatedStatus :: Lens' DescribeTypeResponse (Maybe DeprecatedStatus)
describeTypeResponse_deprecatedStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe DeprecatedStatus
deprecatedStatus :: Maybe DeprecatedStatus
$sel:deprecatedStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe DeprecatedStatus
deprecatedStatus} -> Maybe DeprecatedStatus
deprecatedStatus) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe DeprecatedStatus
a -> DescribeTypeResponse
s {$sel:deprecatedStatus:DescribeTypeResponse' :: Maybe DeprecatedStatus
deprecatedStatus = Maybe DeprecatedStatus
a} :: DescribeTypeResponse)
describeTypeResponse_description :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_description :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
description :: Maybe Text
$sel:description:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:description:DescribeTypeResponse' :: Maybe Text
description = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_documentationUrl :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_documentationUrl :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_documentationUrl = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
documentationUrl :: Maybe Text
$sel:documentationUrl:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
documentationUrl} -> Maybe Text
documentationUrl) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:documentationUrl:DescribeTypeResponse' :: Maybe Text
documentationUrl = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_executionRoleArn :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_executionRoleArn :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_executionRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
executionRoleArn :: Maybe Text
$sel:executionRoleArn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
executionRoleArn} -> Maybe Text
executionRoleArn) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:executionRoleArn:DescribeTypeResponse' :: Maybe Text
executionRoleArn = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_isActivated :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Bool)
describeTypeResponse_isActivated :: Lens' DescribeTypeResponse (Maybe Bool)
describeTypeResponse_isActivated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Bool
isActivated :: Maybe Bool
$sel:isActivated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
isActivated} -> Maybe Bool
isActivated) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Bool
a -> DescribeTypeResponse
s {$sel:isActivated:DescribeTypeResponse' :: Maybe Bool
isActivated = Maybe Bool
a} :: DescribeTypeResponse)
describeTypeResponse_isDefaultVersion :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Bool)
describeTypeResponse_isDefaultVersion :: Lens' DescribeTypeResponse (Maybe Bool)
describeTypeResponse_isDefaultVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Bool
isDefaultVersion :: Maybe Bool
$sel:isDefaultVersion:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
isDefaultVersion} -> Maybe Bool
isDefaultVersion) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Bool
a -> DescribeTypeResponse
s {$sel:isDefaultVersion:DescribeTypeResponse' :: Maybe Bool
isDefaultVersion = Maybe Bool
a} :: DescribeTypeResponse)
describeTypeResponse_lastUpdated :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.UTCTime)
describeTypeResponse_lastUpdated :: Lens' DescribeTypeResponse (Maybe UTCTime)
describeTypeResponse_lastUpdated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe ISO8601
lastUpdated :: Maybe ISO8601
$sel:lastUpdated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ISO8601
lastUpdated} -> Maybe ISO8601
lastUpdated) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe ISO8601
a -> DescribeTypeResponse
s {$sel:lastUpdated:DescribeTypeResponse' :: Maybe ISO8601
lastUpdated = Maybe ISO8601
a} :: DescribeTypeResponse) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time
describeTypeResponse_latestPublicVersion :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_latestPublicVersion :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_latestPublicVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
latestPublicVersion :: Maybe Text
$sel:latestPublicVersion:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
latestPublicVersion} -> Maybe Text
latestPublicVersion) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:latestPublicVersion:DescribeTypeResponse' :: Maybe Text
latestPublicVersion = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_loggingConfig :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe LoggingConfig)
describeTypeResponse_loggingConfig :: Lens' DescribeTypeResponse (Maybe LoggingConfig)
describeTypeResponse_loggingConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe LoggingConfig
loggingConfig :: Maybe LoggingConfig
$sel:loggingConfig:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe LoggingConfig
loggingConfig} -> Maybe LoggingConfig
loggingConfig) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe LoggingConfig
a -> DescribeTypeResponse
s {$sel:loggingConfig:DescribeTypeResponse' :: Maybe LoggingConfig
loggingConfig = Maybe LoggingConfig
a} :: DescribeTypeResponse)
describeTypeResponse_originalTypeArn :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_originalTypeArn :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_originalTypeArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
originalTypeArn :: Maybe Text
$sel:originalTypeArn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
originalTypeArn} -> Maybe Text
originalTypeArn) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:originalTypeArn:DescribeTypeResponse' :: Maybe Text
originalTypeArn = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_originalTypeName :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_originalTypeName :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_originalTypeName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
originalTypeName :: Maybe Text
$sel:originalTypeName:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
originalTypeName} -> Maybe Text
originalTypeName) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:originalTypeName:DescribeTypeResponse' :: Maybe Text
originalTypeName = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_provisioningType :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe ProvisioningType)
describeTypeResponse_provisioningType :: Lens' DescribeTypeResponse (Maybe ProvisioningType)
describeTypeResponse_provisioningType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe ProvisioningType
provisioningType :: Maybe ProvisioningType
$sel:provisioningType:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ProvisioningType
provisioningType} -> Maybe ProvisioningType
provisioningType) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe ProvisioningType
a -> DescribeTypeResponse
s {$sel:provisioningType:DescribeTypeResponse' :: Maybe ProvisioningType
provisioningType = Maybe ProvisioningType
a} :: DescribeTypeResponse)
describeTypeResponse_publicVersionNumber :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_publicVersionNumber :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_publicVersionNumber = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
publicVersionNumber :: Maybe Text
$sel:publicVersionNumber:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
publicVersionNumber} -> Maybe Text
publicVersionNumber) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:publicVersionNumber:DescribeTypeResponse' :: Maybe Text
publicVersionNumber = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_publisherId :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_publisherId :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_publisherId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
publisherId :: Maybe Text
$sel:publisherId:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
publisherId} -> Maybe Text
publisherId) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:publisherId:DescribeTypeResponse' :: Maybe Text
publisherId = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_requiredActivatedTypes :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe [RequiredActivatedType])
describeTypeResponse_requiredActivatedTypes :: Lens' DescribeTypeResponse (Maybe [RequiredActivatedType])
describeTypeResponse_requiredActivatedTypes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe [RequiredActivatedType]
requiredActivatedTypes :: Maybe [RequiredActivatedType]
$sel:requiredActivatedTypes:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe [RequiredActivatedType]
requiredActivatedTypes} -> Maybe [RequiredActivatedType]
requiredActivatedTypes) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe [RequiredActivatedType]
a -> DescribeTypeResponse
s {$sel:requiredActivatedTypes:DescribeTypeResponse' :: Maybe [RequiredActivatedType]
requiredActivatedTypes = Maybe [RequiredActivatedType]
a} :: DescribeTypeResponse) 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
describeTypeResponse_schema :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_schema :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_schema = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
schema :: Maybe Text
$sel:schema:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
schema} -> Maybe Text
schema) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:schema:DescribeTypeResponse' :: Maybe Text
schema = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_sourceUrl :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_sourceUrl :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_sourceUrl = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
sourceUrl :: Maybe Text
$sel:sourceUrl:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
sourceUrl} -> Maybe Text
sourceUrl) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:sourceUrl:DescribeTypeResponse' :: Maybe Text
sourceUrl = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_timeCreated :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.UTCTime)
describeTypeResponse_timeCreated :: Lens' DescribeTypeResponse (Maybe UTCTime)
describeTypeResponse_timeCreated = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe ISO8601
timeCreated :: Maybe ISO8601
$sel:timeCreated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ISO8601
timeCreated} -> Maybe ISO8601
timeCreated) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe ISO8601
a -> DescribeTypeResponse
s {$sel:timeCreated:DescribeTypeResponse' :: Maybe ISO8601
timeCreated = Maybe ISO8601
a} :: DescribeTypeResponse) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time
describeTypeResponse_type :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe RegistryType)
describeTypeResponse_type :: Lens' DescribeTypeResponse (Maybe RegistryType)
describeTypeResponse_type = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe RegistryType
type' :: Maybe RegistryType
$sel:type':DescribeTypeResponse' :: DescribeTypeResponse -> Maybe RegistryType
type'} -> Maybe RegistryType
type') (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe RegistryType
a -> DescribeTypeResponse
s {$sel:type':DescribeTypeResponse' :: Maybe RegistryType
type' = Maybe RegistryType
a} :: DescribeTypeResponse)
describeTypeResponse_typeName :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_typeName :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_typeName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
typeName :: Maybe Text
$sel:typeName:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
typeName} -> Maybe Text
typeName) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:typeName:DescribeTypeResponse' :: Maybe Text
typeName = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_typeTestsStatus :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe TypeTestsStatus)
describeTypeResponse_typeTestsStatus :: Lens' DescribeTypeResponse (Maybe TypeTestsStatus)
describeTypeResponse_typeTestsStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe TypeTestsStatus
typeTestsStatus :: Maybe TypeTestsStatus
$sel:typeTestsStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe TypeTestsStatus
typeTestsStatus} -> Maybe TypeTestsStatus
typeTestsStatus) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe TypeTestsStatus
a -> DescribeTypeResponse
s {$sel:typeTestsStatus:DescribeTypeResponse' :: Maybe TypeTestsStatus
typeTestsStatus = Maybe TypeTestsStatus
a} :: DescribeTypeResponse)
describeTypeResponse_typeTestsStatusDescription :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Prelude.Text)
describeTypeResponse_typeTestsStatusDescription :: Lens' DescribeTypeResponse (Maybe Text)
describeTypeResponse_typeTestsStatusDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Text
typeTestsStatusDescription :: Maybe Text
$sel:typeTestsStatusDescription:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
typeTestsStatusDescription} -> Maybe Text
typeTestsStatusDescription) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Text
a -> DescribeTypeResponse
s {$sel:typeTestsStatusDescription:DescribeTypeResponse' :: Maybe Text
typeTestsStatusDescription = Maybe Text
a} :: DescribeTypeResponse)
describeTypeResponse_visibility :: Lens.Lens' DescribeTypeResponse (Prelude.Maybe Visibility)
describeTypeResponse_visibility :: Lens' DescribeTypeResponse (Maybe Visibility)
describeTypeResponse_visibility = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Maybe Visibility
visibility :: Maybe Visibility
$sel:visibility:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Visibility
visibility} -> Maybe Visibility
visibility) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Maybe Visibility
a -> DescribeTypeResponse
s {$sel:visibility:DescribeTypeResponse' :: Maybe Visibility
visibility = Maybe Visibility
a} :: DescribeTypeResponse)
describeTypeResponse_httpStatus :: Lens.Lens' DescribeTypeResponse Prelude.Int
describeTypeResponse_httpStatus :: Lens' DescribeTypeResponse Int
describeTypeResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeTypeResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeTypeResponse
s@DescribeTypeResponse' {} Int
a -> DescribeTypeResponse
s {$sel:httpStatus:DescribeTypeResponse' :: Int
httpStatus = Int
a} :: DescribeTypeResponse)
instance Prelude.NFData DescribeTypeResponse where
rnf :: DescribeTypeResponse -> ()
rnf DescribeTypeResponse' {Int
Maybe Bool
Maybe [RequiredActivatedType]
Maybe Text
Maybe ISO8601
Maybe DeprecatedStatus
Maybe LoggingConfig
Maybe ProvisioningType
Maybe RegistryType
Maybe TypeTestsStatus
Maybe Visibility
httpStatus :: Int
visibility :: Maybe Visibility
typeTestsStatusDescription :: Maybe Text
typeTestsStatus :: Maybe TypeTestsStatus
typeName :: Maybe Text
type' :: Maybe RegistryType
timeCreated :: Maybe ISO8601
sourceUrl :: Maybe Text
schema :: Maybe Text
requiredActivatedTypes :: Maybe [RequiredActivatedType]
publisherId :: Maybe Text
publicVersionNumber :: Maybe Text
provisioningType :: Maybe ProvisioningType
originalTypeName :: Maybe Text
originalTypeArn :: Maybe Text
loggingConfig :: Maybe LoggingConfig
latestPublicVersion :: Maybe Text
lastUpdated :: Maybe ISO8601
isDefaultVersion :: Maybe Bool
isActivated :: Maybe Bool
executionRoleArn :: Maybe Text
documentationUrl :: Maybe Text
description :: Maybe Text
deprecatedStatus :: Maybe DeprecatedStatus
defaultVersionId :: Maybe Text
configurationSchema :: Maybe Text
autoUpdate :: Maybe Bool
arn :: Maybe Text
$sel:httpStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Int
$sel:visibility:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Visibility
$sel:typeTestsStatusDescription:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:typeTestsStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe TypeTestsStatus
$sel:typeName:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:type':DescribeTypeResponse' :: DescribeTypeResponse -> Maybe RegistryType
$sel:timeCreated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ISO8601
$sel:sourceUrl:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:schema:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:requiredActivatedTypes:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe [RequiredActivatedType]
$sel:publisherId:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:publicVersionNumber:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:provisioningType:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ProvisioningType
$sel:originalTypeName:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:originalTypeArn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:loggingConfig:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe LoggingConfig
$sel:latestPublicVersion:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:lastUpdated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe ISO8601
$sel:isDefaultVersion:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
$sel:isActivated:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
$sel:executionRoleArn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:documentationUrl:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:description:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:deprecatedStatus:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe DeprecatedStatus
$sel:defaultVersionId:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:configurationSchema:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
$sel:autoUpdate:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Bool
$sel:arn:DescribeTypeResponse' :: DescribeTypeResponse -> Maybe Text
..} =
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 Bool
autoUpdate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
configurationSchema
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
defaultVersionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DeprecatedStatus
deprecatedStatus
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 Text
documentationUrl
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
executionRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
isActivated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
isDefaultVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
lastUpdated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
latestPublicVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LoggingConfig
loggingConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
originalTypeArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
originalTypeName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ProvisioningType
provisioningType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
publicVersionNumber
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
publisherId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe [RequiredActivatedType]
requiredActivatedTypes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
schema
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
sourceUrl
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
timeCreated
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RegistryType
type'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
typeName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe TypeTestsStatus
typeTestsStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
typeTestsStatusDescription
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Visibility
visibility
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Int
httpStatus