{-# 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.Chime.DeleteAppInstanceStreamingConfigurations
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deletes the streaming configurations of an @AppInstance@.
module Amazonka.Chime.DeleteAppInstanceStreamingConfigurations
  ( -- * Creating a Request
    DeleteAppInstanceStreamingConfigurations (..),
    newDeleteAppInstanceStreamingConfigurations,

    -- * Request Lenses
    deleteAppInstanceStreamingConfigurations_appInstanceArn,

    -- * Destructuring the Response
    DeleteAppInstanceStreamingConfigurationsResponse (..),
    newDeleteAppInstanceStreamingConfigurationsResponse,
  )
where

import Amazonka.Chime.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

-- | /See:/ 'newDeleteAppInstanceStreamingConfigurations' smart constructor.
data DeleteAppInstanceStreamingConfigurations = DeleteAppInstanceStreamingConfigurations'
  { -- | The ARN of the streaming configurations being deleted.
    DeleteAppInstanceStreamingConfigurations -> Text
appInstanceArn :: Prelude.Text
  }
  deriving (DeleteAppInstanceStreamingConfigurations
-> DeleteAppInstanceStreamingConfigurations -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteAppInstanceStreamingConfigurations
-> DeleteAppInstanceStreamingConfigurations -> Bool
$c/= :: DeleteAppInstanceStreamingConfigurations
-> DeleteAppInstanceStreamingConfigurations -> Bool
== :: DeleteAppInstanceStreamingConfigurations
-> DeleteAppInstanceStreamingConfigurations -> Bool
$c== :: DeleteAppInstanceStreamingConfigurations
-> DeleteAppInstanceStreamingConfigurations -> Bool
Prelude.Eq, ReadPrec [DeleteAppInstanceStreamingConfigurations]
ReadPrec DeleteAppInstanceStreamingConfigurations
Int -> ReadS DeleteAppInstanceStreamingConfigurations
ReadS [DeleteAppInstanceStreamingConfigurations]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteAppInstanceStreamingConfigurations]
$creadListPrec :: ReadPrec [DeleteAppInstanceStreamingConfigurations]
readPrec :: ReadPrec DeleteAppInstanceStreamingConfigurations
$creadPrec :: ReadPrec DeleteAppInstanceStreamingConfigurations
readList :: ReadS [DeleteAppInstanceStreamingConfigurations]
$creadList :: ReadS [DeleteAppInstanceStreamingConfigurations]
readsPrec :: Int -> ReadS DeleteAppInstanceStreamingConfigurations
$creadsPrec :: Int -> ReadS DeleteAppInstanceStreamingConfigurations
Prelude.Read, Int -> DeleteAppInstanceStreamingConfigurations -> ShowS
[DeleteAppInstanceStreamingConfigurations] -> ShowS
DeleteAppInstanceStreamingConfigurations -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteAppInstanceStreamingConfigurations] -> ShowS
$cshowList :: [DeleteAppInstanceStreamingConfigurations] -> ShowS
show :: DeleteAppInstanceStreamingConfigurations -> String
$cshow :: DeleteAppInstanceStreamingConfigurations -> String
showsPrec :: Int -> DeleteAppInstanceStreamingConfigurations -> ShowS
$cshowsPrec :: Int -> DeleteAppInstanceStreamingConfigurations -> ShowS
Prelude.Show, forall x.
Rep DeleteAppInstanceStreamingConfigurations x
-> DeleteAppInstanceStreamingConfigurations
forall x.
DeleteAppInstanceStreamingConfigurations
-> Rep DeleteAppInstanceStreamingConfigurations x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteAppInstanceStreamingConfigurations x
-> DeleteAppInstanceStreamingConfigurations
$cfrom :: forall x.
DeleteAppInstanceStreamingConfigurations
-> Rep DeleteAppInstanceStreamingConfigurations x
Prelude.Generic)

-- |
-- Create a value of 'DeleteAppInstanceStreamingConfigurations' 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:
--
-- 'appInstanceArn', 'deleteAppInstanceStreamingConfigurations_appInstanceArn' - The ARN of the streaming configurations being deleted.
newDeleteAppInstanceStreamingConfigurations ::
  -- | 'appInstanceArn'
  Prelude.Text ->
  DeleteAppInstanceStreamingConfigurations
newDeleteAppInstanceStreamingConfigurations :: Text -> DeleteAppInstanceStreamingConfigurations
newDeleteAppInstanceStreamingConfigurations
  Text
pAppInstanceArn_ =
    DeleteAppInstanceStreamingConfigurations'
      { $sel:appInstanceArn:DeleteAppInstanceStreamingConfigurations' :: Text
appInstanceArn =
          Text
pAppInstanceArn_
      }

-- | The ARN of the streaming configurations being deleted.
deleteAppInstanceStreamingConfigurations_appInstanceArn :: Lens.Lens' DeleteAppInstanceStreamingConfigurations Prelude.Text
deleteAppInstanceStreamingConfigurations_appInstanceArn :: Lens' DeleteAppInstanceStreamingConfigurations Text
deleteAppInstanceStreamingConfigurations_appInstanceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteAppInstanceStreamingConfigurations' {Text
appInstanceArn :: Text
$sel:appInstanceArn:DeleteAppInstanceStreamingConfigurations' :: DeleteAppInstanceStreamingConfigurations -> Text
appInstanceArn} -> Text
appInstanceArn) (\s :: DeleteAppInstanceStreamingConfigurations
s@DeleteAppInstanceStreamingConfigurations' {} Text
a -> DeleteAppInstanceStreamingConfigurations
s {$sel:appInstanceArn:DeleteAppInstanceStreamingConfigurations' :: Text
appInstanceArn = Text
a} :: DeleteAppInstanceStreamingConfigurations)

instance
  Core.AWSRequest
    DeleteAppInstanceStreamingConfigurations
  where
  type
    AWSResponse
      DeleteAppInstanceStreamingConfigurations =
      DeleteAppInstanceStreamingConfigurationsResponse
  request :: (Service -> Service)
-> DeleteAppInstanceStreamingConfigurations
-> Request DeleteAppInstanceStreamingConfigurations
request Service -> Service
overrides =
    forall a. ToRequest a => Service -> a -> Request a
Request.delete (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DeleteAppInstanceStreamingConfigurations
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse
           (AWSResponse DeleteAppInstanceStreamingConfigurations)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
      DeleteAppInstanceStreamingConfigurationsResponse
DeleteAppInstanceStreamingConfigurationsResponse'

instance
  Prelude.Hashable
    DeleteAppInstanceStreamingConfigurations
  where
  hashWithSalt :: Int -> DeleteAppInstanceStreamingConfigurations -> Int
hashWithSalt
    Int
_salt
    DeleteAppInstanceStreamingConfigurations' {Text
appInstanceArn :: Text
$sel:appInstanceArn:DeleteAppInstanceStreamingConfigurations' :: DeleteAppInstanceStreamingConfigurations -> Text
..} =
      Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appInstanceArn

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

instance
  Data.ToHeaders
    DeleteAppInstanceStreamingConfigurations
  where
  toHeaders :: DeleteAppInstanceStreamingConfigurations -> [Header]
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance
  Data.ToPath
    DeleteAppInstanceStreamingConfigurations
  where
  toPath :: DeleteAppInstanceStreamingConfigurations -> ByteString
toPath DeleteAppInstanceStreamingConfigurations' {Text
appInstanceArn :: Text
$sel:appInstanceArn:DeleteAppInstanceStreamingConfigurations' :: DeleteAppInstanceStreamingConfigurations -> Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/app-instances/",
        forall a. ToByteString a => a -> ByteString
Data.toBS Text
appInstanceArn,
        ByteString
"/streaming-configurations"
      ]

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

-- | /See:/ 'newDeleteAppInstanceStreamingConfigurationsResponse' smart constructor.
data DeleteAppInstanceStreamingConfigurationsResponse = DeleteAppInstanceStreamingConfigurationsResponse'
  {
  }
  deriving (DeleteAppInstanceStreamingConfigurationsResponse
-> DeleteAppInstanceStreamingConfigurationsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteAppInstanceStreamingConfigurationsResponse
-> DeleteAppInstanceStreamingConfigurationsResponse -> Bool
$c/= :: DeleteAppInstanceStreamingConfigurationsResponse
-> DeleteAppInstanceStreamingConfigurationsResponse -> Bool
== :: DeleteAppInstanceStreamingConfigurationsResponse
-> DeleteAppInstanceStreamingConfigurationsResponse -> Bool
$c== :: DeleteAppInstanceStreamingConfigurationsResponse
-> DeleteAppInstanceStreamingConfigurationsResponse -> Bool
Prelude.Eq, ReadPrec [DeleteAppInstanceStreamingConfigurationsResponse]
ReadPrec DeleteAppInstanceStreamingConfigurationsResponse
Int -> ReadS DeleteAppInstanceStreamingConfigurationsResponse
ReadS [DeleteAppInstanceStreamingConfigurationsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteAppInstanceStreamingConfigurationsResponse]
$creadListPrec :: ReadPrec [DeleteAppInstanceStreamingConfigurationsResponse]
readPrec :: ReadPrec DeleteAppInstanceStreamingConfigurationsResponse
$creadPrec :: ReadPrec DeleteAppInstanceStreamingConfigurationsResponse
readList :: ReadS [DeleteAppInstanceStreamingConfigurationsResponse]
$creadList :: ReadS [DeleteAppInstanceStreamingConfigurationsResponse]
readsPrec :: Int -> ReadS DeleteAppInstanceStreamingConfigurationsResponse
$creadsPrec :: Int -> ReadS DeleteAppInstanceStreamingConfigurationsResponse
Prelude.Read, Int -> DeleteAppInstanceStreamingConfigurationsResponse -> ShowS
[DeleteAppInstanceStreamingConfigurationsResponse] -> ShowS
DeleteAppInstanceStreamingConfigurationsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteAppInstanceStreamingConfigurationsResponse] -> ShowS
$cshowList :: [DeleteAppInstanceStreamingConfigurationsResponse] -> ShowS
show :: DeleteAppInstanceStreamingConfigurationsResponse -> String
$cshow :: DeleteAppInstanceStreamingConfigurationsResponse -> String
showsPrec :: Int -> DeleteAppInstanceStreamingConfigurationsResponse -> ShowS
$cshowsPrec :: Int -> DeleteAppInstanceStreamingConfigurationsResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteAppInstanceStreamingConfigurationsResponse x
-> DeleteAppInstanceStreamingConfigurationsResponse
forall x.
DeleteAppInstanceStreamingConfigurationsResponse
-> Rep DeleteAppInstanceStreamingConfigurationsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteAppInstanceStreamingConfigurationsResponse x
-> DeleteAppInstanceStreamingConfigurationsResponse
$cfrom :: forall x.
DeleteAppInstanceStreamingConfigurationsResponse
-> Rep DeleteAppInstanceStreamingConfigurationsResponse x
Prelude.Generic)

-- |
-- Create a value of 'DeleteAppInstanceStreamingConfigurationsResponse' 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.
newDeleteAppInstanceStreamingConfigurationsResponse ::
  DeleteAppInstanceStreamingConfigurationsResponse
newDeleteAppInstanceStreamingConfigurationsResponse :: DeleteAppInstanceStreamingConfigurationsResponse
newDeleteAppInstanceStreamingConfigurationsResponse =
  DeleteAppInstanceStreamingConfigurationsResponse
DeleteAppInstanceStreamingConfigurationsResponse'

instance
  Prelude.NFData
    DeleteAppInstanceStreamingConfigurationsResponse
  where
  rnf :: DeleteAppInstanceStreamingConfigurationsResponse -> ()
rnf DeleteAppInstanceStreamingConfigurationsResponse
_ = ()