{-# 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.MediaPackageVOD.DescribePackagingConfiguration
(
DescribePackagingConfiguration (..),
newDescribePackagingConfiguration,
describePackagingConfiguration_id,
DescribePackagingConfigurationResponse (..),
newDescribePackagingConfigurationResponse,
describePackagingConfigurationResponse_hlsPackage,
describePackagingConfigurationResponse_arn,
describePackagingConfigurationResponse_packagingGroupId,
describePackagingConfigurationResponse_dashPackage,
describePackagingConfigurationResponse_mssPackage,
describePackagingConfigurationResponse_id,
describePackagingConfigurationResponse_cmafPackage,
describePackagingConfigurationResponse_tags,
describePackagingConfigurationResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaPackageVOD.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribePackagingConfiguration = DescribePackagingConfiguration'
{
DescribePackagingConfiguration -> Text
id :: Prelude.Text
}
deriving (DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool
(DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool)
-> (DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool)
-> Eq DescribePackagingConfiguration
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool
$c/= :: DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool
== :: DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool
$c== :: DescribePackagingConfiguration
-> DescribePackagingConfiguration -> Bool
Prelude.Eq, ReadPrec [DescribePackagingConfiguration]
ReadPrec DescribePackagingConfiguration
Int -> ReadS DescribePackagingConfiguration
ReadS [DescribePackagingConfiguration]
(Int -> ReadS DescribePackagingConfiguration)
-> ReadS [DescribePackagingConfiguration]
-> ReadPrec DescribePackagingConfiguration
-> ReadPrec [DescribePackagingConfiguration]
-> Read DescribePackagingConfiguration
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribePackagingConfiguration]
$creadListPrec :: ReadPrec [DescribePackagingConfiguration]
readPrec :: ReadPrec DescribePackagingConfiguration
$creadPrec :: ReadPrec DescribePackagingConfiguration
readList :: ReadS [DescribePackagingConfiguration]
$creadList :: ReadS [DescribePackagingConfiguration]
readsPrec :: Int -> ReadS DescribePackagingConfiguration
$creadsPrec :: Int -> ReadS DescribePackagingConfiguration
Prelude.Read, Int -> DescribePackagingConfiguration -> ShowS
[DescribePackagingConfiguration] -> ShowS
DescribePackagingConfiguration -> String
(Int -> DescribePackagingConfiguration -> ShowS)
-> (DescribePackagingConfiguration -> String)
-> ([DescribePackagingConfiguration] -> ShowS)
-> Show DescribePackagingConfiguration
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribePackagingConfiguration] -> ShowS
$cshowList :: [DescribePackagingConfiguration] -> ShowS
show :: DescribePackagingConfiguration -> String
$cshow :: DescribePackagingConfiguration -> String
showsPrec :: Int -> DescribePackagingConfiguration -> ShowS
$cshowsPrec :: Int -> DescribePackagingConfiguration -> ShowS
Prelude.Show, (forall x.
DescribePackagingConfiguration
-> Rep DescribePackagingConfiguration x)
-> (forall x.
Rep DescribePackagingConfiguration x
-> DescribePackagingConfiguration)
-> Generic DescribePackagingConfiguration
forall x.
Rep DescribePackagingConfiguration x
-> DescribePackagingConfiguration
forall x.
DescribePackagingConfiguration
-> Rep DescribePackagingConfiguration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribePackagingConfiguration x
-> DescribePackagingConfiguration
$cfrom :: forall x.
DescribePackagingConfiguration
-> Rep DescribePackagingConfiguration x
Prelude.Generic)
newDescribePackagingConfiguration ::
Prelude.Text ->
DescribePackagingConfiguration
newDescribePackagingConfiguration :: Text -> DescribePackagingConfiguration
newDescribePackagingConfiguration Text
pId_ =
DescribePackagingConfiguration' :: Text -> DescribePackagingConfiguration
DescribePackagingConfiguration' {$sel:id:DescribePackagingConfiguration' :: Text
id = Text
pId_}
describePackagingConfiguration_id :: Lens.Lens' DescribePackagingConfiguration Prelude.Text
describePackagingConfiguration_id :: (Text -> f Text)
-> DescribePackagingConfiguration
-> f DescribePackagingConfiguration
describePackagingConfiguration_id = (DescribePackagingConfiguration -> Text)
-> (DescribePackagingConfiguration
-> Text -> DescribePackagingConfiguration)
-> Lens
DescribePackagingConfiguration
DescribePackagingConfiguration
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfiguration' {Text
id :: Text
$sel:id:DescribePackagingConfiguration' :: DescribePackagingConfiguration -> Text
id} -> Text
id) (\s :: DescribePackagingConfiguration
s@DescribePackagingConfiguration' {} Text
a -> DescribePackagingConfiguration
s {$sel:id:DescribePackagingConfiguration' :: Text
id = Text
a} :: DescribePackagingConfiguration)
instance
Core.AWSRequest
DescribePackagingConfiguration
where
type
AWSResponse DescribePackagingConfiguration =
DescribePackagingConfigurationResponse
request :: DescribePackagingConfiguration
-> Request DescribePackagingConfiguration
request = Service
-> DescribePackagingConfiguration
-> Request DescribePackagingConfiguration
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy DescribePackagingConfiguration
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribePackagingConfiguration)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse DescribePackagingConfiguration))
-> Logger
-> Service
-> Proxy DescribePackagingConfiguration
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse DescribePackagingConfiguration)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe HlsPackage
-> Maybe Text
-> Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse'
(Maybe HlsPackage
-> Maybe Text
-> Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe HlsPackage)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe HlsPackage)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"hlsPackage")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"arn")
Either
String
(Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"packagingGroupId")
Either
String
(Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe DashPackage)
-> Either
String
(Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe DashPackage)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"dashPackage")
Either
String
(Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe MssPackage)
-> Either
String
(Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe MssPackage)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"mssPackage")
Either
String
(Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"id")
Either
String
(Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse)
-> Either String (Maybe CmafPackage)
-> Either
String
(Maybe (HashMap Text Text)
-> Int -> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe CmafPackage)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"cmafPackage")
Either
String
(Maybe (HashMap Text Text)
-> Int -> DescribePackagingConfigurationResponse)
-> Either String (Maybe (HashMap Text Text))
-> Either String (Int -> DescribePackagingConfigurationResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"tags" Either String (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text)
-> Either String (Maybe (HashMap Text Text))
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty)
Either String (Int -> DescribePackagingConfigurationResponse)
-> Either String Int
-> Either String DescribePackagingConfigurationResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
DescribePackagingConfiguration
instance
Prelude.NFData
DescribePackagingConfiguration
instance
Core.ToHeaders
DescribePackagingConfiguration
where
toHeaders :: DescribePackagingConfiguration -> ResponseHeaders
toHeaders =
ResponseHeaders
-> DescribePackagingConfiguration -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToPath DescribePackagingConfiguration where
toPath :: DescribePackagingConfiguration -> ByteString
toPath DescribePackagingConfiguration' {Text
id :: Text
$sel:id:DescribePackagingConfiguration' :: DescribePackagingConfiguration -> Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/packaging_configurations/", Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
id]
instance Core.ToQuery DescribePackagingConfiguration where
toQuery :: DescribePackagingConfiguration -> QueryString
toQuery = QueryString -> DescribePackagingConfiguration -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data DescribePackagingConfigurationResponse = DescribePackagingConfigurationResponse'
{ DescribePackagingConfigurationResponse -> Maybe HlsPackage
hlsPackage :: Prelude.Maybe HlsPackage,
DescribePackagingConfigurationResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
DescribePackagingConfigurationResponse -> Maybe Text
packagingGroupId :: Prelude.Maybe Prelude.Text,
DescribePackagingConfigurationResponse -> Maybe DashPackage
dashPackage :: Prelude.Maybe DashPackage,
DescribePackagingConfigurationResponse -> Maybe MssPackage
mssPackage :: Prelude.Maybe MssPackage,
DescribePackagingConfigurationResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
DescribePackagingConfigurationResponse -> Maybe CmafPackage
cmafPackage :: Prelude.Maybe CmafPackage,
DescribePackagingConfigurationResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
DescribePackagingConfigurationResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool
(DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool)
-> (DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool)
-> Eq DescribePackagingConfigurationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool
$c/= :: DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool
== :: DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool
$c== :: DescribePackagingConfigurationResponse
-> DescribePackagingConfigurationResponse -> Bool
Prelude.Eq, ReadPrec [DescribePackagingConfigurationResponse]
ReadPrec DescribePackagingConfigurationResponse
Int -> ReadS DescribePackagingConfigurationResponse
ReadS [DescribePackagingConfigurationResponse]
(Int -> ReadS DescribePackagingConfigurationResponse)
-> ReadS [DescribePackagingConfigurationResponse]
-> ReadPrec DescribePackagingConfigurationResponse
-> ReadPrec [DescribePackagingConfigurationResponse]
-> Read DescribePackagingConfigurationResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribePackagingConfigurationResponse]
$creadListPrec :: ReadPrec [DescribePackagingConfigurationResponse]
readPrec :: ReadPrec DescribePackagingConfigurationResponse
$creadPrec :: ReadPrec DescribePackagingConfigurationResponse
readList :: ReadS [DescribePackagingConfigurationResponse]
$creadList :: ReadS [DescribePackagingConfigurationResponse]
readsPrec :: Int -> ReadS DescribePackagingConfigurationResponse
$creadsPrec :: Int -> ReadS DescribePackagingConfigurationResponse
Prelude.Read, Int -> DescribePackagingConfigurationResponse -> ShowS
[DescribePackagingConfigurationResponse] -> ShowS
DescribePackagingConfigurationResponse -> String
(Int -> DescribePackagingConfigurationResponse -> ShowS)
-> (DescribePackagingConfigurationResponse -> String)
-> ([DescribePackagingConfigurationResponse] -> ShowS)
-> Show DescribePackagingConfigurationResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribePackagingConfigurationResponse] -> ShowS
$cshowList :: [DescribePackagingConfigurationResponse] -> ShowS
show :: DescribePackagingConfigurationResponse -> String
$cshow :: DescribePackagingConfigurationResponse -> String
showsPrec :: Int -> DescribePackagingConfigurationResponse -> ShowS
$cshowsPrec :: Int -> DescribePackagingConfigurationResponse -> ShowS
Prelude.Show, (forall x.
DescribePackagingConfigurationResponse
-> Rep DescribePackagingConfigurationResponse x)
-> (forall x.
Rep DescribePackagingConfigurationResponse x
-> DescribePackagingConfigurationResponse)
-> Generic DescribePackagingConfigurationResponse
forall x.
Rep DescribePackagingConfigurationResponse x
-> DescribePackagingConfigurationResponse
forall x.
DescribePackagingConfigurationResponse
-> Rep DescribePackagingConfigurationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribePackagingConfigurationResponse x
-> DescribePackagingConfigurationResponse
$cfrom :: forall x.
DescribePackagingConfigurationResponse
-> Rep DescribePackagingConfigurationResponse x
Prelude.Generic)
newDescribePackagingConfigurationResponse ::
Prelude.Int ->
DescribePackagingConfigurationResponse
newDescribePackagingConfigurationResponse :: Int -> DescribePackagingConfigurationResponse
newDescribePackagingConfigurationResponse
Int
pHttpStatus_ =
DescribePackagingConfigurationResponse' :: Maybe HlsPackage
-> Maybe Text
-> Maybe Text
-> Maybe DashPackage
-> Maybe MssPackage
-> Maybe Text
-> Maybe CmafPackage
-> Maybe (HashMap Text Text)
-> Int
-> DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse'
{ $sel:hlsPackage:DescribePackagingConfigurationResponse' :: Maybe HlsPackage
hlsPackage =
Maybe HlsPackage
forall a. Maybe a
Prelude.Nothing,
$sel:arn:DescribePackagingConfigurationResponse' :: Maybe Text
arn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:packagingGroupId:DescribePackagingConfigurationResponse' :: Maybe Text
packagingGroupId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:dashPackage:DescribePackagingConfigurationResponse' :: Maybe DashPackage
dashPackage = Maybe DashPackage
forall a. Maybe a
Prelude.Nothing,
$sel:mssPackage:DescribePackagingConfigurationResponse' :: Maybe MssPackage
mssPackage = Maybe MssPackage
forall a. Maybe a
Prelude.Nothing,
$sel:id:DescribePackagingConfigurationResponse' :: Maybe Text
id = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:cmafPackage:DescribePackagingConfigurationResponse' :: Maybe CmafPackage
cmafPackage = Maybe CmafPackage
forall a. Maybe a
Prelude.Nothing,
$sel:tags:DescribePackagingConfigurationResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribePackagingConfigurationResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describePackagingConfigurationResponse_hlsPackage :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe HlsPackage)
describePackagingConfigurationResponse_hlsPackage :: (Maybe HlsPackage -> f (Maybe HlsPackage))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_hlsPackage = (DescribePackagingConfigurationResponse -> Maybe HlsPackage)
-> (DescribePackagingConfigurationResponse
-> Maybe HlsPackage -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe HlsPackage)
(Maybe HlsPackage)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe HlsPackage
hlsPackage :: Maybe HlsPackage
$sel:hlsPackage:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe HlsPackage
hlsPackage} -> Maybe HlsPackage
hlsPackage) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe HlsPackage
a -> DescribePackagingConfigurationResponse
s {$sel:hlsPackage:DescribePackagingConfigurationResponse' :: Maybe HlsPackage
hlsPackage = Maybe HlsPackage
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_arn :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe Prelude.Text)
describePackagingConfigurationResponse_arn :: (Maybe Text -> f (Maybe Text))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_arn = (DescribePackagingConfigurationResponse -> Maybe Text)
-> (DescribePackagingConfigurationResponse
-> Maybe Text -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe Text
a -> DescribePackagingConfigurationResponse
s {$sel:arn:DescribePackagingConfigurationResponse' :: Maybe Text
arn = Maybe Text
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_packagingGroupId :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe Prelude.Text)
describePackagingConfigurationResponse_packagingGroupId :: (Maybe Text -> f (Maybe Text))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_packagingGroupId = (DescribePackagingConfigurationResponse -> Maybe Text)
-> (DescribePackagingConfigurationResponse
-> Maybe Text -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe Text
packagingGroupId :: Maybe Text
$sel:packagingGroupId:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe Text
packagingGroupId} -> Maybe Text
packagingGroupId) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe Text
a -> DescribePackagingConfigurationResponse
s {$sel:packagingGroupId:DescribePackagingConfigurationResponse' :: Maybe Text
packagingGroupId = Maybe Text
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_dashPackage :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe DashPackage)
describePackagingConfigurationResponse_dashPackage :: (Maybe DashPackage -> f (Maybe DashPackage))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_dashPackage = (DescribePackagingConfigurationResponse -> Maybe DashPackage)
-> (DescribePackagingConfigurationResponse
-> Maybe DashPackage -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe DashPackage)
(Maybe DashPackage)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe DashPackage
dashPackage :: Maybe DashPackage
$sel:dashPackage:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe DashPackage
dashPackage} -> Maybe DashPackage
dashPackage) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe DashPackage
a -> DescribePackagingConfigurationResponse
s {$sel:dashPackage:DescribePackagingConfigurationResponse' :: Maybe DashPackage
dashPackage = Maybe DashPackage
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_mssPackage :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe MssPackage)
describePackagingConfigurationResponse_mssPackage :: (Maybe MssPackage -> f (Maybe MssPackage))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_mssPackage = (DescribePackagingConfigurationResponse -> Maybe MssPackage)
-> (DescribePackagingConfigurationResponse
-> Maybe MssPackage -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe MssPackage)
(Maybe MssPackage)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe MssPackage
mssPackage :: Maybe MssPackage
$sel:mssPackage:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe MssPackage
mssPackage} -> Maybe MssPackage
mssPackage) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe MssPackage
a -> DescribePackagingConfigurationResponse
s {$sel:mssPackage:DescribePackagingConfigurationResponse' :: Maybe MssPackage
mssPackage = Maybe MssPackage
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_id :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe Prelude.Text)
describePackagingConfigurationResponse_id :: (Maybe Text -> f (Maybe Text))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_id = (DescribePackagingConfigurationResponse -> Maybe Text)
-> (DescribePackagingConfigurationResponse
-> Maybe Text -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe Text
id :: Maybe Text
$sel:id:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe Text
a -> DescribePackagingConfigurationResponse
s {$sel:id:DescribePackagingConfigurationResponse' :: Maybe Text
id = Maybe Text
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_cmafPackage :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe CmafPackage)
describePackagingConfigurationResponse_cmafPackage :: (Maybe CmafPackage -> f (Maybe CmafPackage))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_cmafPackage = (DescribePackagingConfigurationResponse -> Maybe CmafPackage)
-> (DescribePackagingConfigurationResponse
-> Maybe CmafPackage -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe CmafPackage)
(Maybe CmafPackage)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe CmafPackage
cmafPackage :: Maybe CmafPackage
$sel:cmafPackage:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe CmafPackage
cmafPackage} -> Maybe CmafPackage
cmafPackage) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe CmafPackage
a -> DescribePackagingConfigurationResponse
s {$sel:cmafPackage:DescribePackagingConfigurationResponse' :: Maybe CmafPackage
cmafPackage = Maybe CmafPackage
a} :: DescribePackagingConfigurationResponse)
describePackagingConfigurationResponse_tags :: Lens.Lens' DescribePackagingConfigurationResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
describePackagingConfigurationResponse_tags :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_tags = (DescribePackagingConfigurationResponse
-> Maybe (HashMap Text Text))
-> (DescribePackagingConfigurationResponse
-> Maybe (HashMap Text Text)
-> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Maybe (HashMap Text Text)
a -> DescribePackagingConfigurationResponse
s {$sel:tags:DescribePackagingConfigurationResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: DescribePackagingConfigurationResponse) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
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 AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describePackagingConfigurationResponse_httpStatus :: Lens.Lens' DescribePackagingConfigurationResponse Prelude.Int
describePackagingConfigurationResponse_httpStatus :: (Int -> f Int)
-> DescribePackagingConfigurationResponse
-> f DescribePackagingConfigurationResponse
describePackagingConfigurationResponse_httpStatus = (DescribePackagingConfigurationResponse -> Int)
-> (DescribePackagingConfigurationResponse
-> Int -> DescribePackagingConfigurationResponse)
-> Lens
DescribePackagingConfigurationResponse
DescribePackagingConfigurationResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribePackagingConfigurationResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribePackagingConfigurationResponse' :: DescribePackagingConfigurationResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribePackagingConfigurationResponse
s@DescribePackagingConfigurationResponse' {} Int
a -> DescribePackagingConfigurationResponse
s {$sel:httpStatus:DescribePackagingConfigurationResponse' :: Int
httpStatus = Int
a} :: DescribePackagingConfigurationResponse)
instance
Prelude.NFData
DescribePackagingConfigurationResponse