amazonka-voice-id: regenerating service

lib/services/amazonka-voice-id/BUILD.bazel

@@ -53,6 +53,8 @@ haskell_library(
         "gen/Amazonka/VoiceId/Types/OutputDataConfig.hs",
         "gen/Amazonka/VoiceId/Types/RegistrationConfig.hs",
         "gen/Amazonka/VoiceId/Types/ServerSideEncryptionConfiguration.hs",
+        "gen/Amazonka/VoiceId/Types/ServerSideEncryptionUpdateDetails.hs",
+        "gen/Amazonka/VoiceId/Types/ServerSideEncryptionUpdateStatus.hs",
         "gen/Amazonka/VoiceId/Types/Speaker.hs",
         "gen/Amazonka/VoiceId/Types/SpeakerEnrollmentJob.hs",
         "gen/Amazonka/VoiceId/Types/SpeakerEnrollmentJobStatus.hs",

lib/services/amazonka-voice-id/amazonka-voice-id.cabal

@@ -92,6 +92,8 @@ library
     Amazonka.VoiceId.Types.OutputDataConfig
     Amazonka.VoiceId.Types.RegistrationConfig
     Amazonka.VoiceId.Types.ServerSideEncryptionConfiguration
+    Amazonka.VoiceId.Types.ServerSideEncryptionUpdateDetails
+    Amazonka.VoiceId.Types.ServerSideEncryptionUpdateStatus
     Amazonka.VoiceId.Types.Speaker
     Amazonka.VoiceId.Types.SpeakerEnrollmentJob
     Amazonka.VoiceId.Types.SpeakerEnrollmentJobStatus

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId.hs

@@ -107,25 +107,25 @@ module Amazonka.VoiceId
     EvaluateSessionResponse (EvaluateSessionResponse'),
     newEvaluateSessionResponse,
 
-    -- ** ListDomains
+    -- ** ListDomains (Paginated)
     ListDomains (ListDomains'),
     newListDomains,
     ListDomainsResponse (ListDomainsResponse'),
     newListDomainsResponse,
 
-    -- ** ListFraudsterRegistrationJobs
+    -- ** ListFraudsterRegistrationJobs (Paginated)
     ListFraudsterRegistrationJobs (ListFraudsterRegistrationJobs'),
     newListFraudsterRegistrationJobs,
     ListFraudsterRegistrationJobsResponse (ListFraudsterRegistrationJobsResponse'),
     newListFraudsterRegistrationJobsResponse,
 
-    -- ** ListSpeakerEnrollmentJobs
+    -- ** ListSpeakerEnrollmentJobs (Paginated)
     ListSpeakerEnrollmentJobs (ListSpeakerEnrollmentJobs'),
     newListSpeakerEnrollmentJobs,
     ListSpeakerEnrollmentJobsResponse (ListSpeakerEnrollmentJobsResponse'),
     newListSpeakerEnrollmentJobsResponse,
 
-    -- ** ListSpeakers
+    -- ** ListSpeakers (Paginated)
     ListSpeakers (ListSpeakers'),
     newListSpeakers,
     ListSpeakersResponse (ListSpeakersResponse'),
@@ -199,6 +199,9 @@ module Amazonka.VoiceId
     -- ** FraudsterRegistrationJobStatus
     FraudsterRegistrationJobStatus (..),
 
+    -- ** ServerSideEncryptionUpdateStatus
+    ServerSideEncryptionUpdateStatus (..),
+
     -- ** SpeakerEnrollmentJobStatus
     SpeakerEnrollmentJobStatus (..),
 
@@ -284,6 +287,10 @@ module Amazonka.VoiceId
     ServerSideEncryptionConfiguration (ServerSideEncryptionConfiguration'),
     newServerSideEncryptionConfiguration,
 
+    -- ** ServerSideEncryptionUpdateDetails
+    ServerSideEncryptionUpdateDetails (ServerSideEncryptionUpdateDetails'),
+    newServerSideEncryptionUpdateDetails,
+
     -- ** Speaker
     Speaker (Speaker'),
     newSpeaker,

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/CreateDomain.hs

@@ -62,10 +62,10 @@ data CreateDomain = CreateDomain'
     description :: Prelude.Maybe (Core.Sensitive Prelude.Text),
     -- | The name of the domain.
     name :: Core.Sensitive Prelude.Text,
-    -- | The configuration, containing the KMS Key Identifier, to be used by
+    -- | The configuration, containing the KMS key identifier, to be used by
     -- Voice ID for the server-side encryption of your data. Refer to
-    -- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect VoiceID encryption at rest>
-    -- for more details on how the KMS Key is used.
+    -- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect Voice ID encryption at rest>
+    -- for more details on how the KMS key is used.
     serverSideEncryptionConfiguration :: ServerSideEncryptionConfiguration
   }
   deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)
@@ -87,10 +87,10 @@ data CreateDomain = CreateDomain'
 --
 -- 'name', 'createDomain_name' - The name of the domain.
 --
--- 'serverSideEncryptionConfiguration', 'createDomain_serverSideEncryptionConfiguration' - The configuration, containing the KMS Key Identifier, to be used by
+-- 'serverSideEncryptionConfiguration', 'createDomain_serverSideEncryptionConfiguration' - The configuration, containing the KMS key identifier, to be used by
 -- Voice ID for the server-side encryption of your data. Refer to
--- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect VoiceID encryption at rest>
--- for more details on how the KMS Key is used.
+-- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect Voice ID encryption at rest>
+-- for more details on how the KMS key is used.
 newCreateDomain ::
   -- | 'name'
   Prelude.Text ->
@@ -126,10 +126,10 @@ createDomain_description = Lens.lens (\CreateDomain' {description} -> descriptio
 createDomain_name :: Lens.Lens' CreateDomain Prelude.Text
 createDomain_name = Lens.lens (\CreateDomain' {name} -> name) (\s@CreateDomain' {} a -> s {name = a} :: CreateDomain) Prelude.. Core._Sensitive
 
--- | The configuration, containing the KMS Key Identifier, to be used by
+-- | The configuration, containing the KMS key identifier, to be used by
 -- Voice ID for the server-side encryption of your data. Refer to
--- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect VoiceID encryption at rest>
--- for more details on how the KMS Key is used.
+-- <https://docs.aws.amazon.com/connect/latest/adminguide/encryption-at-rest.html#encryption-at-rest-voiceid Amazon Connect Voice ID encryption at rest>
+-- for more details on how the KMS key is used.
 createDomain_serverSideEncryptionConfiguration :: Lens.Lens' CreateDomain ServerSideEncryptionConfiguration
 createDomain_serverSideEncryptionConfiguration = Lens.lens (\CreateDomain' {serverSideEncryptionConfiguration} -> serverSideEncryptionConfiguration) (\s@CreateDomain' {} a -> s {serverSideEncryptionConfiguration = a} :: CreateDomain)
 

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/DeleteDomain.hs

@@ -20,7 +20,7 @@
 -- Stability   : auto-generated
 -- Portability : non-portable (GHC extensions)
 --
--- Deletes the specified domain from the Amazon Connect Voice ID system.
+-- Deletes the specified domain from Voice ID.
 module Amazonka.VoiceId.DeleteDomain
   ( -- * Creating a Request
     DeleteDomain (..),

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/DeleteFraudster.hs

@@ -20,7 +20,7 @@
 -- Stability   : auto-generated
 -- Portability : non-portable (GHC extensions)
 --
--- Deletes the specified fraudster from the Amazon Connect Voice ID system.
+-- Deletes the specified fraudster from Voice ID.
 module Amazonka.VoiceId.DeleteFraudster
   ( -- * Creating a Request
     DeleteFraudster (..),

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/DeleteSpeaker.hs

@@ -20,7 +20,7 @@
 -- Stability   : auto-generated
 -- Portability : non-portable (GHC extensions)
 --
--- Deletes the specified speaker from the Amazon Connect Voice ID system.
+-- Deletes the specified speaker from Voice ID.
 module Amazonka.VoiceId.DeleteSpeaker
   ( -- * Creating a Request
     DeleteSpeaker (..),

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/EvaluateSession.hs

@@ -165,7 +165,7 @@ data EvaluateSessionResponse = EvaluateSessionResponse'
     -- useful to infer next steps when the Authentication or Fraud Detection
     -- results are empty or the decision is @NOT_ENOUGH_SPEECH@. In this
     -- situation, if the @StreamingStatus@ is @ONGOING\/PENDING_CONFIGURATION@,
-    -- it can mean that the client should call the API again later, once Voice
+    -- it can mean that the client should call the API again later, after Voice
     -- ID has enough audio to produce a result. If the decision remains
     -- @NOT_ENOUGH_SPEECH@ even after @StreamingStatus@ is @ENDED@, it means
     -- that the previously streamed session did not have enough speech to
@@ -200,7 +200,7 @@ data EvaluateSessionResponse = EvaluateSessionResponse'
 -- useful to infer next steps when the Authentication or Fraud Detection
 -- results are empty or the decision is @NOT_ENOUGH_SPEECH@. In this
 -- situation, if the @StreamingStatus@ is @ONGOING\/PENDING_CONFIGURATION@,
--- it can mean that the client should call the API again later, once Voice
+-- it can mean that the client should call the API again later, after Voice
 -- ID has enough audio to produce a result. If the decision remains
 -- @NOT_ENOUGH_SPEECH@ even after @StreamingStatus@ is @ENDED@, it means
 -- that the previously streamed session did not have enough speech to
@@ -243,7 +243,7 @@ evaluateSessionResponse_fraudDetectionResult = Lens.lens (\EvaluateSessionRespon
 -- useful to infer next steps when the Authentication or Fraud Detection
 -- results are empty or the decision is @NOT_ENOUGH_SPEECH@. In this
 -- situation, if the @StreamingStatus@ is @ONGOING\/PENDING_CONFIGURATION@,
--- it can mean that the client should call the API again later, once Voice
+-- it can mean that the client should call the API again later, after Voice
 -- ID has enough audio to produce a result. If the decision remains
 -- @NOT_ENOUGH_SPEECH@ even after @StreamingStatus@ is @ENDED@, it means
 -- that the previously streamed session did not have enough speech to

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/Lens.hs

@@ -175,6 +175,7 @@ module Amazonka.VoiceId.Lens
 
     -- ** Domain
     domain_name,
+    domain_serverSideEncryptionUpdateDetails,
     domain_serverSideEncryptionConfiguration,
     domain_arn,
     domain_description,
@@ -185,6 +186,7 @@ module Amazonka.VoiceId.Lens
 
     -- ** DomainSummary
     domainSummary_name,
+    domainSummary_serverSideEncryptionUpdateDetails,
     domainSummary_serverSideEncryptionConfiguration,
     domainSummary_arn,
     domainSummary_description,
@@ -270,7 +272,13 @@ module Amazonka.VoiceId.Lens
     -- ** ServerSideEncryptionConfiguration
     serverSideEncryptionConfiguration_kmsKeyId,
 
+    -- ** ServerSideEncryptionUpdateDetails
+    serverSideEncryptionUpdateDetails_message,
+    serverSideEncryptionUpdateDetails_oldKmsKeyId,
+    serverSideEncryptionUpdateDetails_updateStatus,
+
     -- ** Speaker
+    speaker_lastAccessedAt,
     speaker_status,
     speaker_customerSpeakerId,
     speaker_generatedSpeakerId,
@@ -303,6 +311,7 @@ module Amazonka.VoiceId.Lens
     speakerEnrollmentJobSummary_createdAt,
 
     -- ** SpeakerSummary
+    speakerSummary_lastAccessedAt,
     speakerSummary_status,
     speakerSummary_customerSpeakerId,
     speakerSummary_generatedSpeakerId,
@@ -354,6 +363,7 @@ import Amazonka.VoiceId.Types.KnownFraudsterRisk
 import Amazonka.VoiceId.Types.OutputDataConfig
 import Amazonka.VoiceId.Types.RegistrationConfig
 import Amazonka.VoiceId.Types.ServerSideEncryptionConfiguration
+import Amazonka.VoiceId.Types.ServerSideEncryptionUpdateDetails
 import Amazonka.VoiceId.Types.Speaker
 import Amazonka.VoiceId.Types.SpeakerEnrollmentJob
 import Amazonka.VoiceId.Types.SpeakerEnrollmentJobSummary

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/ListDomains.hs

@@ -21,6 +21,8 @@
 -- Portability : non-portable (GHC extensions)
 --
 -- Lists all the domains in the Amazon Web Services account.
+--
+-- This operation returns paginated results.
 module Amazonka.VoiceId.ListDomains
   ( -- * Creating a Request
     ListDomains (..),
@@ -99,6 +101,26 @@ listDomains_nextToken = Lens.lens (\ListDomains' {nextToken} -> nextToken) (\s@L
 listDomains_maxResults :: Lens.Lens' ListDomains (Prelude.Maybe Prelude.Natural)
 listDomains_maxResults = Lens.lens (\ListDomains' {maxResults} -> maxResults) (\s@ListDomains' {} a -> s {maxResults = a} :: ListDomains)
 
+instance Core.AWSPager ListDomains where
+  page rq rs
+    | Core.stop
+        ( rs
+            Lens.^? listDomainsResponse_nextToken Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Core.stop
+        ( rs
+            Lens.^? listDomainsResponse_domainSummaries
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Prelude.otherwise =
+      Prelude.Just Prelude.$
+        rq
+          Prelude.& listDomains_nextToken
+          Lens..~ rs
+          Lens.^? listDomainsResponse_nextToken Prelude.. Lens._Just
+
 instance Core.AWSRequest ListDomains where
   type AWSResponse ListDomains = ListDomainsResponse
   request = Request.postJSON defaultService

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/ListFraudsterRegistrationJobs.hs

@@ -23,6 +23,8 @@
 -- Lists all the fraudster registration jobs in the domain with the given
 -- @JobStatus@. If @JobStatus@ is not provided, this lists all fraudster
 -- registration jobs in the given domain.
+--
+-- This operation returns paginated results.
 module Amazonka.VoiceId.ListFraudsterRegistrationJobs
   ( -- * Creating a Request
     ListFraudsterRegistrationJobs (..),
@@ -124,6 +126,28 @@ listFraudsterRegistrationJobs_maxResults = Lens.lens (\ListFraudsterRegistration
 listFraudsterRegistrationJobs_domainId :: Lens.Lens' ListFraudsterRegistrationJobs Prelude.Text
 listFraudsterRegistrationJobs_domainId = Lens.lens (\ListFraudsterRegistrationJobs' {domainId} -> domainId) (\s@ListFraudsterRegistrationJobs' {} a -> s {domainId = a} :: ListFraudsterRegistrationJobs)
 
+instance Core.AWSPager ListFraudsterRegistrationJobs where
+  page rq rs
+    | Core.stop
+        ( rs
+            Lens.^? listFraudsterRegistrationJobsResponse_nextToken
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Core.stop
+        ( rs
+            Lens.^? listFraudsterRegistrationJobsResponse_jobSummaries
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Prelude.otherwise =
+      Prelude.Just Prelude.$
+        rq
+          Prelude.& listFraudsterRegistrationJobs_nextToken
+          Lens..~ rs
+          Lens.^? listFraudsterRegistrationJobsResponse_nextToken
+            Prelude.. Lens._Just
+
 instance
   Core.AWSRequest
     ListFraudsterRegistrationJobs

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/ListSpeakerEnrollmentJobs.hs

@@ -23,6 +23,8 @@
 -- Lists all the speaker enrollment jobs in the domain with the specified
 -- @JobStatus@. If @JobStatus@ is not provided, this lists all jobs with
 -- all possible speaker enrollment job statuses.
+--
+-- This operation returns paginated results.
 module Amazonka.VoiceId.ListSpeakerEnrollmentJobs
   ( -- * Creating a Request
     ListSpeakerEnrollmentJobs (..),
@@ -124,6 +126,28 @@ listSpeakerEnrollmentJobs_maxResults = Lens.lens (\ListSpeakerEnrollmentJobs' {m
 listSpeakerEnrollmentJobs_domainId :: Lens.Lens' ListSpeakerEnrollmentJobs Prelude.Text
 listSpeakerEnrollmentJobs_domainId = Lens.lens (\ListSpeakerEnrollmentJobs' {domainId} -> domainId) (\s@ListSpeakerEnrollmentJobs' {} a -> s {domainId = a} :: ListSpeakerEnrollmentJobs)
 
+instance Core.AWSPager ListSpeakerEnrollmentJobs where
+  page rq rs
+    | Core.stop
+        ( rs
+            Lens.^? listSpeakerEnrollmentJobsResponse_nextToken
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Core.stop
+        ( rs
+            Lens.^? listSpeakerEnrollmentJobsResponse_jobSummaries
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Prelude.otherwise =
+      Prelude.Just Prelude.$
+        rq
+          Prelude.& listSpeakerEnrollmentJobs_nextToken
+          Lens..~ rs
+          Lens.^? listSpeakerEnrollmentJobsResponse_nextToken
+            Prelude.. Lens._Just
+
 instance Core.AWSRequest ListSpeakerEnrollmentJobs where
   type
     AWSResponse ListSpeakerEnrollmentJobs =

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/ListSpeakers.hs

@@ -21,6 +21,8 @@
 -- Portability : non-portable (GHC extensions)
 --
 -- Lists all speakers in a specified domain.
+--
+-- This operation returns paginated results.
 module Amazonka.VoiceId.ListSpeakers
   ( -- * Creating a Request
     ListSpeakers (..),
@@ -111,6 +113,26 @@ listSpeakers_maxResults = Lens.lens (\ListSpeakers' {maxResults} -> maxResults)
 listSpeakers_domainId :: Lens.Lens' ListSpeakers Prelude.Text
 listSpeakers_domainId = Lens.lens (\ListSpeakers' {domainId} -> domainId) (\s@ListSpeakers' {} a -> s {domainId = a} :: ListSpeakers)
 
+instance Core.AWSPager ListSpeakers where
+  page rq rs
+    | Core.stop
+        ( rs
+            Lens.^? listSpeakersResponse_nextToken Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Core.stop
+        ( rs
+            Lens.^? listSpeakersResponse_speakerSummaries
+              Prelude.. Lens._Just
+        ) =
+      Prelude.Nothing
+    | Prelude.otherwise =
+      Prelude.Just Prelude.$
+        rq
+          Prelude.& listSpeakers_nextToken
+          Lens..~ rs
+          Lens.^? listSpeakersResponse_nextToken Prelude.. Lens._Just
+
 instance Core.AWSRequest ListSpeakers where
   type AWSResponse ListSpeakers = ListSpeakersResponse
   request = Request.postJSON defaultService

lib/services/amazonka-voice-id/gen/Amazonka/VoiceId/OptOutSpeaker.hs

@@ -20,13 +20,13 @@
 -- Stability   : auto-generated
 -- Portability : non-portable (GHC extensions)
 --
--- Opts out a speaker from Voice ID system. A speaker can be opted out
--- regardless of whether or not they already exist in the system. If they
--- don\'t yet exist, a new speaker is created in an opted out state. If
--- they already exist, their existing status is overridden and they are
--- opted out. Enrollment and evaluation authentication requests are
--- rejected for opted out speakers, and opted out speakers have no voice
--- embeddings stored in the system.
+-- Opts out a speaker from Voice ID. A speaker can be opted out regardless
+-- of whether or not they already exist in Voice ID. If they don\'t yet
+-- exist, a new speaker is created in an opted out state. If they already
+-- exist, their existing status is overridden and they are opted out.
+-- Enrollment and evaluation authentication requests are rejected for opted
+-- out speakers, and opted out speakers have no voice embeddings stored in
+-- Voice ID.
 module Amazonka.VoiceId.OptOutSpeaker
   ( -- * Creating a Request
     OptOutSpeaker (..),