Value serialization error with DynamoDB API about amazonka

[mookerji]

As part of testing the PR referenced for this issue, I ran into another API problem. This example call works:

example :: IO (Either Error ())
example = do
    lgr <- newLogger Trace stdout
    env <- getEnv Oregon (FromEnv "AWS_ACCESS_KEY_ID" "AWS_SECRET_ACCESS_KEY") <&> envLogger .~ lgr
    let tableName = "AmazonikaTestTable"
        throughput = provisionedThroughput 1 1
        schema = keySchemaElement "ForumName" Hash :| [keySchemaElement "Subject" Range]
        schema2 = keySchemaElement "ForumName" Hash :| [keySchemaElement "LastPostDateTime" Range]
        schema3 = keySchemaElement "ForumName" Hash :| [keySchemaElement "FirstPostDateTime" Range]
        attributeDefs = [ attributeDefinition "ForumName" S
                        , attributeDefinition "Subject" S
                        , attributeDefinition "LastPostDateTime" S
                        , attributeDefinition "FirstPostDateTime" S
                        ]
        proj = (projection $ "FirstPostDateTime" :| []) & pProjectionType .~ Just Include
        proj2 = (projection $ "LastPostDateTime" :| []) & pProjectionType .~ Just Include
    runAWST env $ do
         r <- send $ createTable tableName schema throughput
           & ctAttributeDefinitions .~ attributeDefs
           & ctLocalSecondaryIndexes .~ [localSecondaryIndex "LastPostIndex" schema2 proj ]
           & ctGlobalSecondaryIndexes .~ [globalSecondaryIndex "FirstPostIndex" schema3 proj2 throughput ]
         return ()

... with this response:

[Client Response] {
  status code    = 200
  status message = OK
  version        = HTTP/1.1
  headers        = x-amzn-requestid: JG7QGUK1K6KLCH49P83ATNOP67VV4KQNSO5AEMVJF66Q9ASUAAJG; x-amz-crc32: 4106595474; content-type: application/x-amz-json-1.0; content-length: 1292; date: Sun, 28 Dec 2014 02:23:51 GMT
  cookies        = CJ {expose = []}
}
[Client Response Body]
{"TableDescription":{"AttributeDefinitions":[{"AttributeName":"FirstPostDateTime","AttributeType":"S"},{"AttributeName":"ForumName","AttributeType":"S"},{"AttributeName":"LastPostDateTime","AttributeType":"S"},{"AttributeName":"Subject","AttributeType":"S"}],"CreationDateTime":1.41973343195E9,"GlobalSecondaryIndexes":[{"IndexName":"FirstPostIndex","IndexSizeBytes":0,"IndexStatus":"CREATING","ItemCount":0,"KeySchema":[{"AttributeName":"ForumName","KeyType":"HASH"},{"AttributeName":"FirstPostDateTime","KeyType":"RANGE"}],"Projection":{"NonKeyAttributes":["LastPostDateTime"],"ProjectionType":"INCLUDE"},"ProvisionedThroughput":{"NumberOfDecreasesToday":0,"ReadCapacityUnits":1,"WriteCapacityUnits":1}}],"ItemCount":0,"KeySchema":[{"AttributeName":"ForumName","KeyType":"HASH"},{"AttributeName":"Subject","KeyType":"RANGE"}],"LocalSecondaryIndexes":[{"IndexName":"LastPostIndex","IndexSizeBytes":0,"ItemCount":0,"KeySchema":[{"AttributeName":"ForumName","KeyType":"HASH"},{"AttributeName":"LastPostDateTime","KeyType":"RANGE"}],"Projection":{"NonKeyAttributes":["FirstPostDateTime"],"ProjectionType":"INCLUDE"}}],"ProvisionedThroughput":{"NumberOfDecreasesToday":0,"ReadCapacityUnits":1,"WriteCapacityUnits":1},"TableName":"AmazonikaTestTable","TableSizeBytes":0,"TableStatus":"CREATING"}}
Left (SerializerError "DynamoDB" "when expecting a ISO8601, encountered Number instead")
it :: Either Error ()

Two things:
0. AWS returns a unix epoch format for the creation time, not a ISO8601 time as expected by the response parser. A few other DynamoDB client calls fail with the same error, and I think a few other clients are probably affected as well.

1. The example above needs to include valid definitions of some optional arguments for a successful response. By default, LocalSecondaryIndexes and GlobalSecondaryIndexes lens values are included in the request body, but as [], instead of being omitted altogether. Not including those optional arguments in the request body results in an AWSValidationException, since [] is probably an invalid value for those keys:

[Client Response] {
  status code    = 400
  status message = Bad Request
  version        = HTTP/1.1
  headers        = x-amzn-requestid: ALKENSE4DDH05T0T1L323G2T63VV4KQNSO5AEMVJF66Q9ASUAAJG; x-amz-crc32: 1761556321; content-type: application/x-amz-json-1.0; content-length: 153; date: Sun, 28 Dec 2014 02:41:11 GMT
  cookies        = CJ {expose = []}
}
Left (SerializerError "DynamoDB" "key \"code\" not present:\n{\"__type\":\"com.amazon.coral.validate#ValidationException\",\"message\":\"One or more parameter values were invalid: List of GlobalSecondaryIndexes is empty\"}")

[brendanhay]

The fixes have been merged and released as 0.1.2.