{-# 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.IAM.UpdateSigningCertificate -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Changes the status of the specified user signing certificate from active -- to disabled, or vice versa. This operation can be used to disable an IAM -- user\'s signing certificate as part of a certificate rotation work flow. -- -- If the @UserName@ field is not specified, the user name is determined -- implicitly based on the Amazon Web Services access key ID used to sign -- the request. This operation works for access keys under the Amazon Web -- Services account. Consequently, you can use this operation to manage -- Amazon Web Services account root user credentials even if the Amazon Web -- Services account has no associated users. module Amazonka.IAM.UpdateSigningCertificate ( -- * Creating a Request UpdateSigningCertificate (..), newUpdateSigningCertificate, -- * Request Lenses updateSigningCertificate_userName, updateSigningCertificate_certificateId, updateSigningCertificate_status, -- * Destructuring the Response UpdateSigningCertificateResponse (..), newUpdateSigningCertificateResponse, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.IAM.Types import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | /See:/ 'newUpdateSigningCertificate' smart constructor. data UpdateSigningCertificate = UpdateSigningCertificate' { -- | The name of the IAM user the signing certificate belongs to. -- -- This parameter allows (through its -- ) a string of characters -- consisting of upper and lowercase alphanumeric characters with no -- spaces. You can also include any of the following characters: _+=,.\@- userName :: Prelude.Maybe Prelude.Text, -- | The ID of the signing certificate you want to update. -- -- This parameter allows (through its -- ) a string of characters -- that can consist of any upper or lowercased letter or digit. certificateId :: Prelude.Text, -- | The status you want to assign to the certificate. @Active@ means that -- the certificate can be used for programmatic calls to Amazon Web -- Services @Inactive@ means that the certificate cannot be used. status :: StatusType } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateSigningCertificate' 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: -- -- 'userName', 'updateSigningCertificate_userName' - The name of the IAM user the signing certificate belongs to. -- -- This parameter allows (through its -- ) a string of characters -- consisting of upper and lowercase alphanumeric characters with no -- spaces. You can also include any of the following characters: _+=,.\@- -- -- 'certificateId', 'updateSigningCertificate_certificateId' - The ID of the signing certificate you want to update. -- -- This parameter allows (through its -- ) a string of characters -- that can consist of any upper or lowercased letter or digit. -- -- 'status', 'updateSigningCertificate_status' - The status you want to assign to the certificate. @Active@ means that -- the certificate can be used for programmatic calls to Amazon Web -- Services @Inactive@ means that the certificate cannot be used. newUpdateSigningCertificate :: -- | 'certificateId' Prelude.Text -> -- | 'status' StatusType -> UpdateSigningCertificate newUpdateSigningCertificate pCertificateId_ pStatus_ = UpdateSigningCertificate' { userName = Prelude.Nothing, certificateId = pCertificateId_, status = pStatus_ } -- | The name of the IAM user the signing certificate belongs to. -- -- This parameter allows (through its -- ) a string of characters -- consisting of upper and lowercase alphanumeric characters with no -- spaces. You can also include any of the following characters: _+=,.\@- updateSigningCertificate_userName :: Lens.Lens' UpdateSigningCertificate (Prelude.Maybe Prelude.Text) updateSigningCertificate_userName = Lens.lens (\UpdateSigningCertificate' {userName} -> userName) (\s@UpdateSigningCertificate' {} a -> s {userName = a} :: UpdateSigningCertificate) -- | The ID of the signing certificate you want to update. -- -- This parameter allows (through its -- ) a string of characters -- that can consist of any upper or lowercased letter or digit. updateSigningCertificate_certificateId :: Lens.Lens' UpdateSigningCertificate Prelude.Text updateSigningCertificate_certificateId = Lens.lens (\UpdateSigningCertificate' {certificateId} -> certificateId) (\s@UpdateSigningCertificate' {} a -> s {certificateId = a} :: UpdateSigningCertificate) -- | The status you want to assign to the certificate. @Active@ means that -- the certificate can be used for programmatic calls to Amazon Web -- Services @Inactive@ means that the certificate cannot be used. updateSigningCertificate_status :: Lens.Lens' UpdateSigningCertificate StatusType updateSigningCertificate_status = Lens.lens (\UpdateSigningCertificate' {status} -> status) (\s@UpdateSigningCertificate' {} a -> s {status = a} :: UpdateSigningCertificate) instance Core.AWSRequest UpdateSigningCertificate where type AWSResponse UpdateSigningCertificate = UpdateSigningCertificateResponse request overrides = Request.postQuery (overrides defaultService) response = Response.receiveNull UpdateSigningCertificateResponse' instance Prelude.Hashable UpdateSigningCertificate where hashWithSalt _salt UpdateSigningCertificate' {..} = _salt `Prelude.hashWithSalt` userName `Prelude.hashWithSalt` certificateId `Prelude.hashWithSalt` status instance Prelude.NFData UpdateSigningCertificate where rnf UpdateSigningCertificate' {..} = Prelude.rnf userName `Prelude.seq` Prelude.rnf certificateId `Prelude.seq` Prelude.rnf status instance Data.ToHeaders UpdateSigningCertificate where toHeaders = Prelude.const Prelude.mempty instance Data.ToPath UpdateSigningCertificate where toPath = Prelude.const "/" instance Data.ToQuery UpdateSigningCertificate where toQuery UpdateSigningCertificate' {..} = Prelude.mconcat [ "Action" Data.=: ("UpdateSigningCertificate" :: Prelude.ByteString), "Version" Data.=: ("2010-05-08" :: Prelude.ByteString), "UserName" Data.=: userName, "CertificateId" Data.=: certificateId, "Status" Data.=: status ] -- | /See:/ 'newUpdateSigningCertificateResponse' smart constructor. data UpdateSigningCertificateResponse = UpdateSigningCertificateResponse' { } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateSigningCertificateResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. newUpdateSigningCertificateResponse :: UpdateSigningCertificateResponse newUpdateSigningCertificateResponse = UpdateSigningCertificateResponse' instance Prelude.NFData UpdateSigningCertificateResponse where rnf _ = ()