amazonka-efs 1.4.3 → 1.4.4

raw patch · 18 files changed

+213/−114 lines, 18 filesdep ~amazonka-coredep ~amazonka-efsdep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

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

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-efs.cabal +6/−6
• gen/Network/AWS/EFS.hs +4/−0
• gen/Network/AWS/EFS/CreateFileSystem.hs +22/−8
• gen/Network/AWS/EFS/CreateMountTarget.hs +30/−19
• gen/Network/AWS/EFS/CreateTags.hs +6/−4
• gen/Network/AWS/EFS/DeleteFileSystem.hs +8/−6
• gen/Network/AWS/EFS/DeleteMountTarget.hs +9/−6
• gen/Network/AWS/EFS/DeleteTags.hs +7/−5
• gen/Network/AWS/EFS/DescribeFileSystems.hs +15/−13
• gen/Network/AWS/EFS/DescribeMountTargetSecurityGroups.hs +8/−4
• gen/Network/AWS/EFS/DescribeMountTargets.hs +11/−7
• gen/Network/AWS/EFS/DescribeTags.hs +11/−7
• gen/Network/AWS/EFS/ModifyMountTargetSecurityGroups.hs +8/−4
• gen/Network/AWS/EFS/Types.hs +5/−1
• gen/Network/AWS/EFS/Types/Product.hs +33/−23
• gen/Network/AWS/EFS/Types/Sum.hs +29/−0
• src/.gitkeep +0/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.3`+`1.4.4`   ## Description

@@ -1,5 +1,5 @@ name:                  amazonka-efs-version:               1.4.3+version:               1.4.4 synopsis:              Amazon Elastic File System SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -11,7 +11,7 @@ category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10-extra-source-files:    README.md fixture/*.yaml fixture/*.proto+extra-source-files:    README.md fixture/*.yaml fixture/*.proto src/.gitkeep description:     Amazon Elastic File System     .@@ -60,7 +60,7 @@         , Network.AWS.EFS.Types.Sum      build-depends:-          amazonka-core == 1.4.3.*+          amazonka-core == 1.4.4.*         , base          >= 4.7     && < 5  test-suite amazonka-efs-test@@ -80,9 +80,9 @@         , Test.AWS.EFS.Internal      build-depends:-          amazonka-core == 1.4.3.*-        , amazonka-test == 1.4.3.*-        , amazonka-efs == 1.4.3.*+          amazonka-core == 1.4.4.*+        , amazonka-test == 1.4.4.*+        , amazonka-efs == 1.4.4.*         , base         , bytestring         , tasty

@@ -118,6 +118,9 @@     -- ** LifeCycleState     , LifeCycleState (..) +    -- ** PerformanceMode+    , PerformanceMode (..)+     -- ** FileSystemDescription     , FileSystemDescription     , fileSystemDescription@@ -129,6 +132,7 @@     , fsdLifeCycleState     , fsdNumberOfMountTargets     , fsdSizeInBytes+    , fsdPerformanceMode      -- ** FileSystemSize     , FileSystemSize

@@ -20,7 +20,8 @@ -- -- 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 AWS 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\".+-- -   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.@@ -29,17 +30,20 @@ -- -- 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. ----- 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> API, which among other things returns the file system state.+-- 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. ----- 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 (< CreateMountTarget>) in your VPC. You mount your Amazon EFS file system on an EC2 instances in your VPC via the mount target. For more information, see <http://docs.aws.amazon.com/efs/latest/ug/how-it-works.html Amazon EFS: How it Works>+-- This operation also takes 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 <http://docs.aws.amazon.com/efs/latest/ug/performance.html#performancemodes.html Amazon EFS: Performance Modes>. ----- This operation requires permission for the 'elasticfilesystem:CreateFileSystem' action.+-- 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 via the mount target. For more information, see <http://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 Network.AWS.EFS.CreateFileSystem     (     -- * Creating a Request       createFileSystem     , CreateFileSystem     -- * Request Lenses+    , cfsPerformanceMode     , cfsCreationToken      -- * Destructuring the Response@@ -54,6 +58,7 @@     , fsdLifeCycleState     , fsdNumberOfMountTargets     , fsdSizeInBytes+    , fsdPerformanceMode     ) where  import           Network.AWS.EFS.Types@@ -64,23 +69,31 @@ import           Network.AWS.Response  -- | /See:/ 'createFileSystem' smart constructor.-newtype CreateFileSystem = CreateFileSystem'-    { _cfsCreationToken :: Text+data CreateFileSystem = CreateFileSystem'+    { _cfsPerformanceMode :: !(Maybe PerformanceMode)+    , _cfsCreationToken   :: !Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'CreateFileSystem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: --+-- * 'cfsPerformanceMode'+-- -- * 'cfsCreationToken' createFileSystem     :: Text -- ^ 'cfsCreationToken'     -> CreateFileSystem createFileSystem pCreationToken_ =     CreateFileSystem'-    { _cfsCreationToken = pCreationToken_+    { _cfsPerformanceMode = Nothing+    , _cfsCreationToken = pCreationToken_     } +-- | The 'PerformanceMode' 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. This can\'t be changed after the file system has been created.+cfsPerformanceMode :: Lens' CreateFileSystem (Maybe PerformanceMode)+cfsPerformanceMode = lens _cfsPerformanceMode (\ s a -> s{_cfsPerformanceMode = a});+ -- | String of up to 64 ASCII characters. Amazon EFS uses this to ensure idempotent creation. cfsCreationToken :: Lens' CreateFileSystem Text cfsCreationToken = lens _cfsCreationToken (\ s a -> s{_cfsCreationToken = a});@@ -101,7 +114,8 @@         toJSON CreateFileSystem'{..}           = object               (catMaybes-                 [Just ("CreationToken" .= _cfsCreationToken)])+                 [("PerformanceMode" .=) <$> _cfsPerformanceMode,+                  Just ("CreationToken" .= _cfsCreationToken)])  instance ToPath CreateFileSystem where         toPath = const "/2015-02-01/file-systems"

@@ -22,47 +22,56 @@ -- -- 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. For more information, see <http://docs.aws.amazon.com/efs/latest/ug/how-it-works.html Amazon EFS: How it Works>. ----- In the request, you also specify a file system ID for which you are creating the mount target and the file system\'s lifecycle state must be \"available\" (see < DescribeFileSystems>).+-- In the request, you also specify a file system ID for which you are creating the mount target and the file system\'s lifecycle state must be 'available'. For more information, see < DescribeFileSystems>. ----- In the request, you also provide a subnet ID, which serves several purposes:+-- In the request, you also provide a subnet ID, which determines the following: ----- -   It determines the VPC in which Amazon EFS creates the mount target.--- -   It determines the Availability Zone in which Amazon EFS creates the mount target.--- -   It determines 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.+-- -   VPC in which Amazon EFS creates the mount target --+-- -   Availability Zone in which Amazon EFS creates the mount target+--+-- -   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 via the mount target can resolve the mount target\'s DNS name to its IP address. For more information, see <http://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 request to add another mount target must meet the following requirements:+-- 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: ----- -   The subnet specified in the request must belong to the same VPC as the subnets of the existing mount targets.+-- -   Must belong to the same VPC as the subnets of the existing mount targets ----- -   The subnet specified in the request must not be in the same Availability Zone as any of 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\". --+--     -   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 requestor-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 < DescribeFileSystems> API, which among other things returns the mount target state.+-- 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 < DescribeFileSystems> operation, which among other things returns the mount target state. ----- We recommend 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, go to <http://aws.amazon.com/efs/ Amazon EFS> product detail page. 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 won\'t be able to access your file system through that mount target.+-- We recommend 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 won\'t be able to access your file system through that mount target. ----- This operation requires permission for the following action on the file system:+-- This operation requires permissions for the following action on the file system: -- -- -   'elasticfilesystem:CreateMountTarget' ----- This operation also requires permission for the following Amazon EC2 actions:+-- This operation also requires permissions for the following Amazon EC2 actions: -- -- -   'ec2:DescribeSubnets'+-- -- -   'ec2:DescribeNetworkInterfaces'+-- -- -   'ec2:CreateNetworkInterface'+-- module Network.AWS.EFS.CreateMountTarget     (     -- * Creating a Request@@ -94,7 +103,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'createMountTarget' smart constructor.+-- |+--+-- /See:/ 'createMountTarget' smart constructor. data CreateMountTarget = CreateMountTarget'     { _cmtIPAddress      :: !(Maybe Text)     , _cmtSecurityGroups :: !(Maybe [Text])@@ -125,19 +136,19 @@     , _cmtSubnetId = pSubnetId_     } --- | A valid IPv4 address within the address range of the specified subnet.+-- | Valid IPv4 address within the address range of the specified subnet. cmtIPAddress :: Lens' CreateMountTarget (Maybe Text) cmtIPAddress = lens _cmtIPAddress (\ s a -> s{_cmtIPAddress = a}); --- | Up to 5 VPC security group IDs, of the form \"sg-xxxxxxxx\". These must be for the same VPC as subnet specified.+-- | Up to five VPC security group IDs, of the form 'sg-xxxxxxxx'. These must be for the same VPC as subnet specified. cmtSecurityGroups :: Lens' CreateMountTarget [Text] cmtSecurityGroups = lens _cmtSecurityGroups (\ s a -> s{_cmtSecurityGroups = a}) . _Default . _Coerce; --- | The ID of the file system for which to create the mount target.+-- | ID of the file system for which to create the mount target. cmtFileSystemId :: Lens' CreateMountTarget Text cmtFileSystemId = lens _cmtFileSystemId (\ s a -> s{_cmtFileSystemId = a}); --- | The ID of the subnet to add the mount target in.+-- | ID of the subnet to add the mount target in. cmtSubnetId :: Lens' CreateMountTarget Text cmtSubnetId = lens _cmtSubnetId (\ s a -> s{_cmtSubnetId = a}); 

@@ -18,7 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Creates or overwrites tags associated with a file system. Each tag is a key-value pair. If a tag key specified in the request already exists on the file system, this operation overwrites its value with the value provided in the request. If you add the \"Name\" tag to your file system, Amazon EFS returns it in the response to the < DescribeFileSystems> API.+-- Creates or overwrites tags associated with a file system. Each tag is a key-value pair. If a tag key specified in the request already exists on the file system, this operation overwrites its value with the value provided in the request. If you add the 'Name' tag to your file system, Amazon EFS returns it in the response to the < DescribeFileSystems> operation. -- -- This operation requires permission for the 'elasticfilesystem:CreateTags' action. module Network.AWS.EFS.CreateTags@@ -42,7 +42,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'createTags' smart constructor.+-- |+--+-- /See:/ 'createTags' smart constructor. data CreateTags = CreateTags'     { _ctFileSystemId :: !Text     , _ctTags         :: ![Tag]@@ -64,11 +66,11 @@     , _ctTags = mempty     } --- | String. The ID of the file system whose tags you want to modify. This operation modifies only the tags and not the file system.+-- | ID of the file system whose tags you want to modify (String). This operation modifies the tags only, not the file system. ctFileSystemId :: Lens' CreateTags Text ctFileSystemId = lens _ctFileSystemId (\ s a -> s{_ctFileSystemId = a}); --- | An array of 'Tag' objects to add. Each 'Tag' object is a key-value pair.+-- | Array of 'Tag' objects to add. Each 'Tag' object is a key-value pair. ctTags :: Lens' CreateTags [Tag] ctTags = lens _ctTags (\ s a -> s{_ctTags = a}) . _Coerce; 

@@ -18,13 +18,13 @@ -- 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 will not be able to access any contents of the deleted file system.+-- 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 cannot 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>.+-- 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> API, 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> will return a 404 \"FileSystemNotFound\" error.+-- 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 permission for the 'elasticfilesystem:DeleteFileSystem' action.+-- This operation requires permissions for the 'elasticfilesystem:DeleteFileSystem' action. module Network.AWS.EFS.DeleteFileSystem     (     -- * Creating a Request@@ -45,7 +45,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'deleteFileSystem' smart constructor.+-- |+--+-- /See:/ 'deleteFileSystem' smart constructor. newtype DeleteFileSystem = DeleteFileSystem'     { _delFileSystemId :: Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)@@ -63,7 +65,7 @@     { _delFileSystemId = pFileSystemId_     } --- | The ID of the file system you want to delete.+-- | ID of the file system you want to delete. delFileSystemId :: Lens' DeleteFileSystem Text delFileSystemId = lens _delFileSystemId (\ s a -> s{_delFileSystemId = a}); 

@@ -20,17 +20,18 @@ -- -- Deletes the specified mount target. ----- This operation forcibly breaks any mounts of the file system via the mount target 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 may 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 using another mount target.+-- This operation forcibly breaks any mounts of the file system via 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 may 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 via another mount target. ----- This operation requires permission for the following action on the file system:+-- 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> API, which returns a list of mount target descriptions for the given file system.+-- 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 permission for the following Amazon EC2 action on the mount target\'s network interface:+-- The operation also requires permissions for the following Amazon EC2 action on the mount target\'s network interface: -- -- -   'ec2:DeleteNetworkInterface'+-- module Network.AWS.EFS.DeleteMountTarget     (     -- * Creating a Request@@ -51,7 +52,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'deleteMountTarget' smart constructor.+-- |+--+-- /See:/ 'deleteMountTarget' smart constructor. newtype DeleteMountTarget = DeleteMountTarget'     { _dMountTargetId :: Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)@@ -69,7 +72,7 @@     { _dMountTargetId = pMountTargetId_     } --- | String. The ID of the mount target to delete.+-- | ID of the mount target to delete (String). dMountTargetId :: Lens' DeleteMountTarget Text dMountTargetId = lens _dMountTargetId (\ s a -> s{_dMountTargetId = a}); 

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes the specified tags from a file system. If the 'DeleteTags' request includes a tag key that does not exist, Amazon EFS ignores it; it is not an error. For more information about tags and related restrictions, go to <http://docs.aws.amazon.com/awsaccountbilling/latest/aboutv2/cost-alloc-tags.html Tag Restrictions> in the /AWS Billing and Cost Management User Guide/.+-- Deletes the specified tags from a file system. If the 'DeleteTags' request includes a tag key that does not exist, Amazon EFS ignores it and doesn\'t cause an error. For more information about tags and related restrictions, see <http://docs.aws.amazon.com/awsaccountbilling/latest/aboutv2/cost-alloc-tags.html Tag Restrictions> in the /AWS Billing and Cost Management User Guide/. ----- This operation requires permission for the 'elasticfilesystem:DeleteTags' action.+-- This operation requires permissions for the 'elasticfilesystem:DeleteTags' action. module Network.AWS.EFS.DeleteTags     (     -- * Creating a Request@@ -42,7 +42,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'deleteTags' smart constructor.+-- |+--+-- /See:/ 'deleteTags' smart constructor. data DeleteTags = DeleteTags'     { _dFileSystemId :: !Text     , _dTagKeys      :: ![Text]@@ -64,11 +66,11 @@     , _dTagKeys = mempty     } --- | String. The ID of the file system whose tags you want to delete.+-- | ID of the file system whose tags you want to delete (String). dFileSystemId :: Lens' DeleteTags Text dFileSystemId = lens _dFileSystemId (\ s a -> s{_dFileSystemId = a}); --- | A list of tag keys to delete.+-- | List of tag keys to delete. dTagKeys :: Lens' DeleteTags [Text] dTagKeys = lens _dTagKeys (\ s a -> s{_dTagKeys = a}) . _Coerce; 

@@ -18,17 +18,17 @@ -- 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, returns descriptions of all file systems owned by the caller\'s AWS account in the AWS region of the endpoint that you\'re calling.+-- 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 AWS account in the AWS 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. 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'. ----- So to retrieve a list of your file system descriptions, the expected usage of this API is an iterative process of first calling 'DescribeFileSystems' without the 'Marker' and then continuing to call it with the 'Marker' parameter set to the value of the 'NextMarker' from the previous response until the response has no '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'. ----- Note that the implementation may return fewer than 'MaxItems' file system descriptions while still including a 'NextMarker' value.+-- The implementation may return fewer than 'MaxItems' file system descriptions while still including a 'NextMarker' value. ----- 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.+-- 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 permission for the 'elasticfilesystem:DescribeFileSystems' action.+-- This operation requires permissions for the 'elasticfilesystem:DescribeFileSystems' action. module Network.AWS.EFS.DescribeFileSystems     (     -- * Creating a Request@@ -57,7 +57,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'describeFileSystems' smart constructor.+-- |+--+-- /See:/ 'describeFileSystems' smart constructor. data DescribeFileSystems = DescribeFileSystems'     { _dfsFileSystemId  :: !(Maybe Text)     , _dfsCreationToken :: !(Maybe Text)@@ -86,19 +88,19 @@     , _dfsMaxItems = Nothing     } --- | Optional string. File system ID whose description you want to retrieve.+-- | (Optional) ID of the file system whose description you want to retrieve (String). dfsFileSystemId :: Lens' DescribeFileSystems (Maybe Text) dfsFileSystemId = lens _dfsFileSystemId (\ s a -> s{_dfsFileSystemId = a}); --- | Optional string. Restricts the list to the file system with this creation token (you specify a creation token at the time of creating an Amazon EFS file system).+-- | (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. dfsCreationToken :: Lens' DescribeFileSystems (Maybe Text) dfsCreationToken = lens _dfsCreationToken (\ s a -> s{_dfsCreationToken = a}); --- | Optional string. Opaque pagination token returned from a previous 'DescribeFileSystems' operation. If present, specifies to continue the list from where the returning call had left off.+-- | (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. dfsMarker :: Lens' DescribeFileSystems (Maybe Text) dfsMarker = lens _dfsMarker (\ s a -> s{_dfsMarker = a}); --- | Optional integer. Specifies the maximum number of file systems to return in the response. This parameter value must be greater than 0. The number of items Amazon EFS returns will be the minimum of the 'MaxItems' parameter specified in the request and the service\'s internal maximum number of items per page.+-- | (Optional) Specifies the maximum number of file systems to return in the response (integer). This parameter value must be greater than 0. The number of items that Amazon EFS returns is the minimum of the 'MaxItems' parameter specified in the request and the service\'s internal maximum number of items per page. dfsMaxItems :: Lens' DescribeFileSystems (Maybe Natural) dfsMaxItems = lens _dfsMaxItems (\ s a -> s{_dfsMaxItems = a}) . mapping _Nat; @@ -161,15 +163,15 @@     , _dfsrsResponseStatus = pResponseStatus_     } --- | An array of file system descriptions.+-- | Array of file system descriptions. dfsrsFileSystems :: Lens' DescribeFileSystemsResponse [FileSystemDescription] dfsrsFileSystems = lens _dfsrsFileSystems (\ s a -> s{_dfsrsFileSystems = a}) . _Default . _Coerce; --- | A string, present if provided by caller in the request.+-- | Present if provided by caller in the request (String). dfsrsMarker :: Lens' DescribeFileSystemsResponse (Maybe Text) dfsrsMarker = lens _dfsrsMarker (\ s a -> s{_dfsrsMarker = a}); --- | A string, present if there are more file systems than returned in the response. You can use the 'NextMarker' in the subsequent request to fetch the descriptions.+-- | 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. dfsrsNextMarker :: Lens' DescribeFileSystemsResponse (Maybe Text) dfsrsNextMarker = lens _dfsrsNextMarker (\ s a -> s{_dfsrsNextMarker = a}); 

@@ -18,12 +18,14 @@ -- 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 life cycle state of the mount target is not \"deleted\".+-- 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 Network.AWS.EFS.DescribeMountTargetSecurityGroups     (     -- * Creating a Request@@ -47,7 +49,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'describeMountTargetSecurityGroups' smart constructor.+-- |+--+-- /See:/ 'describeMountTargetSecurityGroups' smart constructor. newtype DescribeMountTargetSecurityGroups = DescribeMountTargetSecurityGroups'     { _dmtsgMountTargetId :: Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)@@ -65,7 +69,7 @@     { _dmtsgMountTargetId = pMountTargetId_     } --- | The ID of the mount target whose security groups you want to retrieve.+-- | ID of the mount target whose security groups you want to retrieve. dmtsgMountTargetId :: Lens' DescribeMountTargetSecurityGroups Text dmtsgMountTargetId = lens _dmtsgMountTargetId (\ s a -> s{_dmtsgMountTargetId = a}); @@ -126,7 +130,7 @@ dmtsgrsResponseStatus :: Lens' DescribeMountTargetSecurityGroupsResponse Int dmtsgrsResponseStatus = lens _dmtsgrsResponseStatus (\ s a -> s{_dmtsgrsResponseStatus = a}); --- | An array of security groups.+-- | Array of security groups. dmtsgrsSecurityGroups :: Lens' DescribeMountTargetSecurityGroupsResponse [Text] dmtsgrsSecurityGroups = lens _dmtsgrsSecurityGroups (\ s a -> s{_dmtsgrsSecurityGroups = a}) . _Coerce; 

@@ -20,7 +20,7 @@ -- -- 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 permission 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 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'. module Network.AWS.EFS.DescribeMountTargets     (     -- * Creating a Request@@ -49,7 +49,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'describeMountTargets' smart constructor.+-- |+--+-- /See:/ 'describeMountTargets' smart constructor. data DescribeMountTargets = DescribeMountTargets'     { _dmtFileSystemId  :: !(Maybe Text)     , _dmtMarker        :: !(Maybe Text)@@ -78,19 +80,19 @@     , _dmtMountTargetId = Nothing     } --- | Optional. String. The ID of the file system whose mount targets you want to list. It must be included in your request if 'MountTargetId' is not included.+-- | (Optional) ID of the file system whose mount targets you want to list (String). It must be included in your request if 'MountTargetId' is not included. dmtFileSystemId :: Lens' DescribeMountTargets (Maybe Text) dmtFileSystemId = lens _dmtFileSystemId (\ s a -> s{_dmtFileSystemId = a}); --- | Optional. String. Opaque pagination token returned from a previous 'DescribeMountTargets' operation. If present, it specifies to continue the list from where the previous returning call left off.+-- | (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. dmtMarker :: Lens' DescribeMountTargets (Maybe Text) dmtMarker = lens _dmtMarker (\ s a -> s{_dmtMarker = a}); --- | Optional. Maximum number of mount targets to return in the response. It must be an integer with a value greater than zero.+-- | (Optional) Maximum number of mount targets to return in the response. It must be an integer with a value greater than zero. dmtMaxItems :: Lens' DescribeMountTargets (Maybe Natural) dmtMaxItems = lens _dmtMaxItems (\ s a -> s{_dmtMaxItems = a}) . mapping _Nat; --- | Optional. String. The ID of the mount target that you want to have described. It must be included in your request if 'FileSystemId' is not included.+-- | (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. dmtMountTargetId :: Lens' DescribeMountTargets (Maybe Text) dmtMountTargetId = lens _dmtMountTargetId (\ s a -> s{_dmtMountTargetId = a}); @@ -124,7 +126,9 @@                "Marker" =: _dmtMarker, "MaxItems" =: _dmtMaxItems,                "MountTargetId" =: _dmtMountTargetId] --- | /See:/ 'describeMountTargetsResponse' smart constructor.+-- |+--+-- /See:/ 'describeMountTargetsResponse' smart constructor. data DescribeMountTargetsResponse = DescribeMountTargetsResponse'     { _dmtrsMountTargets   :: !(Maybe [MountTargetDescription])     , _dmtrsMarker         :: !(Maybe Text)

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns the tags associated with a file system. The order of tags returned in the response of one 'DescribeTags' call, and the order of tags returned across the responses of a multi-call iteration (when using pagination), is unspecified.+-- Returns the tags associated with a file system. The order of tags returned in the response of one 'DescribeTags' call and the order of tags returned across the responses of a multi-call iteration (when using pagination) is unspecified. ----- This operation requires permission for the 'elasticfilesystem:DescribeTags' action.+-- This operation requires permissions for the 'elasticfilesystem:DescribeTags' action. module Network.AWS.EFS.DescribeTags     (     -- * Creating a Request@@ -48,7 +48,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'describeTags' smart constructor.+-- |+--+-- /See:/ 'describeTags' smart constructor. data DescribeTags = DescribeTags'     { _dtMarker       :: !(Maybe Text)     , _dtMaxItems     :: !(Maybe Nat)@@ -74,15 +76,15 @@     , _dtFileSystemId = pFileSystemId_     } --- | Optional. String. Opaque pagination token returned from a previous 'DescribeTags' operation. If present, it specifies to continue the list from where the previous call left off.+-- | (Optional) Opaque pagination token returned from a previous 'DescribeTags' operation (String). If present, it specifies to continue the list from where the previous call left off. dtMarker :: Lens' DescribeTags (Maybe Text) dtMarker = lens _dtMarker (\ s a -> s{_dtMarker = a}); --- | Optional. Maximum number of file system tags to return in the response. It must be an integer with a value greater than zero.+-- | (Optional) Maximum number of file system tags to return in the response. It must be an integer with a value greater than zero. dtMaxItems :: Lens' DescribeTags (Maybe Natural) dtMaxItems = lens _dtMaxItems (\ s a -> s{_dtMaxItems = a}) . mapping _Nat; --- | The ID of the file system whose tag set you want to retrieve.+-- | ID of the file system whose tag set you want to retrieve. dtFileSystemId :: Lens' DescribeTags Text dtFileSystemId = lens _dtFileSystemId (\ s a -> s{_dtFileSystemId = a}); @@ -114,7 +116,9 @@           = mconcat               ["Marker" =: _dtMarker, "MaxItems" =: _dtMaxItems] --- | /See:/ 'describeTagsResponse' smart constructor.+-- |+--+-- /See:/ 'describeTagsResponse' smart constructor. data DescribeTagsResponse = DescribeTagsResponse'     { _dtrsMarker         :: !(Maybe Text)     , _dtrsNextMarker     :: !(Maybe Text)

@@ -20,12 +20,14 @@ -- -- Modifies the set of security groups in effect for a mount target. ----- When you create a mount target, Amazon EFS also creates a new network interface (see < CreateMountTarget>). This operation replaces the security groups in effect for the network interface associated with a mount target, with the 'SecurityGroups' provided in the request. This operation requires that the network interface of the mount target has been created and the life cycle state of the mount target is not \"deleted\".+-- When you create a mount target, Amazon EFS also creates a new network interface. For more information, see < CreateMountTarget>. This operation replaces the security groups in effect for the network interface associated with a mount target, with the 'SecurityGroups' provided in the request. 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'. -- -- The operation requires permissions for the following actions: -- -- -   'elasticfilesystem:ModifyMountTargetSecurityGroups' action on the mount target\'s file system.+-- -- -   'ec2:ModifyNetworkInterfaceAttribute' action on the mount target\'s network interface.+-- module Network.AWS.EFS.ModifyMountTargetSecurityGroups     (     -- * Creating a Request@@ -47,7 +49,9 @@ import           Network.AWS.Request import           Network.AWS.Response --- | /See:/ 'modifyMountTargetSecurityGroups' smart constructor.+-- |+--+-- /See:/ 'modifyMountTargetSecurityGroups' smart constructor. data ModifyMountTargetSecurityGroups = ModifyMountTargetSecurityGroups'     { _mmtsgSecurityGroups :: !(Maybe [Text])     , _mmtsgMountTargetId  :: !Text@@ -69,11 +73,11 @@     , _mmtsgMountTargetId = pMountTargetId_     } --- | An array of up to five VPC security group IDs.+-- | Array of up to five VPC security group IDs. mmtsgSecurityGroups :: Lens' ModifyMountTargetSecurityGroups [Text] mmtsgSecurityGroups = lens _mmtsgSecurityGroups (\ s a -> s{_mmtsgSecurityGroups = a}) . _Default . _Coerce; --- | The ID of the mount target whose security groups you want to modify.+-- | ID of the mount target whose security groups you want to modify. mmtsgMountTargetId :: Lens' ModifyMountTargetSecurityGroups Text mmtsgMountTargetId = lens _mmtsgMountTargetId (\ s a -> s{_mmtsgMountTargetId = a}); 

@@ -38,6 +38,9 @@     -- * LifeCycleState     , LifeCycleState (..) +    -- * PerformanceMode+    , PerformanceMode (..)+     -- * FileSystemDescription     , FileSystemDescription     , fileSystemDescription@@ -49,6 +52,7 @@     , fsdLifeCycleState     , fsdNumberOfMountTargets     , fsdSizeInBytes+    , fsdPerformanceMode      -- * FileSystemSize     , FileSystemSize@@ -144,7 +148,7 @@ _FileSystemLimitExceeded =     _ServiceError . hasStatus 403 . hasCode "FileSystemLimitExceeded" --- | The calling account has reached the ENI limit for the specific AWS region. Client should try to delete some ENIs or get its account limit raised. For more information, go to <http://docs.aws.amazon.com/AmazonVPC/latest/UserGuide/VPC_Appendix_Limits.html Amazon VPC Limits> in the Amazon Virtual Private Cloud User Guide (see the Network interfaces per VPC entry in the table).+-- | The calling account has reached the ENI limit for the specific AWS region. Client should try to delete some ENIs or get its account limit raised. For more information, see <http://docs.aws.amazon.com/AmazonVPC/latest/UserGuide/VPC_Appendix_Limits.html Amazon VPC Limits> in the Amazon Virtual Private Cloud User Guide (see the Network interfaces per VPC entry in the table). _NetworkInterfaceLimitExceeded :: AsError a => Getting (First ServiceError) a ServiceError _NetworkInterfaceLimitExceeded =     _ServiceError . hasStatus 409 . hasCode "NetworkInterfaceLimitExceeded"

@@ -21,7 +21,7 @@ import           Network.AWS.Lens import           Network.AWS.Prelude --- | This object provides description of a file system.+-- | Description of the file system. -- -- /See:/ 'fileSystemDescription' smart constructor. data FileSystemDescription = FileSystemDescription'@@ -33,6 +33,7 @@     , _fsdLifeCycleState       :: !LifeCycleState     , _fsdNumberOfMountTargets :: !Nat     , _fsdSizeInBytes          :: !FileSystemSize+    , _fsdPerformanceMode      :: !PerformanceMode     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'FileSystemDescription' with the minimum fields required to make a request.@@ -54,6 +55,8 @@ -- * 'fsdNumberOfMountTargets' -- -- * 'fsdSizeInBytes'+--+-- * 'fsdPerformanceMode' fileSystemDescription     :: Text -- ^ 'fsdOwnerId'     -> Text -- ^ 'fsdCreationToken'@@ -62,8 +65,9 @@     -> LifeCycleState -- ^ 'fsdLifeCycleState'     -> Natural -- ^ 'fsdNumberOfMountTargets'     -> FileSystemSize -- ^ 'fsdSizeInBytes'+    -> PerformanceMode -- ^ 'fsdPerformanceMode'     -> FileSystemDescription-fileSystemDescription pOwnerId_ pCreationToken_ pFileSystemId_ pCreationTime_ pLifeCycleState_ pNumberOfMountTargets_ pSizeInBytes_ =+fileSystemDescription pOwnerId_ pCreationToken_ pFileSystemId_ pCreationTime_ pLifeCycleState_ pNumberOfMountTargets_ pSizeInBytes_ pPerformanceMode_ =     FileSystemDescription'     { _fsdName = Nothing     , _fsdOwnerId = pOwnerId_@@ -73,13 +77,14 @@     , _fsdLifeCycleState = pLifeCycleState_     , _fsdNumberOfMountTargets = _Nat # pNumberOfMountTargets_     , _fsdSizeInBytes = pSizeInBytes_+    , _fsdPerformanceMode = pPerformanceMode_     } --- | You can add tags to a file system (see < CreateTags>) including a \"Name\" tag. If the file system has a \"Name\" tag, Amazon EFS returns the value in this field.+-- | You can add tags to a file system, including a 'Name' tag. For more information, see < CreateTags>. If the file system has a 'Name' tag, Amazon EFS returns the value in this field. fsdName :: Lens' FileSystemDescription (Maybe Text) fsdName = lens _fsdName (\ s a -> s{_fsdName = a}); --- | The AWS account that created the file system. If the file system was created by an IAM user, the parent account to which the user belongs is the owner.+-- | AWS account that created the file system. If the file system was created by an IAM user, the parent account to which the user belongs is the owner. fsdOwnerId :: Lens' FileSystemDescription Text fsdOwnerId = lens _fsdOwnerId (\ s a -> s{_fsdOwnerId = a}); @@ -87,26 +92,30 @@ fsdCreationToken :: Lens' FileSystemDescription Text fsdCreationToken = lens _fsdCreationToken (\ s a -> s{_fsdCreationToken = a}); --- | The file system ID assigned by Amazon EFS.+-- | ID of the file system, assigned by Amazon EFS. fsdFileSystemId :: Lens' FileSystemDescription Text fsdFileSystemId = lens _fsdFileSystemId (\ s a -> s{_fsdFileSystemId = a}); --- | The time at which the file system was created, in seconds, since 1970-01-01T00:00:00Z.+-- | Time that the file system was created, in seconds (since 1970-01-01T00:00:00Z). fsdCreationTime :: Lens' FileSystemDescription UTCTime fsdCreationTime = lens _fsdCreationTime (\ s a -> s{_fsdCreationTime = a}) . _Time; --- | A predefined string value that indicates the lifecycle phase of the file system.+-- | Lifecycle phase of the file system. fsdLifeCycleState :: Lens' FileSystemDescription LifeCycleState fsdLifeCycleState = lens _fsdLifeCycleState (\ s a -> s{_fsdLifeCycleState = a}); --- | The current number of mount targets (see < CreateMountTarget>) the file system has.+-- | Current number of mount targets that the file system has. For more information, see < CreateMountTarget>. fsdNumberOfMountTargets :: Lens' FileSystemDescription Natural fsdNumberOfMountTargets = lens _fsdNumberOfMountTargets (\ s a -> s{_fsdNumberOfMountTargets = a}) . _Nat; --- | This object provides the latest known metered size of data stored in the file system, in bytes, in its 'Value' field, and the time at which that size was determined in its 'Timestamp' field. The 'Timestamp' value is the integer number of seconds since 1970-01-01T00:00:00Z. Note that the value does not represent the size of a consistent snapshot of the file system, but it is eventually consistent when there are no writes to the file system. That is, the value will represent actual size only if the file system is not modified for a period longer than a couple of hours. Otherwise, the value is not the exact size the file system was at any instant in time.+-- | Latest known metered size (in bytes) of data stored in the file system, in bytes, in its 'Value' field, and the time at which that size was determined in its 'Timestamp' field. The 'Timestamp' value is the integer number of seconds since 1970-01-01T00:00:00Z. Note that the value does not represent the size of a consistent snapshot of the file system, but it is eventually consistent when there are no writes to the file system. That is, the value will represent actual size only if the file system is not modified for a period longer than a couple of hours. Otherwise, the value is not the exact size the file system was at any instant in time. fsdSizeInBytes :: Lens' FileSystemDescription FileSystemSize fsdSizeInBytes = lens _fsdSizeInBytes (\ s a -> s{_fsdSizeInBytes = a}); +-- | The 'PerformanceMode' of the file system.+fsdPerformanceMode :: Lens' FileSystemDescription PerformanceMode+fsdPerformanceMode = lens _fsdPerformanceMode (\ s a -> s{_fsdPerformanceMode = a});+ instance FromJSON FileSystemDescription where         parseJSON           = withObject "FileSystemDescription"@@ -118,13 +127,14 @@                      <*> (x .: "CreationTime")                      <*> (x .: "LifeCycleState")                      <*> (x .: "NumberOfMountTargets")-                     <*> (x .: "SizeInBytes"))+                     <*> (x .: "SizeInBytes")+                     <*> (x .: "PerformanceMode"))  instance Hashable FileSystemDescription  instance NFData FileSystemDescription --- | This object provides the latest known metered size, in bytes, of data stored in the file system, in its 'Value' field, and the time at which that size was determined in its 'Timestamp' field. Note that the value does not represent the size of a consistent snapshot of the file system, but it is eventually consistent when there are no writes to the file system. That is, the value will represent the actual size only if the file system is not modified for a period longer than a couple of hours. Otherwise, the value is not necessarily the exact size the file system was at any instant in time.+-- | Latest known metered size (in bytes) of data stored in the file system, in its 'Value' field, and the time at which that size was determined in its 'Timestamp' field. Note that the value does not represent the size of a consistent snapshot of the file system, but it is eventually consistent when there are no writes to the file system. That is, the value will represent the actual size only if the file system is not modified for a period longer than a couple of hours. Otherwise, the value is not necessarily the exact size the file system was at any instant in time. -- -- /See:/ 'fileSystemSize' smart constructor. data FileSystemSize = FileSystemSize'@@ -148,11 +158,11 @@     , _fssValue = _Nat # pValue_     } --- | The time at which the size of data, returned in the 'Value' field, was determined. The value is the integer number of seconds since 1970-01-01T00:00:00Z.+-- | Time at which the size of data, returned in the 'Value' field, was determined. The value is the integer number of seconds since 1970-01-01T00:00:00Z. fssTimestamp :: Lens' FileSystemSize (Maybe UTCTime) fssTimestamp = lens _fssTimestamp (\ s a -> s{_fssTimestamp = a}) . mapping _Time; --- | The latest known metered size, in bytes, of data stored in the file system.+-- | Latest known metered size (in bytes) of data stored in the file system. fssValue :: Lens' FileSystemSize Natural fssValue = lens _fssValue (\ s a -> s{_fssValue = a}) . _Nat; @@ -167,7 +177,7 @@  instance NFData FileSystemSize --- | This object provides description of a mount target.+-- | Provides a description of a mount target. -- -- /See:/ 'mountTargetDescription' smart constructor. data MountTargetDescription = MountTargetDescription'@@ -214,31 +224,31 @@     , _mtdLifeCycleState = pLifeCycleState_     } --- | The address at which the file system may be mounted via the mount target.+-- | Address at which the file system may be mounted via the mount target. mtdIPAddress :: Lens' MountTargetDescription (Maybe Text) mtdIPAddress = lens _mtdIPAddress (\ s a -> s{_mtdIPAddress = a}); --- | The ID of the network interface that Amazon EFS created when it created the mount target.+-- | ID of the network interface that Amazon EFS created when it created the mount target. mtdNetworkInterfaceId :: Lens' MountTargetDescription (Maybe Text) mtdNetworkInterfaceId = lens _mtdNetworkInterfaceId (\ s a -> s{_mtdNetworkInterfaceId = a}); --- | The AWS account ID that owns the resource.+-- | AWS account ID that owns the resource. mtdOwnerId :: Lens' MountTargetDescription (Maybe Text) mtdOwnerId = lens _mtdOwnerId (\ s a -> s{_mtdOwnerId = a}); --- | The system-assigned mount target ID.+-- | System-assigned mount target ID. mtdMountTargetId :: Lens' MountTargetDescription Text mtdMountTargetId = lens _mtdMountTargetId (\ s a -> s{_mtdMountTargetId = a}); --- | The ID of the file system for which the mount target is intended.+-- | ID of the file system for which the mount target is intended. mtdFileSystemId :: Lens' MountTargetDescription Text mtdFileSystemId = lens _mtdFileSystemId (\ s a -> s{_mtdFileSystemId = a}); --- | The ID of the subnet that the mount target is in.+-- | ID of the mount target\'s subnet. mtdSubnetId :: Lens' MountTargetDescription Text mtdSubnetId = lens _mtdSubnetId (\ s a -> s{_mtdSubnetId = a}); --- | The lifecycle state the mount target is in.+-- | Lifecycle state of the mount target. mtdLifeCycleState :: Lens' MountTargetDescription LifeCycleState mtdLifeCycleState = lens _mtdLifeCycleState (\ s a -> s{_mtdLifeCycleState = a}); @@ -258,7 +268,7 @@  instance NFData MountTargetDescription --- | A tag is a pair of key and value. The allowed characters in keys and values are letters, whitespace, and numbers, representable in UTF-8, and the characters \'+\', \'-\', \'=\', \'.\', \'_\', \':\', and \'\/\'.+-- | A tag is a key-value pair. Allowed characters: letters, whitespace, and numbers, representable in UTF-8, and the following characters:' + - = . _ : \/' -- -- /See:/ 'tag' smart constructor. data Tag = Tag'@@ -283,7 +293,7 @@     , _tagValue = pValue_     } --- | Tag key, a string. The key must not start with \"aws:\".+-- | Tag key (String). The key can\'t start with 'aws:'. tagKey :: Lens' Tag Text tagKey = lens _tagKey (\ s a -> s{_tagKey = a}); 

@@ -50,3 +50,32 @@  instance FromJSON LifeCycleState where     parseJSON = parseJSONText "LifeCycleState"++data PerformanceMode+    = GeneralPurpose+    | MaxIO+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)++instance FromText PerformanceMode where+    parser = takeLowerText >>= \case+        "generalpurpose" -> pure GeneralPurpose+        "maxio" -> pure MaxIO+        e -> fromTextError $ "Failure parsing PerformanceMode from value: '" <> e+           <> "'. Accepted values: generalpurpose, maxio"++instance ToText PerformanceMode where+    toText = \case+        GeneralPurpose -> "generalPurpose"+        MaxIO -> "maxIO"++instance Hashable     PerformanceMode+instance NFData       PerformanceMode+instance ToByteString PerformanceMode+instance ToQuery      PerformanceMode+instance ToHeader     PerformanceMode++instance ToJSON PerformanceMode where+    toJSON = toJSONText++instance FromJSON PerformanceMode where+    parseJSON = parseJSONText "PerformanceMode"