tezos-baking-015-PtLimaPt 16.1 (latest)

type state = {

cctxt : Tezos_client_015_PtLimaPt.Protocol_client_context.full;
chain : Tezos_shell_services.Chain_services.chain;
constants : Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Constants.t;
config : Baking_configuration.nonce_config;
nonces_location : [ `Nonce ] Baking_files.location;
mutable last_predecessor : Tezos_base.TzPervasives.Block_hash.t;

}

type t = state

type nonces =
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t

val empty : 
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t

val encoding : 
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t
    Tezos_base.TzPervasives.Data_encoding.t

val load : 
  Tezos_client_base.Client_context.wallet ->
  [< `Highwatermarks | `Nonce | `State ] Baking_files.location ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val save : 
  Tezos_client_base.Client_context.wallet ->
  [< `Highwatermarks | `Nonce | `State ] Baking_files.location ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val mem : 
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  Tezos_base.TzPervasives.Block_hash.t ->
  bool

val find_opt : 
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  Tezos_base.TzPervasives.Block_hash.t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t option

val get_block_level_opt : 
  Tezos_rpc.Context.simple ->
  chain:Tezos_shell_services.Block_services.chain ->
  block:Tezos_shell_services.Block_services.block ->
  int32 option Lwt.t

val get_outdated_nonces : 
  t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  (Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
     Tezos_base.TzPervasives.Block_hash.Map.t
   * Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
       Tezos_base.TzPervasives.Block_hash.Map.t)
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val filter_outdated_nonces : 
  t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val blocks_from_current_cycle : 
  t ->
  Tezos_shell_services.Block_services.block ->
  ?offset:int32 ->
  unit ->
  Tezos_base.TzPervasives.Block_hash.t list Tezos_base.TzPervasives.tzresult
    Lwt.t

val get_unrevealed_nonces : 
  t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t
    Tezos_base.TzPervasives.Block_hash.Map.t ->
  (Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Raw_level.t
   * Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t)
    list
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val generate_seed_nonce : 
  Baking_configuration.nonce_config ->
  Baking_state.consensus_key ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Raw_level.t ->
  (Tezos_protocol_015_PtLimaPt.Protocol.Nonce_hash.t
   * Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t)
    Tezos_base.TzPervasives.tzresult
    Lwt.t

val register_nonce : 
  Tezos_client_015_PtLimaPt.Protocol_client_context.full ->
  chain_id:Tezos_base.TzPervasives.Chain_id.t ->
  Tezos_base.TzPervasives.Block_hash.t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val inject_seed_nonce_revelation : 
  Tezos_client_015_PtLimaPt.Protocol_client_context.full ->
  chain:Tezos_shell_services.Chain_services.chain ->
  block:Tezos_shell_services.Block_services.block ->
  branch:Tezos_base.TzPervasives.Block_hash.t ->
  (Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Raw_level.t
   * Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Nonce.t)
    list ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val reveal_potential_nonces : 
  t ->
  Baking_state.proposal ->
  unit Tezos_base.TzPervasives.tzresult Lwt.t

val start_revelation_worker : 
  Tezos_client_015_PtLimaPt.Protocol_client_context.full ->
  Baking_configuration.nonce_config ->
  Tezos_base.TzPervasives.Chain_id.t ->
  Tezos_protocol_015_PtLimaPt.Protocol.Alpha_context.Constants.t ->
  Baking_state.proposal Lwt_stream.t ->
  Lwt_canceler.t Lwt.t

package tezos-baking-015-PtLimaPt