sig
exception Netname_unknown
exception No_secret_key
exception Key_service_problem of exn
type t
type connector =
[ `Direct of Rpc_client.connector * Rpc.protocol | `Keyenvoy of string ]
val create :
?connector:Rpc_key_service.connector -> unit -> Rpc_key_service.t
val generate : Rpc_key_service.t -> string
val encrypt : Rpc_key_service.t -> string -> string -> string
val decrypt : Rpc_key_service.t -> string -> string -> string
val net_get : Rpc_key_service.t -> string * string * string
val shut_down : Rpc_key_service.t -> unit
end
