{-# 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.SMS.Types.ValidationOutput -- 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.SMS.Types.ValidationOutput where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude import Amazonka.SMS.Types.AppValidationOutput import Amazonka.SMS.Types.ServerValidationOutput import Amazonka.SMS.Types.ValidationStatus -- | Contains validation output. -- -- /See:/ 'newValidationOutput' smart constructor. data ValidationOutput = ValidationOutput' { -- | The output from validating an application. appValidationOutput :: Prelude.Maybe AppValidationOutput, -- | The latest time that the validation was performed. latestValidationTime :: Prelude.Maybe Data.POSIX, -- | The name of the validation. name :: Prelude.Maybe Prelude.Text, -- | The output from validation an instance. serverValidationOutput :: Prelude.Maybe ServerValidationOutput, -- | The status of the validation. status :: Prelude.Maybe ValidationStatus, -- | The status message. statusMessage :: Prelude.Maybe Prelude.Text, -- | The ID of the validation. validationId :: Prelude.Maybe Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'ValidationOutput' 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: -- -- 'appValidationOutput', 'validationOutput_appValidationOutput' - The output from validating an application. -- -- 'latestValidationTime', 'validationOutput_latestValidationTime' - The latest time that the validation was performed. -- -- 'name', 'validationOutput_name' - The name of the validation. -- -- 'serverValidationOutput', 'validationOutput_serverValidationOutput' - The output from validation an instance. -- -- 'status', 'validationOutput_status' - The status of the validation. -- -- 'statusMessage', 'validationOutput_statusMessage' - The status message. -- -- 'validationId', 'validationOutput_validationId' - The ID of the validation. newValidationOutput :: ValidationOutput newValidationOutput = ValidationOutput' { appValidationOutput = Prelude.Nothing, latestValidationTime = Prelude.Nothing, name = Prelude.Nothing, serverValidationOutput = Prelude.Nothing, status = Prelude.Nothing, statusMessage = Prelude.Nothing, validationId = Prelude.Nothing } -- | The output from validating an application. validationOutput_appValidationOutput :: Lens.Lens' ValidationOutput (Prelude.Maybe AppValidationOutput) validationOutput_appValidationOutput = Lens.lens (\ValidationOutput' {appValidationOutput} -> appValidationOutput) (\s@ValidationOutput' {} a -> s {appValidationOutput = a} :: ValidationOutput) -- | The latest time that the validation was performed. validationOutput_latestValidationTime :: Lens.Lens' ValidationOutput (Prelude.Maybe Prelude.UTCTime) validationOutput_latestValidationTime = Lens.lens (\ValidationOutput' {latestValidationTime} -> latestValidationTime) (\s@ValidationOutput' {} a -> s {latestValidationTime = a} :: ValidationOutput) Prelude.. Lens.mapping Data._Time -- | The name of the validation. validationOutput_name :: Lens.Lens' ValidationOutput (Prelude.Maybe Prelude.Text) validationOutput_name = Lens.lens (\ValidationOutput' {name} -> name) (\s@ValidationOutput' {} a -> s {name = a} :: ValidationOutput) -- | The output from validation an instance. validationOutput_serverValidationOutput :: Lens.Lens' ValidationOutput (Prelude.Maybe ServerValidationOutput) validationOutput_serverValidationOutput = Lens.lens (\ValidationOutput' {serverValidationOutput} -> serverValidationOutput) (\s@ValidationOutput' {} a -> s {serverValidationOutput = a} :: ValidationOutput) -- | The status of the validation. validationOutput_status :: Lens.Lens' ValidationOutput (Prelude.Maybe ValidationStatus) validationOutput_status = Lens.lens (\ValidationOutput' {status} -> status) (\s@ValidationOutput' {} a -> s {status = a} :: ValidationOutput) -- | The status message. validationOutput_statusMessage :: Lens.Lens' ValidationOutput (Prelude.Maybe Prelude.Text) validationOutput_statusMessage = Lens.lens (\ValidationOutput' {statusMessage} -> statusMessage) (\s@ValidationOutput' {} a -> s {statusMessage = a} :: ValidationOutput) -- | The ID of the validation. validationOutput_validationId :: Lens.Lens' ValidationOutput (Prelude.Maybe Prelude.Text) validationOutput_validationId = Lens.lens (\ValidationOutput' {validationId} -> validationId) (\s@ValidationOutput' {} a -> s {validationId = a} :: ValidationOutput) instance Data.FromJSON ValidationOutput where parseJSON = Data.withObject "ValidationOutput" ( \x -> ValidationOutput' Prelude.<$> (x Data..:? "appValidationOutput") Prelude.<*> (x Data..:? "latestValidationTime") Prelude.<*> (x Data..:? "name") Prelude.<*> (x Data..:? "serverValidationOutput") Prelude.<*> (x Data..:? "status") Prelude.<*> (x Data..:? "statusMessage") Prelude.<*> (x Data..:? "validationId") ) instance Prelude.Hashable ValidationOutput where hashWithSalt _salt ValidationOutput' {..} = _salt `Prelude.hashWithSalt` appValidationOutput `Prelude.hashWithSalt` latestValidationTime `Prelude.hashWithSalt` name `Prelude.hashWithSalt` serverValidationOutput `Prelude.hashWithSalt` status `Prelude.hashWithSalt` statusMessage `Prelude.hashWithSalt` validationId instance Prelude.NFData ValidationOutput where rnf ValidationOutput' {..} = Prelude.rnf appValidationOutput `Prelude.seq` Prelude.rnf latestValidationTime `Prelude.seq` Prelude.rnf name `Prelude.seq` Prelude.rnf serverValidationOutput `Prelude.seq` Prelude.rnf status `Prelude.seq` Prelude.rnf statusMessage `Prelude.seq` Prelude.rnf validationId