{-# 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.GetWirelessGateway
(
GetWirelessGateway (..),
newGetWirelessGateway,
getWirelessGateway_identifier,
getWirelessGateway_identifierType,
GetWirelessGatewayResponse (..),
newGetWirelessGatewayResponse,
getWirelessGatewayResponse_arn,
getWirelessGatewayResponse_loRaWAN,
getWirelessGatewayResponse_thingArn,
getWirelessGatewayResponse_name,
getWirelessGatewayResponse_id,
getWirelessGatewayResponse_thingName,
getWirelessGatewayResponse_description,
getWirelessGatewayResponse_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 GetWirelessGateway = GetWirelessGateway'
{
GetWirelessGateway -> Text
identifier :: Prelude.Text,
GetWirelessGateway -> WirelessGatewayIdType
identifierType :: WirelessGatewayIdType
}
deriving (GetWirelessGateway -> GetWirelessGateway -> Bool
(GetWirelessGateway -> GetWirelessGateway -> Bool)
-> (GetWirelessGateway -> GetWirelessGateway -> Bool)
-> Eq GetWirelessGateway
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWirelessGateway -> GetWirelessGateway -> Bool
$c/= :: GetWirelessGateway -> GetWirelessGateway -> Bool
== :: GetWirelessGateway -> GetWirelessGateway -> Bool
$c== :: GetWirelessGateway -> GetWirelessGateway -> Bool
Prelude.Eq, ReadPrec [GetWirelessGateway]
ReadPrec GetWirelessGateway
Int -> ReadS GetWirelessGateway
ReadS [GetWirelessGateway]
(Int -> ReadS GetWirelessGateway)
-> ReadS [GetWirelessGateway]
-> ReadPrec GetWirelessGateway
-> ReadPrec [GetWirelessGateway]
-> Read GetWirelessGateway
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWirelessGateway]
$creadListPrec :: ReadPrec [GetWirelessGateway]
readPrec :: ReadPrec GetWirelessGateway
$creadPrec :: ReadPrec GetWirelessGateway
readList :: ReadS [GetWirelessGateway]
$creadList :: ReadS [GetWirelessGateway]
readsPrec :: Int -> ReadS GetWirelessGateway
$creadsPrec :: Int -> ReadS GetWirelessGateway
Prelude.Read, Int -> GetWirelessGateway -> ShowS
[GetWirelessGateway] -> ShowS
GetWirelessGateway -> String
(Int -> GetWirelessGateway -> ShowS)
-> (GetWirelessGateway -> String)
-> ([GetWirelessGateway] -> ShowS)
-> Show GetWirelessGateway
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWirelessGateway] -> ShowS
$cshowList :: [GetWirelessGateway] -> ShowS
show :: GetWirelessGateway -> String
$cshow :: GetWirelessGateway -> String
showsPrec :: Int -> GetWirelessGateway -> ShowS
$cshowsPrec :: Int -> GetWirelessGateway -> ShowS
Prelude.Show, (forall x. GetWirelessGateway -> Rep GetWirelessGateway x)
-> (forall x. Rep GetWirelessGateway x -> GetWirelessGateway)
-> Generic GetWirelessGateway
forall x. Rep GetWirelessGateway x -> GetWirelessGateway
forall x. GetWirelessGateway -> Rep GetWirelessGateway x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetWirelessGateway x -> GetWirelessGateway
$cfrom :: forall x. GetWirelessGateway -> Rep GetWirelessGateway x
Prelude.Generic)
newGetWirelessGateway ::
Prelude.Text ->
WirelessGatewayIdType ->
GetWirelessGateway
newGetWirelessGateway :: Text -> WirelessGatewayIdType -> GetWirelessGateway
newGetWirelessGateway Text
pIdentifier_ WirelessGatewayIdType
pIdentifierType_ =
GetWirelessGateway' :: Text -> WirelessGatewayIdType -> GetWirelessGateway
GetWirelessGateway'
{ $sel:identifier:GetWirelessGateway' :: Text
identifier = Text
pIdentifier_,
$sel:identifierType:GetWirelessGateway' :: WirelessGatewayIdType
identifierType = WirelessGatewayIdType
pIdentifierType_
}
getWirelessGateway_identifier :: Lens.Lens' GetWirelessGateway Prelude.Text
getWirelessGateway_identifier :: (Text -> f Text) -> GetWirelessGateway -> f GetWirelessGateway
getWirelessGateway_identifier = (GetWirelessGateway -> Text)
-> (GetWirelessGateway -> Text -> GetWirelessGateway)
-> Lens GetWirelessGateway GetWirelessGateway Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGateway' {Text
identifier :: Text
$sel:identifier:GetWirelessGateway' :: GetWirelessGateway -> Text
identifier} -> Text
identifier) (\s :: GetWirelessGateway
s@GetWirelessGateway' {} Text
a -> GetWirelessGateway
s {$sel:identifier:GetWirelessGateway' :: Text
identifier = Text
a} :: GetWirelessGateway)
getWirelessGateway_identifierType :: Lens.Lens' GetWirelessGateway WirelessGatewayIdType
getWirelessGateway_identifierType :: (WirelessGatewayIdType -> f WirelessGatewayIdType)
-> GetWirelessGateway -> f GetWirelessGateway
getWirelessGateway_identifierType = (GetWirelessGateway -> WirelessGatewayIdType)
-> (GetWirelessGateway
-> WirelessGatewayIdType -> GetWirelessGateway)
-> Lens
GetWirelessGateway
GetWirelessGateway
WirelessGatewayIdType
WirelessGatewayIdType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGateway' {WirelessGatewayIdType
identifierType :: WirelessGatewayIdType
$sel:identifierType:GetWirelessGateway' :: GetWirelessGateway -> WirelessGatewayIdType
identifierType} -> WirelessGatewayIdType
identifierType) (\s :: GetWirelessGateway
s@GetWirelessGateway' {} WirelessGatewayIdType
a -> GetWirelessGateway
s {$sel:identifierType:GetWirelessGateway' :: WirelessGatewayIdType
identifierType = WirelessGatewayIdType
a} :: GetWirelessGateway)
instance Core.AWSRequest GetWirelessGateway where
type
AWSResponse GetWirelessGateway =
GetWirelessGatewayResponse
request :: GetWirelessGateway -> Request GetWirelessGateway
request = Service -> GetWirelessGateway -> Request GetWirelessGateway
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy GetWirelessGateway
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetWirelessGateway)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse GetWirelessGateway))
-> Logger
-> Service
-> Proxy GetWirelessGateway
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetWirelessGateway)))
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 Text
-> Maybe LoRaWANGateway
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse
GetWirelessGatewayResponse'
(Maybe Text
-> Maybe LoRaWANGateway
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe LoRaWANGateway
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"Arn")
Either
String
(Maybe LoRaWANGateway
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
-> Either String (Maybe LoRaWANGateway)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe LoRaWANGateway)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"LoRaWAN")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
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
"ThingArn")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text -> Maybe Text -> Int -> GetWirelessGatewayResponse)
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
"Name")
Either
String
(Maybe Text
-> Maybe Text -> Maybe Text -> Int -> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text -> Maybe Text -> Int -> GetWirelessGatewayResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"Id")
Either
String
(Maybe Text -> Maybe Text -> Int -> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either String (Maybe Text -> Int -> GetWirelessGatewayResponse)
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
"ThingName")
Either String (Maybe Text -> Int -> GetWirelessGatewayResponse)
-> Either String (Maybe Text)
-> Either String (Int -> GetWirelessGatewayResponse)
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
"Description")
Either String (Int -> GetWirelessGatewayResponse)
-> Either String Int -> Either String GetWirelessGatewayResponse
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 GetWirelessGateway
instance Prelude.NFData GetWirelessGateway
instance Core.ToHeaders GetWirelessGateway where
toHeaders :: GetWirelessGateway -> ResponseHeaders
toHeaders = ResponseHeaders -> GetWirelessGateway -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const ResponseHeaders
forall a. Monoid a => a
Prelude.mempty
instance Core.ToPath GetWirelessGateway where
toPath :: GetWirelessGateway -> ByteString
toPath GetWirelessGateway' {Text
WirelessGatewayIdType
identifierType :: WirelessGatewayIdType
identifier :: Text
$sel:identifierType:GetWirelessGateway' :: GetWirelessGateway -> WirelessGatewayIdType
$sel:identifier:GetWirelessGateway' :: GetWirelessGateway -> Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/wireless-gateways/", Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
identifier]
instance Core.ToQuery GetWirelessGateway where
toQuery :: GetWirelessGateway -> QueryString
toQuery GetWirelessGateway' {Text
WirelessGatewayIdType
identifierType :: WirelessGatewayIdType
identifier :: Text
$sel:identifierType:GetWirelessGateway' :: GetWirelessGateway -> WirelessGatewayIdType
$sel:identifier:GetWirelessGateway' :: GetWirelessGateway -> Text
..} =
[QueryString] -> QueryString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"identifierType" ByteString -> WirelessGatewayIdType -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: WirelessGatewayIdType
identifierType]
data GetWirelessGatewayResponse = GetWirelessGatewayResponse'
{
GetWirelessGatewayResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Maybe LoRaWANGateway
loRaWAN :: Prelude.Maybe LoRaWANGateway,
GetWirelessGatewayResponse -> Maybe Text
thingArn :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Maybe Text
thingName :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
GetWirelessGatewayResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool
(GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool)
-> (GetWirelessGatewayResponse
-> GetWirelessGatewayResponse -> Bool)
-> Eq GetWirelessGatewayResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool
$c/= :: GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool
== :: GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool
$c== :: GetWirelessGatewayResponse -> GetWirelessGatewayResponse -> Bool
Prelude.Eq, ReadPrec [GetWirelessGatewayResponse]
ReadPrec GetWirelessGatewayResponse
Int -> ReadS GetWirelessGatewayResponse
ReadS [GetWirelessGatewayResponse]
(Int -> ReadS GetWirelessGatewayResponse)
-> ReadS [GetWirelessGatewayResponse]
-> ReadPrec GetWirelessGatewayResponse
-> ReadPrec [GetWirelessGatewayResponse]
-> Read GetWirelessGatewayResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetWirelessGatewayResponse]
$creadListPrec :: ReadPrec [GetWirelessGatewayResponse]
readPrec :: ReadPrec GetWirelessGatewayResponse
$creadPrec :: ReadPrec GetWirelessGatewayResponse
readList :: ReadS [GetWirelessGatewayResponse]
$creadList :: ReadS [GetWirelessGatewayResponse]
readsPrec :: Int -> ReadS GetWirelessGatewayResponse
$creadsPrec :: Int -> ReadS GetWirelessGatewayResponse
Prelude.Read, Int -> GetWirelessGatewayResponse -> ShowS
[GetWirelessGatewayResponse] -> ShowS
GetWirelessGatewayResponse -> String
(Int -> GetWirelessGatewayResponse -> ShowS)
-> (GetWirelessGatewayResponse -> String)
-> ([GetWirelessGatewayResponse] -> ShowS)
-> Show GetWirelessGatewayResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetWirelessGatewayResponse] -> ShowS
$cshowList :: [GetWirelessGatewayResponse] -> ShowS
show :: GetWirelessGatewayResponse -> String
$cshow :: GetWirelessGatewayResponse -> String
showsPrec :: Int -> GetWirelessGatewayResponse -> ShowS
$cshowsPrec :: Int -> GetWirelessGatewayResponse -> ShowS
Prelude.Show, (forall x.
GetWirelessGatewayResponse -> Rep GetWirelessGatewayResponse x)
-> (forall x.
Rep GetWirelessGatewayResponse x -> GetWirelessGatewayResponse)
-> Generic GetWirelessGatewayResponse
forall x.
Rep GetWirelessGatewayResponse x -> GetWirelessGatewayResponse
forall x.
GetWirelessGatewayResponse -> Rep GetWirelessGatewayResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetWirelessGatewayResponse x -> GetWirelessGatewayResponse
$cfrom :: forall x.
GetWirelessGatewayResponse -> Rep GetWirelessGatewayResponse x
Prelude.Generic)
newGetWirelessGatewayResponse ::
Prelude.Int ->
GetWirelessGatewayResponse
newGetWirelessGatewayResponse :: Int -> GetWirelessGatewayResponse
newGetWirelessGatewayResponse Int
pHttpStatus_ =
GetWirelessGatewayResponse' :: Maybe Text
-> Maybe LoRaWANGateway
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> GetWirelessGatewayResponse
GetWirelessGatewayResponse'
{ $sel:arn:GetWirelessGatewayResponse' :: Maybe Text
arn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:loRaWAN:GetWirelessGatewayResponse' :: Maybe LoRaWANGateway
loRaWAN = Maybe LoRaWANGateway
forall a. Maybe a
Prelude.Nothing,
$sel:thingArn:GetWirelessGatewayResponse' :: Maybe Text
thingArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:name:GetWirelessGatewayResponse' :: Maybe Text
name = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:id:GetWirelessGatewayResponse' :: Maybe Text
id = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:thingName:GetWirelessGatewayResponse' :: Maybe Text
thingName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:description:GetWirelessGatewayResponse' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetWirelessGatewayResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getWirelessGatewayResponse_arn :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_arn :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_arn = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:arn:GetWirelessGatewayResponse' :: Maybe Text
arn = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_loRaWAN :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe LoRaWANGateway)
getWirelessGatewayResponse_loRaWAN :: (Maybe LoRaWANGateway -> f (Maybe LoRaWANGateway))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_loRaWAN = (GetWirelessGatewayResponse -> Maybe LoRaWANGateway)
-> (GetWirelessGatewayResponse
-> Maybe LoRaWANGateway -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe LoRaWANGateway)
(Maybe LoRaWANGateway)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe LoRaWANGateway
loRaWAN :: Maybe LoRaWANGateway
$sel:loRaWAN:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe LoRaWANGateway
loRaWAN} -> Maybe LoRaWANGateway
loRaWAN) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe LoRaWANGateway
a -> GetWirelessGatewayResponse
s {$sel:loRaWAN:GetWirelessGatewayResponse' :: Maybe LoRaWANGateway
loRaWAN = Maybe LoRaWANGateway
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_thingArn :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_thingArn :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_thingArn = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
thingArn :: Maybe Text
$sel:thingArn:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
thingArn} -> Maybe Text
thingArn) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:thingArn:GetWirelessGatewayResponse' :: Maybe Text
thingArn = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_name :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_name :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_name = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
name :: Maybe Text
$sel:name:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:name:GetWirelessGatewayResponse' :: Maybe Text
name = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_id :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_id :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_id = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
id :: Maybe Text
$sel:id:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:id:GetWirelessGatewayResponse' :: Maybe Text
id = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_thingName :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_thingName :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_thingName = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
thingName :: Maybe Text
$sel:thingName:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
thingName} -> Maybe Text
thingName) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:thingName:GetWirelessGatewayResponse' :: Maybe Text
thingName = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_description :: Lens.Lens' GetWirelessGatewayResponse (Prelude.Maybe Prelude.Text)
getWirelessGatewayResponse_description :: (Maybe Text -> f (Maybe Text))
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_description = (GetWirelessGatewayResponse -> Maybe Text)
-> (GetWirelessGatewayResponse
-> Maybe Text -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse
GetWirelessGatewayResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Maybe Text
description :: Maybe Text
$sel:description:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Maybe Text
a -> GetWirelessGatewayResponse
s {$sel:description:GetWirelessGatewayResponse' :: Maybe Text
description = Maybe Text
a} :: GetWirelessGatewayResponse)
getWirelessGatewayResponse_httpStatus :: Lens.Lens' GetWirelessGatewayResponse Prelude.Int
getWirelessGatewayResponse_httpStatus :: (Int -> f Int)
-> GetWirelessGatewayResponse -> f GetWirelessGatewayResponse
getWirelessGatewayResponse_httpStatus = (GetWirelessGatewayResponse -> Int)
-> (GetWirelessGatewayResponse
-> Int -> GetWirelessGatewayResponse)
-> Lens
GetWirelessGatewayResponse GetWirelessGatewayResponse Int Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetWirelessGatewayResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetWirelessGatewayResponse' :: GetWirelessGatewayResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetWirelessGatewayResponse
s@GetWirelessGatewayResponse' {} Int
a -> GetWirelessGatewayResponse
s {$sel:httpStatus:GetWirelessGatewayResponse' :: Int
httpStatus = Int
a} :: GetWirelessGatewayResponse)
instance Prelude.NFData GetWirelessGatewayResponse