package smaws-clients
Install
dune-project
Dependency
Authors
Maintainers
Sources
md5=18fb70dbc45e8d81a341b9bed6871bab
sha512=7607dc98acaeed5803b44c9ca32d90c88e7813d4b3e3ae4ec661a0bad16c88dc1476bc780877527ea4cd5a4b7398453c1bb600ce0db14d39afa05dc4762b5ba5
doc/index.html
smaws-clients
smaws-clients is composed of generated Amazon Web Services (AWS) service SDKs for OCaml from Smithy definitions.
The underlying SDKs use EIO for its concurrency model, taking advantage of the OCaml 5.0 Effects support, that enables a cleaner and simpler concurrency syntax without monadic support (like lwt).
Status
This project is very much a work in progress. The current focus is on generating correct and useful SDKs for core AWS services like STS, SQS, S3, DynamoDB, etc. rather than support for every AWS service.
It should be treated as a preview, as it lacks a number of important features that are needed for production use.
Installation
Use opam to install smaws-clients:
opam install smaws-clientsLibrary Organisation
smaws-clients exposes all of the service SDKs. It works with smaws-lib for authentication and protocol implementations.
Service SDKs are organised under its own module with the naming convention Smaws_Clients.* e.g. Smaws_Clients.DynamoDB.
Types for all operations and their components are found directly under the service module.
Builder functions, in the form of `make_<type_name>`, also exist directly in the service module. They're particularly helpful with larger types that have a lot of optional fields.
Service Operations exist in a submodule of a Service SDK e.g. SQS ListQueues is in the Smaws_Clients.SQS.ListQueues module. (You can find all the operations available for a particular service on the Actions page of the corresponding API Reference section of the AWS documentation for that service).
Usage
Calling a service operation consists of:
- Creating a configuration object with your authorisation and region details
- Initialising a context from your eio switch
- Constructing a request object
- Invoking the service operation function
Limitations
- Service Documentation: there is inline documentation for types and service operations available but this is not included in the generated code
- Authentication: only environment variables or the
~/.aws/credentialsfile (non-SSO). It does not support authentication methods suitable for use on EC2/ECS/Lambda such as EC2/ECS Metadata Secret retrieval. SSO authentication retrieval is not currently supported. - Middleware: no middleware support (e.g. to link in tracers, loggers)
- Helpers: additional SDK helpers, such as DynamoDB DocumentClient, are not available
- Retry and Timeout Handling: there is no retry mechanism or timeouts implemented
Configuration Objects
A configuration object is used by the context todetermine authorization and other environment settings (such as the region to use).
open Smaws_Lib
(* Initialise with defaults from environment *)
let config = Config.defaultConfig ()
(* Customise the config object *)
let config = Config.make
~resolveRegion: (fun () -> "us-west-1")
~resolveAuth: (Auth.fromProfile env)
()Context Initialisation
Calling a service operation first requires you to create a context object. The context ties together a configuration and an eio switch for calling service operations.
NOTE: it isn't possible to use this library with other effect-based concurrency frameworks like miou or riot, or older concurrency frameorks like lwt or async, without an eio compatibility shim (these are untested).
The HTTP client bound to the context creates a shared connection pool for each service endpoint. That connection pool is bound to the lifetime of the switch.
You can share the context object between services or create separate ones (as required).
open Smaws_Lib
let _
Eio_main.run (fun env ->
Eio.Switch.run (fun sw ->
let config = Config.defaultConfig () in
let ctx = Context.make ~config ~sw in
...The above example is typical of a command line utility, where you initialise the switch as part of your main programme. Long running servers or frameworks may already provide you with an eio switch.
Opening and using service modules
Service modules each have their own module under Smaws_Clients. We recommend using local opens because each service module contains numerous types, associated builder functions and operations, which may clutter your namespace.
let read_table_entries =
let open Smaws_Clients.DynamoDB in
...An operation request is constructed with the corresponding make_<operation>_<name> convenience function, or you can also use the generated <operation_name>_input type directly).
let read_table_entries context =
let open Smaws_Clients.DynamoDB in
let request = make_list_tables_request ~table_name:"orders" () in
...You can then invoke an operation using its submodule's request function:
let result = ListTables.request context requestThese return a result type. We recommend binding the let+ operator to Result.bind so you can cascade multiple results as needed.
let (let+) r b = Result.bind r bError Handling
Errors are defined as polymorphic variant types to make error handling more ergonomic, and to allow different layers (HTTP, protocol, operation) to define what errors they can throw. Each class of error is documented below.
Operation Errors
Errors specifically returned from operations are individually in the operation definition. For example:
module PutItem = sig
val request :
Context.t ->
put_item_input ->
( put_item_output,
[> `AWSServiceError of AwsErrors.aws_service_error
| `ConditionalCheckFailedException of
conditional_check_failed_exception
| `HttpError of Http.http_failure
| `InternalServerError of internal_server_error
| `InvalidEndpointException of invalid_endpoint_exception
| `ItemCollectionSizeLimitExceededException of
item_collection_size_limit_exceeded_exception
| `JsonParseError of
Json.DeserializeHelpers.jsonParseError
| `ProvisionedThroughputExceededException of
provisioned_throughput_exceeded_exception
| `RequestLimitExceeded of request_limit_exceeded
| `ResourceNotFoundException of
resource_not_found_exception
| `TransactionConflictException of
transaction_conflict_exception ] )
result
endThey can be patterned matched, e.g.
(* Write an item to the table if it does not exist. Returns the item if it is written, otherwise None *)
let insert_item =
...
let request = make_put_item_request ~item ~condition_expression in
let put_item_response = PutItem.request ctx request in
match put_item_response with
| Ok result -> Some (map_attributes_to_item result.attributes)
(* Catch condition check failure, which indicates our condition failed so
we did not want to write this item
*)
| Error (`ConditionalCheckFailedException _) -> None
(* Raise any other errors as exceptions *)
| Error e -> raise (InsertItemError e)As can be seen in the above example, some operations list out quite a number of error conditions (most of which are not relevant). In other cases, some errors will be missing from the operation specification: Smithy definitions are often incomplete or contain errors or inconsistencies between services.
If an operation returns an error not specified in its definition, it will be wrapped up as an `AWSServiceError type. You can match these by their name (and/or namespace) as a string:
match item_response with
| Error (`AWSServiceError e) when e._type.name = "SomeError" -> (* special handling *)
HTTP Errors
All HTTP errors are packaged as `HttpError, which can be processed if you need to implement retries (there is no builtin retry support).
SDK Reference
All service SDKs that are built are listed below.
Please note inline documentation from the Smithy definitions is not available at this time.
Smaws_Clients.ACMSmaws_Clients.AppRunnerSmaws_Clients.BackupGatewaySmaws_Clients.CloudTrailSmaws_Clients.CodeConnectionsSmaws_Clients.CognitoIdentitySmaws_Clients.ConfigServiceSmaws_Clients.DAXSmaws_Clients.DirectoryServiceSmaws_Clients.DynamoDBSmaws_Clients.DynamoDBStreamsSmaws_Clients.EventBridgeSmaws_Clients.FMSSmaws_Clients.KendraSmaws_Clients.KeyspacesSmaws_Clients.KinesisSmaws_Clients.KinesisAnalyticsSmaws_Clients.KinesisAnalyticsV2Smaws_Clients.KMSSmaws_Clients.LightsailSmaws_Clients.MarketplaceAgreementSmaws_Clients.MigrationHubSmaws_Clients.OpenSearchServerlessSmaws_Clients.PISmaws_Clients.ProtonSmaws_Clients.ResourceGroupsTaggingAPISmaws_Clients.Route53RecoveryClusterSmaws_Clients.ServiceDiscoverySmaws_Clients.SFNSmaws_Clients.ShieldSmaws_Clients.SnowballSmaws_Clients.SQSSmaws_Clients.SSMSmaws_Clients.SWFSmaws_Clients.TranscribeSmaws_Clients.WAFSmaws_Clients.WAFV2Smaws_Clients.WorkMail