{-# 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.IoTWireless.GetLogLevelsByResourceTypes
(
GetLogLevelsByResourceTypes (..),
newGetLogLevelsByResourceTypes,
GetLogLevelsByResourceTypesResponse (..),
newGetLogLevelsByResourceTypesResponse,
getLogLevelsByResourceTypesResponse_defaultLogLevel,
getLogLevelsByResourceTypesResponse_wirelessGatewayLogOptions,
getLogLevelsByResourceTypesResponse_wirelessDeviceLogOptions,
getLogLevelsByResourceTypesResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import Amazonka.IoTWireless.Types
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetLogLevelsByResourceTypes = GetLogLevelsByResourceTypes'
{
}
deriving (GetLogLevelsByResourceTypes -> GetLogLevelsByResourceTypes -> Bool
(GetLogLevelsByResourceTypes
-> GetLogLevelsByResourceTypes -> Bool)
-> (GetLogLevelsByResourceTypes
-> GetLogLevelsByResourceTypes -> Bool)
-> Eq GetLogLevelsByResourceTypes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetLogLevelsByResourceTypes -> GetLogLevelsByResourceTypes -> Bool
$c/= :: GetLogLevelsByResourceTypes -> GetLogLevelsByResourceTypes -> Bool
== :: GetLogLevelsByResourceTypes -> GetLogLevelsByResourceTypes -> Bool
$c== :: GetLogLevelsByResourceTypes -> GetLogLevelsByResourceTypes -> Bool
Prelude.Eq, ReadPrec [GetLogLevelsByResourceTypes]
ReadPrec GetLogLevelsByResourceTypes
Int -> ReadS GetLogLevelsByResourceTypes
ReadS [GetLogLevelsByResourceTypes]
(Int -> ReadS GetLogLevelsByResourceTypes)
-> ReadS [GetLogLevelsByResourceTypes]
-> ReadPrec GetLogLevelsByResourceTypes
-> ReadPrec [GetLogLevelsByResourceTypes]
-> Read GetLogLevelsByResourceTypes
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetLogLevelsByResourceTypes]
$creadListPrec :: ReadPrec [GetLogLevelsByResourceTypes]
readPrec :: ReadPrec GetLogLevelsByResourceTypes
$creadPrec :: ReadPrec GetLogLevelsByResourceTypes
readList :: ReadS [GetLogLevelsByResourceTypes]
$creadList :: ReadS [GetLogLevelsByResourceTypes]
readsPrec :: Int -> ReadS GetLogLevelsByResourceTypes
$creadsPrec :: Int -> ReadS GetLogLevelsByResourceTypes
Prelude.Read, Int -> GetLogLevelsByResourceTypes -> ShowS
[GetLogLevelsByResourceTypes] -> ShowS
GetLogLevelsByResourceTypes -> String
(Int -> GetLogLevelsByResourceTypes -> ShowS)
-> (GetLogLevelsByResourceTypes -> String)
-> ([GetLogLevelsByResourceTypes] -> ShowS)
-> Show GetLogLevelsByResourceTypes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetLogLevelsByResourceTypes] -> ShowS
$cshowList :: [GetLogLevelsByResourceTypes] -> ShowS
show :: GetLogLevelsByResourceTypes -> String
$cshow :: GetLogLevelsByResourceTypes -> String
showsPrec :: Int -> GetLogLevelsByResourceTypes -> ShowS
$cshowsPrec :: Int -> GetLogLevelsByResourceTypes -> ShowS
Prelude.Show, (forall x.
GetLogLevelsByResourceTypes -> Rep GetLogLevelsByResourceTypes x)
-> (forall x.
Rep GetLogLevelsByResourceTypes x -> GetLogLevelsByResourceTypes)
-> Generic GetLogLevelsByResourceTypes
forall x.
Rep GetLogLevelsByResourceTypes x -> GetLogLevelsByResourceTypes
forall x.
GetLogLevelsByResourceTypes -> Rep GetLogLevelsByResourceTypes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetLogLevelsByResourceTypes x -> GetLogLevelsByResourceTypes
$cfrom :: forall x.
GetLogLevelsByResourceTypes -> Rep GetLogLevelsByResourceTypes x
Prelude.Generic)
newGetLogLevelsByResourceTypes ::
GetLogLevelsByResourceTypes
newGetLogLevelsByResourceTypes :: GetLogLevelsByResourceTypes
newGetLogLevelsByResourceTypes =
GetLogLevelsByResourceTypes
GetLogLevelsByResourceTypes'
instance Core.AWSRequest GetLogLevelsByResourceTypes where
type
AWSResponse GetLogLevelsByResourceTypes =
GetLogLevelsByResourceTypesResponse
request :: GetLogLevelsByResourceTypes -> Request GetLogLevelsByResourceTypes
request = Service
-> GetLogLevelsByResourceTypes
-> Request GetLogLevelsByResourceTypes
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy GetLogLevelsByResourceTypes
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetLogLevelsByResourceTypes)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse GetLogLevelsByResourceTypes))
-> Logger
-> Service
-> Proxy GetLogLevelsByResourceTypes
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetLogLevelsByResourceTypes)))
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 LogLevel
-> Maybe [WirelessGatewayLogOption]
-> Maybe [WirelessDeviceLogOption]
-> Int
-> GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse'
(Maybe LogLevel
-> Maybe [WirelessGatewayLogOption]
-> Maybe [WirelessDeviceLogOption]
-> Int
-> GetLogLevelsByResourceTypesResponse)
-> Either String (Maybe LogLevel)
-> Either
String
(Maybe [WirelessGatewayLogOption]
-> Maybe [WirelessDeviceLogOption]
-> Int
-> GetLogLevelsByResourceTypesResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Key -> Either String (Maybe LogLevel)
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Core..?> Key
"DefaultLogLevel")
Either
String
(Maybe [WirelessGatewayLogOption]
-> Maybe [WirelessDeviceLogOption]
-> Int
-> GetLogLevelsByResourceTypesResponse)
-> Either String (Maybe [WirelessGatewayLogOption])
-> Either
String
(Maybe [WirelessDeviceLogOption]
-> Int -> GetLogLevelsByResourceTypesResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object
-> Key -> Either String (Maybe (Maybe [WirelessGatewayLogOption]))
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Core..?> Key
"WirelessGatewayLogOptions"
Either String (Maybe (Maybe [WirelessGatewayLogOption]))
-> Maybe [WirelessGatewayLogOption]
-> Either String (Maybe [WirelessGatewayLogOption])
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe [WirelessGatewayLogOption]
forall a. Monoid a => a
Prelude.mempty
)
Either
String
(Maybe [WirelessDeviceLogOption]
-> Int -> GetLogLevelsByResourceTypesResponse)
-> Either String (Maybe [WirelessDeviceLogOption])
-> Either String (Int -> GetLogLevelsByResourceTypesResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object
-> Key -> Either String (Maybe (Maybe [WirelessDeviceLogOption]))
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Core..?> Key
"WirelessDeviceLogOptions"
Either String (Maybe (Maybe [WirelessDeviceLogOption]))
-> Maybe [WirelessDeviceLogOption]
-> Either String (Maybe [WirelessDeviceLogOption])
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe [WirelessDeviceLogOption]
forall a. Monoid a => a
Prelude.mempty
)
Either String (Int -> GetLogLevelsByResourceTypesResponse)
-> Either String Int
-> Either String GetLogLevelsByResourceTypesResponse
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 GetLogLevelsByResourceTypes
instance Prelude.NFData GetLogLevelsByResourceTypes
instance Core.ToHeaders GetLogLevelsByResourceTypes where
toHeaders :: GetLogLevelsByResourceTypes -> ResponseHeaders
toHeaders = ResponseHeaders -> GetLogLevelsByResourceTypes -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const ResponseHeaders
forall a. Monoid a => a
Prelude.mempty
instance Core.ToPath GetLogLevelsByResourceTypes where
toPath :: GetLogLevelsByResourceTypes -> ByteString
toPath = ByteString -> GetLogLevelsByResourceTypes -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/log-levels"
instance Core.ToQuery GetLogLevelsByResourceTypes where
toQuery :: GetLogLevelsByResourceTypes -> QueryString
toQuery = QueryString -> GetLogLevelsByResourceTypes -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data GetLogLevelsByResourceTypesResponse = GetLogLevelsByResourceTypesResponse'
{ GetLogLevelsByResourceTypesResponse -> Maybe LogLevel
defaultLogLevel :: Prelude.Maybe LogLevel,
GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions :: Prelude.Maybe [WirelessGatewayLogOption],
GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions :: Prelude.Maybe [WirelessDeviceLogOption],
GetLogLevelsByResourceTypesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool
(GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool)
-> (GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool)
-> Eq GetLogLevelsByResourceTypesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool
$c/= :: GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool
== :: GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool
$c== :: GetLogLevelsByResourceTypesResponse
-> GetLogLevelsByResourceTypesResponse -> Bool
Prelude.Eq, ReadPrec [GetLogLevelsByResourceTypesResponse]
ReadPrec GetLogLevelsByResourceTypesResponse
Int -> ReadS GetLogLevelsByResourceTypesResponse
ReadS [GetLogLevelsByResourceTypesResponse]
(Int -> ReadS GetLogLevelsByResourceTypesResponse)
-> ReadS [GetLogLevelsByResourceTypesResponse]
-> ReadPrec GetLogLevelsByResourceTypesResponse
-> ReadPrec [GetLogLevelsByResourceTypesResponse]
-> Read GetLogLevelsByResourceTypesResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetLogLevelsByResourceTypesResponse]
$creadListPrec :: ReadPrec [GetLogLevelsByResourceTypesResponse]
readPrec :: ReadPrec GetLogLevelsByResourceTypesResponse
$creadPrec :: ReadPrec GetLogLevelsByResourceTypesResponse
readList :: ReadS [GetLogLevelsByResourceTypesResponse]
$creadList :: ReadS [GetLogLevelsByResourceTypesResponse]
readsPrec :: Int -> ReadS GetLogLevelsByResourceTypesResponse
$creadsPrec :: Int -> ReadS GetLogLevelsByResourceTypesResponse
Prelude.Read, Int -> GetLogLevelsByResourceTypesResponse -> ShowS
[GetLogLevelsByResourceTypesResponse] -> ShowS
GetLogLevelsByResourceTypesResponse -> String
(Int -> GetLogLevelsByResourceTypesResponse -> ShowS)
-> (GetLogLevelsByResourceTypesResponse -> String)
-> ([GetLogLevelsByResourceTypesResponse] -> ShowS)
-> Show GetLogLevelsByResourceTypesResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetLogLevelsByResourceTypesResponse] -> ShowS
$cshowList :: [GetLogLevelsByResourceTypesResponse] -> ShowS
show :: GetLogLevelsByResourceTypesResponse -> String
$cshow :: GetLogLevelsByResourceTypesResponse -> String
showsPrec :: Int -> GetLogLevelsByResourceTypesResponse -> ShowS
$cshowsPrec :: Int -> GetLogLevelsByResourceTypesResponse -> ShowS
Prelude.Show, (forall x.
GetLogLevelsByResourceTypesResponse
-> Rep GetLogLevelsByResourceTypesResponse x)
-> (forall x.
Rep GetLogLevelsByResourceTypesResponse x
-> GetLogLevelsByResourceTypesResponse)
-> Generic GetLogLevelsByResourceTypesResponse
forall x.
Rep GetLogLevelsByResourceTypesResponse x
-> GetLogLevelsByResourceTypesResponse
forall x.
GetLogLevelsByResourceTypesResponse
-> Rep GetLogLevelsByResourceTypesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetLogLevelsByResourceTypesResponse x
-> GetLogLevelsByResourceTypesResponse
$cfrom :: forall x.
GetLogLevelsByResourceTypesResponse
-> Rep GetLogLevelsByResourceTypesResponse x
Prelude.Generic)
newGetLogLevelsByResourceTypesResponse ::
Prelude.Int ->
GetLogLevelsByResourceTypesResponse
newGetLogLevelsByResourceTypesResponse :: Int -> GetLogLevelsByResourceTypesResponse
newGetLogLevelsByResourceTypesResponse Int
pHttpStatus_ =
GetLogLevelsByResourceTypesResponse' :: Maybe LogLevel
-> Maybe [WirelessGatewayLogOption]
-> Maybe [WirelessDeviceLogOption]
-> Int
-> GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse'
{ $sel:defaultLogLevel:GetLogLevelsByResourceTypesResponse' :: Maybe LogLevel
defaultLogLevel =
Maybe LogLevel
forall a. Maybe a
Prelude.Nothing,
$sel:wirelessGatewayLogOptions:GetLogLevelsByResourceTypesResponse' :: Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions =
Maybe [WirelessGatewayLogOption]
forall a. Maybe a
Prelude.Nothing,
$sel:wirelessDeviceLogOptions:GetLogLevelsByResourceTypesResponse' :: Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions =
Maybe [WirelessDeviceLogOption]
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetLogLevelsByResourceTypesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getLogLevelsByResourceTypesResponse_defaultLogLevel :: Lens.Lens' GetLogLevelsByResourceTypesResponse (Prelude.Maybe LogLevel)
getLogLevelsByResourceTypesResponse_defaultLogLevel :: (Maybe LogLevel -> f (Maybe LogLevel))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
getLogLevelsByResourceTypesResponse_defaultLogLevel = (GetLogLevelsByResourceTypesResponse -> Maybe LogLevel)
-> (GetLogLevelsByResourceTypesResponse
-> Maybe LogLevel -> GetLogLevelsByResourceTypesResponse)
-> Lens
GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse
(Maybe LogLevel)
(Maybe LogLevel)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLogLevelsByResourceTypesResponse' {Maybe LogLevel
defaultLogLevel :: Maybe LogLevel
$sel:defaultLogLevel:GetLogLevelsByResourceTypesResponse' :: GetLogLevelsByResourceTypesResponse -> Maybe LogLevel
defaultLogLevel} -> Maybe LogLevel
defaultLogLevel) (\s :: GetLogLevelsByResourceTypesResponse
s@GetLogLevelsByResourceTypesResponse' {} Maybe LogLevel
a -> GetLogLevelsByResourceTypesResponse
s {$sel:defaultLogLevel:GetLogLevelsByResourceTypesResponse' :: Maybe LogLevel
defaultLogLevel = Maybe LogLevel
a} :: GetLogLevelsByResourceTypesResponse)
getLogLevelsByResourceTypesResponse_wirelessGatewayLogOptions :: Lens.Lens' GetLogLevelsByResourceTypesResponse (Prelude.Maybe [WirelessGatewayLogOption])
getLogLevelsByResourceTypesResponse_wirelessGatewayLogOptions :: (Maybe [WirelessGatewayLogOption]
-> f (Maybe [WirelessGatewayLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
getLogLevelsByResourceTypesResponse_wirelessGatewayLogOptions = (GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessGatewayLogOption])
-> (GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessGatewayLogOption]
-> GetLogLevelsByResourceTypesResponse)
-> Lens
GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse
(Maybe [WirelessGatewayLogOption])
(Maybe [WirelessGatewayLogOption])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLogLevelsByResourceTypesResponse' {Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions :: Maybe [WirelessGatewayLogOption]
$sel:wirelessGatewayLogOptions:GetLogLevelsByResourceTypesResponse' :: GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions} -> Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions) (\s :: GetLogLevelsByResourceTypesResponse
s@GetLogLevelsByResourceTypesResponse' {} Maybe [WirelessGatewayLogOption]
a -> GetLogLevelsByResourceTypesResponse
s {$sel:wirelessGatewayLogOptions:GetLogLevelsByResourceTypesResponse' :: Maybe [WirelessGatewayLogOption]
wirelessGatewayLogOptions = Maybe [WirelessGatewayLogOption]
a} :: GetLogLevelsByResourceTypesResponse) ((Maybe [WirelessGatewayLogOption]
-> f (Maybe [WirelessGatewayLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse)
-> ((Maybe [WirelessGatewayLogOption]
-> f (Maybe [WirelessGatewayLogOption]))
-> Maybe [WirelessGatewayLogOption]
-> f (Maybe [WirelessGatewayLogOption]))
-> (Maybe [WirelessGatewayLogOption]
-> f (Maybe [WirelessGatewayLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
-> Iso
(Maybe [WirelessGatewayLogOption])
(Maybe [WirelessGatewayLogOption])
(Maybe [WirelessGatewayLogOption])
(Maybe [WirelessGatewayLogOption])
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
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
[WirelessGatewayLogOption]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
getLogLevelsByResourceTypesResponse_wirelessDeviceLogOptions :: Lens.Lens' GetLogLevelsByResourceTypesResponse (Prelude.Maybe [WirelessDeviceLogOption])
getLogLevelsByResourceTypesResponse_wirelessDeviceLogOptions :: (Maybe [WirelessDeviceLogOption]
-> f (Maybe [WirelessDeviceLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
getLogLevelsByResourceTypesResponse_wirelessDeviceLogOptions = (GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessDeviceLogOption])
-> (GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessDeviceLogOption]
-> GetLogLevelsByResourceTypesResponse)
-> Lens
GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse
(Maybe [WirelessDeviceLogOption])
(Maybe [WirelessDeviceLogOption])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLogLevelsByResourceTypesResponse' {Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions :: Maybe [WirelessDeviceLogOption]
$sel:wirelessDeviceLogOptions:GetLogLevelsByResourceTypesResponse' :: GetLogLevelsByResourceTypesResponse
-> Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions} -> Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions) (\s :: GetLogLevelsByResourceTypesResponse
s@GetLogLevelsByResourceTypesResponse' {} Maybe [WirelessDeviceLogOption]
a -> GetLogLevelsByResourceTypesResponse
s {$sel:wirelessDeviceLogOptions:GetLogLevelsByResourceTypesResponse' :: Maybe [WirelessDeviceLogOption]
wirelessDeviceLogOptions = Maybe [WirelessDeviceLogOption]
a} :: GetLogLevelsByResourceTypesResponse) ((Maybe [WirelessDeviceLogOption]
-> f (Maybe [WirelessDeviceLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse)
-> ((Maybe [WirelessDeviceLogOption]
-> f (Maybe [WirelessDeviceLogOption]))
-> Maybe [WirelessDeviceLogOption]
-> f (Maybe [WirelessDeviceLogOption]))
-> (Maybe [WirelessDeviceLogOption]
-> f (Maybe [WirelessDeviceLogOption]))
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
-> Iso
(Maybe [WirelessDeviceLogOption])
(Maybe [WirelessDeviceLogOption])
(Maybe [WirelessDeviceLogOption])
(Maybe [WirelessDeviceLogOption])
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
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
[WirelessDeviceLogOption]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
getLogLevelsByResourceTypesResponse_httpStatus :: Lens.Lens' GetLogLevelsByResourceTypesResponse Prelude.Int
getLogLevelsByResourceTypesResponse_httpStatus :: (Int -> f Int)
-> GetLogLevelsByResourceTypesResponse
-> f GetLogLevelsByResourceTypesResponse
getLogLevelsByResourceTypesResponse_httpStatus = (GetLogLevelsByResourceTypesResponse -> Int)
-> (GetLogLevelsByResourceTypesResponse
-> Int -> GetLogLevelsByResourceTypesResponse)
-> Lens
GetLogLevelsByResourceTypesResponse
GetLogLevelsByResourceTypesResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLogLevelsByResourceTypesResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetLogLevelsByResourceTypesResponse' :: GetLogLevelsByResourceTypesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetLogLevelsByResourceTypesResponse
s@GetLogLevelsByResourceTypesResponse' {} Int
a -> GetLogLevelsByResourceTypesResponse
s {$sel:httpStatus:GetLogLevelsByResourceTypesResponse' :: Int
httpStatus = Int
a} :: GetLogLevelsByResourceTypesResponse)
instance
Prelude.NFData
GetLogLevelsByResourceTypesResponse