module Network.AWS.EC2.ResetNetworkInterfaceAttribute
(
resetNetworkInterfaceAttribute
, ResetNetworkInterfaceAttribute
, rniaSourceDestCheck
, rniaDryRun
, rniaNetworkInterfaceId
, resetNetworkInterfaceAttributeResponse
, ResetNetworkInterfaceAttributeResponse
) where
import Network.AWS.EC2.Types
import Network.AWS.EC2.Types.Product
import Network.AWS.Prelude
import Network.AWS.Request
import Network.AWS.Response
data ResetNetworkInterfaceAttribute = ResetNetworkInterfaceAttribute'
{ _rniaSourceDestCheck :: !(Maybe Text)
, _rniaDryRun :: !(Maybe Bool)
, _rniaNetworkInterfaceId :: !Text
} deriving (Eq,Read,Show,Data,Typeable,Generic)
resetNetworkInterfaceAttribute
:: Text
-> ResetNetworkInterfaceAttribute
resetNetworkInterfaceAttribute pNetworkInterfaceId_ =
ResetNetworkInterfaceAttribute'
{ _rniaSourceDestCheck = Nothing
, _rniaDryRun = Nothing
, _rniaNetworkInterfaceId = pNetworkInterfaceId_
}
rniaSourceDestCheck :: Lens' ResetNetworkInterfaceAttribute (Maybe Text)
rniaSourceDestCheck = lens _rniaSourceDestCheck (\ s a -> s{_rniaSourceDestCheck = a});
rniaDryRun :: Lens' ResetNetworkInterfaceAttribute (Maybe Bool)
rniaDryRun = lens _rniaDryRun (\ s a -> s{_rniaDryRun = a});
rniaNetworkInterfaceId :: Lens' ResetNetworkInterfaceAttribute Text
rniaNetworkInterfaceId = lens _rniaNetworkInterfaceId (\ s a -> s{_rniaNetworkInterfaceId = a});
instance AWSRequest ResetNetworkInterfaceAttribute
where
type Rs ResetNetworkInterfaceAttribute =
ResetNetworkInterfaceAttributeResponse
request = postQuery eC2
response
= receiveNull ResetNetworkInterfaceAttributeResponse'
instance ToHeaders ResetNetworkInterfaceAttribute
where
toHeaders = const mempty
instance ToPath ResetNetworkInterfaceAttribute where
toPath = const "/"
instance ToQuery ResetNetworkInterfaceAttribute where
toQuery ResetNetworkInterfaceAttribute'{..}
= mconcat
["Action" =:
("ResetNetworkInterfaceAttribute" :: ByteString),
"Version" =: ("2015-10-01" :: ByteString),
"SourceDestCheck" =: _rniaSourceDestCheck,
"DryRun" =: _rniaDryRun,
"NetworkInterfaceId" =: _rniaNetworkInterfaceId]
data ResetNetworkInterfaceAttributeResponse =
ResetNetworkInterfaceAttributeResponse'
deriving (Eq,Read,Show,Data,Typeable,Generic)
resetNetworkInterfaceAttributeResponse
:: ResetNetworkInterfaceAttributeResponse
resetNetworkInterfaceAttributeResponse =
ResetNetworkInterfaceAttributeResponse'