amazonka-efs 1.6.1 → 2.0

raw patch · 129 files changed

+11096/−2971 lines, 129 filesdep +case-insensitivedep ~amazonka-coredep ~amazonka-testdep ~basesetup-changedPVP ok

version bump matches the API change (PVP)

Dependencies added: case-insensitive

Dependency ranges changed: amazonka-core, amazonka-test, base

API changes (from Hackage documentation)

Files

• README.md +3/−4
• Setup.hs +0/−2
• amazonka-efs.cabal +125/−85
• fixture/CreateAccessPoint.yaml +10/−0
• fixture/CreateAccessPointResponse.proto +0/−0
• fixture/CreateFileSystem.yaml +10/−0
• fixture/CreateMountTarget.yaml +10/−0
• fixture/CreateReplicationConfiguration.yaml +10/−0
• fixture/CreateReplicationConfigurationResponse.proto +0/−0
• fixture/DeleteAccessPoint.yaml +10/−0
• fixture/DeleteAccessPointResponse.proto +0/−0
• fixture/DeleteFileSystem.yaml +10/−0
• fixture/DeleteFileSystemPolicy.yaml +10/−0
• fixture/DeleteFileSystemPolicyResponse.proto +0/−0
• fixture/DeleteMountTarget.yaml +10/−0
• fixture/DeleteReplicationConfiguration.yaml +10/−0
• fixture/DeleteReplicationConfigurationResponse.proto +0/−0
• fixture/DescribeAccessPoints.yaml +10/−0
• fixture/DescribeAccessPointsResponse.proto +0/−0
• fixture/DescribeAccountPreferences.yaml +10/−0
• fixture/DescribeAccountPreferencesResponse.proto +0/−0
• fixture/DescribeBackupPolicy.yaml +10/−0
• fixture/DescribeBackupPolicyResponse.proto +0/−0
• fixture/DescribeFileSystemPolicy.yaml +10/−0
• fixture/DescribeFileSystemPolicyResponse.proto +0/−0
• fixture/DescribeFileSystems.yaml +10/−0
• fixture/DescribeLifecycleConfiguration.yaml +10/−0
• fixture/DescribeLifecycleConfigurationResponse.proto +0/−0
• fixture/DescribeMountTargetSecurityGroups.yaml +10/−0
• fixture/DescribeMountTargets.yaml +10/−0
• fixture/DescribeReplicationConfigurations.yaml +10/−0
• fixture/DescribeReplicationConfigurationsResponse.proto +0/−0
• fixture/ListTagsForResource.yaml +10/−0
• fixture/ListTagsForResourceResponse.proto +0/−0
• fixture/ModifyMountTargetSecurityGroups.yaml +10/−0
• fixture/PutAccountPreferences.yaml +10/−0
• fixture/PutAccountPreferencesResponse.proto +0/−0
• fixture/PutBackupPolicy.yaml +10/−0
• fixture/PutBackupPolicyResponse.proto +0/−0
• fixture/PutFileSystemPolicy.yaml +10/−0
• fixture/PutFileSystemPolicyResponse.proto +0/−0
• fixture/PutLifecycleConfiguration.yaml +10/−0
• fixture/PutLifecycleConfigurationResponse.proto +0/−0
• fixture/TagResource.yaml +10/−0
• fixture/TagResourceResponse.proto +0/−0
• fixture/UntagResource.yaml +10/−0
• fixture/UntagResourceResponse.proto +0/−0
• fixture/UpdateFileSystem.yaml +10/−0
• fixture/UpdateFileSystemResponse.proto +0/−0
• gen/Amazonka/EFS.hs +445/−0
• gen/Amazonka/EFS/CreateAccessPoint.hs +243/−0
• gen/Amazonka/EFS/CreateFileSystem.hs +523/−0
• gen/Amazonka/EFS/CreateMountTarget.hs +294/−0
• gen/Amazonka/EFS/CreateReplicationConfiguration.hs +221/−0
• gen/Amazonka/EFS/DeleteAccessPoint.hs +125/−0
• gen/Amazonka/EFS/DeleteFileSystem.hs +141/−0
• gen/Amazonka/EFS/DeleteFileSystemPolicy.hs +136/−0
• gen/Amazonka/EFS/DeleteMountTarget.hs +146/−0
• gen/Amazonka/EFS/DeleteReplicationConfiguration.hs +148/−0
• gen/Amazonka/EFS/DescribeAccessPoints.hs +237/−0
• gen/Amazonka/EFS/DescribeAccountPreferences.hs +207/−0
• gen/Amazonka/EFS/DescribeBackupPolicy.hs +109/−0
• gen/Amazonka/EFS/DescribeFileSystemPolicy.hs +113/−0
• gen/Amazonka/EFS/DescribeFileSystems.hs +299/−0
• gen/Amazonka/EFS/DescribeLifecycleConfiguration.hs +137/−0
• gen/Amazonka/EFS/DescribeMountTargetSecurityGroups.hs +198/−0
• gen/Amazonka/EFS/DescribeMountTargets.hs +318/−0
• gen/Amazonka/EFS/DescribeReplicationConfigurations.hs +234/−0
• gen/Amazonka/EFS/Lens.hs +384/−0
• gen/Amazonka/EFS/ListTagsForResource.hs +220/−0
• gen/Amazonka/EFS/ModifyMountTargetSecurityGroups.hs +181/−0
• gen/Amazonka/EFS/PutAccountPreferences.hs +194/−0
• gen/Amazonka/EFS/PutBackupPolicy.hs +131/−0
• gen/Amazonka/EFS/PutFileSystemPolicy.hs +199/−0
• gen/Amazonka/EFS/PutLifecycleConfiguration.hs +231/−0
• gen/Amazonka/EFS/TagResource.hs +139/−0
• gen/Amazonka/EFS/Types.hs +602/−0
• gen/Amazonka/EFS/Types/AccessPointDescription.hs +203/−0
• gen/Amazonka/EFS/Types/BackupPolicy.hs +113/−0
• gen/Amazonka/EFS/Types/BackupPolicyDescription.hs +74/−0
• gen/Amazonka/EFS/Types/BackupStatus.hs +81/−0
• gen/Amazonka/EFS/Types/CreationInfo.hs +136/−0
• gen/Amazonka/EFS/Types/Destination.hs +143/−0
• gen/Amazonka/EFS/Types/DestinationToCreate.hs +152/−0
• gen/Amazonka/EFS/Types/FileSystemDescription.hs +390/−0
• gen/Amazonka/EFS/Types/FileSystemPolicyDescription.hs +83/−0
• gen/Amazonka/EFS/Types/FileSystemSize.hs +132/−0
• gen/Amazonka/EFS/Types/LifeCycleState.hs +91/−0
• gen/Amazonka/EFS/Types/LifecycleConfigurationDescription.hs +88/−0
• gen/Amazonka/EFS/Types/LifecyclePolicy.hs +121/−0
• gen/Amazonka/EFS/Types/MountTargetDescription.hs +224/−0
• gen/Amazonka/EFS/Types/PerformanceMode.hs +71/−0
• gen/Amazonka/EFS/Types/PosixUser.hs +121/−0
• gen/Amazonka/EFS/Types/ReplicationConfigurationDescription.hs +174/−0
• gen/Amazonka/EFS/Types/ReplicationStatus.hs +81/−0
• gen/Amazonka/EFS/Types/Resource.hs +72/−0
• gen/Amazonka/EFS/Types/ResourceIdPreference.hs +94/−0
• gen/Amazonka/EFS/Types/ResourceIdType.hs +73/−0
• gen/Amazonka/EFS/Types/RootDirectory.hs +135/−0
• gen/Amazonka/EFS/Types/Tag.hs +95/−0
• gen/Amazonka/EFS/Types/ThroughputMode.hs +76/−0
• gen/Amazonka/EFS/Types/TransitionToIARules.hs +91/−0
• gen/Amazonka/EFS/Types/TransitionToPrimaryStorageClassRules.hs +66/−0
• gen/Amazonka/EFS/UntagResource.hs +142/−0
• gen/Amazonka/EFS/UpdateFileSystem.hs +180/−0
• gen/Amazonka/EFS/Waiters.hs +24/−0
• gen/Network/AWS/EFS.hs +0/−208
• gen/Network/AWS/EFS/CreateFileSystem.hs +0/−148
• gen/Network/AWS/EFS/CreateMountTarget.hs +0/−195
• gen/Network/AWS/EFS/CreateTags.hs +0/−117
• gen/Network/AWS/EFS/DeleteFileSystem.hs +0/−107
• gen/Network/AWS/EFS/DeleteMountTarget.hs +0/−117
• gen/Network/AWS/EFS/DeleteTags.hs +0/−117
• gen/Network/AWS/EFS/DescribeFileSystems.hs +0/−200
• gen/Network/AWS/EFS/DescribeMountTargetSecurityGroups.hs +0/−146
• gen/Network/AWS/EFS/DescribeMountTargets.hs +0/−197
• gen/Network/AWS/EFS/DescribeTags.hs +0/−187
• gen/Network/AWS/EFS/ModifyMountTargetSecurityGroups.hs +0/−139
• gen/Network/AWS/EFS/Types.hs +0/−265
• gen/Network/AWS/EFS/Types/Product.hs +0/−345
• gen/Network/AWS/EFS/Types/Sum.hs +0/−83
• gen/Network/AWS/EFS/Waiters.hs +0/−21
• test/Main.hs +11/−9
• test/Test/AWS/EFS.hs +0/−26
• test/Test/AWS/EFS/Internal.hs +0/−16
• test/Test/AWS/Gen/EFS.hs +0/−237
• test/Test/Amazonka/EFS.hs +20/−0
• test/Test/Amazonka/EFS/Internal.hs +8/−0
• test/Test/Amazonka/Gen/EFS.hs +578/−0

@@ -7,9 +7,8 @@   ## Version--`1.6.1`-+ +`2.0` - Derived from API version @2015-02-01@ of the AWS service descriptions, licensed under Apache 2.0.  ## Description @@ -26,7 +25,7 @@ The provided lenses should be compatible with any of the major lens libraries [lens](http://hackage.haskell.org/package/lens) or [lens-family-core](http://hackage.haskell.org/package/lens-family-core). -See [Network.AWS.EFS](http://hackage.haskell.org/package/amazonka-efs/docs/Network-AWS-EFS.html)+See [Amazonka.EFS](http://hackage.haskell.org/package/amazonka-efs/docs/Amazonka-EFS.html) or [the AWS documentation](https://aws.amazon.com/documentation/) to get started.  

@@ -1,2 +0,0 @@-import           Distribution.Simple-main = defaultMain

@@ -1,96 +1,136 @@-name:                  amazonka-efs-version:               1.6.1-synopsis:              Amazon Elastic File System SDK.-homepage:              https://github.com/brendanhay/amazonka-bug-reports:           https://github.com/brendanhay/amazonka/issues-license:               MPL-2.0-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright:             Copyright (c) 2013-2018 Brendan Hay-category:              Network, AWS, Cloud, Distributed Computing-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md fixture/*.yaml fixture/*.proto src/.gitkeep+cabal-version:      2.2+name:               amazonka-efs+version:            2.0+synopsis:           Amazon Elastic File System SDK.+homepage:           https://github.com/brendanhay/amazonka+bug-reports:        https://github.com/brendanhay/amazonka/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+amazonka@gmail.com>, Jack Kelly <jack@jackkelly.name>++copyright:          Copyright (c) 2013-2023 Brendan Hay+category:           AWS+build-type:         Simple+extra-source-files:+  fixture/*.proto+  fixture/*.yaml+  README.md+  src/.gitkeep+ description:-    The types from this library are intended to be used with-    <http://hackage.haskell.org/package/amazonka amazonka>, which provides-    mechanisms for specifying AuthN/AuthZ information, sending requests,-    and receiving responses.-    .-    Lenses are used for constructing and manipulating types,-    due to the depth of nesting of AWS types and transparency regarding-    de/serialisation into more palatable Haskell values.-    The provided lenses should be compatible with any of the major lens libraries-    such as <http://hackage.haskell.org/package/lens lens> or-    <http://hackage.haskell.org/package/lens-family-core lens-family-core>.-    .-    See "Network.AWS.EFS" or <https://aws.amazon.com/documentation/ the AWS documentation>-    to get started.+  Derived from API version @2015-02-01@ of the AWS service descriptions, licensed under Apache 2.0.+  .+  The types from this library are intended to be used with <http://hackage.haskell.org/package/amazonka amazonka>,+  which provides mechanisms for specifying AuthN/AuthZ information, sending requests, and receiving responses.+  .+  It is recommended to use generic lenses or optics from packages such as <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify optional fields and deconstruct responses.+  .+  Generated lenses can be found in "Amazonka.EFS.Lens" and are+  suitable for use with a lens package such as <http://hackage.haskell.org/package/lens lens> or <http://hackage.haskell.org/package/lens-family-core lens-family-core>.+  .+  See "Amazonka.EFS" and the <https://aws.amazon.com/documentation/ AWS documentation> to get started.  source-repository head-    type:              git-    location:          git://github.com/brendanhay/amazonka.git-    subdir:            amazonka-efs+  type:     git+  location: git://github.com/brendanhay/amazonka.git+  subdir:   amazonka-efs  library-    default-language:  Haskell2010-    hs-source-dirs:    src gen--    ghc-options:-        -Wall-        -fwarn-incomplete-uni-patterns-        -fwarn-incomplete-record-updates-        -funbox-strict-fields--    exposed-modules:-          Network.AWS.EFS-        , Network.AWS.EFS.CreateFileSystem-        , Network.AWS.EFS.CreateMountTarget-        , Network.AWS.EFS.CreateTags-        , Network.AWS.EFS.DeleteFileSystem-        , Network.AWS.EFS.DeleteMountTarget-        , Network.AWS.EFS.DeleteTags-        , Network.AWS.EFS.DescribeFileSystems-        , Network.AWS.EFS.DescribeMountTargetSecurityGroups-        , Network.AWS.EFS.DescribeMountTargets-        , Network.AWS.EFS.DescribeTags-        , Network.AWS.EFS.ModifyMountTargetSecurityGroups-        , Network.AWS.EFS.Types-        , Network.AWS.EFS.Waiters+  default-language: Haskell2010+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields -    other-modules:-          Network.AWS.EFS.Types.Product-        , Network.AWS.EFS.Types.Sum+  exposed-modules:+    Amazonka.EFS+    Amazonka.EFS.CreateAccessPoint+    Amazonka.EFS.CreateFileSystem+    Amazonka.EFS.CreateMountTarget+    Amazonka.EFS.CreateReplicationConfiguration+    Amazonka.EFS.DeleteAccessPoint+    Amazonka.EFS.DeleteFileSystem+    Amazonka.EFS.DeleteFileSystemPolicy+    Amazonka.EFS.DeleteMountTarget+    Amazonka.EFS.DeleteReplicationConfiguration+    Amazonka.EFS.DescribeAccessPoints+    Amazonka.EFS.DescribeAccountPreferences+    Amazonka.EFS.DescribeBackupPolicy+    Amazonka.EFS.DescribeFileSystemPolicy+    Amazonka.EFS.DescribeFileSystems+    Amazonka.EFS.DescribeLifecycleConfiguration+    Amazonka.EFS.DescribeMountTargets+    Amazonka.EFS.DescribeMountTargetSecurityGroups+    Amazonka.EFS.DescribeReplicationConfigurations+    Amazonka.EFS.Lens+    Amazonka.EFS.ListTagsForResource+    Amazonka.EFS.ModifyMountTargetSecurityGroups+    Amazonka.EFS.PutAccountPreferences+    Amazonka.EFS.PutBackupPolicy+    Amazonka.EFS.PutFileSystemPolicy+    Amazonka.EFS.PutLifecycleConfiguration+    Amazonka.EFS.TagResource+    Amazonka.EFS.Types+    Amazonka.EFS.Types.AccessPointDescription+    Amazonka.EFS.Types.BackupPolicy+    Amazonka.EFS.Types.BackupPolicyDescription+    Amazonka.EFS.Types.BackupStatus+    Amazonka.EFS.Types.CreationInfo+    Amazonka.EFS.Types.Destination+    Amazonka.EFS.Types.DestinationToCreate+    Amazonka.EFS.Types.FileSystemDescription+    Amazonka.EFS.Types.FileSystemPolicyDescription+    Amazonka.EFS.Types.FileSystemSize+    Amazonka.EFS.Types.LifecycleConfigurationDescription+    Amazonka.EFS.Types.LifecyclePolicy+    Amazonka.EFS.Types.LifeCycleState+    Amazonka.EFS.Types.MountTargetDescription+    Amazonka.EFS.Types.PerformanceMode+    Amazonka.EFS.Types.PosixUser+    Amazonka.EFS.Types.ReplicationConfigurationDescription+    Amazonka.EFS.Types.ReplicationStatus+    Amazonka.EFS.Types.Resource+    Amazonka.EFS.Types.ResourceIdPreference+    Amazonka.EFS.Types.ResourceIdType+    Amazonka.EFS.Types.RootDirectory+    Amazonka.EFS.Types.Tag+    Amazonka.EFS.Types.ThroughputMode+    Amazonka.EFS.Types.TransitionToIARules+    Amazonka.EFS.Types.TransitionToPrimaryStorageClassRules+    Amazonka.EFS.UntagResource+    Amazonka.EFS.UpdateFileSystem+    Amazonka.EFS.Waiters -    build-depends:-          amazonka-core == 1.6.1.*-        , base          >= 4.7     && < 5+  build-depends:+    , amazonka-core  >=2.0  && <2.1+    , base           >=4.12 && <5  test-suite amazonka-efs-test-    type:              exitcode-stdio-1.0-    default-language:  Haskell2010-    hs-source-dirs:    test-    main-is:           Main.hs--    ghc-options:       -Wall -threaded+  type:             exitcode-stdio-1.0+  default-language: Haskell2010+  hs-source-dirs:   test+  main-is:          Main.hs+  ghc-options:      -Wall -threaded -    -- This section is encoded by the template and any modules added by-    -- hand outside these namespaces will not correctly be added to the-    -- distribution package.-    other-modules:-          Test.AWS.EFS-        , Test.AWS.Gen.EFS-        , Test.AWS.EFS.Internal+  -- This section is encoded by the template and any modules added by+  -- hand outside these namespaces will not correctly be added to the+  -- distribution package.+  other-modules:+    Test.Amazonka.EFS+    Test.Amazonka.EFS.Internal+    Test.Amazonka.Gen.EFS -    build-depends:-          amazonka-core == 1.6.1.*-        , amazonka-test == 1.6.1.*-        , amazonka-efs-        , base-        , bytestring-        , tasty-        , tasty-hunit-        , text-        , time-        , unordered-containers+  build-depends:+    , amazonka-core         >=2.0 && <2.1+    , amazonka-efs+    , amazonka-test         >=2.0 && <2.1+    , base+    , bytestring+    , case-insensitive+    , tasty+    , tasty-hunit+    , text+    , time+    , unordered-containers

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: GET+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: DELETE+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: PUT+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/elasticfilesystem/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  elasticfilesystem.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,445 @@+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module      : Amazonka.EFS+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Derived from API version @2015-02-01@ of the AWS service descriptions, licensed under Apache 2.0.+--+-- Amazon Elastic File System+--+-- Amazon Elastic File System (Amazon EFS) provides simple, scalable file+-- storage for use with Amazon EC2 Linux and Mac instances in the Amazon+-- Web Services Cloud. With Amazon EFS, storage capacity is elastic,+-- growing and shrinking automatically as you add and remove files, so that+-- your applications have the storage they need, when they need it. For+-- more information, see the+-- <https://docs.aws.amazon.com/efs/latest/ug/api-reference.html Amazon Elastic File System API Reference>+-- and the+-- <https://docs.aws.amazon.com/efs/latest/ug/whatisefs.html Amazon Elastic File System User Guide>.+module Amazonka.EFS+  ( -- * Service Configuration+    defaultService,++    -- * Errors+    -- $errors++    -- ** AccessPointAlreadyExists+    _AccessPointAlreadyExists,++    -- ** AccessPointLimitExceeded+    _AccessPointLimitExceeded,++    -- ** AccessPointNotFound+    _AccessPointNotFound,++    -- ** AvailabilityZonesMismatch+    _AvailabilityZonesMismatch,++    -- ** BadRequest+    _BadRequest,++    -- ** DependencyTimeout+    _DependencyTimeout,++    -- ** FileSystemAlreadyExists+    _FileSystemAlreadyExists,++    -- ** FileSystemInUse+    _FileSystemInUse,++    -- ** FileSystemLimitExceeded+    _FileSystemLimitExceeded,++    -- ** FileSystemNotFound+    _FileSystemNotFound,++    -- ** IncorrectFileSystemLifeCycleState+    _IncorrectFileSystemLifeCycleState,++    -- ** IncorrectMountTargetState+    _IncorrectMountTargetState,++    -- ** InsufficientThroughputCapacity+    _InsufficientThroughputCapacity,++    -- ** InternalServerError+    _InternalServerError,++    -- ** InvalidPolicyException+    _InvalidPolicyException,++    -- ** IpAddressInUse+    _IpAddressInUse,++    -- ** MountTargetConflict+    _MountTargetConflict,++    -- ** MountTargetNotFound+    _MountTargetNotFound,++    -- ** NetworkInterfaceLimitExceeded+    _NetworkInterfaceLimitExceeded,++    -- ** NoFreeAddressesInSubnet+    _NoFreeAddressesInSubnet,++    -- ** PolicyNotFound+    _PolicyNotFound,++    -- ** ReplicationNotFound+    _ReplicationNotFound,++    -- ** SecurityGroupLimitExceeded+    _SecurityGroupLimitExceeded,++    -- ** SecurityGroupNotFound+    _SecurityGroupNotFound,++    -- ** SubnetNotFound+    _SubnetNotFound,++    -- ** ThrottlingException+    _ThrottlingException,++    -- ** ThroughputLimitExceeded+    _ThroughputLimitExceeded,++    -- ** TooManyRequests+    _TooManyRequests,++    -- ** UnsupportedAvailabilityZone+    _UnsupportedAvailabilityZone,++    -- ** ValidationException+    _ValidationException,++    -- * Waiters+    -- $waiters++    -- * Operations+    -- $operations++    -- ** CreateAccessPoint+    CreateAccessPoint (CreateAccessPoint'),+    newCreateAccessPoint,+    AccessPointDescription (AccessPointDescription'),+    newAccessPointDescription,++    -- ** CreateFileSystem+    CreateFileSystem (CreateFileSystem'),+    newCreateFileSystem,+    FileSystemDescription (FileSystemDescription'),+    newFileSystemDescription,++    -- ** CreateMountTarget+    CreateMountTarget (CreateMountTarget'),+    newCreateMountTarget,+    MountTargetDescription (MountTargetDescription'),+    newMountTargetDescription,++    -- ** CreateReplicationConfiguration+    CreateReplicationConfiguration (CreateReplicationConfiguration'),+    newCreateReplicationConfiguration,+    ReplicationConfigurationDescription (ReplicationConfigurationDescription'),+    newReplicationConfigurationDescription,++    -- ** DeleteAccessPoint+    DeleteAccessPoint (DeleteAccessPoint'),+    newDeleteAccessPoint,+    DeleteAccessPointResponse (DeleteAccessPointResponse'),+    newDeleteAccessPointResponse,++    -- ** DeleteFileSystem+    DeleteFileSystem (DeleteFileSystem'),+    newDeleteFileSystem,+    DeleteFileSystemResponse (DeleteFileSystemResponse'),+    newDeleteFileSystemResponse,++    -- ** DeleteFileSystemPolicy+    DeleteFileSystemPolicy (DeleteFileSystemPolicy'),+    newDeleteFileSystemPolicy,+    DeleteFileSystemPolicyResponse (DeleteFileSystemPolicyResponse'),+    newDeleteFileSystemPolicyResponse,++    -- ** DeleteMountTarget+    DeleteMountTarget (DeleteMountTarget'),+    newDeleteMountTarget,+    DeleteMountTargetResponse (DeleteMountTargetResponse'),+    newDeleteMountTargetResponse,++    -- ** DeleteReplicationConfiguration+    DeleteReplicationConfiguration (DeleteReplicationConfiguration'),+    newDeleteReplicationConfiguration,+    DeleteReplicationConfigurationResponse (DeleteReplicationConfigurationResponse'),+    newDeleteReplicationConfigurationResponse,++    -- ** DescribeAccessPoints+    DescribeAccessPoints (DescribeAccessPoints'),+    newDescribeAccessPoints,+    DescribeAccessPointsResponse (DescribeAccessPointsResponse'),+    newDescribeAccessPointsResponse,++    -- ** DescribeAccountPreferences+    DescribeAccountPreferences (DescribeAccountPreferences'),+    newDescribeAccountPreferences,+    DescribeAccountPreferencesResponse (DescribeAccountPreferencesResponse'),+    newDescribeAccountPreferencesResponse,++    -- ** DescribeBackupPolicy+    DescribeBackupPolicy (DescribeBackupPolicy'),+    newDescribeBackupPolicy,+    BackupPolicyDescription (BackupPolicyDescription'),+    newBackupPolicyDescription,++    -- ** DescribeFileSystemPolicy+    DescribeFileSystemPolicy (DescribeFileSystemPolicy'),+    newDescribeFileSystemPolicy,+    FileSystemPolicyDescription (FileSystemPolicyDescription'),+    newFileSystemPolicyDescription,++    -- ** DescribeFileSystems (Paginated)+    DescribeFileSystems (DescribeFileSystems'),+    newDescribeFileSystems,+    DescribeFileSystemsResponse (DescribeFileSystemsResponse'),+    newDescribeFileSystemsResponse,++    -- ** DescribeLifecycleConfiguration+    DescribeLifecycleConfiguration (DescribeLifecycleConfiguration'),+    newDescribeLifecycleConfiguration,+    LifecycleConfigurationDescription (LifecycleConfigurationDescription'),+    newLifecycleConfigurationDescription,++    -- ** DescribeMountTargetSecurityGroups+    DescribeMountTargetSecurityGroups (DescribeMountTargetSecurityGroups'),+    newDescribeMountTargetSecurityGroups,+    DescribeMountTargetSecurityGroupsResponse (DescribeMountTargetSecurityGroupsResponse'),+    newDescribeMountTargetSecurityGroupsResponse,++    -- ** DescribeMountTargets (Paginated)+    DescribeMountTargets (DescribeMountTargets'),+    newDescribeMountTargets,+    DescribeMountTargetsResponse (DescribeMountTargetsResponse'),+    newDescribeMountTargetsResponse,++    -- ** DescribeReplicationConfigurations+    DescribeReplicationConfigurations (DescribeReplicationConfigurations'),+    newDescribeReplicationConfigurations,+    DescribeReplicationConfigurationsResponse (DescribeReplicationConfigurationsResponse'),+    newDescribeReplicationConfigurationsResponse,++    -- ** ListTagsForResource+    ListTagsForResource (ListTagsForResource'),+    newListTagsForResource,+    ListTagsForResourceResponse (ListTagsForResourceResponse'),+    newListTagsForResourceResponse,++    -- ** ModifyMountTargetSecurityGroups+    ModifyMountTargetSecurityGroups (ModifyMountTargetSecurityGroups'),+    newModifyMountTargetSecurityGroups,+    ModifyMountTargetSecurityGroupsResponse (ModifyMountTargetSecurityGroupsResponse'),+    newModifyMountTargetSecurityGroupsResponse,++    -- ** PutAccountPreferences+    PutAccountPreferences (PutAccountPreferences'),+    newPutAccountPreferences,+    PutAccountPreferencesResponse (PutAccountPreferencesResponse'),+    newPutAccountPreferencesResponse,++    -- ** PutBackupPolicy+    PutBackupPolicy (PutBackupPolicy'),+    newPutBackupPolicy,+    BackupPolicyDescription (BackupPolicyDescription'),+    newBackupPolicyDescription,++    -- ** PutFileSystemPolicy+    PutFileSystemPolicy (PutFileSystemPolicy'),+    newPutFileSystemPolicy,+    FileSystemPolicyDescription (FileSystemPolicyDescription'),+    newFileSystemPolicyDescription,++    -- ** PutLifecycleConfiguration+    PutLifecycleConfiguration (PutLifecycleConfiguration'),+    newPutLifecycleConfiguration,+    LifecycleConfigurationDescription (LifecycleConfigurationDescription'),+    newLifecycleConfigurationDescription,++    -- ** TagResource+    TagResource (TagResource'),+    newTagResource,+    TagResourceResponse (TagResourceResponse'),+    newTagResourceResponse,++    -- ** UntagResource+    UntagResource (UntagResource'),+    newUntagResource,+    UntagResourceResponse (UntagResourceResponse'),+    newUntagResourceResponse,++    -- ** UpdateFileSystem+    UpdateFileSystem (UpdateFileSystem'),+    newUpdateFileSystem,+    FileSystemDescription (FileSystemDescription'),+    newFileSystemDescription,++    -- * Types++    -- ** BackupStatus+    BackupStatus (..),++    -- ** LifeCycleState+    LifeCycleState (..),++    -- ** PerformanceMode+    PerformanceMode (..),++    -- ** ReplicationStatus+    ReplicationStatus (..),++    -- ** Resource+    Resource (..),++    -- ** ResourceIdType+    ResourceIdType (..),++    -- ** ThroughputMode+    ThroughputMode (..),++    -- ** TransitionToIARules+    TransitionToIARules (..),++    -- ** TransitionToPrimaryStorageClassRules+    TransitionToPrimaryStorageClassRules (..),++    -- ** AccessPointDescription+    AccessPointDescription (AccessPointDescription'),+    newAccessPointDescription,++    -- ** BackupPolicy+    BackupPolicy (BackupPolicy'),+    newBackupPolicy,++    -- ** BackupPolicyDescription+    BackupPolicyDescription (BackupPolicyDescription'),+    newBackupPolicyDescription,++    -- ** CreationInfo+    CreationInfo (CreationInfo'),+    newCreationInfo,++    -- ** Destination+    Destination (Destination'),+    newDestination,++    -- ** DestinationToCreate+    DestinationToCreate (DestinationToCreate'),+    newDestinationToCreate,++    -- ** FileSystemDescription+    FileSystemDescription (FileSystemDescription'),+    newFileSystemDescription,++    -- ** FileSystemPolicyDescription+    FileSystemPolicyDescription (FileSystemPolicyDescription'),+    newFileSystemPolicyDescription,++    -- ** FileSystemSize+    FileSystemSize (FileSystemSize'),+    newFileSystemSize,++    -- ** LifecycleConfigurationDescription+    LifecycleConfigurationDescription (LifecycleConfigurationDescription'),+    newLifecycleConfigurationDescription,++    -- ** LifecyclePolicy+    LifecyclePolicy (LifecyclePolicy'),+    newLifecyclePolicy,++    -- ** MountTargetDescription+    MountTargetDescription (MountTargetDescription'),+    newMountTargetDescription,++    -- ** PosixUser+    PosixUser (PosixUser'),+    newPosixUser,++    -- ** ReplicationConfigurationDescription+    ReplicationConfigurationDescription (ReplicationConfigurationDescription'),+    newReplicationConfigurationDescription,++    -- ** ResourceIdPreference+    ResourceIdPreference (ResourceIdPreference'),+    newResourceIdPreference,++    -- ** RootDirectory+    RootDirectory (RootDirectory'),+    newRootDirectory,++    -- ** Tag+    Tag (Tag'),+    newTag,+  )+where++import Amazonka.EFS.CreateAccessPoint+import Amazonka.EFS.CreateFileSystem+import Amazonka.EFS.CreateMountTarget+import Amazonka.EFS.CreateReplicationConfiguration+import Amazonka.EFS.DeleteAccessPoint+import Amazonka.EFS.DeleteFileSystem+import Amazonka.EFS.DeleteFileSystemPolicy+import Amazonka.EFS.DeleteMountTarget+import Amazonka.EFS.DeleteReplicationConfiguration+import Amazonka.EFS.DescribeAccessPoints+import Amazonka.EFS.DescribeAccountPreferences+import Amazonka.EFS.DescribeBackupPolicy+import Amazonka.EFS.DescribeFileSystemPolicy+import Amazonka.EFS.DescribeFileSystems+import Amazonka.EFS.DescribeLifecycleConfiguration+import Amazonka.EFS.DescribeMountTargetSecurityGroups+import Amazonka.EFS.DescribeMountTargets+import Amazonka.EFS.DescribeReplicationConfigurations+import Amazonka.EFS.Lens+import Amazonka.EFS.ListTagsForResource+import Amazonka.EFS.ModifyMountTargetSecurityGroups+import Amazonka.EFS.PutAccountPreferences+import Amazonka.EFS.PutBackupPolicy+import Amazonka.EFS.PutFileSystemPolicy+import Amazonka.EFS.PutLifecycleConfiguration+import Amazonka.EFS.TagResource+import Amazonka.EFS.Types+import Amazonka.EFS.UntagResource+import Amazonka.EFS.UpdateFileSystem+import Amazonka.EFS.Waiters++-- $errors+-- Error matchers are designed for use with the functions provided by+-- <http://hackage.haskell.org/package/lens/docs/Control-Exception-Lens.html Control.Exception.Lens>.+-- This allows catching (and rethrowing) service specific errors returned+-- by 'EFS'.++-- $operations+-- Some AWS operations return results that are incomplete and require subsequent+-- requests in order to obtain the entire result set. The process of sending+-- subsequent requests to continue where a previous request left off is called+-- pagination. For example, the 'ListObjects' operation of Amazon S3 returns up to+-- 1000 objects at a time, and you must send subsequent requests with the+-- appropriate Marker in order to retrieve the next page of results.+--+-- Operations that have an 'AWSPager' instance can transparently perform subsequent+-- requests, correctly setting Markers and other request facets to iterate through+-- the entire result set of a truncated API operation. Operations which support+-- this have an additional note in the documentation.+--+-- Many operations have the ability to filter results on the server side. See the+-- individual operation parameters for details.++-- $waiters+-- Waiters poll by repeatedly sending a request until some remote success condition+-- configured by the 'Wait' specification is fulfilled. The 'Wait' specification+-- determines how many attempts should be made, in addition to delay and retry strategies.

@@ -0,0 +1,243 @@+{-# 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.EFS.CreateAccessPoint+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates an EFS access point. An access point is an application-specific+-- view into an EFS file system that applies an operating system user and+-- group, and a file system path, to any file system request made through+-- the access point. The operating system user and group override any+-- identity information provided by the NFS client. The file system path is+-- exposed as the access point\'s root directory. Applications using the+-- access point can only access data in the application\'s own directory+-- and any subdirectories. To learn more, see+-- <https://docs.aws.amazon.com/efs/latest/ug/efs-access-points.html Mounting a file system using EFS access points>.+--+-- If multiple requests to create access points on the same file system are+-- sent in quick succession, and the file system is near the limit of 120+-- access points, you may experience a throttling response for these+-- requests. This is to ensure that the file system does not exceed the+-- stated access point limit.+--+-- This operation requires permissions for the+-- @elasticfilesystem:CreateAccessPoint@ action.+module Amazonka.EFS.CreateAccessPoint+  ( -- * Creating a Request+    CreateAccessPoint (..),+    newCreateAccessPoint,++    -- * Request Lenses+    createAccessPoint_posixUser,+    createAccessPoint_rootDirectory,+    createAccessPoint_tags,+    createAccessPoint_clientToken,+    createAccessPoint_fileSystemId,++    -- * Destructuring the Response+    AccessPointDescription (..),+    newAccessPointDescription,++    -- * Response Lenses+    accessPointDescription_accessPointArn,+    accessPointDescription_accessPointId,+    accessPointDescription_clientToken,+    accessPointDescription_fileSystemId,+    accessPointDescription_lifeCycleState,+    accessPointDescription_name,+    accessPointDescription_ownerId,+    accessPointDescription_posixUser,+    accessPointDescription_rootDirectory,+    accessPointDescription_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateAccessPoint' smart constructor.+data CreateAccessPoint = CreateAccessPoint'+  { -- | The operating system user and group applied to all file system requests+    -- made using the access point.+    posixUser :: Prelude.Maybe PosixUser,+    -- | Specifies the directory on the Amazon EFS file system that the access+    -- point exposes as the root directory of your file system to NFS clients+    -- using the access point. The clients using the access point can only+    -- access the root directory and below. If the @RootDirectory@ > @Path@+    -- specified does not exist, EFS creates it and applies the @CreationInfo@+    -- settings when a client connects to an access point. When specifying a+    -- @RootDirectory@, you must provide the @Path@, and the @CreationInfo@.+    --+    -- Amazon EFS creates a root directory only if you have provided the+    -- CreationInfo: OwnUid, OwnGID, and permissions for the directory. If you+    -- do not provide this information, Amazon EFS does not create the root+    -- directory. If the root directory does not exist, attempts to mount using+    -- the access point will fail.+    rootDirectory :: Prelude.Maybe RootDirectory,+    -- | Creates tags associated with the access point. Each tag is a key-value+    -- pair, each key must be unique. For more information, see+    -- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+    -- in the /Amazon Web Services General Reference Guide/.+    tags :: Prelude.Maybe [Tag],+    -- | A string of up to 64 ASCII characters that Amazon EFS uses to ensure+    -- idempotent creation.+    clientToken :: Prelude.Text,+    -- | The ID of the EFS file system that the access point provides access to.+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateAccessPoint' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'posixUser', 'createAccessPoint_posixUser' - The operating system user and group applied to all file system requests+-- made using the access point.+--+-- 'rootDirectory', 'createAccessPoint_rootDirectory' - Specifies the directory on the Amazon EFS file system that the access+-- point exposes as the root directory of your file system to NFS clients+-- using the access point. The clients using the access point can only+-- access the root directory and below. If the @RootDirectory@ > @Path@+-- specified does not exist, EFS creates it and applies the @CreationInfo@+-- settings when a client connects to an access point. When specifying a+-- @RootDirectory@, you must provide the @Path@, and the @CreationInfo@.+--+-- Amazon EFS creates a root directory only if you have provided the+-- CreationInfo: OwnUid, OwnGID, and permissions for the directory. If you+-- do not provide this information, Amazon EFS does not create the root+-- directory. If the root directory does not exist, attempts to mount using+-- the access point will fail.+--+-- 'tags', 'createAccessPoint_tags' - Creates tags associated with the access point. Each tag is a key-value+-- pair, each key must be unique. For more information, see+-- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+-- in the /Amazon Web Services General Reference Guide/.+--+-- 'clientToken', 'createAccessPoint_clientToken' - A string of up to 64 ASCII characters that Amazon EFS uses to ensure+-- idempotent creation.+--+-- 'fileSystemId', 'createAccessPoint_fileSystemId' - The ID of the EFS file system that the access point provides access to.+newCreateAccessPoint ::+  -- | 'clientToken'+  Prelude.Text ->+  -- | 'fileSystemId'+  Prelude.Text ->+  CreateAccessPoint+newCreateAccessPoint pClientToken_ pFileSystemId_ =+  CreateAccessPoint'+    { posixUser = Prelude.Nothing,+      rootDirectory = Prelude.Nothing,+      tags = Prelude.Nothing,+      clientToken = pClientToken_,+      fileSystemId = pFileSystemId_+    }++-- | The operating system user and group applied to all file system requests+-- made using the access point.+createAccessPoint_posixUser :: Lens.Lens' CreateAccessPoint (Prelude.Maybe PosixUser)+createAccessPoint_posixUser = Lens.lens (\CreateAccessPoint' {posixUser} -> posixUser) (\s@CreateAccessPoint' {} a -> s {posixUser = a} :: CreateAccessPoint)++-- | Specifies the directory on the Amazon EFS file system that the access+-- point exposes as the root directory of your file system to NFS clients+-- using the access point. The clients using the access point can only+-- access the root directory and below. If the @RootDirectory@ > @Path@+-- specified does not exist, EFS creates it and applies the @CreationInfo@+-- settings when a client connects to an access point. When specifying a+-- @RootDirectory@, you must provide the @Path@, and the @CreationInfo@.+--+-- Amazon EFS creates a root directory only if you have provided the+-- CreationInfo: OwnUid, OwnGID, and permissions for the directory. If you+-- do not provide this information, Amazon EFS does not create the root+-- directory. If the root directory does not exist, attempts to mount using+-- the access point will fail.+createAccessPoint_rootDirectory :: Lens.Lens' CreateAccessPoint (Prelude.Maybe RootDirectory)+createAccessPoint_rootDirectory = Lens.lens (\CreateAccessPoint' {rootDirectory} -> rootDirectory) (\s@CreateAccessPoint' {} a -> s {rootDirectory = a} :: CreateAccessPoint)++-- | Creates tags associated with the access point. Each tag is a key-value+-- pair, each key must be unique. For more information, see+-- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+-- in the /Amazon Web Services General Reference Guide/.+createAccessPoint_tags :: Lens.Lens' CreateAccessPoint (Prelude.Maybe [Tag])+createAccessPoint_tags = Lens.lens (\CreateAccessPoint' {tags} -> tags) (\s@CreateAccessPoint' {} a -> s {tags = a} :: CreateAccessPoint) Prelude.. Lens.mapping Lens.coerced++-- | A string of up to 64 ASCII characters that Amazon EFS uses to ensure+-- idempotent creation.+createAccessPoint_clientToken :: Lens.Lens' CreateAccessPoint Prelude.Text+createAccessPoint_clientToken = Lens.lens (\CreateAccessPoint' {clientToken} -> clientToken) (\s@CreateAccessPoint' {} a -> s {clientToken = a} :: CreateAccessPoint)++-- | The ID of the EFS file system that the access point provides access to.+createAccessPoint_fileSystemId :: Lens.Lens' CreateAccessPoint Prelude.Text+createAccessPoint_fileSystemId = Lens.lens (\CreateAccessPoint' {fileSystemId} -> fileSystemId) (\s@CreateAccessPoint' {} a -> s {fileSystemId = a} :: CreateAccessPoint)++instance Core.AWSRequest CreateAccessPoint where+  type+    AWSResponse CreateAccessPoint =+      AccessPointDescription+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateAccessPoint where+  hashWithSalt _salt CreateAccessPoint' {..} =+    _salt+      `Prelude.hashWithSalt` posixUser+      `Prelude.hashWithSalt` rootDirectory+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` clientToken+      `Prelude.hashWithSalt` fileSystemId++instance Prelude.NFData CreateAccessPoint where+  rnf CreateAccessPoint' {..} =+    Prelude.rnf posixUser+      `Prelude.seq` Prelude.rnf rootDirectory+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf clientToken+      `Prelude.seq` Prelude.rnf fileSystemId++instance Data.ToHeaders CreateAccessPoint where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToJSON CreateAccessPoint where+  toJSON CreateAccessPoint' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("PosixUser" Data..=) Prelude.<$> posixUser,+            ("RootDirectory" Data..=) Prelude.<$> rootDirectory,+            ("Tags" Data..=) Prelude.<$> tags,+            Prelude.Just ("ClientToken" Data..= clientToken),+            Prelude.Just ("FileSystemId" Data..= fileSystemId)+          ]+      )++instance Data.ToPath CreateAccessPoint where+  toPath = Prelude.const "/2015-02-01/access-points"++instance Data.ToQuery CreateAccessPoint where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,523 @@+{-# 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.EFS.CreateFileSystem+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a new, empty file system. The operation requires a creation+-- token in the request that Amazon EFS uses to ensure idempotent creation+-- (calling the operation with same creation token has no effect). If a+-- file system does not currently exist that is owned by the caller\'s+-- Amazon Web Services account with the specified creation token, this+-- operation does the following:+--+-- -   Creates a new, empty file system. The file system will have an+--     Amazon EFS assigned ID, and an initial lifecycle state @creating@.+--+-- -   Returns with the description of the created file system.+--+-- Otherwise, this operation returns a @FileSystemAlreadyExists@ error with+-- the ID of the existing file system.+--+-- For basic use cases, you can use a randomly generated UUID for the+-- creation token.+--+-- The idempotent operation allows you to retry a @CreateFileSystem@ call+-- without risk of creating an extra file system. This can happen when an+-- initial call fails in a way that leaves it uncertain whether or not a+-- file system was actually created. An example might be that a transport+-- level timeout occurred or your connection was reset. As long as you use+-- the same creation token, if the initial call had succeeded in creating a+-- file system, the client can learn of its existence from the+-- @FileSystemAlreadyExists@ error.+--+-- For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/creating-using-create-fs.html#creating-using-create-fs-part1 Creating a file system>+-- in the /Amazon EFS User Guide/.+--+-- The @CreateFileSystem@ call returns while the file system\'s lifecycle+-- state is still @creating@. You can check the file system creation status+-- by calling the DescribeFileSystems operation, which among other things+-- returns the file system state.+--+-- This operation accepts an optional @PerformanceMode@ parameter that you+-- choose for your file system. We recommend @generalPurpose@ performance+-- mode for most file systems. File systems using the @maxIO@ performance+-- mode can scale to higher levels of aggregate throughput and operations+-- per second with a tradeoff of slightly higher latencies for most file+-- operations. The performance mode can\'t be changed after the file system+-- has been created. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/performance.html#performancemodes.html Amazon EFS performance modes>.+--+-- You can set the throughput mode for the file system using the+-- @ThroughputMode@ parameter.+--+-- After the file system is fully created, Amazon EFS sets its lifecycle+-- state to @available@, at which point you can create one or more mount+-- targets for the file system in your VPC. For more information, see+-- CreateMountTarget. You mount your Amazon EFS file system on an EC2+-- instances in your VPC by using the mount target. For more information,+-- see+-- <https://docs.aws.amazon.com/efs/latest/ug/how-it-works.html Amazon EFS: How it Works>.+--+-- This operation requires permissions for the+-- @elasticfilesystem:CreateFileSystem@ action.+module Amazonka.EFS.CreateFileSystem+  ( -- * Creating a Request+    CreateFileSystem (..),+    newCreateFileSystem,++    -- * Request Lenses+    createFileSystem_availabilityZoneName,+    createFileSystem_backup,+    createFileSystem_encrypted,+    createFileSystem_kmsKeyId,+    createFileSystem_performanceMode,+    createFileSystem_provisionedThroughputInMibps,+    createFileSystem_tags,+    createFileSystem_throughputMode,+    createFileSystem_creationToken,++    -- * Destructuring the Response+    FileSystemDescription (..),+    newFileSystemDescription,++    -- * Response Lenses+    fileSystemDescription_availabilityZoneId,+    fileSystemDescription_availabilityZoneName,+    fileSystemDescription_encrypted,+    fileSystemDescription_fileSystemArn,+    fileSystemDescription_kmsKeyId,+    fileSystemDescription_name,+    fileSystemDescription_provisionedThroughputInMibps,+    fileSystemDescription_throughputMode,+    fileSystemDescription_ownerId,+    fileSystemDescription_creationToken,+    fileSystemDescription_fileSystemId,+    fileSystemDescription_creationTime,+    fileSystemDescription_lifeCycleState,+    fileSystemDescription_numberOfMountTargets,+    fileSystemDescription_sizeInBytes,+    fileSystemDescription_performanceMode,+    fileSystemDescription_tags,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateFileSystem' smart constructor.+data CreateFileSystem = CreateFileSystem'+  { -- | Used to create a file system that uses One Zone storage classes. It+    -- specifies the Amazon Web Services Availability Zone in which to create+    -- the file system. Use the format @us-east-1a@ to specify the Availability+    -- Zone. For more information about One Zone storage classes, see+    -- <https://docs.aws.amazon.com/efs/latest/ug/storage-classes.html Using EFS storage classes>+    -- in the /Amazon EFS User Guide/.+    --+    -- One Zone storage classes are not available in all Availability Zones in+    -- Amazon Web Services Regions where Amazon EFS is available.+    availabilityZoneName :: Prelude.Maybe Prelude.Text,+    -- | Specifies whether automatic backups are enabled on the file system that+    -- you are creating. Set the value to @true@ to enable automatic backups.+    -- If you are creating a file system that uses One Zone storage classes,+    -- automatic backups are enabled by default. For more information, see+    -- <https://docs.aws.amazon.com/efs/latest/ug/awsbackup.html#automatic-backups Automatic backups>+    -- in the /Amazon EFS User Guide/.+    --+    -- Default is @false@. However, if you specify an @AvailabilityZoneName@,+    -- the default is @true@.+    --+    -- Backup is not available in all Amazon Web Services Regions where Amazon+    -- EFS is available.+    backup :: Prelude.Maybe Prelude.Bool,+    -- | A Boolean value that, if true, creates an encrypted file system. When+    -- creating an encrypted file system, you have the option of specifying an+    -- existing Key Management Service key (KMS key). If you don\'t specify a+    -- KMS key, then the default KMS key for Amazon EFS,+    -- @\/aws\/elasticfilesystem@, is used to protect the encrypted file+    -- system.+    encrypted :: Prelude.Maybe Prelude.Bool,+    -- | The ID of the KMS key that you want to use to protect the encrypted file+    -- system. This parameter is required only if you want to use a non-default+    -- KMS key. If this parameter is not specified, the default KMS key for+    -- Amazon EFS is used. You can specify a KMS key ID using the following+    -- formats:+    --+    -- -   Key ID - A unique identifier of the key, for example+    --     @1234abcd-12ab-34cd-56ef-1234567890ab@.+    --+    -- -   ARN - An Amazon Resource Name (ARN) for the key, for example+    --     @arn:aws:kms:us-west-2:111122223333:key\/1234abcd-12ab-34cd-56ef-1234567890ab@.+    --+    -- -   Key alias - A previously created display name for a key, for example+    --     @alias\/projectKey1@.+    --+    -- -   Key alias ARN - An ARN for a key alias, for example+    --     @arn:aws:kms:us-west-2:444455556666:alias\/projectKey1@.+    --+    -- If you use @KmsKeyId@, you must set the+    -- CreateFileSystemRequest$Encrypted parameter to true.+    --+    -- EFS accepts only symmetric KMS keys. You cannot use asymmetric KMS keys+    -- with Amazon EFS file systems.+    kmsKeyId :: Prelude.Maybe Prelude.Text,+    -- | The performance mode of the file system. We recommend @generalPurpose@+    -- performance mode for most file systems. File systems using the @maxIO@+    -- performance mode can scale to higher levels of aggregate throughput and+    -- operations per second with a tradeoff of slightly higher latencies for+    -- most file operations. The performance mode can\'t be changed after the+    -- file system has been created.+    --+    -- The @maxIO@ mode is not supported on file systems using One Zone storage+    -- classes.+    performanceMode :: Prelude.Maybe PerformanceMode,+    -- | The throughput, measured in MiB\/s, that you want to provision for a+    -- file system that you\'re creating. Valid values are 1-1024. Required if+    -- @ThroughputMode@ is set to @provisioned@. The upper limit for throughput+    -- is 1024 MiB\/s. To increase this limit, contact Amazon Web Services+    -- Support. For more information, see+    -- <https://docs.aws.amazon.com/efs/latest/ug/limits.html#soft-limits Amazon EFS quotas that you can increase>+    -- in the /Amazon EFS User Guide/.+    provisionedThroughputInMibps :: Prelude.Maybe Prelude.Double,+    -- | Use to create one or more tags associated with the file system. Each tag+    -- is a user-defined key-value pair. Name your file system on creation by+    -- including a @\"Key\":\"Name\",\"Value\":\"{value}\"@ key-value pair.+    -- Each key must be unique. For more information, see+    -- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+    -- in the /Amazon Web Services General Reference Guide/.+    tags :: Prelude.Maybe [Tag],+    -- | Specifies the throughput mode for the file system. The mode can be+    -- @bursting@, @provisioned@, or @elastic@. If you set @ThroughputMode@ to+    -- @provisioned@, you must also set a value for+    -- @ProvisionedThroughputInMibps@. After you create the file system, you+    -- can decrease your file system\'s throughput in Provisioned Throughput+    -- mode or change between the throughput modes, with certain time+    -- restrictions. For more information, see+    -- <https://docs.aws.amazon.com/efs/latest/ug/performance.html#provisioned-throughput Specifying throughput with provisioned mode>+    -- in the /Amazon EFS User Guide/.+    --+    -- Default is @bursting@.+    throughputMode :: Prelude.Maybe ThroughputMode,+    -- | A string of up to 64 ASCII characters. Amazon EFS uses this to ensure+    -- idempotent creation.+    creationToken :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateFileSystem' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'availabilityZoneName', 'createFileSystem_availabilityZoneName' - Used to create a file system that uses One Zone storage classes. It+-- specifies the Amazon Web Services Availability Zone in which to create+-- the file system. Use the format @us-east-1a@ to specify the Availability+-- Zone. For more information about One Zone storage classes, see+-- <https://docs.aws.amazon.com/efs/latest/ug/storage-classes.html Using EFS storage classes>+-- in the /Amazon EFS User Guide/.+--+-- One Zone storage classes are not available in all Availability Zones in+-- Amazon Web Services Regions where Amazon EFS is available.+--+-- 'backup', 'createFileSystem_backup' - Specifies whether automatic backups are enabled on the file system that+-- you are creating. Set the value to @true@ to enable automatic backups.+-- If you are creating a file system that uses One Zone storage classes,+-- automatic backups are enabled by default. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/awsbackup.html#automatic-backups Automatic backups>+-- in the /Amazon EFS User Guide/.+--+-- Default is @false@. However, if you specify an @AvailabilityZoneName@,+-- the default is @true@.+--+-- Backup is not available in all Amazon Web Services Regions where Amazon+-- EFS is available.+--+-- 'encrypted', 'createFileSystem_encrypted' - A Boolean value that, if true, creates an encrypted file system. When+-- creating an encrypted file system, you have the option of specifying an+-- existing Key Management Service key (KMS key). If you don\'t specify a+-- KMS key, then the default KMS key for Amazon EFS,+-- @\/aws\/elasticfilesystem@, is used to protect the encrypted file+-- system.+--+-- 'kmsKeyId', 'createFileSystem_kmsKeyId' - The ID of the KMS key that you want to use to protect the encrypted file+-- system. This parameter is required only if you want to use a non-default+-- KMS key. If this parameter is not specified, the default KMS key for+-- Amazon EFS is used. You can specify a KMS key ID using the following+-- formats:+--+-- -   Key ID - A unique identifier of the key, for example+--     @1234abcd-12ab-34cd-56ef-1234567890ab@.+--+-- -   ARN - An Amazon Resource Name (ARN) for the key, for example+--     @arn:aws:kms:us-west-2:111122223333:key\/1234abcd-12ab-34cd-56ef-1234567890ab@.+--+-- -   Key alias - A previously created display name for a key, for example+--     @alias\/projectKey1@.+--+-- -   Key alias ARN - An ARN for a key alias, for example+--     @arn:aws:kms:us-west-2:444455556666:alias\/projectKey1@.+--+-- If you use @KmsKeyId@, you must set the+-- CreateFileSystemRequest$Encrypted parameter to true.+--+-- EFS accepts only symmetric KMS keys. You cannot use asymmetric KMS keys+-- with Amazon EFS file systems.+--+-- 'performanceMode', 'createFileSystem_performanceMode' - The performance mode of the file system. We recommend @generalPurpose@+-- performance mode for most file systems. File systems using the @maxIO@+-- performance mode can scale to higher levels of aggregate throughput and+-- operations per second with a tradeoff of slightly higher latencies for+-- most file operations. The performance mode can\'t be changed after the+-- file system has been created.+--+-- The @maxIO@ mode is not supported on file systems using One Zone storage+-- classes.+--+-- 'provisionedThroughputInMibps', 'createFileSystem_provisionedThroughputInMibps' - The throughput, measured in MiB\/s, that you want to provision for a+-- file system that you\'re creating. Valid values are 1-1024. Required if+-- @ThroughputMode@ is set to @provisioned@. The upper limit for throughput+-- is 1024 MiB\/s. To increase this limit, contact Amazon Web Services+-- Support. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/limits.html#soft-limits Amazon EFS quotas that you can increase>+-- in the /Amazon EFS User Guide/.+--+-- 'tags', 'createFileSystem_tags' - Use to create one or more tags associated with the file system. Each tag+-- is a user-defined key-value pair. Name your file system on creation by+-- including a @\"Key\":\"Name\",\"Value\":\"{value}\"@ key-value pair.+-- Each key must be unique. For more information, see+-- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+-- in the /Amazon Web Services General Reference Guide/.+--+-- 'throughputMode', 'createFileSystem_throughputMode' - Specifies the throughput mode for the file system. The mode can be+-- @bursting@, @provisioned@, or @elastic@. If you set @ThroughputMode@ to+-- @provisioned@, you must also set a value for+-- @ProvisionedThroughputInMibps@. After you create the file system, you+-- can decrease your file system\'s throughput in Provisioned Throughput+-- mode or change between the throughput modes, with certain time+-- restrictions. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/performance.html#provisioned-throughput Specifying throughput with provisioned mode>+-- in the /Amazon EFS User Guide/.+--+-- Default is @bursting@.+--+-- 'creationToken', 'createFileSystem_creationToken' - A string of up to 64 ASCII characters. Amazon EFS uses this to ensure+-- idempotent creation.+newCreateFileSystem ::+  -- | 'creationToken'+  Prelude.Text ->+  CreateFileSystem+newCreateFileSystem pCreationToken_ =+  CreateFileSystem'+    { availabilityZoneName =+        Prelude.Nothing,+      backup = Prelude.Nothing,+      encrypted = Prelude.Nothing,+      kmsKeyId = Prelude.Nothing,+      performanceMode = Prelude.Nothing,+      provisionedThroughputInMibps = Prelude.Nothing,+      tags = Prelude.Nothing,+      throughputMode = Prelude.Nothing,+      creationToken = pCreationToken_+    }++-- | Used to create a file system that uses One Zone storage classes. It+-- specifies the Amazon Web Services Availability Zone in which to create+-- the file system. Use the format @us-east-1a@ to specify the Availability+-- Zone. For more information about One Zone storage classes, see+-- <https://docs.aws.amazon.com/efs/latest/ug/storage-classes.html Using EFS storage classes>+-- in the /Amazon EFS User Guide/.+--+-- One Zone storage classes are not available in all Availability Zones in+-- Amazon Web Services Regions where Amazon EFS is available.+createFileSystem_availabilityZoneName :: Lens.Lens' CreateFileSystem (Prelude.Maybe Prelude.Text)+createFileSystem_availabilityZoneName = Lens.lens (\CreateFileSystem' {availabilityZoneName} -> availabilityZoneName) (\s@CreateFileSystem' {} a -> s {availabilityZoneName = a} :: CreateFileSystem)++-- | Specifies whether automatic backups are enabled on the file system that+-- you are creating. Set the value to @true@ to enable automatic backups.+-- If you are creating a file system that uses One Zone storage classes,+-- automatic backups are enabled by default. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/awsbackup.html#automatic-backups Automatic backups>+-- in the /Amazon EFS User Guide/.+--+-- Default is @false@. However, if you specify an @AvailabilityZoneName@,+-- the default is @true@.+--+-- Backup is not available in all Amazon Web Services Regions where Amazon+-- EFS is available.+createFileSystem_backup :: Lens.Lens' CreateFileSystem (Prelude.Maybe Prelude.Bool)+createFileSystem_backup = Lens.lens (\CreateFileSystem' {backup} -> backup) (\s@CreateFileSystem' {} a -> s {backup = a} :: CreateFileSystem)++-- | A Boolean value that, if true, creates an encrypted file system. When+-- creating an encrypted file system, you have the option of specifying an+-- existing Key Management Service key (KMS key). If you don\'t specify a+-- KMS key, then the default KMS key for Amazon EFS,+-- @\/aws\/elasticfilesystem@, is used to protect the encrypted file+-- system.+createFileSystem_encrypted :: Lens.Lens' CreateFileSystem (Prelude.Maybe Prelude.Bool)+createFileSystem_encrypted = Lens.lens (\CreateFileSystem' {encrypted} -> encrypted) (\s@CreateFileSystem' {} a -> s {encrypted = a} :: CreateFileSystem)++-- | The ID of the KMS key that you want to use to protect the encrypted file+-- system. This parameter is required only if you want to use a non-default+-- KMS key. If this parameter is not specified, the default KMS key for+-- Amazon EFS is used. You can specify a KMS key ID using the following+-- formats:+--+-- -   Key ID - A unique identifier of the key, for example+--     @1234abcd-12ab-34cd-56ef-1234567890ab@.+--+-- -   ARN - An Amazon Resource Name (ARN) for the key, for example+--     @arn:aws:kms:us-west-2:111122223333:key\/1234abcd-12ab-34cd-56ef-1234567890ab@.+--+-- -   Key alias - A previously created display name for a key, for example+--     @alias\/projectKey1@.+--+-- -   Key alias ARN - An ARN for a key alias, for example+--     @arn:aws:kms:us-west-2:444455556666:alias\/projectKey1@.+--+-- If you use @KmsKeyId@, you must set the+-- CreateFileSystemRequest$Encrypted parameter to true.+--+-- EFS accepts only symmetric KMS keys. You cannot use asymmetric KMS keys+-- with Amazon EFS file systems.+createFileSystem_kmsKeyId :: Lens.Lens' CreateFileSystem (Prelude.Maybe Prelude.Text)+createFileSystem_kmsKeyId = Lens.lens (\CreateFileSystem' {kmsKeyId} -> kmsKeyId) (\s@CreateFileSystem' {} a -> s {kmsKeyId = a} :: CreateFileSystem)++-- | The performance mode of the file system. We recommend @generalPurpose@+-- performance mode for most file systems. File systems using the @maxIO@+-- performance mode can scale to higher levels of aggregate throughput and+-- operations per second with a tradeoff of slightly higher latencies for+-- most file operations. The performance mode can\'t be changed after the+-- file system has been created.+--+-- The @maxIO@ mode is not supported on file systems using One Zone storage+-- classes.+createFileSystem_performanceMode :: Lens.Lens' CreateFileSystem (Prelude.Maybe PerformanceMode)+createFileSystem_performanceMode = Lens.lens (\CreateFileSystem' {performanceMode} -> performanceMode) (\s@CreateFileSystem' {} a -> s {performanceMode = a} :: CreateFileSystem)++-- | The throughput, measured in MiB\/s, that you want to provision for a+-- file system that you\'re creating. Valid values are 1-1024. Required if+-- @ThroughputMode@ is set to @provisioned@. The upper limit for throughput+-- is 1024 MiB\/s. To increase this limit, contact Amazon Web Services+-- Support. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/limits.html#soft-limits Amazon EFS quotas that you can increase>+-- in the /Amazon EFS User Guide/.+createFileSystem_provisionedThroughputInMibps :: Lens.Lens' CreateFileSystem (Prelude.Maybe Prelude.Double)+createFileSystem_provisionedThroughputInMibps = Lens.lens (\CreateFileSystem' {provisionedThroughputInMibps} -> provisionedThroughputInMibps) (\s@CreateFileSystem' {} a -> s {provisionedThroughputInMibps = a} :: CreateFileSystem)++-- | Use to create one or more tags associated with the file system. Each tag+-- is a user-defined key-value pair. Name your file system on creation by+-- including a @\"Key\":\"Name\",\"Value\":\"{value}\"@ key-value pair.+-- Each key must be unique. For more information, see+-- <https://docs.aws.amazon.com/general/latest/gr/aws_tagging.html Tagging Amazon Web Services resources>+-- in the /Amazon Web Services General Reference Guide/.+createFileSystem_tags :: Lens.Lens' CreateFileSystem (Prelude.Maybe [Tag])+createFileSystem_tags = Lens.lens (\CreateFileSystem' {tags} -> tags) (\s@CreateFileSystem' {} a -> s {tags = a} :: CreateFileSystem) Prelude.. Lens.mapping Lens.coerced++-- | Specifies the throughput mode for the file system. The mode can be+-- @bursting@, @provisioned@, or @elastic@. If you set @ThroughputMode@ to+-- @provisioned@, you must also set a value for+-- @ProvisionedThroughputInMibps@. After you create the file system, you+-- can decrease your file system\'s throughput in Provisioned Throughput+-- mode or change between the throughput modes, with certain time+-- restrictions. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/performance.html#provisioned-throughput Specifying throughput with provisioned mode>+-- in the /Amazon EFS User Guide/.+--+-- Default is @bursting@.+createFileSystem_throughputMode :: Lens.Lens' CreateFileSystem (Prelude.Maybe ThroughputMode)+createFileSystem_throughputMode = Lens.lens (\CreateFileSystem' {throughputMode} -> throughputMode) (\s@CreateFileSystem' {} a -> s {throughputMode = a} :: CreateFileSystem)++-- | A string of up to 64 ASCII characters. Amazon EFS uses this to ensure+-- idempotent creation.+createFileSystem_creationToken :: Lens.Lens' CreateFileSystem Prelude.Text+createFileSystem_creationToken = Lens.lens (\CreateFileSystem' {creationToken} -> creationToken) (\s@CreateFileSystem' {} a -> s {creationToken = a} :: CreateFileSystem)++instance Core.AWSRequest CreateFileSystem where+  type+    AWSResponse CreateFileSystem =+      FileSystemDescription+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateFileSystem where+  hashWithSalt _salt CreateFileSystem' {..} =+    _salt+      `Prelude.hashWithSalt` availabilityZoneName+      `Prelude.hashWithSalt` backup+      `Prelude.hashWithSalt` encrypted+      `Prelude.hashWithSalt` kmsKeyId+      `Prelude.hashWithSalt` performanceMode+      `Prelude.hashWithSalt` provisionedThroughputInMibps+      `Prelude.hashWithSalt` tags+      `Prelude.hashWithSalt` throughputMode+      `Prelude.hashWithSalt` creationToken++instance Prelude.NFData CreateFileSystem where+  rnf CreateFileSystem' {..} =+    Prelude.rnf availabilityZoneName+      `Prelude.seq` Prelude.rnf backup+      `Prelude.seq` Prelude.rnf encrypted+      `Prelude.seq` Prelude.rnf kmsKeyId+      `Prelude.seq` Prelude.rnf performanceMode+      `Prelude.seq` Prelude.rnf provisionedThroughputInMibps+      `Prelude.seq` Prelude.rnf tags+      `Prelude.seq` Prelude.rnf throughputMode+      `Prelude.seq` Prelude.rnf creationToken++instance Data.ToHeaders CreateFileSystem where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToJSON CreateFileSystem where+  toJSON CreateFileSystem' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("AvailabilityZoneName" Data..=)+              Prelude.<$> availabilityZoneName,+            ("Backup" Data..=) Prelude.<$> backup,+            ("Encrypted" Data..=) Prelude.<$> encrypted,+            ("KmsKeyId" Data..=) Prelude.<$> kmsKeyId,+            ("PerformanceMode" Data..=)+              Prelude.<$> performanceMode,+            ("ProvisionedThroughputInMibps" Data..=)+              Prelude.<$> provisionedThroughputInMibps,+            ("Tags" Data..=) Prelude.<$> tags,+            ("ThroughputMode" Data..=)+              Prelude.<$> throughputMode,+            Prelude.Just+              ("CreationToken" Data..= creationToken)+          ]+      )++instance Data.ToPath CreateFileSystem where+  toPath = Prelude.const "/2015-02-01/file-systems"++instance Data.ToQuery CreateFileSystem where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,294 @@+{-# 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.EFS.CreateMountTarget+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a mount target for a file system. You can then mount the file+-- system on EC2 instances by using the mount target.+--+-- You can create one mount target in each Availability Zone in your VPC.+-- All EC2 instances in a VPC within a given Availability Zone share a+-- single mount target for a given file system. If you have multiple+-- subnets in an Availability Zone, you create a mount target in one of the+-- subnets. EC2 instances do not need to be in the same subnet as the mount+-- target in order to access their file system.+--+-- You can create only one mount target for an EFS file system using One+-- Zone storage classes. You must create that mount target in the same+-- Availability Zone in which the file system is located. Use the+-- @AvailabilityZoneName@ and @AvailabiltyZoneId@ properties in the+-- DescribeFileSystems response object to get this information. Use the+-- @subnetId@ associated with the file system\'s Availability Zone when+-- creating the mount target.+--+-- For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/how-it-works.html Amazon EFS: How it Works>.+--+-- To create a mount target for a file system, the file system\'s lifecycle+-- state must be @available@. For more information, see+-- DescribeFileSystems.+--+-- In the request, provide the following:+--+-- -   The file system ID for which you are creating the mount target.+--+-- -   A subnet ID, which determines the following:+--+--     -   The VPC in which Amazon EFS creates the mount target+--+--     -   The Availability Zone in which Amazon EFS creates the mount+--         target+--+--     -   The IP address range from which Amazon EFS selects the IP+--         address of the mount target (if you don\'t specify an IP address+--         in the request)+--+-- After creating the mount target, Amazon EFS returns a response that+-- includes, a @MountTargetId@ and an @IpAddress@. You use this IP address+-- when mounting the file system in an EC2 instance. You can also use the+-- mount target\'s DNS name when mounting the file system. The EC2 instance+-- on which you mount the file system by using the mount target can resolve+-- the mount target\'s DNS name to its IP address. For more information,+-- see+-- <https://docs.aws.amazon.com/efs/latest/ug/how-it-works.html#how-it-works-implementation How it Works: Implementation Overview>.+--+-- Note that you can create mount targets for a file system in only one+-- VPC, and there can be only one mount target per Availability Zone. That+-- is, if the file system already has one or more mount targets created for+-- it, the subnet specified in the request to add another mount target must+-- meet the following requirements:+--+-- -   Must belong to the same VPC as the subnets of the existing mount+--     targets+--+-- -   Must not be in the same Availability Zone as any of the subnets of+--     the existing mount targets+--+-- If the request satisfies the requirements, Amazon EFS does the+-- following:+--+-- -   Creates a new mount target in the specified subnet.+--+-- -   Also creates a new network interface in the subnet as follows:+--+--     -   If the request provides an @IpAddress@, Amazon EFS assigns that+--         IP address to the network interface. Otherwise, Amazon EFS+--         assigns a free address in the subnet (in the same way that the+--         Amazon EC2 @CreateNetworkInterface@ call does when a request+--         does not specify a primary private IP address).+--+--     -   If the request provides @SecurityGroups@, this network interface+--         is associated with those security groups. Otherwise, it belongs+--         to the default security group for the subnet\'s VPC.+--+--     -   Assigns the description+--         @Mount target @/@fsmt-id@/@ for file system @/@fs-id@/@ @ where+--         @ @/@fsmt-id@/@ @ is the mount target ID, and @ @/@fs-id@/@ @ is+--         the @FileSystemId@.+--+--     -   Sets the @requesterManaged@ property of the network interface to+--         @true@, and the @requesterId@ value to @EFS@.+--+--     Each Amazon EFS mount target has one corresponding requester-managed+--     EC2 network interface. After the network interface is created,+--     Amazon EFS sets the @NetworkInterfaceId@ field in the mount+--     target\'s description to the network interface ID, and the+--     @IpAddress@ field to its address. If network interface creation+--     fails, the entire @CreateMountTarget@ operation fails.+--+-- The @CreateMountTarget@ call returns only after creating the network+-- interface, but while the mount target state is still @creating@, you can+-- check the mount target creation status by calling the+-- DescribeMountTargets operation, which among other things returns the+-- mount target state.+--+-- We recommend that you create a mount target in each of the Availability+-- Zones. There are cost considerations for using a file system in an+-- Availability Zone through a mount target created in another Availability+-- Zone. For more information, see <http://aws.amazon.com/efs/ Amazon EFS>.+-- In addition, by always using a mount target local to the instance\'s+-- Availability Zone, you eliminate a partial failure scenario. If the+-- Availability Zone in which your mount target is created goes down, then+-- you can\'t access your file system through that mount target.+--+-- This operation requires permissions for the following action on the file+-- system:+--+-- -   @elasticfilesystem:CreateMountTarget@+--+-- This operation also requires permissions for the following Amazon EC2+-- actions:+--+-- -   @ec2:DescribeSubnets@+--+-- -   @ec2:DescribeNetworkInterfaces@+--+-- -   @ec2:CreateNetworkInterface@+module Amazonka.EFS.CreateMountTarget+  ( -- * Creating a Request+    CreateMountTarget (..),+    newCreateMountTarget,++    -- * Request Lenses+    createMountTarget_ipAddress,+    createMountTarget_securityGroups,+    createMountTarget_fileSystemId,+    createMountTarget_subnetId,++    -- * Destructuring the Response+    MountTargetDescription (..),+    newMountTargetDescription,++    -- * Response Lenses+    mountTargetDescription_availabilityZoneId,+    mountTargetDescription_availabilityZoneName,+    mountTargetDescription_ipAddress,+    mountTargetDescription_networkInterfaceId,+    mountTargetDescription_ownerId,+    mountTargetDescription_vpcId,+    mountTargetDescription_mountTargetId,+    mountTargetDescription_fileSystemId,+    mountTargetDescription_subnetId,+    mountTargetDescription_lifeCycleState,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newCreateMountTarget' smart constructor.+data CreateMountTarget = CreateMountTarget'+  { -- | Valid IPv4 address within the address range of the specified subnet.+    ipAddress :: Prelude.Maybe Prelude.Text,+    -- | Up to five VPC security group IDs, of the form @sg-xxxxxxxx@. These must+    -- be for the same VPC as subnet specified.+    securityGroups :: Prelude.Maybe [Prelude.Text],+    -- | The ID of the file system for which to create the mount target.+    fileSystemId :: Prelude.Text,+    -- | The ID of the subnet to add the mount target in. For file systems that+    -- use One Zone storage classes, use the subnet that is associated with the+    -- file system\'s Availability Zone.+    subnetId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateMountTarget' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'ipAddress', 'createMountTarget_ipAddress' - Valid IPv4 address within the address range of the specified subnet.+--+-- 'securityGroups', 'createMountTarget_securityGroups' - Up to five VPC security group IDs, of the form @sg-xxxxxxxx@. These must+-- be for the same VPC as subnet specified.+--+-- 'fileSystemId', 'createMountTarget_fileSystemId' - The ID of the file system for which to create the mount target.+--+-- 'subnetId', 'createMountTarget_subnetId' - The ID of the subnet to add the mount target in. For file systems that+-- use One Zone storage classes, use the subnet that is associated with the+-- file system\'s Availability Zone.+newCreateMountTarget ::+  -- | 'fileSystemId'+  Prelude.Text ->+  -- | 'subnetId'+  Prelude.Text ->+  CreateMountTarget+newCreateMountTarget pFileSystemId_ pSubnetId_ =+  CreateMountTarget'+    { ipAddress = Prelude.Nothing,+      securityGroups = Prelude.Nothing,+      fileSystemId = pFileSystemId_,+      subnetId = pSubnetId_+    }++-- | Valid IPv4 address within the address range of the specified subnet.+createMountTarget_ipAddress :: Lens.Lens' CreateMountTarget (Prelude.Maybe Prelude.Text)+createMountTarget_ipAddress = Lens.lens (\CreateMountTarget' {ipAddress} -> ipAddress) (\s@CreateMountTarget' {} a -> s {ipAddress = a} :: CreateMountTarget)++-- | Up to five VPC security group IDs, of the form @sg-xxxxxxxx@. These must+-- be for the same VPC as subnet specified.+createMountTarget_securityGroups :: Lens.Lens' CreateMountTarget (Prelude.Maybe [Prelude.Text])+createMountTarget_securityGroups = Lens.lens (\CreateMountTarget' {securityGroups} -> securityGroups) (\s@CreateMountTarget' {} a -> s {securityGroups = a} :: CreateMountTarget) Prelude.. Lens.mapping Lens.coerced++-- | The ID of the file system for which to create the mount target.+createMountTarget_fileSystemId :: Lens.Lens' CreateMountTarget Prelude.Text+createMountTarget_fileSystemId = Lens.lens (\CreateMountTarget' {fileSystemId} -> fileSystemId) (\s@CreateMountTarget' {} a -> s {fileSystemId = a} :: CreateMountTarget)++-- | The ID of the subnet to add the mount target in. For file systems that+-- use One Zone storage classes, use the subnet that is associated with the+-- file system\'s Availability Zone.+createMountTarget_subnetId :: Lens.Lens' CreateMountTarget Prelude.Text+createMountTarget_subnetId = Lens.lens (\CreateMountTarget' {subnetId} -> subnetId) (\s@CreateMountTarget' {} a -> s {subnetId = a} :: CreateMountTarget)++instance Core.AWSRequest CreateMountTarget where+  type+    AWSResponse CreateMountTarget =+      MountTargetDescription+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable CreateMountTarget where+  hashWithSalt _salt CreateMountTarget' {..} =+    _salt+      `Prelude.hashWithSalt` ipAddress+      `Prelude.hashWithSalt` securityGroups+      `Prelude.hashWithSalt` fileSystemId+      `Prelude.hashWithSalt` subnetId++instance Prelude.NFData CreateMountTarget where+  rnf CreateMountTarget' {..} =+    Prelude.rnf ipAddress+      `Prelude.seq` Prelude.rnf securityGroups+      `Prelude.seq` Prelude.rnf fileSystemId+      `Prelude.seq` Prelude.rnf subnetId++instance Data.ToHeaders CreateMountTarget where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToJSON CreateMountTarget where+  toJSON CreateMountTarget' {..} =+    Data.object+      ( Prelude.catMaybes+          [ ("IpAddress" Data..=) Prelude.<$> ipAddress,+            ("SecurityGroups" Data..=)+              Prelude.<$> securityGroups,+            Prelude.Just ("FileSystemId" Data..= fileSystemId),+            Prelude.Just ("SubnetId" Data..= subnetId)+          ]+      )++instance Data.ToPath CreateMountTarget where+  toPath = Prelude.const "/2015-02-01/mount-targets"++instance Data.ToQuery CreateMountTarget where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,221 @@+{-# 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.EFS.CreateReplicationConfiguration+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a replication configuration that replicates an existing EFS file+-- system to a new, read-only file system. For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/efs-replication.html Amazon EFS replication>+-- in the /Amazon EFS User Guide/. The replication configuration specifies+-- the following:+--+-- -   __Source file system__ - An existing EFS file system that you want+--     replicated. The source file system cannot be a destination file+--     system in an existing replication configuration.+--+-- -   __Destination file system configuration__ - The configuration of the+--     destination file system to which the source file system will be+--     replicated. There can only be one destination file system in a+--     replication configuration. The destination file system configuration+--     consists of the following properties:+--+--     -   __Amazon Web Services Region__ - The Amazon Web Services Region+--         in which the destination file system is created. Amazon EFS+--         replication is available in all Amazon Web Services Regions that+--         Amazon EFS is available in, except Africa (Cape Town), Asia+--         Pacific (Hong Kong), Asia Pacific (Jakarta), Europe (Milan), and+--         Middle East (Bahrain).+--+--     -   __Availability Zone__ - If you want the destination file system+--         to use EFS One Zone availability and durability, you must+--         specify the Availability Zone to create the file system in. For+--         more information about EFS storage classes, see+--         <https://docs.aws.amazon.com/efs/latest/ug/storage-classes.html Amazon EFS storage classes>+--         in the /Amazon EFS User Guide/.+--+--     -   __Encryption__ - All destination file systems are created with+--         encryption at rest enabled. You can specify the Key Management+--         Service (KMS) key that is used to encrypt the destination file+--         system. If you don\'t specify a KMS key, your service-managed+--         KMS key for Amazon EFS is used.+--+--         After the file system is created, you cannot change the KMS key.+--+-- The following properties are set by default:+--+-- -   __Performance mode__ - The destination file system\'s performance+--     mode matches that of the source file system, unless the destination+--     file system uses EFS One Zone storage. In that case, the General+--     Purpose performance mode is used. The performance mode cannot be+--     changed.+--+-- -   __Throughput mode__ - The destination file system uses the Bursting+--     Throughput mode by default. After the file system is created, you+--     can modify the throughput mode.+--+-- The following properties are turned off by default:+--+-- -   __Lifecycle management__ - EFS lifecycle management and EFS+--     Intelligent-Tiering are not enabled on the destination file system.+--     After the destination file system is created, you can enable EFS+--     lifecycle management and EFS Intelligent-Tiering.+--+-- -   __Automatic backups__ - Automatic daily backups not enabled on the+--     destination file system. After the file system is created, you can+--     change this setting.+--+-- For more information, see+-- <https://docs.aws.amazon.com/efs/latest/ug/efs-replication.html Amazon EFS replication>+-- in the /Amazon EFS User Guide/.+module Amazonka.EFS.CreateReplicationConfiguration+  ( -- * Creating a Request+    CreateReplicationConfiguration (..),+    newCreateReplicationConfiguration,++    -- * Request Lenses+    createReplicationConfiguration_sourceFileSystemId,+    createReplicationConfiguration_destinations,++    -- * Destructuring the Response+    ReplicationConfigurationDescription (..),+    newReplicationConfigurationDescription,++    -- * Response Lenses+    replicationConfigurationDescription_sourceFileSystemId,+    replicationConfigurationDescription_sourceFileSystemRegion,+    replicationConfigurationDescription_sourceFileSystemArn,+    replicationConfigurationDescription_originalSourceFileSystemArn,+    replicationConfigurationDescription_creationTime,+    replicationConfigurationDescription_destinations,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newCreateReplicationConfiguration' smart constructor.+data CreateReplicationConfiguration = CreateReplicationConfiguration'+  { -- | Specifies the Amazon EFS file system that you want to replicate. This+    -- file system cannot already be a source or destination file system in+    -- another replication configuration.+    sourceFileSystemId :: Prelude.Text,+    -- | An array of destination configuration objects. Only one destination+    -- configuration object is supported.+    destinations :: [DestinationToCreate]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateReplicationConfiguration' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'sourceFileSystemId', 'createReplicationConfiguration_sourceFileSystemId' - Specifies the Amazon EFS file system that you want to replicate. This+-- file system cannot already be a source or destination file system in+-- another replication configuration.+--+-- 'destinations', 'createReplicationConfiguration_destinations' - An array of destination configuration objects. Only one destination+-- configuration object is supported.+newCreateReplicationConfiguration ::+  -- | 'sourceFileSystemId'+  Prelude.Text ->+  CreateReplicationConfiguration+newCreateReplicationConfiguration+  pSourceFileSystemId_ =+    CreateReplicationConfiguration'+      { sourceFileSystemId =+          pSourceFileSystemId_,+        destinations = Prelude.mempty+      }++-- | Specifies the Amazon EFS file system that you want to replicate. This+-- file system cannot already be a source or destination file system in+-- another replication configuration.+createReplicationConfiguration_sourceFileSystemId :: Lens.Lens' CreateReplicationConfiguration Prelude.Text+createReplicationConfiguration_sourceFileSystemId = Lens.lens (\CreateReplicationConfiguration' {sourceFileSystemId} -> sourceFileSystemId) (\s@CreateReplicationConfiguration' {} a -> s {sourceFileSystemId = a} :: CreateReplicationConfiguration)++-- | An array of destination configuration objects. Only one destination+-- configuration object is supported.+createReplicationConfiguration_destinations :: Lens.Lens' CreateReplicationConfiguration [DestinationToCreate]+createReplicationConfiguration_destinations = Lens.lens (\CreateReplicationConfiguration' {destinations} -> destinations) (\s@CreateReplicationConfiguration' {} a -> s {destinations = a} :: CreateReplicationConfiguration) Prelude.. Lens.coerced++instance+  Core.AWSRequest+    CreateReplicationConfiguration+  where+  type+    AWSResponse CreateReplicationConfiguration =+      ReplicationConfigurationDescription+  request overrides =+    Request.postJSON (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    CreateReplicationConfiguration+  where+  hashWithSalt+    _salt+    CreateReplicationConfiguration' {..} =+      _salt+        `Prelude.hashWithSalt` sourceFileSystemId+        `Prelude.hashWithSalt` destinations++instance+  Prelude.NFData+    CreateReplicationConfiguration+  where+  rnf CreateReplicationConfiguration' {..} =+    Prelude.rnf sourceFileSystemId+      `Prelude.seq` Prelude.rnf destinations++instance+  Data.ToHeaders+    CreateReplicationConfiguration+  where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToJSON CreateReplicationConfiguration where+  toJSON CreateReplicationConfiguration' {..} =+    Data.object+      ( Prelude.catMaybes+          [Prelude.Just ("Destinations" Data..= destinations)]+      )++instance Data.ToPath CreateReplicationConfiguration where+  toPath CreateReplicationConfiguration' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS sourceFileSystemId,+        "/replication-configuration"+      ]++instance Data.ToQuery CreateReplicationConfiguration where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,125 @@+{-# 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.EFS.DeleteAccessPoint+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified access point. After deletion is complete, new+-- clients can no longer connect to the access points. Clients connected to+-- the access point at the time of deletion will continue to function until+-- they terminate their connection.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DeleteAccessPoint@ action.+module Amazonka.EFS.DeleteAccessPoint+  ( -- * Creating a Request+    DeleteAccessPoint (..),+    newDeleteAccessPoint,++    -- * Request Lenses+    deleteAccessPoint_accessPointId,++    -- * Destructuring the Response+    DeleteAccessPointResponse (..),+    newDeleteAccessPointResponse,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteAccessPoint' smart constructor.+data DeleteAccessPoint = DeleteAccessPoint'+  { -- | The ID of the access point that you want to delete.+    accessPointId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteAccessPoint' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessPointId', 'deleteAccessPoint_accessPointId' - The ID of the access point that you want to delete.+newDeleteAccessPoint ::+  -- | 'accessPointId'+  Prelude.Text ->+  DeleteAccessPoint+newDeleteAccessPoint pAccessPointId_ =+  DeleteAccessPoint' {accessPointId = pAccessPointId_}++-- | The ID of the access point that you want to delete.+deleteAccessPoint_accessPointId :: Lens.Lens' DeleteAccessPoint Prelude.Text+deleteAccessPoint_accessPointId = Lens.lens (\DeleteAccessPoint' {accessPointId} -> accessPointId) (\s@DeleteAccessPoint' {} a -> s {accessPointId = a} :: DeleteAccessPoint)++instance Core.AWSRequest DeleteAccessPoint where+  type+    AWSResponse DeleteAccessPoint =+      DeleteAccessPointResponse+  request overrides =+    Request.delete (overrides defaultService)+  response =+    Response.receiveNull DeleteAccessPointResponse'++instance Prelude.Hashable DeleteAccessPoint where+  hashWithSalt _salt DeleteAccessPoint' {..} =+    _salt `Prelude.hashWithSalt` accessPointId++instance Prelude.NFData DeleteAccessPoint where+  rnf DeleteAccessPoint' {..} =+    Prelude.rnf accessPointId++instance Data.ToHeaders DeleteAccessPoint where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DeleteAccessPoint where+  toPath DeleteAccessPoint' {..} =+    Prelude.mconcat+      [ "/2015-02-01/access-points/",+        Data.toBS accessPointId+      ]++instance Data.ToQuery DeleteAccessPoint where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteAccessPointResponse' smart constructor.+data DeleteAccessPointResponse = DeleteAccessPointResponse'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteAccessPointResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDeleteAccessPointResponse ::+  DeleteAccessPointResponse+newDeleteAccessPointResponse =+  DeleteAccessPointResponse'++instance Prelude.NFData DeleteAccessPointResponse where+  rnf _ = ()

@@ -0,0 +1,141 @@+{-# 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.EFS.DeleteFileSystem+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a file system, permanently severing access to its contents. Upon+-- return, the file system no longer exists and you can\'t access any+-- contents of the deleted file system.+--+-- You need to manually delete mount targets attached to a file system+-- before you can delete an EFS file system. This step is performed for you+-- when you use the Amazon Web Services console to delete a file system.+--+-- You cannot delete a file system that is part of an EFS Replication+-- configuration. You need to delete the replication configuration first.+--+-- You can\'t delete a file system that is in use. That is, if the file+-- system has any mount targets, you must first delete them. For more+-- information, see DescribeMountTargets and DeleteMountTarget.+--+-- The @DeleteFileSystem@ call returns while the file system state is still+-- @deleting@. You can check the file system deletion status by calling the+-- DescribeFileSystems operation, which returns a list of file systems in+-- your account. If you pass file system ID or creation token for the+-- deleted file system, the DescribeFileSystems returns a+-- @404 FileSystemNotFound@ error.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DeleteFileSystem@ action.+module Amazonka.EFS.DeleteFileSystem+  ( -- * Creating a Request+    DeleteFileSystem (..),+    newDeleteFileSystem,++    -- * Request Lenses+    deleteFileSystem_fileSystemId,++    -- * Destructuring the Response+    DeleteFileSystemResponse (..),+    newDeleteFileSystemResponse,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newDeleteFileSystem' smart constructor.+data DeleteFileSystem = DeleteFileSystem'+  { -- | The ID of the file system you want to delete.+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteFileSystem' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'deleteFileSystem_fileSystemId' - The ID of the file system you want to delete.+newDeleteFileSystem ::+  -- | 'fileSystemId'+  Prelude.Text ->+  DeleteFileSystem+newDeleteFileSystem pFileSystemId_ =+  DeleteFileSystem' {fileSystemId = pFileSystemId_}++-- | The ID of the file system you want to delete.+deleteFileSystem_fileSystemId :: Lens.Lens' DeleteFileSystem Prelude.Text+deleteFileSystem_fileSystemId = Lens.lens (\DeleteFileSystem' {fileSystemId} -> fileSystemId) (\s@DeleteFileSystem' {} a -> s {fileSystemId = a} :: DeleteFileSystem)++instance Core.AWSRequest DeleteFileSystem where+  type+    AWSResponse DeleteFileSystem =+      DeleteFileSystemResponse+  request overrides =+    Request.delete (overrides defaultService)+  response =+    Response.receiveNull DeleteFileSystemResponse'++instance Prelude.Hashable DeleteFileSystem where+  hashWithSalt _salt DeleteFileSystem' {..} =+    _salt `Prelude.hashWithSalt` fileSystemId++instance Prelude.NFData DeleteFileSystem where+  rnf DeleteFileSystem' {..} = Prelude.rnf fileSystemId++instance Data.ToHeaders DeleteFileSystem where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DeleteFileSystem where+  toPath DeleteFileSystem' {..} =+    Prelude.mconcat+      ["/2015-02-01/file-systems/", Data.toBS fileSystemId]++instance Data.ToQuery DeleteFileSystem where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteFileSystemResponse' smart constructor.+data DeleteFileSystemResponse = DeleteFileSystemResponse'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteFileSystemResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDeleteFileSystemResponse ::+  DeleteFileSystemResponse+newDeleteFileSystemResponse =+  DeleteFileSystemResponse'++instance Prelude.NFData DeleteFileSystemResponse where+  rnf _ = ()

@@ -0,0 +1,136 @@+{-# 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.EFS.DeleteFileSystemPolicy+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the @FileSystemPolicy@ for the specified file system. The+-- default @FileSystemPolicy@ goes into effect once the existing policy is+-- deleted. For more information about the default file system policy, see+-- <https://docs.aws.amazon.com/efs/latest/ug/res-based-policies-efs.html Using Resource-based Policies with EFS>.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DeleteFileSystemPolicy@ action.+module Amazonka.EFS.DeleteFileSystemPolicy+  ( -- * Creating a Request+    DeleteFileSystemPolicy (..),+    newDeleteFileSystemPolicy,++    -- * Request Lenses+    deleteFileSystemPolicy_fileSystemId,++    -- * Destructuring the Response+    DeleteFileSystemPolicyResponse (..),+    newDeleteFileSystemPolicyResponse,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteFileSystemPolicy' smart constructor.+data DeleteFileSystemPolicy = DeleteFileSystemPolicy'+  { -- | Specifies the EFS file system for which to delete the+    -- @FileSystemPolicy@.+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteFileSystemPolicy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'deleteFileSystemPolicy_fileSystemId' - Specifies the EFS file system for which to delete the+-- @FileSystemPolicy@.+newDeleteFileSystemPolicy ::+  -- | 'fileSystemId'+  Prelude.Text ->+  DeleteFileSystemPolicy+newDeleteFileSystemPolicy pFileSystemId_ =+  DeleteFileSystemPolicy'+    { fileSystemId =+        pFileSystemId_+    }++-- | Specifies the EFS file system for which to delete the+-- @FileSystemPolicy@.+deleteFileSystemPolicy_fileSystemId :: Lens.Lens' DeleteFileSystemPolicy Prelude.Text+deleteFileSystemPolicy_fileSystemId = Lens.lens (\DeleteFileSystemPolicy' {fileSystemId} -> fileSystemId) (\s@DeleteFileSystemPolicy' {} a -> s {fileSystemId = a} :: DeleteFileSystemPolicy)++instance Core.AWSRequest DeleteFileSystemPolicy where+  type+    AWSResponse DeleteFileSystemPolicy =+      DeleteFileSystemPolicyResponse+  request overrides =+    Request.delete (overrides defaultService)+  response =+    Response.receiveNull+      DeleteFileSystemPolicyResponse'++instance Prelude.Hashable DeleteFileSystemPolicy where+  hashWithSalt _salt DeleteFileSystemPolicy' {..} =+    _salt `Prelude.hashWithSalt` fileSystemId++instance Prelude.NFData DeleteFileSystemPolicy where+  rnf DeleteFileSystemPolicy' {..} =+    Prelude.rnf fileSystemId++instance Data.ToHeaders DeleteFileSystemPolicy where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DeleteFileSystemPolicy where+  toPath DeleteFileSystemPolicy' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS fileSystemId,+        "/policy"+      ]++instance Data.ToQuery DeleteFileSystemPolicy where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteFileSystemPolicyResponse' smart constructor.+data DeleteFileSystemPolicyResponse = DeleteFileSystemPolicyResponse'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteFileSystemPolicyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDeleteFileSystemPolicyResponse ::+  DeleteFileSystemPolicyResponse+newDeleteFileSystemPolicyResponse =+  DeleteFileSystemPolicyResponse'++instance+  Prelude.NFData+    DeleteFileSystemPolicyResponse+  where+  rnf _ = ()

@@ -0,0 +1,146 @@+{-# 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.EFS.DeleteMountTarget+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified mount target.+--+-- This operation forcibly breaks any mounts of the file system by using+-- the mount target that is being deleted, which might disrupt instances or+-- applications using those mounts. To avoid applications getting cut off+-- abruptly, you might consider unmounting any mounts of the mount target,+-- if feasible. The operation also deletes the associated network+-- interface. Uncommitted writes might be lost, but breaking a mount target+-- using this operation does not corrupt the file system itself. The file+-- system you created remains. You can mount an EC2 instance in your VPC by+-- using another mount target.+--+-- This operation requires permissions for the following action on the file+-- system:+--+-- -   @elasticfilesystem:DeleteMountTarget@+--+-- The @DeleteMountTarget@ call returns while the mount target state is+-- still @deleting@. You can check the mount target deletion by calling the+-- DescribeMountTargets operation, which returns a list of mount target+-- descriptions for the given file system.+--+-- The operation also requires permissions for the following Amazon EC2+-- action on the mount target\'s network interface:+--+-- -   @ec2:DeleteNetworkInterface@+module Amazonka.EFS.DeleteMountTarget+  ( -- * Creating a Request+    DeleteMountTarget (..),+    newDeleteMountTarget,++    -- * Request Lenses+    deleteMountTarget_mountTargetId,++    -- * Destructuring the Response+    DeleteMountTargetResponse (..),+    newDeleteMountTargetResponse,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newDeleteMountTarget' smart constructor.+data DeleteMountTarget = DeleteMountTarget'+  { -- | The ID of the mount target to delete (String).+    mountTargetId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteMountTarget' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'mountTargetId', 'deleteMountTarget_mountTargetId' - The ID of the mount target to delete (String).+newDeleteMountTarget ::+  -- | 'mountTargetId'+  Prelude.Text ->+  DeleteMountTarget+newDeleteMountTarget pMountTargetId_ =+  DeleteMountTarget' {mountTargetId = pMountTargetId_}++-- | The ID of the mount target to delete (String).+deleteMountTarget_mountTargetId :: Lens.Lens' DeleteMountTarget Prelude.Text+deleteMountTarget_mountTargetId = Lens.lens (\DeleteMountTarget' {mountTargetId} -> mountTargetId) (\s@DeleteMountTarget' {} a -> s {mountTargetId = a} :: DeleteMountTarget)++instance Core.AWSRequest DeleteMountTarget where+  type+    AWSResponse DeleteMountTarget =+      DeleteMountTargetResponse+  request overrides =+    Request.delete (overrides defaultService)+  response =+    Response.receiveNull DeleteMountTargetResponse'++instance Prelude.Hashable DeleteMountTarget where+  hashWithSalt _salt DeleteMountTarget' {..} =+    _salt `Prelude.hashWithSalt` mountTargetId++instance Prelude.NFData DeleteMountTarget where+  rnf DeleteMountTarget' {..} =+    Prelude.rnf mountTargetId++instance Data.ToHeaders DeleteMountTarget where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DeleteMountTarget where+  toPath DeleteMountTarget' {..} =+    Prelude.mconcat+      [ "/2015-02-01/mount-targets/",+        Data.toBS mountTargetId+      ]++instance Data.ToQuery DeleteMountTarget where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteMountTargetResponse' smart constructor.+data DeleteMountTargetResponse = DeleteMountTargetResponse'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteMountTargetResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDeleteMountTargetResponse ::+  DeleteMountTargetResponse+newDeleteMountTargetResponse =+  DeleteMountTargetResponse'++instance Prelude.NFData DeleteMountTargetResponse where+  rnf _ = ()

@@ -0,0 +1,148 @@+{-# 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.EFS.DeleteReplicationConfiguration+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes an existing replication configuration. To delete a replication+-- configuration, you must make the request from the Amazon Web Services+-- Region in which the destination file system is located. Deleting a+-- replication configuration ends the replication process. After a+-- replication configuration is deleted, the destination file system is no+-- longer read-only. You can write to the destination file system after its+-- status becomes @Writeable@.+module Amazonka.EFS.DeleteReplicationConfiguration+  ( -- * Creating a Request+    DeleteReplicationConfiguration (..),+    newDeleteReplicationConfiguration,++    -- * Request Lenses+    deleteReplicationConfiguration_sourceFileSystemId,++    -- * Destructuring the Response+    DeleteReplicationConfigurationResponse (..),+    newDeleteReplicationConfigurationResponse,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDeleteReplicationConfiguration' smart constructor.+data DeleteReplicationConfiguration = DeleteReplicationConfiguration'+  { -- | The ID of the source file system in the replication configuration.+    sourceFileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteReplicationConfiguration' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'sourceFileSystemId', 'deleteReplicationConfiguration_sourceFileSystemId' - The ID of the source file system in the replication configuration.+newDeleteReplicationConfiguration ::+  -- | 'sourceFileSystemId'+  Prelude.Text ->+  DeleteReplicationConfiguration+newDeleteReplicationConfiguration+  pSourceFileSystemId_ =+    DeleteReplicationConfiguration'+      { sourceFileSystemId =+          pSourceFileSystemId_+      }++-- | The ID of the source file system in the replication configuration.+deleteReplicationConfiguration_sourceFileSystemId :: Lens.Lens' DeleteReplicationConfiguration Prelude.Text+deleteReplicationConfiguration_sourceFileSystemId = Lens.lens (\DeleteReplicationConfiguration' {sourceFileSystemId} -> sourceFileSystemId) (\s@DeleteReplicationConfiguration' {} a -> s {sourceFileSystemId = a} :: DeleteReplicationConfiguration)++instance+  Core.AWSRequest+    DeleteReplicationConfiguration+  where+  type+    AWSResponse DeleteReplicationConfiguration =+      DeleteReplicationConfigurationResponse+  request overrides =+    Request.delete (overrides defaultService)+  response =+    Response.receiveNull+      DeleteReplicationConfigurationResponse'++instance+  Prelude.Hashable+    DeleteReplicationConfiguration+  where+  hashWithSalt+    _salt+    DeleteReplicationConfiguration' {..} =+      _salt `Prelude.hashWithSalt` sourceFileSystemId++instance+  Prelude.NFData+    DeleteReplicationConfiguration+  where+  rnf DeleteReplicationConfiguration' {..} =+    Prelude.rnf sourceFileSystemId++instance+  Data.ToHeaders+    DeleteReplicationConfiguration+  where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DeleteReplicationConfiguration where+  toPath DeleteReplicationConfiguration' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS sourceFileSystemId,+        "/replication-configuration"+      ]++instance Data.ToQuery DeleteReplicationConfiguration where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteReplicationConfigurationResponse' smart constructor.+data DeleteReplicationConfigurationResponse = DeleteReplicationConfigurationResponse'+  {+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteReplicationConfigurationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+newDeleteReplicationConfigurationResponse ::+  DeleteReplicationConfigurationResponse+newDeleteReplicationConfigurationResponse =+  DeleteReplicationConfigurationResponse'++instance+  Prelude.NFData+    DeleteReplicationConfigurationResponse+  where+  rnf _ = ()

@@ -0,0 +1,237 @@+{-# 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.EFS.DescribeAccessPoints+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the description of a specific Amazon EFS access point if the+-- @AccessPointId@ is provided. If you provide an EFS @FileSystemId@, it+-- returns descriptions of all access points for that file system. You can+-- provide either an @AccessPointId@ or a @FileSystemId@ in the request,+-- but not both.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DescribeAccessPoints@ action.+module Amazonka.EFS.DescribeAccessPoints+  ( -- * Creating a Request+    DescribeAccessPoints (..),+    newDescribeAccessPoints,++    -- * Request Lenses+    describeAccessPoints_accessPointId,+    describeAccessPoints_fileSystemId,+    describeAccessPoints_maxResults,+    describeAccessPoints_nextToken,++    -- * Destructuring the Response+    DescribeAccessPointsResponse (..),+    newDescribeAccessPointsResponse,++    -- * Response Lenses+    describeAccessPointsResponse_accessPoints,+    describeAccessPointsResponse_nextToken,+    describeAccessPointsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeAccessPoints' smart constructor.+data DescribeAccessPoints = DescribeAccessPoints'+  { -- | (Optional) Specifies an EFS access point to describe in the response;+    -- mutually exclusive with @FileSystemId@.+    accessPointId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) If you provide a @FileSystemId@, EFS returns all access+    -- points for that file system; mutually exclusive with @AccessPointId@.+    fileSystemId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) When retrieving all access points for a file system, you can+    -- optionally specify the @MaxItems@ parameter to limit the number of+    -- objects returned in a response. The default value is 100.+    maxResults :: Prelude.Maybe Prelude.Natural,+    -- | @NextToken@ is present if the response is paginated. You can use+    -- @NextMarker@ in the subsequent request to fetch the next page of access+    -- point descriptions.+    nextToken :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAccessPoints' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessPointId', 'describeAccessPoints_accessPointId' - (Optional) Specifies an EFS access point to describe in the response;+-- mutually exclusive with @FileSystemId@.+--+-- 'fileSystemId', 'describeAccessPoints_fileSystemId' - (Optional) If you provide a @FileSystemId@, EFS returns all access+-- points for that file system; mutually exclusive with @AccessPointId@.+--+-- 'maxResults', 'describeAccessPoints_maxResults' - (Optional) When retrieving all access points for a file system, you can+-- optionally specify the @MaxItems@ parameter to limit the number of+-- objects returned in a response. The default value is 100.+--+-- 'nextToken', 'describeAccessPoints_nextToken' - @NextToken@ is present if the response is paginated. You can use+-- @NextMarker@ in the subsequent request to fetch the next page of access+-- point descriptions.+newDescribeAccessPoints ::+  DescribeAccessPoints+newDescribeAccessPoints =+  DescribeAccessPoints'+    { accessPointId =+        Prelude.Nothing,+      fileSystemId = Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing+    }++-- | (Optional) Specifies an EFS access point to describe in the response;+-- mutually exclusive with @FileSystemId@.+describeAccessPoints_accessPointId :: Lens.Lens' DescribeAccessPoints (Prelude.Maybe Prelude.Text)+describeAccessPoints_accessPointId = Lens.lens (\DescribeAccessPoints' {accessPointId} -> accessPointId) (\s@DescribeAccessPoints' {} a -> s {accessPointId = a} :: DescribeAccessPoints)++-- | (Optional) If you provide a @FileSystemId@, EFS returns all access+-- points for that file system; mutually exclusive with @AccessPointId@.+describeAccessPoints_fileSystemId :: Lens.Lens' DescribeAccessPoints (Prelude.Maybe Prelude.Text)+describeAccessPoints_fileSystemId = Lens.lens (\DescribeAccessPoints' {fileSystemId} -> fileSystemId) (\s@DescribeAccessPoints' {} a -> s {fileSystemId = a} :: DescribeAccessPoints)++-- | (Optional) When retrieving all access points for a file system, you can+-- optionally specify the @MaxItems@ parameter to limit the number of+-- objects returned in a response. The default value is 100.+describeAccessPoints_maxResults :: Lens.Lens' DescribeAccessPoints (Prelude.Maybe Prelude.Natural)+describeAccessPoints_maxResults = Lens.lens (\DescribeAccessPoints' {maxResults} -> maxResults) (\s@DescribeAccessPoints' {} a -> s {maxResults = a} :: DescribeAccessPoints)++-- | @NextToken@ is present if the response is paginated. You can use+-- @NextMarker@ in the subsequent request to fetch the next page of access+-- point descriptions.+describeAccessPoints_nextToken :: Lens.Lens' DescribeAccessPoints (Prelude.Maybe Prelude.Text)+describeAccessPoints_nextToken = Lens.lens (\DescribeAccessPoints' {nextToken} -> nextToken) (\s@DescribeAccessPoints' {} a -> s {nextToken = a} :: DescribeAccessPoints)++instance Core.AWSRequest DescribeAccessPoints where+  type+    AWSResponse DescribeAccessPoints =+      DescribeAccessPointsResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeAccessPointsResponse'+            Prelude.<$> (x Data..?> "AccessPoints" Core..!@ Prelude.mempty)+            Prelude.<*> (x Data..?> "NextToken")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeAccessPoints where+  hashWithSalt _salt DescribeAccessPoints' {..} =+    _salt+      `Prelude.hashWithSalt` accessPointId+      `Prelude.hashWithSalt` fileSystemId+      `Prelude.hashWithSalt` maxResults+      `Prelude.hashWithSalt` nextToken++instance Prelude.NFData DescribeAccessPoints where+  rnf DescribeAccessPoints' {..} =+    Prelude.rnf accessPointId+      `Prelude.seq` Prelude.rnf fileSystemId+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken++instance Data.ToHeaders DescribeAccessPoints where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeAccessPoints where+  toPath = Prelude.const "/2015-02-01/access-points"++instance Data.ToQuery DescribeAccessPoints where+  toQuery DescribeAccessPoints' {..} =+    Prelude.mconcat+      [ "AccessPointId" Data.=: accessPointId,+        "FileSystemId" Data.=: fileSystemId,+        "MaxResults" Data.=: maxResults,+        "NextToken" Data.=: nextToken+      ]++-- | /See:/ 'newDescribeAccessPointsResponse' smart constructor.+data DescribeAccessPointsResponse = DescribeAccessPointsResponse'+  { -- | An array of access point descriptions.+    accessPoints :: Prelude.Maybe [AccessPointDescription],+    -- | Present if there are more access points than returned in the response.+    -- You can use the NextMarker in the subsequent request to fetch the+    -- additional descriptions.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAccessPointsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessPoints', 'describeAccessPointsResponse_accessPoints' - An array of access point descriptions.+--+-- 'nextToken', 'describeAccessPointsResponse_nextToken' - Present if there are more access points than returned in the response.+-- You can use the NextMarker in the subsequent request to fetch the+-- additional descriptions.+--+-- 'httpStatus', 'describeAccessPointsResponse_httpStatus' - The response's http status code.+newDescribeAccessPointsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeAccessPointsResponse+newDescribeAccessPointsResponse pHttpStatus_ =+  DescribeAccessPointsResponse'+    { accessPoints =+        Prelude.Nothing,+      nextToken = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | An array of access point descriptions.+describeAccessPointsResponse_accessPoints :: Lens.Lens' DescribeAccessPointsResponse (Prelude.Maybe [AccessPointDescription])+describeAccessPointsResponse_accessPoints = Lens.lens (\DescribeAccessPointsResponse' {accessPoints} -> accessPoints) (\s@DescribeAccessPointsResponse' {} a -> s {accessPoints = a} :: DescribeAccessPointsResponse) Prelude.. Lens.mapping Lens.coerced++-- | Present if there are more access points than returned in the response.+-- You can use the NextMarker in the subsequent request to fetch the+-- additional descriptions.+describeAccessPointsResponse_nextToken :: Lens.Lens' DescribeAccessPointsResponse (Prelude.Maybe Prelude.Text)+describeAccessPointsResponse_nextToken = Lens.lens (\DescribeAccessPointsResponse' {nextToken} -> nextToken) (\s@DescribeAccessPointsResponse' {} a -> s {nextToken = a} :: DescribeAccessPointsResponse)++-- | The response's http status code.+describeAccessPointsResponse_httpStatus :: Lens.Lens' DescribeAccessPointsResponse Prelude.Int+describeAccessPointsResponse_httpStatus = Lens.lens (\DescribeAccessPointsResponse' {httpStatus} -> httpStatus) (\s@DescribeAccessPointsResponse' {} a -> s {httpStatus = a} :: DescribeAccessPointsResponse)++instance Prelude.NFData DescribeAccessPointsResponse where+  rnf DescribeAccessPointsResponse' {..} =+    Prelude.rnf accessPoints+      `Prelude.seq` Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf httpStatus

@@ -0,0 +1,207 @@+{-# 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.EFS.DescribeAccountPreferences+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the account preferences settings for the Amazon Web Services+-- account associated with the user making the request, in the current+-- Amazon Web Services Region. For more information, see+-- <efs/latest/ug/manage-efs-resource-ids.html Managing Amazon EFS resource IDs>.+module Amazonka.EFS.DescribeAccountPreferences+  ( -- * Creating a Request+    DescribeAccountPreferences (..),+    newDescribeAccountPreferences,++    -- * Request Lenses+    describeAccountPreferences_maxResults,+    describeAccountPreferences_nextToken,++    -- * Destructuring the Response+    DescribeAccountPreferencesResponse (..),+    newDescribeAccountPreferencesResponse,++    -- * Response Lenses+    describeAccountPreferencesResponse_nextToken,+    describeAccountPreferencesResponse_resourceIdPreference,+    describeAccountPreferencesResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeAccountPreferences' smart constructor.+data DescribeAccountPreferences = DescribeAccountPreferences'+  { -- | (Optional) When retrieving account preferences, you can optionally+    -- specify the @MaxItems@ parameter to limit the number of objects returned+    -- in a response. The default value is 100.+    maxResults :: Prelude.Maybe Prelude.Natural,+    -- | (Optional) You can use @NextToken@ in a subsequent request to fetch the+    -- next page of Amazon Web Services account preferences if the response+    -- payload was paginated.+    nextToken :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAccountPreferences' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'maxResults', 'describeAccountPreferences_maxResults' - (Optional) When retrieving account preferences, you can optionally+-- specify the @MaxItems@ parameter to limit the number of objects returned+-- in a response. The default value is 100.+--+-- 'nextToken', 'describeAccountPreferences_nextToken' - (Optional) You can use @NextToken@ in a subsequent request to fetch the+-- next page of Amazon Web Services account preferences if the response+-- payload was paginated.+newDescribeAccountPreferences ::+  DescribeAccountPreferences+newDescribeAccountPreferences =+  DescribeAccountPreferences'+    { maxResults =+        Prelude.Nothing,+      nextToken = Prelude.Nothing+    }++-- | (Optional) When retrieving account preferences, you can optionally+-- specify the @MaxItems@ parameter to limit the number of objects returned+-- in a response. The default value is 100.+describeAccountPreferences_maxResults :: Lens.Lens' DescribeAccountPreferences (Prelude.Maybe Prelude.Natural)+describeAccountPreferences_maxResults = Lens.lens (\DescribeAccountPreferences' {maxResults} -> maxResults) (\s@DescribeAccountPreferences' {} a -> s {maxResults = a} :: DescribeAccountPreferences)++-- | (Optional) You can use @NextToken@ in a subsequent request to fetch the+-- next page of Amazon Web Services account preferences if the response+-- payload was paginated.+describeAccountPreferences_nextToken :: Lens.Lens' DescribeAccountPreferences (Prelude.Maybe Prelude.Text)+describeAccountPreferences_nextToken = Lens.lens (\DescribeAccountPreferences' {nextToken} -> nextToken) (\s@DescribeAccountPreferences' {} a -> s {nextToken = a} :: DescribeAccountPreferences)++instance Core.AWSRequest DescribeAccountPreferences where+  type+    AWSResponse DescribeAccountPreferences =+      DescribeAccountPreferencesResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeAccountPreferencesResponse'+            Prelude.<$> (x Data..?> "NextToken")+            Prelude.<*> (x Data..?> "ResourceIdPreference")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeAccountPreferences where+  hashWithSalt _salt DescribeAccountPreferences' {..} =+    _salt+      `Prelude.hashWithSalt` maxResults+      `Prelude.hashWithSalt` nextToken++instance Prelude.NFData DescribeAccountPreferences where+  rnf DescribeAccountPreferences' {..} =+    Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken++instance Data.ToHeaders DescribeAccountPreferences where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeAccountPreferences where+  toPath =+    Prelude.const "/2015-02-01/account-preferences"++instance Data.ToQuery DescribeAccountPreferences where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeAccountPreferencesResponse' smart constructor.+data DescribeAccountPreferencesResponse = DescribeAccountPreferencesResponse'+  { -- | Present if there are more records than returned in the response. You can+    -- use the @NextToken@ in the subsequent request to fetch the additional+    -- descriptions.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | Describes the resource ID preference setting for the Amazon Web Services+    -- account associated with the user making the request, in the current+    -- Amazon Web Services Region.+    resourceIdPreference :: Prelude.Maybe ResourceIdPreference,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAccountPreferencesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'nextToken', 'describeAccountPreferencesResponse_nextToken' - Present if there are more records than returned in the response. You can+-- use the @NextToken@ in the subsequent request to fetch the additional+-- descriptions.+--+-- 'resourceIdPreference', 'describeAccountPreferencesResponse_resourceIdPreference' - Describes the resource ID preference setting for the Amazon Web Services+-- account associated with the user making the request, in the current+-- Amazon Web Services Region.+--+-- 'httpStatus', 'describeAccountPreferencesResponse_httpStatus' - The response's http status code.+newDescribeAccountPreferencesResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeAccountPreferencesResponse+newDescribeAccountPreferencesResponse pHttpStatus_ =+  DescribeAccountPreferencesResponse'+    { nextToken =+        Prelude.Nothing,+      resourceIdPreference = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | Present if there are more records than returned in the response. You can+-- use the @NextToken@ in the subsequent request to fetch the additional+-- descriptions.+describeAccountPreferencesResponse_nextToken :: Lens.Lens' DescribeAccountPreferencesResponse (Prelude.Maybe Prelude.Text)+describeAccountPreferencesResponse_nextToken = Lens.lens (\DescribeAccountPreferencesResponse' {nextToken} -> nextToken) (\s@DescribeAccountPreferencesResponse' {} a -> s {nextToken = a} :: DescribeAccountPreferencesResponse)++-- | Describes the resource ID preference setting for the Amazon Web Services+-- account associated with the user making the request, in the current+-- Amazon Web Services Region.+describeAccountPreferencesResponse_resourceIdPreference :: Lens.Lens' DescribeAccountPreferencesResponse (Prelude.Maybe ResourceIdPreference)+describeAccountPreferencesResponse_resourceIdPreference = Lens.lens (\DescribeAccountPreferencesResponse' {resourceIdPreference} -> resourceIdPreference) (\s@DescribeAccountPreferencesResponse' {} a -> s {resourceIdPreference = a} :: DescribeAccountPreferencesResponse)++-- | The response's http status code.+describeAccountPreferencesResponse_httpStatus :: Lens.Lens' DescribeAccountPreferencesResponse Prelude.Int+describeAccountPreferencesResponse_httpStatus = Lens.lens (\DescribeAccountPreferencesResponse' {httpStatus} -> httpStatus) (\s@DescribeAccountPreferencesResponse' {} a -> s {httpStatus = a} :: DescribeAccountPreferencesResponse)++instance+  Prelude.NFData+    DescribeAccountPreferencesResponse+  where+  rnf DescribeAccountPreferencesResponse' {..} =+    Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf resourceIdPreference+      `Prelude.seq` Prelude.rnf httpStatus

@@ -0,0 +1,109 @@+{-# 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.EFS.DescribeBackupPolicy+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the backup policy for the specified EFS file system.+module Amazonka.EFS.DescribeBackupPolicy+  ( -- * Creating a Request+    DescribeBackupPolicy (..),+    newDescribeBackupPolicy,++    -- * Request Lenses+    describeBackupPolicy_fileSystemId,++    -- * Destructuring the Response+    BackupPolicyDescription (..),+    newBackupPolicyDescription,++    -- * Response Lenses+    backupPolicyDescription_backupPolicy,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeBackupPolicy' smart constructor.+data DescribeBackupPolicy = DescribeBackupPolicy'+  { -- | Specifies which EFS file system to retrieve the @BackupPolicy@ for.+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeBackupPolicy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'describeBackupPolicy_fileSystemId' - Specifies which EFS file system to retrieve the @BackupPolicy@ for.+newDescribeBackupPolicy ::+  -- | 'fileSystemId'+  Prelude.Text ->+  DescribeBackupPolicy+newDescribeBackupPolicy pFileSystemId_ =+  DescribeBackupPolicy'+    { fileSystemId =+        pFileSystemId_+    }++-- | Specifies which EFS file system to retrieve the @BackupPolicy@ for.+describeBackupPolicy_fileSystemId :: Lens.Lens' DescribeBackupPolicy Prelude.Text+describeBackupPolicy_fileSystemId = Lens.lens (\DescribeBackupPolicy' {fileSystemId} -> fileSystemId) (\s@DescribeBackupPolicy' {} a -> s {fileSystemId = a} :: DescribeBackupPolicy)++instance Core.AWSRequest DescribeBackupPolicy where+  type+    AWSResponse DescribeBackupPolicy =+      BackupPolicyDescription+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DescribeBackupPolicy where+  hashWithSalt _salt DescribeBackupPolicy' {..} =+    _salt `Prelude.hashWithSalt` fileSystemId++instance Prelude.NFData DescribeBackupPolicy where+  rnf DescribeBackupPolicy' {..} =+    Prelude.rnf fileSystemId++instance Data.ToHeaders DescribeBackupPolicy where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeBackupPolicy where+  toPath DescribeBackupPolicy' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS fileSystemId,+        "/backup-policy"+      ]++instance Data.ToQuery DescribeBackupPolicy where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,113 @@+{-# 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.EFS.DescribeFileSystemPolicy+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the @FileSystemPolicy@ for the specified EFS file system.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DescribeFileSystemPolicy@ action.+module Amazonka.EFS.DescribeFileSystemPolicy+  ( -- * Creating a Request+    DescribeFileSystemPolicy (..),+    newDescribeFileSystemPolicy,++    -- * Request Lenses+    describeFileSystemPolicy_fileSystemId,++    -- * Destructuring the Response+    FileSystemPolicyDescription (..),+    newFileSystemPolicyDescription,++    -- * Response Lenses+    fileSystemPolicyDescription_fileSystemId,+    fileSystemPolicyDescription_policy,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeFileSystemPolicy' smart constructor.+data DescribeFileSystemPolicy = DescribeFileSystemPolicy'+  { -- | Specifies which EFS file system to retrieve the @FileSystemPolicy@ for.+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeFileSystemPolicy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'describeFileSystemPolicy_fileSystemId' - Specifies which EFS file system to retrieve the @FileSystemPolicy@ for.+newDescribeFileSystemPolicy ::+  -- | 'fileSystemId'+  Prelude.Text ->+  DescribeFileSystemPolicy+newDescribeFileSystemPolicy pFileSystemId_ =+  DescribeFileSystemPolicy'+    { fileSystemId =+        pFileSystemId_+    }++-- | Specifies which EFS file system to retrieve the @FileSystemPolicy@ for.+describeFileSystemPolicy_fileSystemId :: Lens.Lens' DescribeFileSystemPolicy Prelude.Text+describeFileSystemPolicy_fileSystemId = Lens.lens (\DescribeFileSystemPolicy' {fileSystemId} -> fileSystemId) (\s@DescribeFileSystemPolicy' {} a -> s {fileSystemId = a} :: DescribeFileSystemPolicy)++instance Core.AWSRequest DescribeFileSystemPolicy where+  type+    AWSResponse DescribeFileSystemPolicy =+      FileSystemPolicyDescription+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance Prelude.Hashable DescribeFileSystemPolicy where+  hashWithSalt _salt DescribeFileSystemPolicy' {..} =+    _salt `Prelude.hashWithSalt` fileSystemId++instance Prelude.NFData DescribeFileSystemPolicy where+  rnf DescribeFileSystemPolicy' {..} =+    Prelude.rnf fileSystemId++instance Data.ToHeaders DescribeFileSystemPolicy where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeFileSystemPolicy where+  toPath DescribeFileSystemPolicy' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS fileSystemId,+        "/policy"+      ]++instance Data.ToQuery DescribeFileSystemPolicy where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,299 @@+{-# 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.EFS.DescribeFileSystems+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the description of a specific Amazon EFS file system if either+-- the file system @CreationToken@ or the @FileSystemId@ is provided.+-- Otherwise, it returns descriptions of all file systems owned by the+-- caller\'s Amazon Web Services account in the Amazon Web Services Region+-- of the endpoint that you\'re calling.+--+-- When retrieving all file system descriptions, you can optionally specify+-- the @MaxItems@ parameter to limit the number of descriptions in a+-- response. Currently, this number is automatically set to 10. If more+-- file system descriptions remain, Amazon EFS returns a @NextMarker@, an+-- opaque token, in the response. In this case, you should send a+-- subsequent request with the @Marker@ request parameter set to the value+-- of @NextMarker@.+--+-- To retrieve a list of your file system descriptions, this operation is+-- used in an iterative process, where @DescribeFileSystems@ is called+-- first without the @Marker@ and then the operation continues to call it+-- with the @Marker@ parameter set to the value of the @NextMarker@ from+-- the previous response until the response has no @NextMarker@.+--+-- The order of file systems returned in the response of one+-- @DescribeFileSystems@ call and the order of file systems returned across+-- the responses of a multi-call iteration is unspecified.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DescribeFileSystems@ action.+--+-- This operation returns paginated results.+module Amazonka.EFS.DescribeFileSystems+  ( -- * Creating a Request+    DescribeFileSystems (..),+    newDescribeFileSystems,++    -- * Request Lenses+    describeFileSystems_creationToken,+    describeFileSystems_fileSystemId,+    describeFileSystems_marker,+    describeFileSystems_maxItems,++    -- * Destructuring the Response+    DescribeFileSystemsResponse (..),+    newDescribeFileSystemsResponse,++    -- * Response Lenses+    describeFileSystemsResponse_fileSystems,+    describeFileSystemsResponse_marker,+    describeFileSystemsResponse_nextMarker,+    describeFileSystemsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newDescribeFileSystems' smart constructor.+data DescribeFileSystems = DescribeFileSystems'+  { -- | (Optional) Restricts the list to the file system with this creation+    -- token (String). You specify a creation token when you create an Amazon+    -- EFS file system.+    creationToken :: Prelude.Maybe Prelude.Text,+    -- | (Optional) ID of the file system whose description you want to retrieve+    -- (String).+    fileSystemId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) Opaque pagination token returned from a previous+    -- @DescribeFileSystems@ operation (String). If present, specifies to+    -- continue the list from where the returning call had left off.+    marker :: Prelude.Maybe Prelude.Text,+    -- | (Optional) Specifies the maximum number of file systems to return in the+    -- response (integer). This number is automatically set to 100. The+    -- response is paginated at 100 per page if you have more than 100 file+    -- systems.+    maxItems :: Prelude.Maybe Prelude.Natural+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeFileSystems' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'creationToken', 'describeFileSystems_creationToken' - (Optional) Restricts the list to the file system with this creation+-- token (String). You specify a creation token when you create an Amazon+-- EFS file system.+--+-- 'fileSystemId', 'describeFileSystems_fileSystemId' - (Optional) ID of the file system whose description you want to retrieve+-- (String).+--+-- 'marker', 'describeFileSystems_marker' - (Optional) Opaque pagination token returned from a previous+-- @DescribeFileSystems@ operation (String). If present, specifies to+-- continue the list from where the returning call had left off.+--+-- 'maxItems', 'describeFileSystems_maxItems' - (Optional) Specifies the maximum number of file systems to return in the+-- response (integer). This number is automatically set to 100. The+-- response is paginated at 100 per page if you have more than 100 file+-- systems.+newDescribeFileSystems ::+  DescribeFileSystems+newDescribeFileSystems =+  DescribeFileSystems'+    { creationToken =+        Prelude.Nothing,+      fileSystemId = Prelude.Nothing,+      marker = Prelude.Nothing,+      maxItems = Prelude.Nothing+    }++-- | (Optional) Restricts the list to the file system with this creation+-- token (String). You specify a creation token when you create an Amazon+-- EFS file system.+describeFileSystems_creationToken :: Lens.Lens' DescribeFileSystems (Prelude.Maybe Prelude.Text)+describeFileSystems_creationToken = Lens.lens (\DescribeFileSystems' {creationToken} -> creationToken) (\s@DescribeFileSystems' {} a -> s {creationToken = a} :: DescribeFileSystems)++-- | (Optional) ID of the file system whose description you want to retrieve+-- (String).+describeFileSystems_fileSystemId :: Lens.Lens' DescribeFileSystems (Prelude.Maybe Prelude.Text)+describeFileSystems_fileSystemId = Lens.lens (\DescribeFileSystems' {fileSystemId} -> fileSystemId) (\s@DescribeFileSystems' {} a -> s {fileSystemId = a} :: DescribeFileSystems)++-- | (Optional) Opaque pagination token returned from a previous+-- @DescribeFileSystems@ operation (String). If present, specifies to+-- continue the list from where the returning call had left off.+describeFileSystems_marker :: Lens.Lens' DescribeFileSystems (Prelude.Maybe Prelude.Text)+describeFileSystems_marker = Lens.lens (\DescribeFileSystems' {marker} -> marker) (\s@DescribeFileSystems' {} a -> s {marker = a} :: DescribeFileSystems)++-- | (Optional) Specifies the maximum number of file systems to return in the+-- response (integer). This number is automatically set to 100. The+-- response is paginated at 100 per page if you have more than 100 file+-- systems.+describeFileSystems_maxItems :: Lens.Lens' DescribeFileSystems (Prelude.Maybe Prelude.Natural)+describeFileSystems_maxItems = Lens.lens (\DescribeFileSystems' {maxItems} -> maxItems) (\s@DescribeFileSystems' {} a -> s {maxItems = a} :: DescribeFileSystems)++instance Core.AWSPager DescribeFileSystems where+  page rq rs+    | Core.stop+        ( rs+            Lens.^? describeFileSystemsResponse_nextMarker+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Core.stop+        ( rs+            Lens.^? describeFileSystemsResponse_fileSystems+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Prelude.otherwise =+        Prelude.Just+          Prelude.$ rq+          Prelude.& describeFileSystems_marker+          Lens..~ rs+          Lens.^? describeFileSystemsResponse_nextMarker+          Prelude.. Lens._Just++instance Core.AWSRequest DescribeFileSystems where+  type+    AWSResponse DescribeFileSystems =+      DescribeFileSystemsResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeFileSystemsResponse'+            Prelude.<$> (x Data..?> "FileSystems" Core..!@ Prelude.mempty)+            Prelude.<*> (x Data..?> "Marker")+            Prelude.<*> (x Data..?> "NextMarker")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeFileSystems where+  hashWithSalt _salt DescribeFileSystems' {..} =+    _salt+      `Prelude.hashWithSalt` creationToken+      `Prelude.hashWithSalt` fileSystemId+      `Prelude.hashWithSalt` marker+      `Prelude.hashWithSalt` maxItems++instance Prelude.NFData DescribeFileSystems where+  rnf DescribeFileSystems' {..} =+    Prelude.rnf creationToken+      `Prelude.seq` Prelude.rnf fileSystemId+      `Prelude.seq` Prelude.rnf marker+      `Prelude.seq` Prelude.rnf maxItems++instance Data.ToHeaders DescribeFileSystems where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeFileSystems where+  toPath = Prelude.const "/2015-02-01/file-systems"++instance Data.ToQuery DescribeFileSystems where+  toQuery DescribeFileSystems' {..} =+    Prelude.mconcat+      [ "CreationToken" Data.=: creationToken,+        "FileSystemId" Data.=: fileSystemId,+        "Marker" Data.=: marker,+        "MaxItems" Data.=: maxItems+      ]++-- | /See:/ 'newDescribeFileSystemsResponse' smart constructor.+data DescribeFileSystemsResponse = DescribeFileSystemsResponse'+  { -- | An array of file system descriptions.+    fileSystems :: Prelude.Maybe [FileSystemDescription],+    -- | Present if provided by caller in the request (String).+    marker :: Prelude.Maybe Prelude.Text,+    -- | Present if there are more file systems than returned in the response+    -- (String). You can use the @NextMarker@ in the subsequent request to+    -- fetch the descriptions.+    nextMarker :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeFileSystemsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystems', 'describeFileSystemsResponse_fileSystems' - An array of file system descriptions.+--+-- 'marker', 'describeFileSystemsResponse_marker' - Present if provided by caller in the request (String).+--+-- 'nextMarker', 'describeFileSystemsResponse_nextMarker' - Present if there are more file systems than returned in the response+-- (String). You can use the @NextMarker@ in the subsequent request to+-- fetch the descriptions.+--+-- 'httpStatus', 'describeFileSystemsResponse_httpStatus' - The response's http status code.+newDescribeFileSystemsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeFileSystemsResponse+newDescribeFileSystemsResponse pHttpStatus_ =+  DescribeFileSystemsResponse'+    { fileSystems =+        Prelude.Nothing,+      marker = Prelude.Nothing,+      nextMarker = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | An array of file system descriptions.+describeFileSystemsResponse_fileSystems :: Lens.Lens' DescribeFileSystemsResponse (Prelude.Maybe [FileSystemDescription])+describeFileSystemsResponse_fileSystems = Lens.lens (\DescribeFileSystemsResponse' {fileSystems} -> fileSystems) (\s@DescribeFileSystemsResponse' {} a -> s {fileSystems = a} :: DescribeFileSystemsResponse) Prelude.. Lens.mapping Lens.coerced++-- | Present if provided by caller in the request (String).+describeFileSystemsResponse_marker :: Lens.Lens' DescribeFileSystemsResponse (Prelude.Maybe Prelude.Text)+describeFileSystemsResponse_marker = Lens.lens (\DescribeFileSystemsResponse' {marker} -> marker) (\s@DescribeFileSystemsResponse' {} a -> s {marker = a} :: DescribeFileSystemsResponse)++-- | Present if there are more file systems than returned in the response+-- (String). You can use the @NextMarker@ in the subsequent request to+-- fetch the descriptions.+describeFileSystemsResponse_nextMarker :: Lens.Lens' DescribeFileSystemsResponse (Prelude.Maybe Prelude.Text)+describeFileSystemsResponse_nextMarker = Lens.lens (\DescribeFileSystemsResponse' {nextMarker} -> nextMarker) (\s@DescribeFileSystemsResponse' {} a -> s {nextMarker = a} :: DescribeFileSystemsResponse)++-- | The response's http status code.+describeFileSystemsResponse_httpStatus :: Lens.Lens' DescribeFileSystemsResponse Prelude.Int+describeFileSystemsResponse_httpStatus = Lens.lens (\DescribeFileSystemsResponse' {httpStatus} -> httpStatus) (\s@DescribeFileSystemsResponse' {} a -> s {httpStatus = a} :: DescribeFileSystemsResponse)++instance Prelude.NFData DescribeFileSystemsResponse where+  rnf DescribeFileSystemsResponse' {..} =+    Prelude.rnf fileSystems+      `Prelude.seq` Prelude.rnf marker+      `Prelude.seq` Prelude.rnf nextMarker+      `Prelude.seq` Prelude.rnf httpStatus

@@ -0,0 +1,137 @@+{-# 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.EFS.DescribeLifecycleConfiguration+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the current @LifecycleConfiguration@ object for the specified+-- Amazon EFS file system. EFS lifecycle management uses the+-- @LifecycleConfiguration@ object to identify which files to move to the+-- EFS Infrequent Access (IA) storage class. For a file system without a+-- @LifecycleConfiguration@ object, the call returns an empty array in the+-- response.+--+-- When EFS Intelligent-Tiering is enabled,+-- @TransitionToPrimaryStorageClass@ has a value of @AFTER_1_ACCESS@.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DescribeLifecycleConfiguration@ operation.+module Amazonka.EFS.DescribeLifecycleConfiguration+  ( -- * Creating a Request+    DescribeLifecycleConfiguration (..),+    newDescribeLifecycleConfiguration,++    -- * Request Lenses+    describeLifecycleConfiguration_fileSystemId,++    -- * Destructuring the Response+    LifecycleConfigurationDescription (..),+    newLifecycleConfigurationDescription,++    -- * Response Lenses+    lifecycleConfigurationDescription_lifecyclePolicies,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeLifecycleConfiguration' smart constructor.+data DescribeLifecycleConfiguration = DescribeLifecycleConfiguration'+  { -- | The ID of the file system whose @LifecycleConfiguration@ object you want+    -- to retrieve (String).+    fileSystemId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeLifecycleConfiguration' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'describeLifecycleConfiguration_fileSystemId' - The ID of the file system whose @LifecycleConfiguration@ object you want+-- to retrieve (String).+newDescribeLifecycleConfiguration ::+  -- | 'fileSystemId'+  Prelude.Text ->+  DescribeLifecycleConfiguration+newDescribeLifecycleConfiguration pFileSystemId_ =+  DescribeLifecycleConfiguration'+    { fileSystemId =+        pFileSystemId_+    }++-- | The ID of the file system whose @LifecycleConfiguration@ object you want+-- to retrieve (String).+describeLifecycleConfiguration_fileSystemId :: Lens.Lens' DescribeLifecycleConfiguration Prelude.Text+describeLifecycleConfiguration_fileSystemId = Lens.lens (\DescribeLifecycleConfiguration' {fileSystemId} -> fileSystemId) (\s@DescribeLifecycleConfiguration' {} a -> s {fileSystemId = a} :: DescribeLifecycleConfiguration)++instance+  Core.AWSRequest+    DescribeLifecycleConfiguration+  where+  type+    AWSResponse DescribeLifecycleConfiguration =+      LifecycleConfigurationDescription+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      (\s h x -> Data.eitherParseJSON x)++instance+  Prelude.Hashable+    DescribeLifecycleConfiguration+  where+  hashWithSalt+    _salt+    DescribeLifecycleConfiguration' {..} =+      _salt `Prelude.hashWithSalt` fileSystemId++instance+  Prelude.NFData+    DescribeLifecycleConfiguration+  where+  rnf DescribeLifecycleConfiguration' {..} =+    Prelude.rnf fileSystemId++instance+  Data.ToHeaders+    DescribeLifecycleConfiguration+  where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeLifecycleConfiguration where+  toPath DescribeLifecycleConfiguration' {..} =+    Prelude.mconcat+      [ "/2015-02-01/file-systems/",+        Data.toBS fileSystemId,+        "/lifecycle-configuration"+      ]++instance Data.ToQuery DescribeLifecycleConfiguration where+  toQuery = Prelude.const Prelude.mempty

@@ -0,0 +1,198 @@+{-# 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.EFS.DescribeMountTargetSecurityGroups+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the security groups currently in effect for a mount target. This+-- operation requires that the network interface of the mount target has+-- been created and the lifecycle state of the mount target is not+-- @deleted@.+--+-- This operation requires permissions for the following actions:+--+-- -   @elasticfilesystem:DescribeMountTargetSecurityGroups@ action on the+--     mount target\'s file system.+--+-- -   @ec2:DescribeNetworkInterfaceAttribute@ action on the mount+--     target\'s network interface.+module Amazonka.EFS.DescribeMountTargetSecurityGroups+  ( -- * Creating a Request+    DescribeMountTargetSecurityGroups (..),+    newDescribeMountTargetSecurityGroups,++    -- * Request Lenses+    describeMountTargetSecurityGroups_mountTargetId,++    -- * Destructuring the Response+    DescribeMountTargetSecurityGroupsResponse (..),+    newDescribeMountTargetSecurityGroupsResponse,++    -- * Response Lenses+    describeMountTargetSecurityGroupsResponse_httpStatus,+    describeMountTargetSecurityGroupsResponse_securityGroups,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newDescribeMountTargetSecurityGroups' smart constructor.+data DescribeMountTargetSecurityGroups = DescribeMountTargetSecurityGroups'+  { -- | The ID of the mount target whose security groups you want to retrieve.+    mountTargetId :: Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeMountTargetSecurityGroups' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'mountTargetId', 'describeMountTargetSecurityGroups_mountTargetId' - The ID of the mount target whose security groups you want to retrieve.+newDescribeMountTargetSecurityGroups ::+  -- | 'mountTargetId'+  Prelude.Text ->+  DescribeMountTargetSecurityGroups+newDescribeMountTargetSecurityGroups pMountTargetId_ =+  DescribeMountTargetSecurityGroups'+    { mountTargetId =+        pMountTargetId_+    }++-- | The ID of the mount target whose security groups you want to retrieve.+describeMountTargetSecurityGroups_mountTargetId :: Lens.Lens' DescribeMountTargetSecurityGroups Prelude.Text+describeMountTargetSecurityGroups_mountTargetId = Lens.lens (\DescribeMountTargetSecurityGroups' {mountTargetId} -> mountTargetId) (\s@DescribeMountTargetSecurityGroups' {} a -> s {mountTargetId = a} :: DescribeMountTargetSecurityGroups)++instance+  Core.AWSRequest+    DescribeMountTargetSecurityGroups+  where+  type+    AWSResponse DescribeMountTargetSecurityGroups =+      DescribeMountTargetSecurityGroupsResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeMountTargetSecurityGroupsResponse'+            Prelude.<$> (Prelude.pure (Prelude.fromEnum s))+            Prelude.<*> ( x+                            Data..?> "SecurityGroups"+                            Core..!@ Prelude.mempty+                        )+      )++instance+  Prelude.Hashable+    DescribeMountTargetSecurityGroups+  where+  hashWithSalt+    _salt+    DescribeMountTargetSecurityGroups' {..} =+      _salt `Prelude.hashWithSalt` mountTargetId++instance+  Prelude.NFData+    DescribeMountTargetSecurityGroups+  where+  rnf DescribeMountTargetSecurityGroups' {..} =+    Prelude.rnf mountTargetId++instance+  Data.ToHeaders+    DescribeMountTargetSecurityGroups+  where+  toHeaders = Prelude.const Prelude.mempty++instance+  Data.ToPath+    DescribeMountTargetSecurityGroups+  where+  toPath DescribeMountTargetSecurityGroups' {..} =+    Prelude.mconcat+      [ "/2015-02-01/mount-targets/",+        Data.toBS mountTargetId,+        "/security-groups"+      ]++instance+  Data.ToQuery+    DescribeMountTargetSecurityGroups+  where+  toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeMountTargetSecurityGroupsResponse' smart constructor.+data DescribeMountTargetSecurityGroupsResponse = DescribeMountTargetSecurityGroupsResponse'+  { -- | The response's http status code.+    httpStatus :: Prelude.Int,+    -- | An array of security groups.+    securityGroups :: [Prelude.Text]+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeMountTargetSecurityGroupsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'httpStatus', 'describeMountTargetSecurityGroupsResponse_httpStatus' - The response's http status code.+--+-- 'securityGroups', 'describeMountTargetSecurityGroupsResponse_securityGroups' - An array of security groups.+newDescribeMountTargetSecurityGroupsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeMountTargetSecurityGroupsResponse+newDescribeMountTargetSecurityGroupsResponse+  pHttpStatus_ =+    DescribeMountTargetSecurityGroupsResponse'+      { httpStatus =+          pHttpStatus_,+        securityGroups = Prelude.mempty+      }++-- | The response's http status code.+describeMountTargetSecurityGroupsResponse_httpStatus :: Lens.Lens' DescribeMountTargetSecurityGroupsResponse Prelude.Int+describeMountTargetSecurityGroupsResponse_httpStatus = Lens.lens (\DescribeMountTargetSecurityGroupsResponse' {httpStatus} -> httpStatus) (\s@DescribeMountTargetSecurityGroupsResponse' {} a -> s {httpStatus = a} :: DescribeMountTargetSecurityGroupsResponse)++-- | An array of security groups.+describeMountTargetSecurityGroupsResponse_securityGroups :: Lens.Lens' DescribeMountTargetSecurityGroupsResponse [Prelude.Text]+describeMountTargetSecurityGroupsResponse_securityGroups = Lens.lens (\DescribeMountTargetSecurityGroupsResponse' {securityGroups} -> securityGroups) (\s@DescribeMountTargetSecurityGroupsResponse' {} a -> s {securityGroups = a} :: DescribeMountTargetSecurityGroupsResponse) Prelude.. Lens.coerced++instance+  Prelude.NFData+    DescribeMountTargetSecurityGroupsResponse+  where+  rnf DescribeMountTargetSecurityGroupsResponse' {..} =+    Prelude.rnf httpStatus+      `Prelude.seq` Prelude.rnf securityGroups

@@ -0,0 +1,318 @@+{-# 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.EFS.DescribeMountTargets+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the descriptions of all the current mount targets, or a specific+-- mount target, for a file system. When requesting all of the current+-- mount targets, the order of mount targets returned in the response is+-- unspecified.+--+-- This operation requires permissions for the+-- @elasticfilesystem:DescribeMountTargets@ action, on either the file+-- system ID that you specify in @FileSystemId@, or on the file system of+-- the mount target that you specify in @MountTargetId@.+--+-- This operation returns paginated results.+module Amazonka.EFS.DescribeMountTargets+  ( -- * Creating a Request+    DescribeMountTargets (..),+    newDescribeMountTargets,++    -- * Request Lenses+    describeMountTargets_accessPointId,+    describeMountTargets_fileSystemId,+    describeMountTargets_marker,+    describeMountTargets_maxItems,+    describeMountTargets_mountTargetId,++    -- * Destructuring the Response+    DescribeMountTargetsResponse (..),+    newDescribeMountTargetsResponse,++    -- * Response Lenses+    describeMountTargetsResponse_marker,+    describeMountTargetsResponse_mountTargets,+    describeMountTargetsResponse_nextMarker,+    describeMountTargetsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- |+--+-- /See:/ 'newDescribeMountTargets' smart constructor.+data DescribeMountTargets = DescribeMountTargets'+  { -- | (Optional) The ID of the access point whose mount targets that you want+    -- to list. It must be included in your request if a @FileSystemId@ or+    -- @MountTargetId@ is not included in your request. Accepts either an+    -- access point ID or ARN as input.+    accessPointId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) ID of the file system whose mount targets you want to list+    -- (String). It must be included in your request if an @AccessPointId@ or+    -- @MountTargetId@ is not included. Accepts either a file system ID or ARN+    -- as input.+    fileSystemId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) Opaque pagination token returned from a previous+    -- @DescribeMountTargets@ operation (String). If present, it specifies to+    -- continue the list from where the previous returning call left off.+    marker :: Prelude.Maybe Prelude.Text,+    -- | (Optional) Maximum number of mount targets to return in the response.+    -- Currently, this number is automatically set to 10, and other values are+    -- ignored. The response is paginated at 100 per page if you have more than+    -- 100 mount targets.+    maxItems :: Prelude.Maybe Prelude.Natural,+    -- | (Optional) ID of the mount target that you want to have described+    -- (String). It must be included in your request if @FileSystemId@ is not+    -- included. Accepts either a mount target ID or ARN as input.+    mountTargetId :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeMountTargets' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessPointId', 'describeMountTargets_accessPointId' - (Optional) The ID of the access point whose mount targets that you want+-- to list. It must be included in your request if a @FileSystemId@ or+-- @MountTargetId@ is not included in your request. Accepts either an+-- access point ID or ARN as input.+--+-- 'fileSystemId', 'describeMountTargets_fileSystemId' - (Optional) ID of the file system whose mount targets you want to list+-- (String). It must be included in your request if an @AccessPointId@ or+-- @MountTargetId@ is not included. Accepts either a file system ID or ARN+-- as input.+--+-- 'marker', 'describeMountTargets_marker' - (Optional) Opaque pagination token returned from a previous+-- @DescribeMountTargets@ operation (String). If present, it specifies to+-- continue the list from where the previous returning call left off.+--+-- 'maxItems', 'describeMountTargets_maxItems' - (Optional) Maximum number of mount targets to return in the response.+-- Currently, this number is automatically set to 10, and other values are+-- ignored. The response is paginated at 100 per page if you have more than+-- 100 mount targets.+--+-- 'mountTargetId', 'describeMountTargets_mountTargetId' - (Optional) ID of the mount target that you want to have described+-- (String). It must be included in your request if @FileSystemId@ is not+-- included. Accepts either a mount target ID or ARN as input.+newDescribeMountTargets ::+  DescribeMountTargets+newDescribeMountTargets =+  DescribeMountTargets'+    { accessPointId =+        Prelude.Nothing,+      fileSystemId = Prelude.Nothing,+      marker = Prelude.Nothing,+      maxItems = Prelude.Nothing,+      mountTargetId = Prelude.Nothing+    }++-- | (Optional) The ID of the access point whose mount targets that you want+-- to list. It must be included in your request if a @FileSystemId@ or+-- @MountTargetId@ is not included in your request. Accepts either an+-- access point ID or ARN as input.+describeMountTargets_accessPointId :: Lens.Lens' DescribeMountTargets (Prelude.Maybe Prelude.Text)+describeMountTargets_accessPointId = Lens.lens (\DescribeMountTargets' {accessPointId} -> accessPointId) (\s@DescribeMountTargets' {} a -> s {accessPointId = a} :: DescribeMountTargets)++-- | (Optional) ID of the file system whose mount targets you want to list+-- (String). It must be included in your request if an @AccessPointId@ or+-- @MountTargetId@ is not included. Accepts either a file system ID or ARN+-- as input.+describeMountTargets_fileSystemId :: Lens.Lens' DescribeMountTargets (Prelude.Maybe Prelude.Text)+describeMountTargets_fileSystemId = Lens.lens (\DescribeMountTargets' {fileSystemId} -> fileSystemId) (\s@DescribeMountTargets' {} a -> s {fileSystemId = a} :: DescribeMountTargets)++-- | (Optional) Opaque pagination token returned from a previous+-- @DescribeMountTargets@ operation (String). If present, it specifies to+-- continue the list from where the previous returning call left off.+describeMountTargets_marker :: Lens.Lens' DescribeMountTargets (Prelude.Maybe Prelude.Text)+describeMountTargets_marker = Lens.lens (\DescribeMountTargets' {marker} -> marker) (\s@DescribeMountTargets' {} a -> s {marker = a} :: DescribeMountTargets)++-- | (Optional) Maximum number of mount targets to return in the response.+-- Currently, this number is automatically set to 10, and other values are+-- ignored. The response is paginated at 100 per page if you have more than+-- 100 mount targets.+describeMountTargets_maxItems :: Lens.Lens' DescribeMountTargets (Prelude.Maybe Prelude.Natural)+describeMountTargets_maxItems = Lens.lens (\DescribeMountTargets' {maxItems} -> maxItems) (\s@DescribeMountTargets' {} a -> s {maxItems = a} :: DescribeMountTargets)++-- | (Optional) ID of the mount target that you want to have described+-- (String). It must be included in your request if @FileSystemId@ is not+-- included. Accepts either a mount target ID or ARN as input.+describeMountTargets_mountTargetId :: Lens.Lens' DescribeMountTargets (Prelude.Maybe Prelude.Text)+describeMountTargets_mountTargetId = Lens.lens (\DescribeMountTargets' {mountTargetId} -> mountTargetId) (\s@DescribeMountTargets' {} a -> s {mountTargetId = a} :: DescribeMountTargets)++instance Core.AWSPager DescribeMountTargets where+  page rq rs+    | Core.stop+        ( rs+            Lens.^? describeMountTargetsResponse_nextMarker+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Core.stop+        ( rs+            Lens.^? describeMountTargetsResponse_mountTargets+            Prelude.. Lens._Just+        ) =+        Prelude.Nothing+    | Prelude.otherwise =+        Prelude.Just+          Prelude.$ rq+          Prelude.& describeMountTargets_marker+          Lens..~ rs+          Lens.^? describeMountTargetsResponse_nextMarker+          Prelude.. Lens._Just++instance Core.AWSRequest DescribeMountTargets where+  type+    AWSResponse DescribeMountTargets =+      DescribeMountTargetsResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeMountTargetsResponse'+            Prelude.<$> (x Data..?> "Marker")+            Prelude.<*> (x Data..?> "MountTargets" Core..!@ Prelude.mempty)+            Prelude.<*> (x Data..?> "NextMarker")+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance Prelude.Hashable DescribeMountTargets where+  hashWithSalt _salt DescribeMountTargets' {..} =+    _salt+      `Prelude.hashWithSalt` accessPointId+      `Prelude.hashWithSalt` fileSystemId+      `Prelude.hashWithSalt` marker+      `Prelude.hashWithSalt` maxItems+      `Prelude.hashWithSalt` mountTargetId++instance Prelude.NFData DescribeMountTargets where+  rnf DescribeMountTargets' {..} =+    Prelude.rnf accessPointId+      `Prelude.seq` Prelude.rnf fileSystemId+      `Prelude.seq` Prelude.rnf marker+      `Prelude.seq` Prelude.rnf maxItems+      `Prelude.seq` Prelude.rnf mountTargetId++instance Data.ToHeaders DescribeMountTargets where+  toHeaders = Prelude.const Prelude.mempty++instance Data.ToPath DescribeMountTargets where+  toPath = Prelude.const "/2015-02-01/mount-targets"++instance Data.ToQuery DescribeMountTargets where+  toQuery DescribeMountTargets' {..} =+    Prelude.mconcat+      [ "AccessPointId" Data.=: accessPointId,+        "FileSystemId" Data.=: fileSystemId,+        "Marker" Data.=: marker,+        "MaxItems" Data.=: maxItems,+        "MountTargetId" Data.=: mountTargetId+      ]++-- |+--+-- /See:/ 'newDescribeMountTargetsResponse' smart constructor.+data DescribeMountTargetsResponse = DescribeMountTargetsResponse'+  { -- | If the request included the @Marker@, the response returns that value in+    -- this field.+    marker :: Prelude.Maybe Prelude.Text,+    -- | Returns the file system\'s mount targets as an array of+    -- @MountTargetDescription@ objects.+    mountTargets :: Prelude.Maybe [MountTargetDescription],+    -- | If a value is present, there are more mount targets to return. In a+    -- subsequent request, you can provide @Marker@ in your request with this+    -- value to retrieve the next set of mount targets.+    nextMarker :: Prelude.Maybe Prelude.Text,+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeMountTargetsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'describeMountTargetsResponse_marker' - If the request included the @Marker@, the response returns that value in+-- this field.+--+-- 'mountTargets', 'describeMountTargetsResponse_mountTargets' - Returns the file system\'s mount targets as an array of+-- @MountTargetDescription@ objects.+--+-- 'nextMarker', 'describeMountTargetsResponse_nextMarker' - If a value is present, there are more mount targets to return. In a+-- subsequent request, you can provide @Marker@ in your request with this+-- value to retrieve the next set of mount targets.+--+-- 'httpStatus', 'describeMountTargetsResponse_httpStatus' - The response's http status code.+newDescribeMountTargetsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeMountTargetsResponse+newDescribeMountTargetsResponse pHttpStatus_ =+  DescribeMountTargetsResponse'+    { marker =+        Prelude.Nothing,+      mountTargets = Prelude.Nothing,+      nextMarker = Prelude.Nothing,+      httpStatus = pHttpStatus_+    }++-- | If the request included the @Marker@, the response returns that value in+-- this field.+describeMountTargetsResponse_marker :: Lens.Lens' DescribeMountTargetsResponse (Prelude.Maybe Prelude.Text)+describeMountTargetsResponse_marker = Lens.lens (\DescribeMountTargetsResponse' {marker} -> marker) (\s@DescribeMountTargetsResponse' {} a -> s {marker = a} :: DescribeMountTargetsResponse)++-- | Returns the file system\'s mount targets as an array of+-- @MountTargetDescription@ objects.+describeMountTargetsResponse_mountTargets :: Lens.Lens' DescribeMountTargetsResponse (Prelude.Maybe [MountTargetDescription])+describeMountTargetsResponse_mountTargets = Lens.lens (\DescribeMountTargetsResponse' {mountTargets} -> mountTargets) (\s@DescribeMountTargetsResponse' {} a -> s {mountTargets = a} :: DescribeMountTargetsResponse) Prelude.. Lens.mapping Lens.coerced++-- | If a value is present, there are more mount targets to return. In a+-- subsequent request, you can provide @Marker@ in your request with this+-- value to retrieve the next set of mount targets.+describeMountTargetsResponse_nextMarker :: Lens.Lens' DescribeMountTargetsResponse (Prelude.Maybe Prelude.Text)+describeMountTargetsResponse_nextMarker = Lens.lens (\DescribeMountTargetsResponse' {nextMarker} -> nextMarker) (\s@DescribeMountTargetsResponse' {} a -> s {nextMarker = a} :: DescribeMountTargetsResponse)++-- | The response's http status code.+describeMountTargetsResponse_httpStatus :: Lens.Lens' DescribeMountTargetsResponse Prelude.Int+describeMountTargetsResponse_httpStatus = Lens.lens (\DescribeMountTargetsResponse' {httpStatus} -> httpStatus) (\s@DescribeMountTargetsResponse' {} a -> s {httpStatus = a} :: DescribeMountTargetsResponse)++instance Prelude.NFData DescribeMountTargetsResponse where+  rnf DescribeMountTargetsResponse' {..} =+    Prelude.rnf marker+      `Prelude.seq` Prelude.rnf mountTargets+      `Prelude.seq` Prelude.rnf nextMarker+      `Prelude.seq` Prelude.rnf httpStatus

@@ -0,0 +1,234 @@+{-# 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.EFS.DescribeReplicationConfigurations+-- Copyright   : (c) 2013-2023 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Retrieves the replication configuration for a specific file system. If a+-- file system is not specified, all of the replication configurations for+-- the Amazon Web Services account in an Amazon Web Services Region are+-- retrieved.+module Amazonka.EFS.DescribeReplicationConfigurations+  ( -- * Creating a Request+    DescribeReplicationConfigurations (..),+    newDescribeReplicationConfigurations,++    -- * Request Lenses+    describeReplicationConfigurations_fileSystemId,+    describeReplicationConfigurations_maxResults,+    describeReplicationConfigurations_nextToken,++    -- * Destructuring the Response+    DescribeReplicationConfigurationsResponse (..),+    newDescribeReplicationConfigurationsResponse,++    -- * Response Lenses+    describeReplicationConfigurationsResponse_nextToken,+    describeReplicationConfigurationsResponse_replications,+    describeReplicationConfigurationsResponse_httpStatus,+  )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import Amazonka.EFS.Types+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response++-- | /See:/ 'newDescribeReplicationConfigurations' smart constructor.+data DescribeReplicationConfigurations = DescribeReplicationConfigurations'+  { -- | You can retrieve the replication configuration for a specific file+    -- system by providing its file system ID.+    fileSystemId :: Prelude.Maybe Prelude.Text,+    -- | (Optional) To limit the number of objects returned in a response, you+    -- can specify the @MaxItems@ parameter. The default value is 100.+    maxResults :: Prelude.Maybe Prelude.Natural,+    -- | @NextToken@ is present if the response is paginated. You can use+    -- @NextToken@ in a subsequent request to fetch the next page of output.+    nextToken :: Prelude.Maybe Prelude.Text+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeReplicationConfigurations' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemId', 'describeReplicationConfigurations_fileSystemId' - You can retrieve the replication configuration for a specific file+-- system by providing its file system ID.+--+-- 'maxResults', 'describeReplicationConfigurations_maxResults' - (Optional) To limit the number of objects returned in a response, you+-- can specify the @MaxItems@ parameter. The default value is 100.+--+-- 'nextToken', 'describeReplicationConfigurations_nextToken' - @NextToken@ is present if the response is paginated. You can use+-- @NextToken@ in a subsequent request to fetch the next page of output.+newDescribeReplicationConfigurations ::+  DescribeReplicationConfigurations+newDescribeReplicationConfigurations =+  DescribeReplicationConfigurations'+    { fileSystemId =+        Prelude.Nothing,+      maxResults = Prelude.Nothing,+      nextToken = Prelude.Nothing+    }++-- | You can retrieve the replication configuration for a specific file+-- system by providing its file system ID.+describeReplicationConfigurations_fileSystemId :: Lens.Lens' DescribeReplicationConfigurations (Prelude.Maybe Prelude.Text)+describeReplicationConfigurations_fileSystemId = Lens.lens (\DescribeReplicationConfigurations' {fileSystemId} -> fileSystemId) (\s@DescribeReplicationConfigurations' {} a -> s {fileSystemId = a} :: DescribeReplicationConfigurations)++-- | (Optional) To limit the number of objects returned in a response, you+-- can specify the @MaxItems@ parameter. The default value is 100.+describeReplicationConfigurations_maxResults :: Lens.Lens' DescribeReplicationConfigurations (Prelude.Maybe Prelude.Natural)+describeReplicationConfigurations_maxResults = Lens.lens (\DescribeReplicationConfigurations' {maxResults} -> maxResults) (\s@DescribeReplicationConfigurations' {} a -> s {maxResults = a} :: DescribeReplicationConfigurations)++-- | @NextToken@ is present if the response is paginated. You can use+-- @NextToken@ in a subsequent request to fetch the next page of output.+describeReplicationConfigurations_nextToken :: Lens.Lens' DescribeReplicationConfigurations (Prelude.Maybe Prelude.Text)+describeReplicationConfigurations_nextToken = Lens.lens (\DescribeReplicationConfigurations' {nextToken} -> nextToken) (\s@DescribeReplicationConfigurations' {} a -> s {nextToken = a} :: DescribeReplicationConfigurations)++instance+  Core.AWSRequest+    DescribeReplicationConfigurations+  where+  type+    AWSResponse DescribeReplicationConfigurations =+      DescribeReplicationConfigurationsResponse+  request overrides =+    Request.get (overrides defaultService)+  response =+    Response.receiveJSON+      ( \s h x ->+          DescribeReplicationConfigurationsResponse'+            Prelude.<$> (x Data..?> "NextToken")+            Prelude.<*> (x Data..?> "Replications" Core..!@ Prelude.mempty)+            Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+      )++instance+  Prelude.Hashable+    DescribeReplicationConfigurations+  where+  hashWithSalt+    _salt+    DescribeReplicationConfigurations' {..} =+      _salt+        `Prelude.hashWithSalt` fileSystemId+        `Prelude.hashWithSalt` maxResults+        `Prelude.hashWithSalt` nextToken++instance+  Prelude.NFData+    DescribeReplicationConfigurations+  where+  rnf DescribeReplicationConfigurations' {..} =+    Prelude.rnf fileSystemId+      `Prelude.seq` Prelude.rnf maxResults+      `Prelude.seq` Prelude.rnf nextToken++instance+  Data.ToHeaders+    DescribeReplicationConfigurations+  where+  toHeaders = Prelude.const Prelude.mempty++instance+  Data.ToPath+    DescribeReplicationConfigurations+  where+  toPath =+    Prelude.const+      "/2015-02-01/file-systems/replication-configurations"++instance+  Data.ToQuery+    DescribeReplicationConfigurations+  where+  toQuery DescribeReplicationConfigurations' {..} =+    Prelude.mconcat+      [ "FileSystemId" Data.=: fileSystemId,+        "MaxResults" Data.=: maxResults,+        "NextToken" Data.=: nextToken+      ]++-- | /See:/ 'newDescribeReplicationConfigurationsResponse' smart constructor.+data DescribeReplicationConfigurationsResponse = DescribeReplicationConfigurationsResponse'+  { -- | You can use the @NextToken@ from the previous response in a subsequent+    -- request to fetch the additional descriptions.+    nextToken :: Prelude.Maybe Prelude.Text,+    -- | The collection of replication configurations that is returned.+    replications :: Prelude.Maybe [ReplicationConfigurationDescription],+    -- | The response's http status code.+    httpStatus :: Prelude.Int+  }+  deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeReplicationConfigurationsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'nextToken', 'describeReplicationConfigurationsResponse_nextToken' - You can use the @NextToken@ from the previous response in a subsequent+-- request to fetch the additional descriptions.+--+-- 'replications', 'describeReplicationConfigurationsResponse_replications' - The collection of replication configurations that is returned.+--+-- 'httpStatus', 'describeReplicationConfigurationsResponse_httpStatus' - The response's http status code.+newDescribeReplicationConfigurationsResponse ::+  -- | 'httpStatus'+  Prelude.Int ->+  DescribeReplicationConfigurationsResponse+newDescribeReplicationConfigurationsResponse+  pHttpStatus_ =+    DescribeReplicationConfigurationsResponse'+      { nextToken =+          Prelude.Nothing,+        replications = Prelude.Nothing,+        httpStatus = pHttpStatus_+      }++-- | You can use the @NextToken@ from the previous response in a subsequent+-- request to fetch the additional descriptions.+describeReplicationConfigurationsResponse_nextToken :: Lens.Lens' DescribeReplicationConfigurationsResponse (Prelude.Maybe Prelude.Text)+describeReplicationConfigurationsResponse_nextToken = Lens.lens (\DescribeReplicationConfigurationsResponse' {nextToken} -> nextToken) (\s@DescribeReplicationConfigurationsResponse' {} a -> s {nextToken = a} :: DescribeReplicationConfigurationsResponse)++-- | The collection of replication configurations that is returned.+describeReplicationConfigurationsResponse_replications :: Lens.Lens' DescribeReplicationConfigurationsResponse (Prelude.Maybe [ReplicationConfigurationDescription])+describeReplicationConfigurationsResponse_replications = Lens.lens (\DescribeReplicationConfigurationsResponse' {replications} -> replications) (\s@DescribeReplicationConfigurationsResponse' {} a -> s {replications = a} :: DescribeReplicationConfigurationsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeReplicationConfigurationsResponse_httpStatus :: Lens.Lens' DescribeReplicationConfigurationsResponse Prelude.Int+describeReplicationConfigurationsResponse_httpStatus = Lens.lens (\DescribeReplicationConfigurationsResponse' {httpStatus} -> httpStatus) (\s@DescribeReplicationConfigurationsResponse' {} a -> s {httpStatus = a} :: DescribeReplicationConfigurationsResponse)++instance+  Prelude.NFData+    DescribeReplicationConfigurationsResponse+  where+  rnf DescribeReplicationConfigurationsResponse' {..} =+    Prelude.rnf nextToken+      `Prelude.seq` Prelude.rnf replications+      `Prelude.seq` Prelude.rnf httpStatus

@@ -0,0 +1,384 @@+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Amazonka.EFS.Lens+-- 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.EFS.Lens+  ( -- * Operations++    -- ** CreateAccessPoint+    createAccessPoint_posixUser,+    createAccessPoint_rootDirectory,+    createAccessPoint_tags,+    createAccessPoint_clientToken,+    createAccessPoint_fileSystemId,+    accessPointDescription_accessPointArn,+    accessPointDescription_accessPointId,+    accessPointDescription_clientToken,+    accessPointDescription_fileSystemId,+    accessPointDescription_lifeCycleState,+    accessPointDescription_name,+    accessPointDescription_ownerId,+    accessPointDescription_posixUser,+    accessPointDescription_rootDirectory,+    accessPointDescription_tags,++    -- ** CreateFileSystem+    createFileSystem_availabilityZoneName,+    createFileSystem_backup,+    createFileSystem_encrypted,+    createFileSystem_kmsKeyId,+    createFileSystem_performanceMode,+    createFileSystem_provisionedThroughputInMibps,+    createFileSystem_tags,+    createFileSystem_throughputMode,+    createFileSystem_creationToken,+    fileSystemDescription_availabilityZoneId,+    fileSystemDescription_availabilityZoneName,+    fileSystemDescription_encrypted,+    fileSystemDescription_fileSystemArn,+    fileSystemDescription_kmsKeyId,+    fileSystemDescription_name,+    fileSystemDescription_provisionedThroughputInMibps,+    fileSystemDescription_throughputMode,+    fileSystemDescription_ownerId,+    fileSystemDescription_creationToken,+    fileSystemDescription_fileSystemId,+    fileSystemDescription_creationTime,+    fileSystemDescription_lifeCycleState,+    fileSystemDescription_numberOfMountTargets,+    fileSystemDescription_sizeInBytes,+    fileSystemDescription_performanceMode,+    fileSystemDescription_tags,++    -- ** CreateMountTarget+    createMountTarget_ipAddress,+    createMountTarget_securityGroups,+    createMountTarget_fileSystemId,+    createMountTarget_subnetId,+    mountTargetDescription_availabilityZoneId,+    mountTargetDescription_availabilityZoneName,+    mountTargetDescription_ipAddress,+    mountTargetDescription_networkInterfaceId,+    mountTargetDescription_ownerId,+    mountTargetDescription_vpcId,+    mountTargetDescription_mountTargetId,+    mountTargetDescription_fileSystemId,+    mountTargetDescription_subnetId,+    mountTargetDescription_lifeCycleState,++    -- ** CreateReplicationConfiguration+    createReplicationConfiguration_sourceFileSystemId,+    createReplicationConfiguration_destinations,+    replicationConfigurationDescription_sourceFileSystemId,+    replicationConfigurationDescription_sourceFileSystemRegion,+    replicationConfigurationDescription_sourceFileSystemArn,+    replicationConfigurationDescription_originalSourceFileSystemArn,+    replicationConfigurationDescription_creationTime,+    replicationConfigurationDescription_destinations,++    -- ** DeleteAccessPoint+    deleteAccessPoint_accessPointId,++    -- ** DeleteFileSystem+    deleteFileSystem_fileSystemId,++    -- ** DeleteFileSystemPolicy+    deleteFileSystemPolicy_fileSystemId,++    -- ** DeleteMountTarget+    deleteMountTarget_mountTargetId,++    -- ** DeleteReplicationConfiguration+    deleteReplicationConfiguration_sourceFileSystemId,++    -- ** DescribeAccessPoints+    describeAccessPoints_accessPointId,+    describeAccessPoints_fileSystemId,+    describeAccessPoints_maxResults,+    describeAccessPoints_nextToken,+    describeAccessPointsResponse_accessPoints,+    describeAccessPointsResponse_nextToken,+    describeAccessPointsResponse_httpStatus,++    -- ** DescribeAccountPreferences+    describeAccountPreferences_maxResults,+    describeAccountPreferences_nextToken,+    describeAccountPreferencesResponse_nextToken,+    describeAccountPreferencesResponse_resourceIdPreference,+    describeAccountPreferencesResponse_httpStatus,++    -- ** DescribeBackupPolicy+    describeBackupPolicy_fileSystemId,+    backupPolicyDescription_backupPolicy,++    -- ** DescribeFileSystemPolicy+    describeFileSystemPolicy_fileSystemId,+    fileSystemPolicyDescription_fileSystemId,+    fileSystemPolicyDescription_policy,++    -- ** DescribeFileSystems+    describeFileSystems_creationToken,+    describeFileSystems_fileSystemId,+    describeFileSystems_marker,+    describeFileSystems_maxItems,+    describeFileSystemsResponse_fileSystems,+    describeFileSystemsResponse_marker,+    describeFileSystemsResponse_nextMarker,+    describeFileSystemsResponse_httpStatus,++    -- ** DescribeLifecycleConfiguration+    describeLifecycleConfiguration_fileSystemId,+    lifecycleConfigurationDescription_lifecyclePolicies,++    -- ** DescribeMountTargetSecurityGroups+    describeMountTargetSecurityGroups_mountTargetId,+    describeMountTargetSecurityGroupsResponse_httpStatus,+    describeMountTargetSecurityGroupsResponse_securityGroups,++    -- ** DescribeMountTargets+    describeMountTargets_accessPointId,+    describeMountTargets_fileSystemId,+    describeMountTargets_marker,+    describeMountTargets_maxItems,+    describeMountTargets_mountTargetId,+    describeMountTargetsResponse_marker,+    describeMountTargetsResponse_mountTargets,+    describeMountTargetsResponse_nextMarker,+    describeMountTargetsResponse_httpStatus,++    -- ** DescribeReplicationConfigurations+    describeReplicationConfigurations_fileSystemId,+    describeReplicationConfigurations_maxResults,+    describeReplicationConfigurations_nextToken,+    describeReplicationConfigurationsResponse_nextToken,+    describeReplicationConfigurationsResponse_replications,+    describeReplicationConfigurationsResponse_httpStatus,++    -- ** ListTagsForResource+    listTagsForResource_maxResults,+    listTagsForResource_nextToken,+    listTagsForResource_resourceId,+    listTagsForResourceResponse_nextToken,+    listTagsForResourceResponse_tags,+    listTagsForResourceResponse_httpStatus,++    -- ** ModifyMountTargetSecurityGroups+    modifyMountTargetSecurityGroups_securityGroups,+    modifyMountTargetSecurityGroups_mountTargetId,++    -- ** PutAccountPreferences+    putAccountPreferences_resourceIdType,+    putAccountPreferencesResponse_resourceIdPreference,+    putAccountPreferencesResponse_httpStatus,++    -- ** PutBackupPolicy+    putBackupPolicy_fileSystemId,+    putBackupPolicy_backupPolicy,+    backupPolicyDescription_backupPolicy,++    -- ** PutFileSystemPolicy+    putFileSystemPolicy_bypassPolicyLockoutSafetyCheck,+    putFileSystemPolicy_fileSystemId,+    putFileSystemPolicy_policy,+    fileSystemPolicyDescription_fileSystemId,+    fileSystemPolicyDescription_policy,++    -- ** PutLifecycleConfiguration+    putLifecycleConfiguration_fileSystemId,+    putLifecycleConfiguration_lifecyclePolicies,+    lifecycleConfigurationDescription_lifecyclePolicies,++    -- ** TagResource+    tagResource_resourceId,+    tagResource_tags,++    -- ** UntagResource+    untagResource_resourceId,+    untagResource_tagKeys,++    -- ** UpdateFileSystem+    updateFileSystem_provisionedThroughputInMibps,+    updateFileSystem_throughputMode,+    updateFileSystem_fileSystemId,+    fileSystemDescription_availabilityZoneId,+    fileSystemDescription_availabilityZoneName,+    fileSystemDescription_encrypted,+    fileSystemDescription_fileSystemArn,+    fileSystemDescription_kmsKeyId,+    fileSystemDescription_name,+    fileSystemDescription_provisionedThroughputInMibps,+    fileSystemDescription_throughputMode,+    fileSystemDescription_ownerId,+    fileSystemDescription_creationToken,+    fileSystemDescription_fileSystemId,+    fileSystemDescription_creationTime,+    fileSystemDescription_lifeCycleState,+    fileSystemDescription_numberOfMountTargets,+    fileSystemDescription_sizeInBytes,+    fileSystemDescription_performanceMode,+    fileSystemDescription_tags,++    -- * Types++    -- ** AccessPointDescription+    accessPointDescription_accessPointArn,+    accessPointDescription_accessPointId,+    accessPointDescription_clientToken,+    accessPointDescription_fileSystemId,+    accessPointDescription_lifeCycleState,+    accessPointDescription_name,+    accessPointDescription_ownerId,+    accessPointDescription_posixUser,+    accessPointDescription_rootDirectory,+    accessPointDescription_tags,++    -- ** BackupPolicy+    backupPolicy_status,++    -- ** BackupPolicyDescription+    backupPolicyDescription_backupPolicy,++    -- ** CreationInfo+    creationInfo_ownerUid,+    creationInfo_ownerGid,+    creationInfo_permissions,++    -- ** Destination+    destination_lastReplicatedTimestamp,+    destination_status,+    destination_fileSystemId,+    destination_region,++    -- ** DestinationToCreate+    destinationToCreate_availabilityZoneName,+    destinationToCreate_kmsKeyId,+    destinationToCreate_region,++    -- ** FileSystemDescription+    fileSystemDescription_availabilityZoneId,+    fileSystemDescription_availabilityZoneName,+    fileSystemDescription_encrypted,+    fileSystemDescription_fileSystemArn,+    fileSystemDescription_kmsKeyId,+    fileSystemDescription_name,+    fileSystemDescription_provisionedThroughputInMibps,+    fileSystemDescription_throughputMode,+    fileSystemDescription_ownerId,+    fileSystemDescription_creationToken,+    fileSystemDescription_fileSystemId,+    fileSystemDescription_creationTime,+    fileSystemDescription_lifeCycleState,+    fileSystemDescription_numberOfMountTargets,+    fileSystemDescription_sizeInBytes,+    fileSystemDescription_performanceMode,+    fileSystemDescription_tags,++    -- ** FileSystemPolicyDescription+    fileSystemPolicyDescription_fileSystemId,+    fileSystemPolicyDescription_policy,++    -- ** FileSystemSize+    fileSystemSize_timestamp,+    fileSystemSize_valueInIA,+    fileSystemSize_valueInStandard,+    fileSystemSize_value,++    -- ** LifecycleConfigurationDescription+    lifecycleConfigurationDescription_lifecyclePolicies,++    -- ** LifecyclePolicy+    lifecyclePolicy_transitionToIA,+    lifecyclePolicy_transitionToPrimaryStorageClass,++    -- ** MountTargetDescription+    mountTargetDescription_availabilityZoneId,+    mountTargetDescription_availabilityZoneName,+    mountTargetDescription_ipAddress,+    mountTargetDescription_networkInterfaceId,+    mountTargetDescription_ownerId,+    mountTargetDescription_vpcId,+    mountTargetDescription_mountTargetId,+    mountTargetDescription_fileSystemId,+    mountTargetDescription_subnetId,+    mountTargetDescription_lifeCycleState,++    -- ** PosixUser+    posixUser_secondaryGids,+    posixUser_uid,+    posixUser_gid,++    -- ** ReplicationConfigurationDescription+    replicationConfigurationDescription_sourceFileSystemId,+    replicationConfigurationDescription_sourceFileSystemRegion,+    replicationConfigurationDescription_sourceFileSystemArn,+    replicationConfigurationDescription_originalSourceFileSystemArn,+    replicationConfigurationDescription_creationTime,+    replicationConfigurationDescription_destinations,++    -- ** ResourceIdPreference+    resourceIdPreference_resourceIdType,+    resourceIdPreference_resources,++    -- ** RootDirectory+    rootDirectory_creationInfo,+    rootDirectory_path,++    -- ** Tag+    tag_key,+    tag_value,+  )+where++import Amazonka.EFS.CreateAccessPoint+import Amazonka.EFS.CreateFileSystem+import Amazonka.EFS.CreateMountTarget+import Amazonka.EFS.CreateReplicationConfiguration+import Amazonka.EFS.DeleteAccessPoint+import Amazonka.EFS.DeleteFileSystem+import Amazonka.EFS.DeleteFileSystemPolicy+import Amazonka.EFS.DeleteMountTarget+import Amazonka.EFS.DeleteReplicationConfiguration+import Amazonka.EFS.DescribeAccessPoints+import Amazonka.EFS.DescribeAccountPreferences+import Amazonka.EFS.DescribeBackupPolicy+import Amazonka.EFS.DescribeFileSystemPolicy+import Amazonka.EFS.DescribeFileSystems+import Amazonka.EFS.DescribeLifecycleConfiguration+import Amazonka.EFS.DescribeMountTargetSecurityGroups+import Amazonka.EFS.DescribeMountTargets+import Amazonka.EFS.DescribeReplicationConfigurations+import Amazonka.EFS.ListTagsForResource+import Amazonka.EFS.ModifyMountTargetSecurityGroups+import Amazonka.EFS.PutAccountPreferences+import Amazonka.EFS.PutBackupPolicy+import Amazonka.EFS.PutFileSystemPolicy+import Amazonka.EFS.PutLifecycleConfiguration+import Amazonka.EFS.TagResource+import Amazonka.EFS.Types.AccessPointDescription+import Amazonka.EFS.Types.BackupPolicy+import Amazonka.EFS.Types.BackupPolicyDescription+import Amazonka.EFS.Types.CreationInfo+import Amazonka.EFS.Types.Destination+import Amazonka.EFS.Types.DestinationToCreate+import Amazonka.EFS.Types.FileSystemDescription+import Amazonka.EFS.Types.FileSystemPolicyDescription+import Amazonka.EFS.Types.FileSystemSize+import Amazonka.EFS.Types.LifecycleConfigurationDescription+import Amazonka.EFS.Types.LifecyclePolicy+import Amazonka.EFS.Types.MountTargetDescription+import Amazonka.EFS.Types.PosixUser+import Amazonka.EFS.Types.ReplicationConfigurationDescription+import Amazonka.EFS.Types.ResourceIdPreference+import Amazonka.EFS.Types.RootDirectory+import Amazonka.EFS.Types.Tag+import Amazonka.EFS.UntagResource+import Amazonka.EFS.UpdateFileSystem