2018-05-26 15:41:16 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
(* *)
|
|
|
|
(* Copyright (c) 2014 - 2017. *)
|
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
(* *)
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
(* *)
|
|
|
|
(**************************************************************************)
|
|
|
|
|
2018-06-06 12:49:53 +04:00
|
|
|
module Make(S : sig
|
|
|
|
val default : Uri.t
|
|
|
|
val authenticate: Signature.Public_key_hash.t list -> MBytes.t -> Signature.t tzresult Lwt.t
|
2018-06-14 01:05:36 +04:00
|
|
|
val logger: RPC_client.logger
|
2018-06-06 12:49:53 +04:00
|
|
|
end) : Client_keys.SIGNER
|
2018-05-26 15:41:16 +04:00
|
|
|
|
|
|
|
val make_pk: Signature.public_key -> Client_keys.pk_uri
|
|
|
|
val make_sk: Signature.secret_key -> Client_keys.sk_uri
|
2018-05-27 15:27:29 +04:00
|
|
|
|
|
|
|
val read_base_uri_from_env: unit -> Uri.t option tzresult Lwt.t
|
|
|
|
val parse_base_uri: string -> Uri.t tzresult Lwt.t
|