type t

val get_sm_key : t -> Signkey.t
val get_signkeys : t -> Signkey.t list

val add_master_signatures :
  (module Pg.CONN) ->
  t ->
  (Crypto.EddsaPublicKey.t * Bin_sig.ExchangeSigningKeyValidity.t) list ->
  (unit, string) result

val init : (module Pg.CONN) -> t