module Stratosphere.ResourceProperties.KinesisFirehoseCloudWatchLoggingOptions where
import Control.Lens
import Data.Aeson
import Data.Aeson.Types
import Data.Text
import GHC.Generics
import Stratosphere.Values
data KinesisFirehoseCloudWatchLoggingOptions =
KinesisFirehoseCloudWatchLoggingOptions
{ _kinesisFirehoseCloudWatchLoggingOptionsEnabled :: Maybe (Val Bool')
, _kinesisFirehoseCloudWatchLoggingOptionsLogGroupName :: Maybe (Val Text)
, _kinesisFirehoseCloudWatchLoggingOptionsLogStreamName :: Maybe (Val Text)
} deriving (Show, Generic)
instance ToJSON KinesisFirehoseCloudWatchLoggingOptions where
toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 40, omitNothingFields = True }
instance FromJSON KinesisFirehoseCloudWatchLoggingOptions where
parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 40, omitNothingFields = True }
kinesisFirehoseCloudWatchLoggingOptions
:: KinesisFirehoseCloudWatchLoggingOptions
kinesisFirehoseCloudWatchLoggingOptions =
KinesisFirehoseCloudWatchLoggingOptions
{ _kinesisFirehoseCloudWatchLoggingOptionsEnabled = Nothing
, _kinesisFirehoseCloudWatchLoggingOptionsLogGroupName = Nothing
, _kinesisFirehoseCloudWatchLoggingOptionsLogStreamName = Nothing
}
kfcwloEnabled :: Lens' KinesisFirehoseCloudWatchLoggingOptions (Maybe (Val Bool'))
kfcwloEnabled = lens _kinesisFirehoseCloudWatchLoggingOptionsEnabled (\s a -> s { _kinesisFirehoseCloudWatchLoggingOptionsEnabled = a })
kfcwloLogGroupName :: Lens' KinesisFirehoseCloudWatchLoggingOptions (Maybe (Val Text))
kfcwloLogGroupName = lens _kinesisFirehoseCloudWatchLoggingOptionsLogGroupName (\s a -> s { _kinesisFirehoseCloudWatchLoggingOptionsLogGroupName = a })
kfcwloLogStreamName :: Lens' KinesisFirehoseCloudWatchLoggingOptions (Maybe (Val Text))
kfcwloLogStreamName = lens _kinesisFirehoseCloudWatchLoggingOptionsLogStreamName (\s a -> s { _kinesisFirehoseCloudWatchLoggingOptionsLogStreamName = a })