{-# 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 #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.WAF.GetSqlInjectionMatchSet -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- This is __AWS WAF Classic__ documentation. For more information, see -- -- in the developer guide. -- -- __For the latest version of AWS WAF__, use the AWS WAFV2 API and see the -- . -- With the latest version, AWS WAF has a single set of endpoints for -- regional and global use. -- -- Returns the SqlInjectionMatchSet that is specified by -- @SqlInjectionMatchSetId@. module Amazonka.WAF.GetSqlInjectionMatchSet ( -- * Creating a Request GetSqlInjectionMatchSet (..), newGetSqlInjectionMatchSet, -- * Request Lenses getSqlInjectionMatchSet_sqlInjectionMatchSetId, -- * Destructuring the Response GetSqlInjectionMatchSetResponse (..), newGetSqlInjectionMatchSetResponse, -- * Response Lenses getSqlInjectionMatchSetResponse_sqlInjectionMatchSet, getSqlInjectionMatchSetResponse_httpStatus, ) 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 qualified Amazonka.Request as Request import qualified Amazonka.Response as Response import Amazonka.WAF.Types -- | A request to get a SqlInjectionMatchSet. -- -- /See:/ 'newGetSqlInjectionMatchSet' smart constructor. data GetSqlInjectionMatchSet = GetSqlInjectionMatchSet' { -- | The @SqlInjectionMatchSetId@ of the SqlInjectionMatchSet that you want -- to get. @SqlInjectionMatchSetId@ is returned by -- CreateSqlInjectionMatchSet and by ListSqlInjectionMatchSets. sqlInjectionMatchSetId :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'GetSqlInjectionMatchSet' 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: -- -- 'sqlInjectionMatchSetId', 'getSqlInjectionMatchSet_sqlInjectionMatchSetId' - The @SqlInjectionMatchSetId@ of the SqlInjectionMatchSet that you want -- to get. @SqlInjectionMatchSetId@ is returned by -- CreateSqlInjectionMatchSet and by ListSqlInjectionMatchSets. newGetSqlInjectionMatchSet :: -- | 'sqlInjectionMatchSetId' Prelude.Text -> GetSqlInjectionMatchSet newGetSqlInjectionMatchSet pSqlInjectionMatchSetId_ = GetSqlInjectionMatchSet' { sqlInjectionMatchSetId = pSqlInjectionMatchSetId_ } -- | The @SqlInjectionMatchSetId@ of the SqlInjectionMatchSet that you want -- to get. @SqlInjectionMatchSetId@ is returned by -- CreateSqlInjectionMatchSet and by ListSqlInjectionMatchSets. getSqlInjectionMatchSet_sqlInjectionMatchSetId :: Lens.Lens' GetSqlInjectionMatchSet Prelude.Text getSqlInjectionMatchSet_sqlInjectionMatchSetId = Lens.lens (\GetSqlInjectionMatchSet' {sqlInjectionMatchSetId} -> sqlInjectionMatchSetId) (\s@GetSqlInjectionMatchSet' {} a -> s {sqlInjectionMatchSetId = a} :: GetSqlInjectionMatchSet) instance Core.AWSRequest GetSqlInjectionMatchSet where type AWSResponse GetSqlInjectionMatchSet = GetSqlInjectionMatchSetResponse request overrides = Request.postJSON (overrides defaultService) response = Response.receiveJSON ( \s h x -> GetSqlInjectionMatchSetResponse' Prelude.<$> (x Data..?> "SqlInjectionMatchSet") Prelude.<*> (Prelude.pure (Prelude.fromEnum s)) ) instance Prelude.Hashable GetSqlInjectionMatchSet where hashWithSalt _salt GetSqlInjectionMatchSet' {..} = _salt `Prelude.hashWithSalt` sqlInjectionMatchSetId instance Prelude.NFData GetSqlInjectionMatchSet where rnf GetSqlInjectionMatchSet' {..} = Prelude.rnf sqlInjectionMatchSetId instance Data.ToHeaders GetSqlInjectionMatchSet where toHeaders = Prelude.const ( Prelude.mconcat [ "X-Amz-Target" Data.=# ( "AWSWAF_20150824.GetSqlInjectionMatchSet" :: Prelude.ByteString ), "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON GetSqlInjectionMatchSet where toJSON GetSqlInjectionMatchSet' {..} = Data.object ( Prelude.catMaybes [ Prelude.Just ( "SqlInjectionMatchSetId" Data..= sqlInjectionMatchSetId ) ] ) instance Data.ToPath GetSqlInjectionMatchSet where toPath = Prelude.const "/" instance Data.ToQuery GetSqlInjectionMatchSet where toQuery = Prelude.const Prelude.mempty -- | The response to a GetSqlInjectionMatchSet request. -- -- /See:/ 'newGetSqlInjectionMatchSetResponse' smart constructor. data GetSqlInjectionMatchSetResponse = GetSqlInjectionMatchSetResponse' { -- | Information about the SqlInjectionMatchSet that you specified in the -- @GetSqlInjectionMatchSet@ request. For more information, see the -- following topics: -- -- - SqlInjectionMatchSet: Contains @Name@, @SqlInjectionMatchSetId@, and -- an array of @SqlInjectionMatchTuple@ objects -- -- - SqlInjectionMatchTuple: Each @SqlInjectionMatchTuple@ object -- contains @FieldToMatch@ and @TextTransformation@ -- -- - FieldToMatch: Contains @Data@ and @Type@ sqlInjectionMatchSet :: Prelude.Maybe SqlInjectionMatchSet, -- | The response's http status code. httpStatus :: Prelude.Int } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'GetSqlInjectionMatchSetResponse' 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: -- -- 'sqlInjectionMatchSet', 'getSqlInjectionMatchSetResponse_sqlInjectionMatchSet' - Information about the SqlInjectionMatchSet that you specified in the -- @GetSqlInjectionMatchSet@ request. For more information, see the -- following topics: -- -- - SqlInjectionMatchSet: Contains @Name@, @SqlInjectionMatchSetId@, and -- an array of @SqlInjectionMatchTuple@ objects -- -- - SqlInjectionMatchTuple: Each @SqlInjectionMatchTuple@ object -- contains @FieldToMatch@ and @TextTransformation@ -- -- - FieldToMatch: Contains @Data@ and @Type@ -- -- 'httpStatus', 'getSqlInjectionMatchSetResponse_httpStatus' - The response's http status code. newGetSqlInjectionMatchSetResponse :: -- | 'httpStatus' Prelude.Int -> GetSqlInjectionMatchSetResponse newGetSqlInjectionMatchSetResponse pHttpStatus_ = GetSqlInjectionMatchSetResponse' { sqlInjectionMatchSet = Prelude.Nothing, httpStatus = pHttpStatus_ } -- | Information about the SqlInjectionMatchSet that you specified in the -- @GetSqlInjectionMatchSet@ request. For more information, see the -- following topics: -- -- - SqlInjectionMatchSet: Contains @Name@, @SqlInjectionMatchSetId@, and -- an array of @SqlInjectionMatchTuple@ objects -- -- - SqlInjectionMatchTuple: Each @SqlInjectionMatchTuple@ object -- contains @FieldToMatch@ and @TextTransformation@ -- -- - FieldToMatch: Contains @Data@ and @Type@ getSqlInjectionMatchSetResponse_sqlInjectionMatchSet :: Lens.Lens' GetSqlInjectionMatchSetResponse (Prelude.Maybe SqlInjectionMatchSet) getSqlInjectionMatchSetResponse_sqlInjectionMatchSet = Lens.lens (\GetSqlInjectionMatchSetResponse' {sqlInjectionMatchSet} -> sqlInjectionMatchSet) (\s@GetSqlInjectionMatchSetResponse' {} a -> s {sqlInjectionMatchSet = a} :: GetSqlInjectionMatchSetResponse) -- | The response's http status code. getSqlInjectionMatchSetResponse_httpStatus :: Lens.Lens' GetSqlInjectionMatchSetResponse Prelude.Int getSqlInjectionMatchSetResponse_httpStatus = Lens.lens (\GetSqlInjectionMatchSetResponse' {httpStatus} -> httpStatus) (\s@GetSqlInjectionMatchSetResponse' {} a -> s {httpStatus = a} :: GetSqlInjectionMatchSetResponse) instance Prelude.NFData GetSqlInjectionMatchSetResponse where rnf GetSqlInjectionMatchSetResponse' {..} = Prelude.rnf sqlInjectionMatchSet `Prelude.seq` Prelude.rnf httpStatus