{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.MediaLive.StartChannel
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Starts an existing channel
module Amazonka.MediaLive.StartChannel
  ( -- * Creating a Request
    StartChannel (..),
    newStartChannel,

    -- * Request Lenses
    startChannel_channelId,

    -- * Destructuring the Response
    StartChannelResponse (..),
    newStartChannelResponse,

    -- * Response Lenses
    startChannelResponse_arn,
    startChannelResponse_cdiInputSpecification,
    startChannelResponse_channelClass,
    startChannelResponse_destinations,
    startChannelResponse_egressEndpoints,
    startChannelResponse_encoderSettings,
    startChannelResponse_id,
    startChannelResponse_inputAttachments,
    startChannelResponse_inputSpecification,
    startChannelResponse_logLevel,
    startChannelResponse_maintenance,
    startChannelResponse_name,
    startChannelResponse_pipelineDetails,
    startChannelResponse_pipelinesRunningCount,
    startChannelResponse_roleArn,
    startChannelResponse_state,
    startChannelResponse_tags,
    startChannelResponse_vpc,
    startChannelResponse_httpStatus,
  )
where

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

-- | Placeholder documentation for StartChannelRequest
--
-- /See:/ 'newStartChannel' smart constructor.
data StartChannel = StartChannel'
  { -- | A request to start a channel
    StartChannel -> Text
channelId :: Prelude.Text
  }
  deriving (StartChannel -> StartChannel -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartChannel -> StartChannel -> Bool
$c/= :: StartChannel -> StartChannel -> Bool
== :: StartChannel -> StartChannel -> Bool
$c== :: StartChannel -> StartChannel -> Bool
Prelude.Eq, ReadPrec [StartChannel]
ReadPrec StartChannel
Int -> ReadS StartChannel
ReadS [StartChannel]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartChannel]
$creadListPrec :: ReadPrec [StartChannel]
readPrec :: ReadPrec StartChannel
$creadPrec :: ReadPrec StartChannel
readList :: ReadS [StartChannel]
$creadList :: ReadS [StartChannel]
readsPrec :: Int -> ReadS StartChannel
$creadsPrec :: Int -> ReadS StartChannel
Prelude.Read, Int -> StartChannel -> ShowS
[StartChannel] -> ShowS
StartChannel -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartChannel] -> ShowS
$cshowList :: [StartChannel] -> ShowS
show :: StartChannel -> String
$cshow :: StartChannel -> String
showsPrec :: Int -> StartChannel -> ShowS
$cshowsPrec :: Int -> StartChannel -> ShowS
Prelude.Show, forall x. Rep StartChannel x -> StartChannel
forall x. StartChannel -> Rep StartChannel x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StartChannel x -> StartChannel
$cfrom :: forall x. StartChannel -> Rep StartChannel x
Prelude.Generic)

-- |
-- Create a value of 'StartChannel' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'channelId', 'startChannel_channelId' - A request to start a channel
newStartChannel ::
  -- | 'channelId'
  Prelude.Text ->
  StartChannel
newStartChannel :: Text -> StartChannel
newStartChannel Text
pChannelId_ =
  StartChannel' {$sel:channelId:StartChannel' :: Text
channelId = Text
pChannelId_}

-- | A request to start a channel
startChannel_channelId :: Lens.Lens' StartChannel Prelude.Text
startChannel_channelId :: Lens' StartChannel Text
startChannel_channelId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannel' {Text
channelId :: Text
$sel:channelId:StartChannel' :: StartChannel -> Text
channelId} -> Text
channelId) (\s :: StartChannel
s@StartChannel' {} Text
a -> StartChannel
s {$sel:channelId:StartChannel' :: Text
channelId = Text
a} :: StartChannel)

instance Core.AWSRequest StartChannel where
  type AWSResponse StartChannel = StartChannelResponse
  request :: (Service -> Service) -> StartChannel -> Request StartChannel
request Service -> Service
overrides =
    forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StartChannel
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse StartChannel)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
      ( \Int
s ResponseHeaders
h Object
x ->
          Maybe Text
-> Maybe CdiInputSpecification
-> Maybe ChannelClass
-> Maybe [OutputDestination]
-> Maybe [ChannelEgressEndpoint]
-> Maybe EncoderSettings
-> Maybe Text
-> Maybe [InputAttachment]
-> Maybe InputSpecification
-> Maybe LogLevel
-> Maybe MaintenanceStatus
-> Maybe Text
-> Maybe [PipelineDetail]
-> Maybe Int
-> Maybe Text
-> Maybe ChannelState
-> Maybe (HashMap Text Text)
-> Maybe VpcOutputSettingsDescription
-> Int
-> StartChannelResponse
StartChannelResponse'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"arn")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"cdiInputSpecification")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"channelClass")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"destinations" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
                            forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"egressEndpoints"
                            forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
                        )
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"encoderSettings")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"id")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
                            forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"inputAttachments"
                            forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
                        )
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"inputSpecification")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"logLevel")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"maintenance")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"name")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
                            forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"pipelineDetails"
                            forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
                        )
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"pipelinesRunningCount")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"roleArn")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"state")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"tags" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"vpc")
            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 StartChannel where
  hashWithSalt :: Int -> StartChannel -> Int
hashWithSalt Int
_salt StartChannel' {Text
channelId :: Text
$sel:channelId:StartChannel' :: StartChannel -> Text
..} =
    Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
channelId

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

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

instance Data.ToJSON StartChannel where
  toJSON :: StartChannel -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)

instance Data.ToPath StartChannel where
  toPath :: StartChannel -> ByteString
toPath StartChannel' {Text
channelId :: Text
$sel:channelId:StartChannel' :: StartChannel -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ByteString
"/prod/channels/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
channelId, ByteString
"/start"]

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

-- | Placeholder documentation for StartChannelResponse
--
-- /See:/ 'newStartChannelResponse' smart constructor.
data StartChannelResponse = StartChannelResponse'
  { -- | The unique arn of the channel.
    StartChannelResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
    -- | Specification of CDI inputs for this channel
    StartChannelResponse -> Maybe CdiInputSpecification
cdiInputSpecification :: Prelude.Maybe CdiInputSpecification,
    -- | The class for this channel. STANDARD for a channel with two pipelines or
    -- SINGLE_PIPELINE for a channel with one pipeline.
    StartChannelResponse -> Maybe ChannelClass
channelClass :: Prelude.Maybe ChannelClass,
    -- | A list of destinations of the channel. For UDP outputs, there is one
    -- destination per output. For other types (HLS, for example), there is one
    -- destination per packager.
    StartChannelResponse -> Maybe [OutputDestination]
destinations :: Prelude.Maybe [OutputDestination],
    -- | The endpoints where outgoing connections initiate from
    StartChannelResponse -> Maybe [ChannelEgressEndpoint]
egressEndpoints :: Prelude.Maybe [ChannelEgressEndpoint],
    StartChannelResponse -> Maybe EncoderSettings
encoderSettings :: Prelude.Maybe EncoderSettings,
    -- | The unique id of the channel.
    StartChannelResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
    -- | List of input attachments for channel.
    StartChannelResponse -> Maybe [InputAttachment]
inputAttachments :: Prelude.Maybe [InputAttachment],
    -- | Specification of network and file inputs for this channel
    StartChannelResponse -> Maybe InputSpecification
inputSpecification :: Prelude.Maybe InputSpecification,
    -- | The log level being written to CloudWatch Logs.
    StartChannelResponse -> Maybe LogLevel
logLevel :: Prelude.Maybe LogLevel,
    -- | Maintenance settings for this channel.
    StartChannelResponse -> Maybe MaintenanceStatus
maintenance :: Prelude.Maybe MaintenanceStatus,
    -- | The name of the channel. (user-mutable)
    StartChannelResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
    -- | Runtime details for the pipelines of a running channel.
    StartChannelResponse -> Maybe [PipelineDetail]
pipelineDetails :: Prelude.Maybe [PipelineDetail],
    -- | The number of currently healthy pipelines.
    StartChannelResponse -> Maybe Int
pipelinesRunningCount :: Prelude.Maybe Prelude.Int,
    -- | The Amazon Resource Name (ARN) of the role assumed when running the
    -- Channel.
    StartChannelResponse -> Maybe Text
roleArn :: Prelude.Maybe Prelude.Text,
    StartChannelResponse -> Maybe ChannelState
state :: Prelude.Maybe ChannelState,
    -- | A collection of key-value pairs.
    StartChannelResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
    -- | Settings for VPC output
    StartChannelResponse -> Maybe VpcOutputSettingsDescription
vpc :: Prelude.Maybe VpcOutputSettingsDescription,
    -- | The response's http status code.
    StartChannelResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (StartChannelResponse -> StartChannelResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartChannelResponse -> StartChannelResponse -> Bool
$c/= :: StartChannelResponse -> StartChannelResponse -> Bool
== :: StartChannelResponse -> StartChannelResponse -> Bool
$c== :: StartChannelResponse -> StartChannelResponse -> Bool
Prelude.Eq, ReadPrec [StartChannelResponse]
ReadPrec StartChannelResponse
Int -> ReadS StartChannelResponse
ReadS [StartChannelResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartChannelResponse]
$creadListPrec :: ReadPrec [StartChannelResponse]
readPrec :: ReadPrec StartChannelResponse
$creadPrec :: ReadPrec StartChannelResponse
readList :: ReadS [StartChannelResponse]
$creadList :: ReadS [StartChannelResponse]
readsPrec :: Int -> ReadS StartChannelResponse
$creadsPrec :: Int -> ReadS StartChannelResponse
Prelude.Read, Int -> StartChannelResponse -> ShowS
[StartChannelResponse] -> ShowS
StartChannelResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartChannelResponse] -> ShowS
$cshowList :: [StartChannelResponse] -> ShowS
show :: StartChannelResponse -> String
$cshow :: StartChannelResponse -> String
showsPrec :: Int -> StartChannelResponse -> ShowS
$cshowsPrec :: Int -> StartChannelResponse -> ShowS
Prelude.Show, forall x. Rep StartChannelResponse x -> StartChannelResponse
forall x. StartChannelResponse -> Rep StartChannelResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StartChannelResponse x -> StartChannelResponse
$cfrom :: forall x. StartChannelResponse -> Rep StartChannelResponse x
Prelude.Generic)

-- |
-- Create a value of 'StartChannelResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'arn', 'startChannelResponse_arn' - The unique arn of the channel.
--
-- 'cdiInputSpecification', 'startChannelResponse_cdiInputSpecification' - Specification of CDI inputs for this channel
--
-- 'channelClass', 'startChannelResponse_channelClass' - The class for this channel. STANDARD for a channel with two pipelines or
-- SINGLE_PIPELINE for a channel with one pipeline.
--
-- 'destinations', 'startChannelResponse_destinations' - A list of destinations of the channel. For UDP outputs, there is one
-- destination per output. For other types (HLS, for example), there is one
-- destination per packager.
--
-- 'egressEndpoints', 'startChannelResponse_egressEndpoints' - The endpoints where outgoing connections initiate from
--
-- 'encoderSettings', 'startChannelResponse_encoderSettings' - Undocumented member.
--
-- 'id', 'startChannelResponse_id' - The unique id of the channel.
--
-- 'inputAttachments', 'startChannelResponse_inputAttachments' - List of input attachments for channel.
--
-- 'inputSpecification', 'startChannelResponse_inputSpecification' - Specification of network and file inputs for this channel
--
-- 'logLevel', 'startChannelResponse_logLevel' - The log level being written to CloudWatch Logs.
--
-- 'maintenance', 'startChannelResponse_maintenance' - Maintenance settings for this channel.
--
-- 'name', 'startChannelResponse_name' - The name of the channel. (user-mutable)
--
-- 'pipelineDetails', 'startChannelResponse_pipelineDetails' - Runtime details for the pipelines of a running channel.
--
-- 'pipelinesRunningCount', 'startChannelResponse_pipelinesRunningCount' - The number of currently healthy pipelines.
--
-- 'roleArn', 'startChannelResponse_roleArn' - The Amazon Resource Name (ARN) of the role assumed when running the
-- Channel.
--
-- 'state', 'startChannelResponse_state' - Undocumented member.
--
-- 'tags', 'startChannelResponse_tags' - A collection of key-value pairs.
--
-- 'vpc', 'startChannelResponse_vpc' - Settings for VPC output
--
-- 'httpStatus', 'startChannelResponse_httpStatus' - The response's http status code.
newStartChannelResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  StartChannelResponse
newStartChannelResponse :: Int -> StartChannelResponse
newStartChannelResponse Int
pHttpStatus_ =
  StartChannelResponse'
    { $sel:arn:StartChannelResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
      $sel:cdiInputSpecification:StartChannelResponse' :: Maybe CdiInputSpecification
cdiInputSpecification = forall a. Maybe a
Prelude.Nothing,
      $sel:channelClass:StartChannelResponse' :: Maybe ChannelClass
channelClass = forall a. Maybe a
Prelude.Nothing,
      $sel:destinations:StartChannelResponse' :: Maybe [OutputDestination]
destinations = forall a. Maybe a
Prelude.Nothing,
      $sel:egressEndpoints:StartChannelResponse' :: Maybe [ChannelEgressEndpoint]
egressEndpoints = forall a. Maybe a
Prelude.Nothing,
      $sel:encoderSettings:StartChannelResponse' :: Maybe EncoderSettings
encoderSettings = forall a. Maybe a
Prelude.Nothing,
      $sel:id:StartChannelResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
      $sel:inputAttachments:StartChannelResponse' :: Maybe [InputAttachment]
inputAttachments = forall a. Maybe a
Prelude.Nothing,
      $sel:inputSpecification:StartChannelResponse' :: Maybe InputSpecification
inputSpecification = forall a. Maybe a
Prelude.Nothing,
      $sel:logLevel:StartChannelResponse' :: Maybe LogLevel
logLevel = forall a. Maybe a
Prelude.Nothing,
      $sel:maintenance:StartChannelResponse' :: Maybe MaintenanceStatus
maintenance = forall a. Maybe a
Prelude.Nothing,
      $sel:name:StartChannelResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
      $sel:pipelineDetails:StartChannelResponse' :: Maybe [PipelineDetail]
pipelineDetails = forall a. Maybe a
Prelude.Nothing,
      $sel:pipelinesRunningCount:StartChannelResponse' :: Maybe Int
pipelinesRunningCount = forall a. Maybe a
Prelude.Nothing,
      $sel:roleArn:StartChannelResponse' :: Maybe Text
roleArn = forall a. Maybe a
Prelude.Nothing,
      $sel:state:StartChannelResponse' :: Maybe ChannelState
state = forall a. Maybe a
Prelude.Nothing,
      $sel:tags:StartChannelResponse' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
      $sel:vpc:StartChannelResponse' :: Maybe VpcOutputSettingsDescription
vpc = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:StartChannelResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The unique arn of the channel.
startChannelResponse_arn :: Lens.Lens' StartChannelResponse (Prelude.Maybe Prelude.Text)
startChannelResponse_arn :: Lens' StartChannelResponse (Maybe Text)
startChannelResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:StartChannelResponse' :: StartChannelResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe Text
a -> StartChannelResponse
s {$sel:arn:StartChannelResponse' :: Maybe Text
arn = Maybe Text
a} :: StartChannelResponse)

-- | Specification of CDI inputs for this channel
startChannelResponse_cdiInputSpecification :: Lens.Lens' StartChannelResponse (Prelude.Maybe CdiInputSpecification)
startChannelResponse_cdiInputSpecification :: Lens' StartChannelResponse (Maybe CdiInputSpecification)
startChannelResponse_cdiInputSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe CdiInputSpecification
cdiInputSpecification :: Maybe CdiInputSpecification
$sel:cdiInputSpecification:StartChannelResponse' :: StartChannelResponse -> Maybe CdiInputSpecification
cdiInputSpecification} -> Maybe CdiInputSpecification
cdiInputSpecification) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe CdiInputSpecification
a -> StartChannelResponse
s {$sel:cdiInputSpecification:StartChannelResponse' :: Maybe CdiInputSpecification
cdiInputSpecification = Maybe CdiInputSpecification
a} :: StartChannelResponse)

-- | The class for this channel. STANDARD for a channel with two pipelines or
-- SINGLE_PIPELINE for a channel with one pipeline.
startChannelResponse_channelClass :: Lens.Lens' StartChannelResponse (Prelude.Maybe ChannelClass)
startChannelResponse_channelClass :: Lens' StartChannelResponse (Maybe ChannelClass)
startChannelResponse_channelClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe ChannelClass
channelClass :: Maybe ChannelClass
$sel:channelClass:StartChannelResponse' :: StartChannelResponse -> Maybe ChannelClass
channelClass} -> Maybe ChannelClass
channelClass) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe ChannelClass
a -> StartChannelResponse
s {$sel:channelClass:StartChannelResponse' :: Maybe ChannelClass
channelClass = Maybe ChannelClass
a} :: StartChannelResponse)

-- | A list of destinations of the channel. For UDP outputs, there is one
-- destination per output. For other types (HLS, for example), there is one
-- destination per packager.
startChannelResponse_destinations :: Lens.Lens' StartChannelResponse (Prelude.Maybe [OutputDestination])
startChannelResponse_destinations :: Lens' StartChannelResponse (Maybe [OutputDestination])
startChannelResponse_destinations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe [OutputDestination]
destinations :: Maybe [OutputDestination]
$sel:destinations:StartChannelResponse' :: StartChannelResponse -> Maybe [OutputDestination]
destinations} -> Maybe [OutputDestination]
destinations) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe [OutputDestination]
a -> StartChannelResponse
s {$sel:destinations:StartChannelResponse' :: Maybe [OutputDestination]
destinations = Maybe [OutputDestination]
a} :: StartChannelResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | The endpoints where outgoing connections initiate from
startChannelResponse_egressEndpoints :: Lens.Lens' StartChannelResponse (Prelude.Maybe [ChannelEgressEndpoint])
startChannelResponse_egressEndpoints :: Lens' StartChannelResponse (Maybe [ChannelEgressEndpoint])
startChannelResponse_egressEndpoints = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe [ChannelEgressEndpoint]
egressEndpoints :: Maybe [ChannelEgressEndpoint]
$sel:egressEndpoints:StartChannelResponse' :: StartChannelResponse -> Maybe [ChannelEgressEndpoint]
egressEndpoints} -> Maybe [ChannelEgressEndpoint]
egressEndpoints) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe [ChannelEgressEndpoint]
a -> StartChannelResponse
s {$sel:egressEndpoints:StartChannelResponse' :: Maybe [ChannelEgressEndpoint]
egressEndpoints = Maybe [ChannelEgressEndpoint]
a} :: StartChannelResponse) 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

-- | Undocumented member.
startChannelResponse_encoderSettings :: Lens.Lens' StartChannelResponse (Prelude.Maybe EncoderSettings)
startChannelResponse_encoderSettings :: Lens' StartChannelResponse (Maybe EncoderSettings)
startChannelResponse_encoderSettings = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe EncoderSettings
encoderSettings :: Maybe EncoderSettings
$sel:encoderSettings:StartChannelResponse' :: StartChannelResponse -> Maybe EncoderSettings
encoderSettings} -> Maybe EncoderSettings
encoderSettings) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe EncoderSettings
a -> StartChannelResponse
s {$sel:encoderSettings:StartChannelResponse' :: Maybe EncoderSettings
encoderSettings = Maybe EncoderSettings
a} :: StartChannelResponse)

-- | The unique id of the channel.
startChannelResponse_id :: Lens.Lens' StartChannelResponse (Prelude.Maybe Prelude.Text)
startChannelResponse_id :: Lens' StartChannelResponse (Maybe Text)
startChannelResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe Text
id :: Maybe Text
$sel:id:StartChannelResponse' :: StartChannelResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe Text
a -> StartChannelResponse
s {$sel:id:StartChannelResponse' :: Maybe Text
id = Maybe Text
a} :: StartChannelResponse)

-- | List of input attachments for channel.
startChannelResponse_inputAttachments :: Lens.Lens' StartChannelResponse (Prelude.Maybe [InputAttachment])
startChannelResponse_inputAttachments :: Lens' StartChannelResponse (Maybe [InputAttachment])
startChannelResponse_inputAttachments = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe [InputAttachment]
inputAttachments :: Maybe [InputAttachment]
$sel:inputAttachments:StartChannelResponse' :: StartChannelResponse -> Maybe [InputAttachment]
inputAttachments} -> Maybe [InputAttachment]
inputAttachments) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe [InputAttachment]
a -> StartChannelResponse
s {$sel:inputAttachments:StartChannelResponse' :: Maybe [InputAttachment]
inputAttachments = Maybe [InputAttachment]
a} :: StartChannelResponse) 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

-- | Specification of network and file inputs for this channel
startChannelResponse_inputSpecification :: Lens.Lens' StartChannelResponse (Prelude.Maybe InputSpecification)
startChannelResponse_inputSpecification :: Lens' StartChannelResponse (Maybe InputSpecification)
startChannelResponse_inputSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe InputSpecification
inputSpecification :: Maybe InputSpecification
$sel:inputSpecification:StartChannelResponse' :: StartChannelResponse -> Maybe InputSpecification
inputSpecification} -> Maybe InputSpecification
inputSpecification) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe InputSpecification
a -> StartChannelResponse
s {$sel:inputSpecification:StartChannelResponse' :: Maybe InputSpecification
inputSpecification = Maybe InputSpecification
a} :: StartChannelResponse)

-- | The log level being written to CloudWatch Logs.
startChannelResponse_logLevel :: Lens.Lens' StartChannelResponse (Prelude.Maybe LogLevel)
startChannelResponse_logLevel :: Lens' StartChannelResponse (Maybe LogLevel)
startChannelResponse_logLevel = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe LogLevel
logLevel :: Maybe LogLevel
$sel:logLevel:StartChannelResponse' :: StartChannelResponse -> Maybe LogLevel
logLevel} -> Maybe LogLevel
logLevel) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe LogLevel
a -> StartChannelResponse
s {$sel:logLevel:StartChannelResponse' :: Maybe LogLevel
logLevel = Maybe LogLevel
a} :: StartChannelResponse)

-- | Maintenance settings for this channel.
startChannelResponse_maintenance :: Lens.Lens' StartChannelResponse (Prelude.Maybe MaintenanceStatus)
startChannelResponse_maintenance :: Lens' StartChannelResponse (Maybe MaintenanceStatus)
startChannelResponse_maintenance = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe MaintenanceStatus
maintenance :: Maybe MaintenanceStatus
$sel:maintenance:StartChannelResponse' :: StartChannelResponse -> Maybe MaintenanceStatus
maintenance} -> Maybe MaintenanceStatus
maintenance) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe MaintenanceStatus
a -> StartChannelResponse
s {$sel:maintenance:StartChannelResponse' :: Maybe MaintenanceStatus
maintenance = Maybe MaintenanceStatus
a} :: StartChannelResponse)

-- | The name of the channel. (user-mutable)
startChannelResponse_name :: Lens.Lens' StartChannelResponse (Prelude.Maybe Prelude.Text)
startChannelResponse_name :: Lens' StartChannelResponse (Maybe Text)
startChannelResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe Text
name :: Maybe Text
$sel:name:StartChannelResponse' :: StartChannelResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe Text
a -> StartChannelResponse
s {$sel:name:StartChannelResponse' :: Maybe Text
name = Maybe Text
a} :: StartChannelResponse)

-- | Runtime details for the pipelines of a running channel.
startChannelResponse_pipelineDetails :: Lens.Lens' StartChannelResponse (Prelude.Maybe [PipelineDetail])
startChannelResponse_pipelineDetails :: Lens' StartChannelResponse (Maybe [PipelineDetail])
startChannelResponse_pipelineDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe [PipelineDetail]
pipelineDetails :: Maybe [PipelineDetail]
$sel:pipelineDetails:StartChannelResponse' :: StartChannelResponse -> Maybe [PipelineDetail]
pipelineDetails} -> Maybe [PipelineDetail]
pipelineDetails) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe [PipelineDetail]
a -> StartChannelResponse
s {$sel:pipelineDetails:StartChannelResponse' :: Maybe [PipelineDetail]
pipelineDetails = Maybe [PipelineDetail]
a} :: StartChannelResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | The number of currently healthy pipelines.
startChannelResponse_pipelinesRunningCount :: Lens.Lens' StartChannelResponse (Prelude.Maybe Prelude.Int)
startChannelResponse_pipelinesRunningCount :: Lens' StartChannelResponse (Maybe Int)
startChannelResponse_pipelinesRunningCount = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe Int
pipelinesRunningCount :: Maybe Int
$sel:pipelinesRunningCount:StartChannelResponse' :: StartChannelResponse -> Maybe Int
pipelinesRunningCount} -> Maybe Int
pipelinesRunningCount) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe Int
a -> StartChannelResponse
s {$sel:pipelinesRunningCount:StartChannelResponse' :: Maybe Int
pipelinesRunningCount = Maybe Int
a} :: StartChannelResponse)

-- | The Amazon Resource Name (ARN) of the role assumed when running the
-- Channel.
startChannelResponse_roleArn :: Lens.Lens' StartChannelResponse (Prelude.Maybe Prelude.Text)
startChannelResponse_roleArn :: Lens' StartChannelResponse (Maybe Text)
startChannelResponse_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe Text
roleArn :: Maybe Text
$sel:roleArn:StartChannelResponse' :: StartChannelResponse -> Maybe Text
roleArn} -> Maybe Text
roleArn) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe Text
a -> StartChannelResponse
s {$sel:roleArn:StartChannelResponse' :: Maybe Text
roleArn = Maybe Text
a} :: StartChannelResponse)

-- | Undocumented member.
startChannelResponse_state :: Lens.Lens' StartChannelResponse (Prelude.Maybe ChannelState)
startChannelResponse_state :: Lens' StartChannelResponse (Maybe ChannelState)
startChannelResponse_state = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe ChannelState
state :: Maybe ChannelState
$sel:state:StartChannelResponse' :: StartChannelResponse -> Maybe ChannelState
state} -> Maybe ChannelState
state) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe ChannelState
a -> StartChannelResponse
s {$sel:state:StartChannelResponse' :: Maybe ChannelState
state = Maybe ChannelState
a} :: StartChannelResponse)

-- | A collection of key-value pairs.
startChannelResponse_tags :: Lens.Lens' StartChannelResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
startChannelResponse_tags :: Lens' StartChannelResponse (Maybe (HashMap Text Text))
startChannelResponse_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:StartChannelResponse' :: StartChannelResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe (HashMap Text Text)
a -> StartChannelResponse
s {$sel:tags:StartChannelResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: StartChannelResponse) 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

-- | Settings for VPC output
startChannelResponse_vpc :: Lens.Lens' StartChannelResponse (Prelude.Maybe VpcOutputSettingsDescription)
startChannelResponse_vpc :: Lens' StartChannelResponse (Maybe VpcOutputSettingsDescription)
startChannelResponse_vpc = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartChannelResponse' {Maybe VpcOutputSettingsDescription
vpc :: Maybe VpcOutputSettingsDescription
$sel:vpc:StartChannelResponse' :: StartChannelResponse -> Maybe VpcOutputSettingsDescription
vpc} -> Maybe VpcOutputSettingsDescription
vpc) (\s :: StartChannelResponse
s@StartChannelResponse' {} Maybe VpcOutputSettingsDescription
a -> StartChannelResponse
s {$sel:vpc:StartChannelResponse' :: Maybe VpcOutputSettingsDescription
vpc = Maybe VpcOutputSettingsDescription
a} :: StartChannelResponse)

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

instance Prelude.NFData StartChannelResponse where
  rnf :: StartChannelResponse -> ()
rnf StartChannelResponse' {Int
Maybe Int
Maybe [ChannelEgressEndpoint]
Maybe [OutputDestination]
Maybe [PipelineDetail]
Maybe [InputAttachment]
Maybe Text
Maybe (HashMap Text Text)
Maybe CdiInputSpecification
Maybe ChannelClass
Maybe ChannelState
Maybe InputSpecification
Maybe LogLevel
Maybe MaintenanceStatus
Maybe VpcOutputSettingsDescription
Maybe EncoderSettings
httpStatus :: Int
vpc :: Maybe VpcOutputSettingsDescription
tags :: Maybe (HashMap Text Text)
state :: Maybe ChannelState
roleArn :: Maybe Text
pipelinesRunningCount :: Maybe Int
pipelineDetails :: Maybe [PipelineDetail]
name :: Maybe Text
maintenance :: Maybe MaintenanceStatus
logLevel :: Maybe LogLevel
inputSpecification :: Maybe InputSpecification
inputAttachments :: Maybe [InputAttachment]
id :: Maybe Text
encoderSettings :: Maybe EncoderSettings
egressEndpoints :: Maybe [ChannelEgressEndpoint]
destinations :: Maybe [OutputDestination]
channelClass :: Maybe ChannelClass
cdiInputSpecification :: Maybe CdiInputSpecification
arn :: Maybe Text
$sel:httpStatus:StartChannelResponse' :: StartChannelResponse -> Int
$sel:vpc:StartChannelResponse' :: StartChannelResponse -> Maybe VpcOutputSettingsDescription
$sel:tags:StartChannelResponse' :: StartChannelResponse -> Maybe (HashMap Text Text)
$sel:state:StartChannelResponse' :: StartChannelResponse -> Maybe ChannelState
$sel:roleArn:StartChannelResponse' :: StartChannelResponse -> Maybe Text
$sel:pipelinesRunningCount:StartChannelResponse' :: StartChannelResponse -> Maybe Int
$sel:pipelineDetails:StartChannelResponse' :: StartChannelResponse -> Maybe [PipelineDetail]
$sel:name:StartChannelResponse' :: StartChannelResponse -> Maybe Text
$sel:maintenance:StartChannelResponse' :: StartChannelResponse -> Maybe MaintenanceStatus
$sel:logLevel:StartChannelResponse' :: StartChannelResponse -> Maybe LogLevel
$sel:inputSpecification:StartChannelResponse' :: StartChannelResponse -> Maybe InputSpecification
$sel:inputAttachments:StartChannelResponse' :: StartChannelResponse -> Maybe [InputAttachment]
$sel:id:StartChannelResponse' :: StartChannelResponse -> Maybe Text
$sel:encoderSettings:StartChannelResponse' :: StartChannelResponse -> Maybe EncoderSettings
$sel:egressEndpoints:StartChannelResponse' :: StartChannelResponse -> Maybe [ChannelEgressEndpoint]
$sel:destinations:StartChannelResponse' :: StartChannelResponse -> Maybe [OutputDestination]
$sel:channelClass:StartChannelResponse' :: StartChannelResponse -> Maybe ChannelClass
$sel:cdiInputSpecification:StartChannelResponse' :: StartChannelResponse -> Maybe CdiInputSpecification
$sel:arn:StartChannelResponse' :: StartChannelResponse -> 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 CdiInputSpecification
cdiInputSpecification
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ChannelClass
channelClass
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [OutputDestination]
destinations
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ChannelEgressEndpoint]
egressEndpoints
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe EncoderSettings
encoderSettings
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
id
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [InputAttachment]
inputAttachments
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe InputSpecification
inputSpecification
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LogLevel
logLevel
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe MaintenanceStatus
maintenance
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [PipelineDetail]
pipelineDetails
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
pipelinesRunningCount
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
roleArn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ChannelState
state
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
tags
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe VpcOutputSettingsDescription
vpc
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus