{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.IoTEventsData.Types.CustomerAction -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.IoTEventsData.Types.CustomerAction where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.IoTEventsData.Types.AcknowledgeActionConfiguration import Amazonka.IoTEventsData.Types.CustomerActionName import Amazonka.IoTEventsData.Types.DisableActionConfiguration import Amazonka.IoTEventsData.Types.EnableActionConfiguration import Amazonka.IoTEventsData.Types.ResetActionConfiguration import Amazonka.IoTEventsData.Types.SnoozeActionConfiguration import qualified Amazonka.Prelude as Prelude -- | Contains information about the action that you can take to respond to -- the alarm. -- -- /See:/ 'newCustomerAction' smart constructor. data CustomerAction = CustomerAction' { -- | Contains the configuration information of an acknowledge action. acknowledgeActionConfiguration :: Prelude.Maybe AcknowledgeActionConfiguration, -- | The name of the action. The action name can be one of the following -- values: -- -- - @SNOOZE@ - When you snooze the alarm, the alarm state changes to -- @SNOOZE_DISABLED@. -- -- - @ENABLE@ - When you enable the alarm, the alarm state changes to -- @NORMAL@. -- -- - @DISABLE@ - When you disable the alarm, the alarm state changes to -- @DISABLED@. -- -- - @ACKNOWLEDGE@ - When you acknowledge the alarm, the alarm state -- changes to @ACKNOWLEDGED@. -- -- - @RESET@ - When you reset the alarm, the alarm state changes to -- @NORMAL@. -- -- For more information, see the -- -- API. actionName :: Prelude.Maybe CustomerActionName, -- | Contains the configuration information of a disable action. disableActionConfiguration :: Prelude.Maybe DisableActionConfiguration, -- | Contains the configuration information of an enable action. enableActionConfiguration :: Prelude.Maybe EnableActionConfiguration, -- | Contains the configuration information of a reset action. resetActionConfiguration :: Prelude.Maybe ResetActionConfiguration, -- | Contains the configuration information of a snooze action. snoozeActionConfiguration :: Prelude.Maybe SnoozeActionConfiguration } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'CustomerAction' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'acknowledgeActionConfiguration', 'customerAction_acknowledgeActionConfiguration' - Contains the configuration information of an acknowledge action. -- -- 'actionName', 'customerAction_actionName' - The name of the action. The action name can be one of the following -- values: -- -- - @SNOOZE@ - When you snooze the alarm, the alarm state changes to -- @SNOOZE_DISABLED@. -- -- - @ENABLE@ - When you enable the alarm, the alarm state changes to -- @NORMAL@. -- -- - @DISABLE@ - When you disable the alarm, the alarm state changes to -- @DISABLED@. -- -- - @ACKNOWLEDGE@ - When you acknowledge the alarm, the alarm state -- changes to @ACKNOWLEDGED@. -- -- - @RESET@ - When you reset the alarm, the alarm state changes to -- @NORMAL@. -- -- For more information, see the -- -- API. -- -- 'disableActionConfiguration', 'customerAction_disableActionConfiguration' - Contains the configuration information of a disable action. -- -- 'enableActionConfiguration', 'customerAction_enableActionConfiguration' - Contains the configuration information of an enable action. -- -- 'resetActionConfiguration', 'customerAction_resetActionConfiguration' - Contains the configuration information of a reset action. -- -- 'snoozeActionConfiguration', 'customerAction_snoozeActionConfiguration' - Contains the configuration information of a snooze action. newCustomerAction :: CustomerAction newCustomerAction = CustomerAction' { acknowledgeActionConfiguration = Prelude.Nothing, actionName = Prelude.Nothing, disableActionConfiguration = Prelude.Nothing, enableActionConfiguration = Prelude.Nothing, resetActionConfiguration = Prelude.Nothing, snoozeActionConfiguration = Prelude.Nothing } -- | Contains the configuration information of an acknowledge action. customerAction_acknowledgeActionConfiguration :: Lens.Lens' CustomerAction (Prelude.Maybe AcknowledgeActionConfiguration) customerAction_acknowledgeActionConfiguration = Lens.lens (\CustomerAction' {acknowledgeActionConfiguration} -> acknowledgeActionConfiguration) (\s@CustomerAction' {} a -> s {acknowledgeActionConfiguration = a} :: CustomerAction) -- | The name of the action. The action name can be one of the following -- values: -- -- - @SNOOZE@ - When you snooze the alarm, the alarm state changes to -- @SNOOZE_DISABLED@. -- -- - @ENABLE@ - When you enable the alarm, the alarm state changes to -- @NORMAL@. -- -- - @DISABLE@ - When you disable the alarm, the alarm state changes to -- @DISABLED@. -- -- - @ACKNOWLEDGE@ - When you acknowledge the alarm, the alarm state -- changes to @ACKNOWLEDGED@. -- -- - @RESET@ - When you reset the alarm, the alarm state changes to -- @NORMAL@. -- -- For more information, see the -- -- API. customerAction_actionName :: Lens.Lens' CustomerAction (Prelude.Maybe CustomerActionName) customerAction_actionName = Lens.lens (\CustomerAction' {actionName} -> actionName) (\s@CustomerAction' {} a -> s {actionName = a} :: CustomerAction) -- | Contains the configuration information of a disable action. customerAction_disableActionConfiguration :: Lens.Lens' CustomerAction (Prelude.Maybe DisableActionConfiguration) customerAction_disableActionConfiguration = Lens.lens (\CustomerAction' {disableActionConfiguration} -> disableActionConfiguration) (\s@CustomerAction' {} a -> s {disableActionConfiguration = a} :: CustomerAction) -- | Contains the configuration information of an enable action. customerAction_enableActionConfiguration :: Lens.Lens' CustomerAction (Prelude.Maybe EnableActionConfiguration) customerAction_enableActionConfiguration = Lens.lens (\CustomerAction' {enableActionConfiguration} -> enableActionConfiguration) (\s@CustomerAction' {} a -> s {enableActionConfiguration = a} :: CustomerAction) -- | Contains the configuration information of a reset action. customerAction_resetActionConfiguration :: Lens.Lens' CustomerAction (Prelude.Maybe ResetActionConfiguration) customerAction_resetActionConfiguration = Lens.lens (\CustomerAction' {resetActionConfiguration} -> resetActionConfiguration) (\s@CustomerAction' {} a -> s {resetActionConfiguration = a} :: CustomerAction) -- | Contains the configuration information of a snooze action. customerAction_snoozeActionConfiguration :: Lens.Lens' CustomerAction (Prelude.Maybe SnoozeActionConfiguration) customerAction_snoozeActionConfiguration = Lens.lens (\CustomerAction' {snoozeActionConfiguration} -> snoozeActionConfiguration) (\s@CustomerAction' {} a -> s {snoozeActionConfiguration = a} :: CustomerAction) instance Data.FromJSON CustomerAction where parseJSON = Data.withObject "CustomerAction" ( \x -> CustomerAction' Prelude.<$> (x Data..:? "acknowledgeActionConfiguration") Prelude.<*> (x Data..:? "actionName") Prelude.<*> (x Data..:? "disableActionConfiguration") Prelude.<*> (x Data..:? "enableActionConfiguration") Prelude.<*> (x Data..:? "resetActionConfiguration") Prelude.<*> (x Data..:? "snoozeActionConfiguration") ) instance Prelude.Hashable CustomerAction where hashWithSalt _salt CustomerAction' {..} = _salt `Prelude.hashWithSalt` acknowledgeActionConfiguration `Prelude.hashWithSalt` actionName `Prelude.hashWithSalt` disableActionConfiguration `Prelude.hashWithSalt` enableActionConfiguration `Prelude.hashWithSalt` resetActionConfiguration `Prelude.hashWithSalt` snoozeActionConfiguration instance Prelude.NFData CustomerAction where rnf CustomerAction' {..} = Prelude.rnf acknowledgeActionConfiguration `Prelude.seq` Prelude.rnf actionName `Prelude.seq` Prelude.rnf disableActionConfiguration `Prelude.seq` Prelude.rnf enableActionConfiguration `Prelude.seq` Prelude.rnf resetActionConfiguration `Prelude.seq` Prelude.rnf snoozeActionConfiguration