{-# 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.GetWirelessDeviceStatistics
(
GetWirelessDeviceStatistics (..),
newGetWirelessDeviceStatistics,
getWirelessDeviceStatistics_wirelessDeviceId,
GetWirelessDeviceStatisticsResponse (..),
newGetWirelessDeviceStatisticsResponse,
getWirelessDeviceStatisticsResponse_sidewalk,
getWirelessDeviceStatisticsResponse_loRaWAN,
getWirelessDeviceStatisticsResponse_lastUplinkReceivedAt,
getWirelessDeviceStatisticsResponse_wirelessDeviceId,
getWirelessDeviceStatisticsResponse_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 GetWirelessDeviceStatistics = GetWirelessDeviceStatistics'
{
GetWirelessDeviceStatistics -> Text
wirelessDeviceId :: Prelude.Text
}
deriving (GetWirelessDeviceStatistics -> GetWirelessDeviceStatistics -> Bool
(GetWirelessDeviceStatistics
-> GetWirelessDeviceStatistics -> Bool)
-> (GetWirelessDeviceStatistics
-> GetWirelessDeviceStatistics -> Bool)
-> Eq GetWirelessDeviceStatistics
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWirelessDeviceStatistics -> GetWirelessDeviceStatistics -> Bool
$c/= :: GetWirelessDeviceStatistics -> GetWirelessDeviceStatistics -> Bool
== :: GetWirelessDeviceStatistics -> GetWirelessDeviceStatistics -> Bool
$c== :: GetWirelessDeviceStatistics -> GetWirelessDeviceStatistics -> Bool
Prelude.Eq, ReadPrec [GetWirelessDeviceStatistics]
ReadPrec GetWirelessDeviceStatistics
Int -> ReadS GetWirelessDeviceStatistics
ReadS [GetWirelessDeviceStatistics]
(Int -> ReadS GetWirelessDeviceStatistics)
-> ReadS [GetWirelessDeviceStatistics]
-> ReadPrec GetWirelessDeviceStatistics
-> ReadPrec [GetWirelessDeviceStatistics]
-> Read GetWirelessDeviceStatistics
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWirelessDeviceStatistics]
$creadListPrec :: ReadPrec [GetWirelessDeviceStatistics]
readPrec :: ReadPrec GetWirelessDeviceStatistics
$creadPrec :: ReadPrec GetWirelessDeviceStatistics
readList :: ReadS [GetWirelessDeviceStatistics]
$creadList :: ReadS [GetWirelessDeviceStatistics]
readsPrec :: Int -> ReadS GetWirelessDeviceStatistics
$creadsPrec :: Int -> ReadS GetWirelessDeviceStatistics
Prelude.Read, Int -> GetWirelessDeviceStatistics -> ShowS
[GetWirelessDeviceStatistics] -> ShowS
GetWirelessDeviceStatistics -> String
(Int -> GetWirelessDeviceStatistics -> ShowS)
-> (GetWirelessDeviceStatistics -> String)
-> ([GetWirelessDeviceStatistics] -> ShowS)
-> Show GetWirelessDeviceStatistics
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWirelessDeviceStatistics] -> ShowS
$cshowList :: [GetWirelessDeviceStatistics] -> ShowS
show :: GetWirelessDeviceStatistics -> String
$cshow :: GetWirelessDeviceStatistics -> String
showsPrec :: Int -> GetWirelessDeviceStatistics -> ShowS
$cshowsPrec :: Int -> GetWirelessDeviceStatistics -> ShowS
Prelude.Show, (forall x.
GetWirelessDeviceStatistics -> Rep GetWirelessDeviceStatistics x)
-> (forall x.
Rep GetWirelessDeviceStatistics x -> GetWirelessDeviceStatistics)
-> Generic GetWirelessDeviceStatistics
forall x.
Rep GetWirelessDeviceStatistics x -> GetWirelessDeviceStatistics
forall x.
GetWirelessDeviceStatistics -> Rep GetWirelessDeviceStatistics x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetWirelessDeviceStatistics x -> GetWirelessDeviceStatistics
$cfrom :: forall x.
GetWirelessDeviceStatistics -> Rep GetWirelessDeviceStatistics x
Prelude.Generic)
newGetWirelessDeviceStatistics ::
Prelude.Text ->
GetWirelessDeviceStatistics
newGetWirelessDeviceStatistics :: Text -> GetWirelessDeviceStatistics
newGetWirelessDeviceStatistics Text
pWirelessDeviceId_ =
GetWirelessDeviceStatistics' :: Text -> GetWirelessDeviceStatistics
GetWirelessDeviceStatistics'
{ $sel:wirelessDeviceId:GetWirelessDeviceStatistics' :: Text
wirelessDeviceId =
Text
pWirelessDeviceId_
}
getWirelessDeviceStatistics_wirelessDeviceId :: Lens.Lens' GetWirelessDeviceStatistics Prelude.Text
getWirelessDeviceStatistics_wirelessDeviceId :: (Text -> f Text)
-> GetWirelessDeviceStatistics -> f GetWirelessDeviceStatistics
getWirelessDeviceStatistics_wirelessDeviceId = (GetWirelessDeviceStatistics -> Text)
-> (GetWirelessDeviceStatistics
-> Text -> GetWirelessDeviceStatistics)
-> Lens
GetWirelessDeviceStatistics GetWirelessDeviceStatistics Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatistics' {Text
wirelessDeviceId :: Text
$sel:wirelessDeviceId:GetWirelessDeviceStatistics' :: GetWirelessDeviceStatistics -> Text
wirelessDeviceId} -> Text
wirelessDeviceId) (\s :: GetWirelessDeviceStatistics
s@GetWirelessDeviceStatistics' {} Text
a -> GetWirelessDeviceStatistics
s {$sel:wirelessDeviceId:GetWirelessDeviceStatistics' :: Text
wirelessDeviceId = Text
a} :: GetWirelessDeviceStatistics)
instance Core.AWSRequest GetWirelessDeviceStatistics where
type
AWSResponse GetWirelessDeviceStatistics =
GetWirelessDeviceStatisticsResponse
request :: GetWirelessDeviceStatistics -> Request GetWirelessDeviceStatistics
request = Service
-> GetWirelessDeviceStatistics
-> Request GetWirelessDeviceStatistics
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy GetWirelessDeviceStatistics
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetWirelessDeviceStatistics)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse GetWirelessDeviceStatistics))
-> Logger
-> Service
-> Proxy GetWirelessDeviceStatistics
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetWirelessDeviceStatistics)))
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 SidewalkDeviceMetadata
-> Maybe LoRaWANDeviceMetadata
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse'
(Maybe SidewalkDeviceMetadata
-> Maybe LoRaWANDeviceMetadata
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessDeviceStatisticsResponse)
-> Either String (Maybe SidewalkDeviceMetadata)
-> Either
String
(Maybe LoRaWANDeviceMetadata
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessDeviceStatisticsResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe SidewalkDeviceMetadata)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"Sidewalk")
Either
String
(Maybe LoRaWANDeviceMetadata
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessDeviceStatisticsResponse)
-> Either String (Maybe LoRaWANDeviceMetadata)
-> Either
String
(Maybe Text
-> Maybe Text -> Int -> GetWirelessDeviceStatisticsResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe LoRaWANDeviceMetadata)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"LoRaWAN")
Either
String
(Maybe Text
-> Maybe Text -> Int -> GetWirelessDeviceStatisticsResponse)
-> Either String (Maybe Text)
-> Either
String (Maybe Text -> Int -> GetWirelessDeviceStatisticsResponse)
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
"LastUplinkReceivedAt")
Either
String (Maybe Text -> Int -> GetWirelessDeviceStatisticsResponse)
-> Either String (Maybe Text)
-> Either String (Int -> GetWirelessDeviceStatisticsResponse)
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
"WirelessDeviceId")
Either String (Int -> GetWirelessDeviceStatisticsResponse)
-> Either String Int
-> Either String GetWirelessDeviceStatisticsResponse
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 GetWirelessDeviceStatistics
instance Prelude.NFData GetWirelessDeviceStatistics
instance Core.ToHeaders GetWirelessDeviceStatistics where
toHeaders :: GetWirelessDeviceStatistics -> ResponseHeaders
toHeaders = ResponseHeaders -> GetWirelessDeviceStatistics -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const ResponseHeaders
forall a. Monoid a => a
Prelude.mempty
instance Core.ToPath GetWirelessDeviceStatistics where
toPath :: GetWirelessDeviceStatistics -> ByteString
toPath GetWirelessDeviceStatistics' {Text
wirelessDeviceId :: Text
$sel:wirelessDeviceId:GetWirelessDeviceStatistics' :: GetWirelessDeviceStatistics -> Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/wireless-devices/",
Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
wirelessDeviceId,
ByteString
"/statistics"
]
instance Core.ToQuery GetWirelessDeviceStatistics where
toQuery :: GetWirelessDeviceStatistics -> QueryString
toQuery = QueryString -> GetWirelessDeviceStatistics -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data GetWirelessDeviceStatisticsResponse = GetWirelessDeviceStatisticsResponse'
{
GetWirelessDeviceStatisticsResponse -> Maybe SidewalkDeviceMetadata
sidewalk :: Prelude.Maybe SidewalkDeviceMetadata,
GetWirelessDeviceStatisticsResponse -> Maybe LoRaWANDeviceMetadata
loRaWAN :: Prelude.Maybe LoRaWANDeviceMetadata,
GetWirelessDeviceStatisticsResponse -> Maybe Text
lastUplinkReceivedAt :: Prelude.Maybe Prelude.Text,
GetWirelessDeviceStatisticsResponse -> Maybe Text
wirelessDeviceId :: Prelude.Maybe Prelude.Text,
GetWirelessDeviceStatisticsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool
(GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool)
-> (GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool)
-> Eq GetWirelessDeviceStatisticsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool
$c/= :: GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool
== :: GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool
$c== :: GetWirelessDeviceStatisticsResponse
-> GetWirelessDeviceStatisticsResponse -> Bool
Prelude.Eq, ReadPrec [GetWirelessDeviceStatisticsResponse]
ReadPrec GetWirelessDeviceStatisticsResponse
Int -> ReadS GetWirelessDeviceStatisticsResponse
ReadS [GetWirelessDeviceStatisticsResponse]
(Int -> ReadS GetWirelessDeviceStatisticsResponse)
-> ReadS [GetWirelessDeviceStatisticsResponse]
-> ReadPrec GetWirelessDeviceStatisticsResponse
-> ReadPrec [GetWirelessDeviceStatisticsResponse]
-> Read GetWirelessDeviceStatisticsResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWirelessDeviceStatisticsResponse]
$creadListPrec :: ReadPrec [GetWirelessDeviceStatisticsResponse]
readPrec :: ReadPrec GetWirelessDeviceStatisticsResponse
$creadPrec :: ReadPrec GetWirelessDeviceStatisticsResponse
readList :: ReadS [GetWirelessDeviceStatisticsResponse]
$creadList :: ReadS [GetWirelessDeviceStatisticsResponse]
readsPrec :: Int -> ReadS GetWirelessDeviceStatisticsResponse
$creadsPrec :: Int -> ReadS GetWirelessDeviceStatisticsResponse
Prelude.Read, Int -> GetWirelessDeviceStatisticsResponse -> ShowS
[GetWirelessDeviceStatisticsResponse] -> ShowS
GetWirelessDeviceStatisticsResponse -> String
(Int -> GetWirelessDeviceStatisticsResponse -> ShowS)
-> (GetWirelessDeviceStatisticsResponse -> String)
-> ([GetWirelessDeviceStatisticsResponse] -> ShowS)
-> Show GetWirelessDeviceStatisticsResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWirelessDeviceStatisticsResponse] -> ShowS
$cshowList :: [GetWirelessDeviceStatisticsResponse] -> ShowS
show :: GetWirelessDeviceStatisticsResponse -> String
$cshow :: GetWirelessDeviceStatisticsResponse -> String
showsPrec :: Int -> GetWirelessDeviceStatisticsResponse -> ShowS
$cshowsPrec :: Int -> GetWirelessDeviceStatisticsResponse -> ShowS
Prelude.Show, (forall x.
GetWirelessDeviceStatisticsResponse
-> Rep GetWirelessDeviceStatisticsResponse x)
-> (forall x.
Rep GetWirelessDeviceStatisticsResponse x
-> GetWirelessDeviceStatisticsResponse)
-> Generic GetWirelessDeviceStatisticsResponse
forall x.
Rep GetWirelessDeviceStatisticsResponse x
-> GetWirelessDeviceStatisticsResponse
forall x.
GetWirelessDeviceStatisticsResponse
-> Rep GetWirelessDeviceStatisticsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetWirelessDeviceStatisticsResponse x
-> GetWirelessDeviceStatisticsResponse
$cfrom :: forall x.
GetWirelessDeviceStatisticsResponse
-> Rep GetWirelessDeviceStatisticsResponse x
Prelude.Generic)
newGetWirelessDeviceStatisticsResponse ::
Prelude.Int ->
GetWirelessDeviceStatisticsResponse
newGetWirelessDeviceStatisticsResponse :: Int -> GetWirelessDeviceStatisticsResponse
newGetWirelessDeviceStatisticsResponse Int
pHttpStatus_ =
GetWirelessDeviceStatisticsResponse' :: Maybe SidewalkDeviceMetadata
-> Maybe LoRaWANDeviceMetadata
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse'
{ $sel:sidewalk:GetWirelessDeviceStatisticsResponse' :: Maybe SidewalkDeviceMetadata
sidewalk =
Maybe SidewalkDeviceMetadata
forall a. Maybe a
Prelude.Nothing,
$sel:loRaWAN:GetWirelessDeviceStatisticsResponse' :: Maybe LoRaWANDeviceMetadata
loRaWAN = Maybe LoRaWANDeviceMetadata
forall a. Maybe a
Prelude.Nothing,
$sel:lastUplinkReceivedAt:GetWirelessDeviceStatisticsResponse' :: Maybe Text
lastUplinkReceivedAt = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:wirelessDeviceId:GetWirelessDeviceStatisticsResponse' :: Maybe Text
wirelessDeviceId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetWirelessDeviceStatisticsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getWirelessDeviceStatisticsResponse_sidewalk :: Lens.Lens' GetWirelessDeviceStatisticsResponse (Prelude.Maybe SidewalkDeviceMetadata)
getWirelessDeviceStatisticsResponse_sidewalk :: (Maybe SidewalkDeviceMetadata -> f (Maybe SidewalkDeviceMetadata))
-> GetWirelessDeviceStatisticsResponse
-> f GetWirelessDeviceStatisticsResponse
getWirelessDeviceStatisticsResponse_sidewalk = (GetWirelessDeviceStatisticsResponse
-> Maybe SidewalkDeviceMetadata)
-> (GetWirelessDeviceStatisticsResponse
-> Maybe SidewalkDeviceMetadata
-> GetWirelessDeviceStatisticsResponse)
-> Lens
GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse
(Maybe SidewalkDeviceMetadata)
(Maybe SidewalkDeviceMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatisticsResponse' {Maybe SidewalkDeviceMetadata
sidewalk :: Maybe SidewalkDeviceMetadata
$sel:sidewalk:GetWirelessDeviceStatisticsResponse' :: GetWirelessDeviceStatisticsResponse -> Maybe SidewalkDeviceMetadata
sidewalk} -> Maybe SidewalkDeviceMetadata
sidewalk) (\s :: GetWirelessDeviceStatisticsResponse
s@GetWirelessDeviceStatisticsResponse' {} Maybe SidewalkDeviceMetadata
a -> GetWirelessDeviceStatisticsResponse
s {$sel:sidewalk:GetWirelessDeviceStatisticsResponse' :: Maybe SidewalkDeviceMetadata
sidewalk = Maybe SidewalkDeviceMetadata
a} :: GetWirelessDeviceStatisticsResponse)
getWirelessDeviceStatisticsResponse_loRaWAN :: Lens.Lens' GetWirelessDeviceStatisticsResponse (Prelude.Maybe LoRaWANDeviceMetadata)
getWirelessDeviceStatisticsResponse_loRaWAN :: (Maybe LoRaWANDeviceMetadata -> f (Maybe LoRaWANDeviceMetadata))
-> GetWirelessDeviceStatisticsResponse
-> f GetWirelessDeviceStatisticsResponse
getWirelessDeviceStatisticsResponse_loRaWAN = (GetWirelessDeviceStatisticsResponse
-> Maybe LoRaWANDeviceMetadata)
-> (GetWirelessDeviceStatisticsResponse
-> Maybe LoRaWANDeviceMetadata
-> GetWirelessDeviceStatisticsResponse)
-> Lens
GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse
(Maybe LoRaWANDeviceMetadata)
(Maybe LoRaWANDeviceMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatisticsResponse' {Maybe LoRaWANDeviceMetadata
loRaWAN :: Maybe LoRaWANDeviceMetadata
$sel:loRaWAN:GetWirelessDeviceStatisticsResponse' :: GetWirelessDeviceStatisticsResponse -> Maybe LoRaWANDeviceMetadata
loRaWAN} -> Maybe LoRaWANDeviceMetadata
loRaWAN) (\s :: GetWirelessDeviceStatisticsResponse
s@GetWirelessDeviceStatisticsResponse' {} Maybe LoRaWANDeviceMetadata
a -> GetWirelessDeviceStatisticsResponse
s {$sel:loRaWAN:GetWirelessDeviceStatisticsResponse' :: Maybe LoRaWANDeviceMetadata
loRaWAN = Maybe LoRaWANDeviceMetadata
a} :: GetWirelessDeviceStatisticsResponse)
getWirelessDeviceStatisticsResponse_lastUplinkReceivedAt :: Lens.Lens' GetWirelessDeviceStatisticsResponse (Prelude.Maybe Prelude.Text)
getWirelessDeviceStatisticsResponse_lastUplinkReceivedAt :: (Maybe Text -> f (Maybe Text))
-> GetWirelessDeviceStatisticsResponse
-> f GetWirelessDeviceStatisticsResponse
getWirelessDeviceStatisticsResponse_lastUplinkReceivedAt = (GetWirelessDeviceStatisticsResponse -> Maybe Text)
-> (GetWirelessDeviceStatisticsResponse
-> Maybe Text -> GetWirelessDeviceStatisticsResponse)
-> Lens
GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatisticsResponse' {Maybe Text
lastUplinkReceivedAt :: Maybe Text
$sel:lastUplinkReceivedAt:GetWirelessDeviceStatisticsResponse' :: GetWirelessDeviceStatisticsResponse -> Maybe Text
lastUplinkReceivedAt} -> Maybe Text
lastUplinkReceivedAt) (\s :: GetWirelessDeviceStatisticsResponse
s@GetWirelessDeviceStatisticsResponse' {} Maybe Text
a -> GetWirelessDeviceStatisticsResponse
s {$sel:lastUplinkReceivedAt:GetWirelessDeviceStatisticsResponse' :: Maybe Text
lastUplinkReceivedAt = Maybe Text
a} :: GetWirelessDeviceStatisticsResponse)
getWirelessDeviceStatisticsResponse_wirelessDeviceId :: Lens.Lens' GetWirelessDeviceStatisticsResponse (Prelude.Maybe Prelude.Text)
getWirelessDeviceStatisticsResponse_wirelessDeviceId :: (Maybe Text -> f (Maybe Text))
-> GetWirelessDeviceStatisticsResponse
-> f GetWirelessDeviceStatisticsResponse
getWirelessDeviceStatisticsResponse_wirelessDeviceId = (GetWirelessDeviceStatisticsResponse -> Maybe Text)
-> (GetWirelessDeviceStatisticsResponse
-> Maybe Text -> GetWirelessDeviceStatisticsResponse)
-> Lens
GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatisticsResponse' {Maybe Text
wirelessDeviceId :: Maybe Text
$sel:wirelessDeviceId:GetWirelessDeviceStatisticsResponse' :: GetWirelessDeviceStatisticsResponse -> Maybe Text
wirelessDeviceId} -> Maybe Text
wirelessDeviceId) (\s :: GetWirelessDeviceStatisticsResponse
s@GetWirelessDeviceStatisticsResponse' {} Maybe Text
a -> GetWirelessDeviceStatisticsResponse
s {$sel:wirelessDeviceId:GetWirelessDeviceStatisticsResponse' :: Maybe Text
wirelessDeviceId = Maybe Text
a} :: GetWirelessDeviceStatisticsResponse)
getWirelessDeviceStatisticsResponse_httpStatus :: Lens.Lens' GetWirelessDeviceStatisticsResponse Prelude.Int
getWirelessDeviceStatisticsResponse_httpStatus :: (Int -> f Int)
-> GetWirelessDeviceStatisticsResponse
-> f GetWirelessDeviceStatisticsResponse
getWirelessDeviceStatisticsResponse_httpStatus = (GetWirelessDeviceStatisticsResponse -> Int)
-> (GetWirelessDeviceStatisticsResponse
-> Int -> GetWirelessDeviceStatisticsResponse)
-> Lens
GetWirelessDeviceStatisticsResponse
GetWirelessDeviceStatisticsResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessDeviceStatisticsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetWirelessDeviceStatisticsResponse' :: GetWirelessDeviceStatisticsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetWirelessDeviceStatisticsResponse
s@GetWirelessDeviceStatisticsResponse' {} Int
a -> GetWirelessDeviceStatisticsResponse
s {$sel:httpStatus:GetWirelessDeviceStatisticsResponse' :: Int
httpStatus = Int
a} :: GetWirelessDeviceStatisticsResponse)
instance
Prelude.NFData
GetWirelessDeviceStatisticsResponse