package kinetic-client

  1. Overview
  2. Docs
Client API for Seagate's Kinetic drives

Install

Dune Dependency

Authors

Maintainers

Sources

0.0.11.tar.gz
md5=acc775dbd08f7cdbdd7955f2a284b2f0
sha512=d7374b38a9cfee05b6b820c72d88a2626fb9af6ab972a4596aaa2cdc708042b4003b1c5f525121791bfe9140c65b49c9f3a5e8e50f70d432f0e979cfd8a7d5a4

README.md.html

Kinetic OCaml Client

This is an OCaml client for Seagate's Kinetic drives. Currently, it uses protocol version 4.0.0.

Installation

In order to build the client, you need to have some OCaml libraries present. In concreto, you need:

  • lwt

  • lwt_ssl

  • lwt_log

  • cryptokit

  • ocaml-protoc

  • cmdliner (for tests)

  • dune

If you have these, you can compile everything with:

$> make

You can install the library with:

$> make install

Once you have the library installed, you just add `true:package(kinetic-client) to your ocamlbuild _tags file.

Usage

The API is defined in kinetic.mli

typically you'd do something like:

    ...
    Kinetic.wrap_socket socket
    >>=? fun client ->
    Kinetic.put client
      "the_key" (Some "the value")
      ~db_version:None ~new_version:None
      ~forced:true
      ~synchronization:(Some Kinetic.WRITEBACK)
    >>=? fun () ->
    ...

take a look at test_it.ml

Remarks

Protocol?

There is a rather stable protocol defined in Seagate's kinetic-protocol which defines the serialization for valid messages. The protocol itself is rather implicitly defined by the Kinetic drive, and the interpretation of what comprises an acceptable client/server conversation varies between different firmware releases. All this to say that even if both client and server state they support protocol version X, they still might not be able to talk to each other. YMMV

Todo

  • We only catered for our own needs, so feature support is rather limited. (we welcome pull requests ;) )

  • the API feels heavy, because it's a direct translation of the messages into RPC. Once the protocol stabilizes, we should move into something more elegant.

Have fun,

The OpenVStorage team