stratosphere-dynamodb-1.0.0: gen/Stratosphere/DynamoDB/GlobalTable/LocalSecondaryIndexProperty.hs

module Stratosphere.DynamoDB.GlobalTable.LocalSecondaryIndexProperty (
        module Exports, LocalSecondaryIndexProperty(..),
        mkLocalSecondaryIndexProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DynamoDB.GlobalTable.KeySchemaProperty as Exports
import {-# SOURCE #-} Stratosphere.DynamoDB.GlobalTable.ProjectionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data LocalSecondaryIndexProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-localsecondaryindex.html>
    LocalSecondaryIndexProperty {haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-localsecondaryindex.html#cfn-dynamodb-globaltable-localsecondaryindex-indexname>
                                 indexName :: (Value Prelude.Text),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-localsecondaryindex.html#cfn-dynamodb-globaltable-localsecondaryindex-keyschema>
                                 keySchema :: [KeySchemaProperty],
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-localsecondaryindex.html#cfn-dynamodb-globaltable-localsecondaryindex-projection>
                                 projection :: ProjectionProperty}
  deriving stock (Prelude.Eq, Prelude.Show)
mkLocalSecondaryIndexProperty ::
  Value Prelude.Text
  -> [KeySchemaProperty]
     -> ProjectionProperty -> LocalSecondaryIndexProperty
mkLocalSecondaryIndexProperty indexName keySchema projection
  = LocalSecondaryIndexProperty
      {haddock_workaround_ = (), indexName = indexName,
       keySchema = keySchema, projection = projection}
instance ToResourceProperties LocalSecondaryIndexProperty where
  toResourceProperties LocalSecondaryIndexProperty {..}
    = ResourceProperties
        {awsType = "AWS::DynamoDB::GlobalTable.LocalSecondaryIndex",
         supportsTags = Prelude.False,
         properties = ["IndexName" JSON..= indexName,
                       "KeySchema" JSON..= keySchema, "Projection" JSON..= projection]}
instance JSON.ToJSON LocalSecondaryIndexProperty where
  toJSON LocalSecondaryIndexProperty {..}
    = JSON.object
        ["IndexName" JSON..= indexName, "KeySchema" JSON..= keySchema,
         "Projection" JSON..= projection]
instance Property "IndexName" LocalSecondaryIndexProperty where
  type PropertyType "IndexName" LocalSecondaryIndexProperty = Value Prelude.Text
  set newValue LocalSecondaryIndexProperty {..}
    = LocalSecondaryIndexProperty {indexName = newValue, ..}
instance Property "KeySchema" LocalSecondaryIndexProperty where
  type PropertyType "KeySchema" LocalSecondaryIndexProperty = [KeySchemaProperty]
  set newValue LocalSecondaryIndexProperty {..}
    = LocalSecondaryIndexProperty {keySchema = newValue, ..}
instance Property "Projection" LocalSecondaryIndexProperty where
  type PropertyType "Projection" LocalSecondaryIndexProperty = ProjectionProperty
  set newValue LocalSecondaryIndexProperty {..}
    = LocalSecondaryIndexProperty {projection = newValue, ..}