@reventlessdev/rescript-aws-sdk 2.2.0-alpha.20

package/src/DynamoDb_DocumentClient.res.mjs

@@ -0,0 +1,338 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
+import * as Stdlib_JsExn from "@rescript/runtime/lib/es6/Stdlib_JsExn.js";
+import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
+import * as LibDynamodb from "@aws-sdk/lib-dynamodb";
+import * as DynamoDb_DynamoDb$AwsSdk from "./DynamoDb_DynamoDb.res.mjs";
+
+let Raw = {};
+
+let clientInstance = {
+  contents: undefined
+};
+
+function client() {
+  let docClient = clientInstance.contents;
+  if (docClient !== undefined) {
+    return Primitive_option.valFromOption(docClient);
+  }
+  let docClient$1 = LibDynamodb.DynamoDBDocumentClient.from(DynamoDb_DynamoDb$AwsSdk.client(), {
+    marshallOptions: {
+      convertEmptyValues: false,
+      removeUndefinedValues: true
+    }
+  });
+  clientInstance.contents = Primitive_option.some(docClient$1);
+  return docClient$1;
+}
+
+function getIntAttribute(attributes, name) {
+  return Stdlib_Option.flatMap(attributes, attribute => Stdlib_Option.map(Stdlib_Option.flatMap(attribute[name], value => Stdlib_JSON.Decode.float(value)), number => number | 0));
+}
+
+let Raw$1 = {};
+
+function send(input) {
+  return client().send(input);
+}
+
+let PutCommand = {
+  Raw: Raw$1,
+  send: send
+};
+
+function putMany(tableName, conditionalExpression, items) {
+  return Promise.all(items.map(item => {
+    let input = new LibDynamodb.PutCommand({
+      Item: item,
+      TableName: tableName,
+      ConditionExpression: conditionalExpression
+    });
+    return client().send(input);
+  }));
+}
+
+function putIfNotExists(tableName, idKey, sortKey, item) {
+  let tmp;
+  let exit = 0;
+  if (sortKey !== undefined) {
+    let sortKey$1 = Primitive_option.valFromOption(sortKey);
+    if (sortKey$1 == null) {
+      exit = 1;
+    } else {
+      tmp = `attribute_not_exists(` + idKey + `) and attribute_not_exists(` + sortKey$1 + `)`;
+    }
+  } else {
+    exit = 1;
+  }
+  if (exit === 1) {
+    tmp = `attribute_not_exists(` + idKey + `)`;
+  }
+  let input = new LibDynamodb.PutCommand({
+    Item: item,
+    TableName: tableName,
+    ConditionExpression: tmp
+  });
+  return client().send(input);
+}
+
+let name = "ConditionalCheckFailedException";
+
+let ConditionCheckFailedException = {
+  name: name
+};
+
+let name$1 = "InternalServerError";
+
+let InternalServerError = {
+  name: name$1
+};
+
+let name$2 = "InvalidEndpointException";
+
+let InvalidEndpointException = {
+  name: name$2
+};
+
+let name$3 = "ItemCollectionSizeLimitExceededException";
+
+let ItemCollectionSizeLimitExceededException = {
+  name: name$3
+};
+
+let name$4 = "ProvisionedThroughputExceededException";
+
+let ProvisionedThroughputExceededException = {
+  name: name$4
+};
+
+let name$5 = "RequestLimitExceeded";
+
+let RequestLimitExceeded = {
+  name: name$5
+};
+
+let name$6 = "ResourceNotFoundException";
+
+let ResourceNotFoundException = {
+  name: name$6
+};
+
+let name$7 = "TransactionConflictException";
+
+let TransactionConflictException = {
+  name: name$7
+};
+
+let name$8 = "DynamoDBServiceException";
+
+let DynamoDBServiceException = {
+  name: name$8
+};
+
+function classify(exn) {
+  let name$9 = Stdlib_Option.getOr(Stdlib_JsExn.name(exn), "");
+  if (name$9 === name) {
+    return {
+      TAG: "ConditionCheckFailedException",
+      _0: exn
+    };
+  } else if (name$9 === name$1) {
+    return {
+      TAG: "InternalServerError",
+      _0: exn
+    };
+  } else if (name$9 === name$2) {
+    return {
+      TAG: "InvalidEndpointException",
+      _0: exn
+    };
+  } else if (name$9 === name$3) {
+    return {
+      TAG: "ItemCollectionSizeLimitExceededException",
+      _0: exn
+    };
+  } else if (name$9 === name$4) {
+    return {
+      TAG: "ProvisionedThroughputExceededException",
+      _0: exn
+    };
+  } else if (name$9 === name$5) {
+    return {
+      TAG: "RequestLimitExceeded",
+      _0: exn
+    };
+  } else if (name$9 === name$6) {
+    return {
+      TAG: "ResourceNotFoundException",
+      _0: exn
+    };
+  } else if (name$9 === name$7) {
+    return {
+      TAG: "TransactionConflictException",
+      _0: exn
+    };
+  } else if (name$9 === name$8) {
+    return {
+      TAG: "DynamoDBServiceException",
+      _0: exn
+    };
+  } else {
+    return {
+      TAG: "Unknown",
+      _0: exn
+    };
+  }
+}
+
+let PutError = {
+  ConditionCheckFailedException: ConditionCheckFailedException,
+  InternalServerError: InternalServerError,
+  InvalidEndpointException: InvalidEndpointException,
+  ItemCollectionSizeLimitExceededException: ItemCollectionSizeLimitExceededException,
+  ProvisionedThroughputExceededException: ProvisionedThroughputExceededException,
+  RequestLimitExceeded: RequestLimitExceeded,
+  ResourceNotFoundException: ResourceNotFoundException,
+  TransactionConflictException: TransactionConflictException,
+  DynamoDBServiceException: DynamoDBServiceException,
+  classify: classify
+};
+
+let Raw$2 = {};
+
+function send$1(input) {
+  return client().send(input);
+}
+
+let BatchWriteCommand = {
+  maxBatchSize: 25,
+  Raw: Raw$2,
+  send: send$1
+};
+
+let Raw$3 = {};
+
+function send$2(input) {
+  return client().send(input);
+}
+
+let UpdateCommand = {
+  Raw: Raw$3,
+  send: send$2
+};
+
+let Raw$4 = {};
+
+function send$3(command) {
+  return client().send(command);
+}
+
+let DeleteCommand = {
+  Raw: Raw$4,
+  send: send$3
+};
+
+function deleteById(tableName, id) {
+  let command = new LibDynamodb.DeleteCommand({
+    TableName: tableName,
+    Key: Object.fromEntries([[
+        "id",
+        id
+      ]])
+  });
+  return client().send(command);
+}
+
+function deleteByIdSort(tableName, id, sortField, sortKey) {
+  let keyDict = Object.fromEntries([
+    [
+      "id",
+      id
+    ],
+    [
+      sortField,
+      sortKey
+    ]
+  ]);
+  let command = new LibDynamodb.DeleteCommand({
+    TableName: tableName,
+    Key: keyDict
+  });
+  return client().send(command);
+}
+
+function $$delete(sort, tableName, id) {
+  if (sort !== undefined) {
+    return deleteByIdSort(tableName, id, sort[0], sort[1]);
+  } else {
+    return deleteById(tableName, id);
+  }
+}
+
+let Raw$5 = {};
+
+function send$4(command) {
+  return client().send(command);
+}
+
+let TransactWriteCommand = {
+  Raw: Raw$5,
+  send: send$4
+};
+
+let Raw$6 = {};
+
+function send$5(command) {
+  return client().send(command);
+}
+
+let QueryCommand = {
+  Raw: Raw$6,
+  send: send$5
+};
+
+let Raw$7 = {};
+
+function send$6(command) {
+  return client().send(command);
+}
+
+let GetCommand = {
+  Raw: Raw$7,
+  send: send$6
+};
+
+let Raw$8 = {};
+
+function send$7(command) {
+  return client().send(command);
+}
+
+let ScanCommand = {
+  Raw: Raw$8,
+  send: send$7
+};
+
+export {
+  Raw,
+  clientInstance,
+  client,
+  getIntAttribute,
+  PutCommand,
+  putMany,
+  putIfNotExists,
+  PutError,
+  BatchWriteCommand,
+  UpdateCommand,
+  DeleteCommand,
+  deleteById,
+  deleteByIdSort,
+  $$delete,
+  TransactWriteCommand,
+  QueryCommand,
+  GetCommand,
+  ScanCommand,
+}
+/* Stdlib_JsExn Not a pure module */

package/src/DynamoDb_DynamoDb.res

@@ -0,0 +1,189 @@
+/*** @aws-sdk/client-dynamodb
+  see: https://docs.aws.amazon.com/AWSJavaScriptSDK/v3/latest/client/dynamodb/
+  
+  Use this client to modify (existing) tables.
+
+  ## difference of dynamodb-client vs document-client
+    - dynamodb-client 
+      - Operates on tables via commands
+      - Modification of table via dynamo-db-client update
+    - document-client 
+      - Operates on the table content (documents), but not on the tables themselves
+*/
+type client
+
+type options = {
+  region?: string,
+  maxAttempts?: int,
+  requestHandler?: NodeHttpHandler.t,
+}
+
+module Raw = {
+  @module("@aws-sdk/client-dynamodb") @new
+  external client: (~options: options=?, unit) => client = "DynamoDBClient"
+}
+
+let clientInstance = ref(None)
+
+/** create a DynamoDBClient with default values:
+  - maxAttempts: 3,
+  - connectionTimeout: 1000ms
+  - requestTimeout: 5000ms
+
+  use `Raw.client` if you want to set alternative configuration
+*/
+let client: unit => client = () =>
+  switch clientInstance.contents {
+  | None =>
+    let client = Raw.client(
+      ~options={
+        maxAttempts: 3,
+        requestHandler: NodeHttpHandler.make({
+          connectionTimeout: 1000,
+          requestTimeout: 5000,
+        }),
+      },
+      (),
+    )
+    clientInstance := Some(client)
+    client
+  | Some(client) => client
+  }
+
+module UpdateTableCommand = {
+  /*** modify an existing table
+
+  this command is not available in document-client
+
+  see: https://docs.aws.amazon.com/AWSJavaScriptSDK/v3/latest/client/dynamodb/command/UpdateTableCommand/ */
+
+  type t
+
+  type billingMode = [
+    | #PROVISIONED
+    | #PAY_PER_REQUEST
+  ]
+
+  type streamViewType = [
+    | #KEYS_ONLY
+    | #NEW_IMAGE
+    | #OLD_IMAGE
+    | #NEW_AND_OLD_IMAGES
+  ]
+  type streamSpecification = {
+    @as("StreamEnabled") streamEnabled: bool,
+    @as("StreamViewType")
+    streamViewType?: streamViewType,
+  }
+
+  /** the following properties have no bindings yet:
+    - AttributeDefinitions
+    - DeletionProtectionEnabled
+    - GlobalSecondaryIndexUpdates
+    - OnDemandThroughput
+    - ProvisionedThroughput
+    - ReplicaUpdates
+    - SSESpecification
+    - TableClass
+  */
+  type input = {
+    @as("TableName") tableName: string,
+    @as("BillingMode") billingMode?: billingMode,
+    @as("StreamSpecification") streamSpecification?: streamSpecification,
+  }
+
+  type tableDescription = {
+    @as("StreamSpecification") streamSpecification: streamSpecification,
+    @as("LatestStreamArn") latestStreamArn: string,
+    @as("LatestStreamLabel") latestStreamLabel: string,
+  }
+  type output = {
+    @as("$metadata") metadata: Metadata.t,
+    @as("TableDescription") tableDescription: tableDescription,
+  }
+
+  @new @module("@aws-sdk/client-dynamodb")
+  external make: input => t = "UpdateTableCommand"
+
+  module Raw = {
+    @send
+    external send: (client, t) => promise<output> = "send"
+  }
+
+  let send: t => promise<output> = command => Raw.send(client(), command)
+}
+
+module UpdateTimeToLiveCommand = {
+  /*** modify ttl config of an existing table
+
+  this command is not available in document-client
+  */
+
+  type t
+
+  type timeToLiveSpecification = {
+    @as("Enabled") enabled: bool,
+    @as("AttributeName") attributeName: string,
+  }
+
+  type input = {
+    @as("TableName") tableName: string,
+    @as("TimeToLiveSpecification") timeToLiveSpecification: timeToLiveSpecification,
+  }
+
+  type output = {
+    @as("metadata") metadata: Metadata.t,
+    @as("TimeToLiveSpecification") timeToLiveSpecification: timeToLiveSpecification,
+  }
+
+  @new @module("@aws-sdk/client-dynamodb")
+  external make: input => t = "UpdateTimeToLiveCommand"
+  module Raw = {
+    @send
+    external send: (client, t) => promise<output> = "send"
+  }
+  let send: t => promise<output> = command => Raw.send(client(), command)
+}
+
+module UpdateContinuousBackupsCommand = {
+  /*** modify continuous backup config of an existing table
+
+  this command is not available in document-client
+  */
+
+  type t
+
+  type pointInTimeRecoverySpecification = {
+    @as("PointInTimeRecoveryEnabled") pointInTimeRecoveryEnabled: bool,
+  }
+  type input = {
+    @as("TableName") tableName: string,
+    @as("PointInTimeRecoverySpecification")
+    pointInTimeRecoverySpecification: pointInTimeRecoverySpecification,
+  }
+
+  type continuousBackupsStatus = [#ENABLED | #DISABLED]
+  type pointInTimeRecoveryDescription = {
+    @as("EarliestRestorableDateTime") earliestRestorableDateTime?: Date.t,
+    @as("PointInTimeRecoveryStatus") pointInTimeRecoveryStatus?: string,
+    @as("LatestRestorableDateTime") latestRestorableDateTime?: Date.t,
+  }
+  type continuousBackupsDescription = {
+    @as("ContinuousBackupsStatus") continuousBackupsStatus: continuousBackupsStatus,
+    @as("PointInTimeRecoveryDescription")
+    pointInTimeRecoveryDescription?: pointInTimeRecoveryDescription,
+  }
+  type output = {
+    @as("$metadata") metadata: Metadata.t,
+    @as("ContinuousBackupsDescription") continuousBackupsDescription: continuousBackupsDescription,
+  }
+
+  @new @module("@aws-sdk/client-dynamodb")
+  external make: input => t = "UpdateContinuousBackupsCommand"
+  module Raw = {
+    @send
+    external send: (client, t) => promise<output> = "send"
+  }
+
+  let send: t => promise<output> = command => Raw.send(client(), command)
+}

package/src/DynamoDb_DynamoDb.res.mjs

@@ -0,0 +1,70 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
+import * as ClientDynamodb from "@aws-sdk/client-dynamodb";
+import * as NodeHttpHandler from "@smithy/node-http-handler";
+
+let Raw = {};
+
+let clientInstance = {
+  contents: undefined
+};
+
+function client() {
+  let client$1 = clientInstance.contents;
+  if (client$1 !== undefined) {
+    return Primitive_option.valFromOption(client$1);
+  }
+  let client$2 = new ClientDynamodb.DynamoDBClient({
+    maxAttempts: 3,
+    requestHandler: Primitive_option.some(new NodeHttpHandler.NodeHttpHandler({
+      connectionTimeout: 1000,
+      requestTimeout: 5000
+    }))
+  });
+  clientInstance.contents = Primitive_option.some(client$2);
+  return client$2;
+}
+
+let Raw$1 = {};
+
+function send(command) {
+  return client().send(command);
+}
+
+let UpdateTableCommand = {
+  Raw: Raw$1,
+  send: send
+};
+
+let Raw$2 = {};
+
+function send$1(command) {
+  return client().send(command);
+}
+
+let UpdateTimeToLiveCommand = {
+  Raw: Raw$2,
+  send: send$1
+};
+
+let Raw$3 = {};
+
+function send$2(command) {
+  return client().send(command);
+}
+
+let UpdateContinuousBackupsCommand = {
+  Raw: Raw$3,
+  send: send$2
+};
+
+export {
+  Raw,
+  clientInstance,
+  client,
+  UpdateTableCommand,
+  UpdateTimeToLiveCommand,
+  UpdateContinuousBackupsCommand,
+}
+/* @aws-sdk/client-dynamodb Not a pure module */

package/src/DynamoDb_Util.res

@@ -0,0 +1,128 @@
+/*** bindings for `@aws-sdk/util-dynamodb`dynamoutil
+  https://docs.aws.amazon.com/AWSJavaScriptSDK/v3/latest/Package/-aws-sdk-util-dynamodb
+
+  in aws sdk v2 this was `aws-sdk/DynamoDb/Converter`
+*/
+
+type rec attributeValue = {
+  /** `B`inary attribute */
+  @as("B")
+  binary?: Js.TypedArray2.Uint8Array.t,
+  @as("BOOL") bool?: bool,
+  @as("BS") binarySet?: array<Js.TypedArray2.Uint8Array.t>,
+  @as("L") list?: array<attributeValue>,
+  @as("M") map?: dict<attributeValue>,
+  @as("N") number?: string,
+  @as("NS") numberSet?: array<string>,
+  @as("NULL") null?: bool,
+  @as("S") string?: string,
+  @as("SS") stringSet?: array<string>,
+  @as("$unknown") unknown?: (string, unknown),
+}
+
+module MarshallOptions: {
+  /*** see: https://docs.aws.amazon.com/AWSJavaScriptSDK/v3/latest/Package/-aws-sdk-util-dynamodb/Interface/marshallOptions/ */
+
+  type options = {
+    /** Whether to automatically convert empty strings, blobs, and sets to `null` */
+    convertEmptyValues?: bool,
+    /** Whether to remove undefined values while marshalling. */
+    removeUndefinedValues?: bool,
+    /** Whether to convert typeof object to map attribute. */
+    convertClassInstanceToMap?: bool,
+    /** Whether to convert the top level container if it is a map or list. */
+    convertTopLevelContainer?: bool,
+    wrapNumbers?: bool,
+  }
+
+  /**
+  The `marshall` function returns different types depending on `option.convertTopLevelContainer`.
+  To model this, the phantom type (parameter) `'output` is used. This type is abstract to enforce proper creation with one of this functions:
+    - `topLevelContainerConverted`
+    - `topLevelContainerNotConverted`
+  */
+  type t<'output>
+
+  external toOptions: t<'output> => options = "%identity"
+
+  /** create objections with `convertTopLevelContainer` set to `true` */
+  let topLevelContainerConverted: (
+    ~convertEmptyValues: bool=?,
+    ~removeUndefinedValues: bool=?,
+    ~convertClassInstanceToMap: bool=?,
+    ~wrapNumbers: bool=?,
+  ) => t<attributeValue>
+
+  /** create objections with `convertTopLevelContainer` set to `false` */
+  let topLevelContainerNotConverted: (
+    ~convertEmptyValues: bool=?,
+    ~removeUndefinedValues: bool=?,
+    ~convertClassInstanceToMap: bool=?,
+    ~wrapNumbers: bool=?,
+  ) => t<dict<attributeValue>>
+} = {
+  type options = {
+    convertEmptyValues?: bool,
+    removeUndefinedValues?: bool,
+    convertClassInstanceToMap?: bool,
+    convertTopLevelContainer?: bool,
+    wrapNumbers?: bool,
+  }
+
+  type t<'output> = options
+
+  external toOptions: t<'output> => options = "%identity"
+
+  /** convert the top level container into an attributeValue if it is a map or list. */
+  let topLevelContainerConverted = (
+    ~convertEmptyValues=?,
+    ~removeUndefinedValues=?,
+    ~convertClassInstanceToMap=?,
+    ~wrapNumbers=?,
+  ) => {
+    {
+      ?convertEmptyValues,
+      ?removeUndefinedValues,
+      ?convertClassInstanceToMap,
+      convertTopLevelContainer: true,
+      ?wrapNumbers,
+    }
+  }
+
+  /** do NOT convert the top level container into an attributeValue if it is a map or list. */
+  let topLevelContainerNotConverted = (
+    ~convertEmptyValues=?,
+    ~removeUndefinedValues=?,
+    ~convertClassInstanceToMap=?,
+    ~wrapNumbers=?,
+  ) => {
+    {
+      ?convertEmptyValues,
+      ?removeUndefinedValues,
+      ?convertClassInstanceToMap,
+      convertTopLevelContainer: false,
+      ?wrapNumbers,
+    }
+  }
+}
+
+/** Convert JavaScript object into DynamoDB Record
+  see: https://github.com/aws/aws-sdk-js-v3/blob/de4dc495455a47cd718c635209cd7aef9167797c/packages/util-dynamodb/src/marshall.ts#L40
+*/
+@module("@aws-sdk/util-dynamodb")
+external marshall: ('a, ~options: MarshallOptions.t<'output>=?) => 'output = "marshall"
+
+module Raw = {
+  type unmarshallOptions = {
+    /** When true, skip wrapping the data in { M: data } before converting. Default is true when using the DynamoDBDocumentClient, but false if directly using the unmarshall function (backwards compatibility).
+
+  Set this to false if top level data is dict<attributeValue>
+  */
+    convertWithoutMapWrapper?: bool,
+    /** Whether to return numbers as a string instead of converting them to native JavaScript numbers. This allows for the safe round-trip transport of numbers of arbitrary size. */
+    wrapNumbers?: bool,
+  }
+  @module("@aws-sdk/util-dynamodb")
+  external unmarshall: ('data, ~options: unmarshallOptions) => 'output = "unmarshall"
+}
+