tezos-protocol-011-PtHangz2 20.1

This module implements the gas subsystem of the context.

Gas reflects the computational cost of each operation to limit the cost of operations and, by extension, the cost of blocks.

There are two gas quotas: one for operation and one for block. For this reason, we maintain two gas levels -- one for operations and another one for blocks -- that correspond to the remaining amounts of gas, initialized with the quota limits and decreased each time gas is consumed.

module Arith : 
  Fixed_point_repr.Safe
    with type 'a t = Saturation_repr.may_saturate Saturation_repr.t

type t = private

| Unaccounted
| Limited of {
1. remaining : Arith.fp;
}

For maintenance operations or for testing, gas can be Unaccounted. Otherwise, the computation is Limited by the remaining gas in the context.

val encoding : t Tezos_protocol_environment_011_PtHangz2.Data_encoding.encoding

val pp : Tezos_protocol_environment_011_PtHangz2.Format.formatter -> t -> unit

val check_limit_is_valid : 
  context ->
  'a Arith.t ->
  unit Tezos_protocol_environment_011_PtHangz2.Error_monad.tzresult

check_limit_is_valid ctxt limit checks that the given gas limit is well-formed, i.e., it does not exceed the hard gas limit per operation as defined in ctxt and it is positive.

val set_limit : context -> 'a Arith.t -> context

set_limit ctxt limit returns a context with a given limit level of gas allocated for an operation.

val set_unlimited : context -> context

set_unlimited allows unlimited gas consumption.

val remaining_operation_gas : context -> Arith.fp

remaining_operation_gas ctxt returns the current gas level in the context ctxt for the current operation. If gas is Unaccounted, an arbitrary value will be returned.

val level : context -> t

level ctxt is the current gas level in ctxt for the current operation.

val update_remaining_operation_gas : context -> Arith.fp -> context

update_remaining_operation_gas ctxt remaining sets the current gas level for operations to remaining.

val gas_exhausted_error : 
  context ->
  'a Tezos_protocol_environment_011_PtHangz2.Error_monad.tzresult

gas_exhausted_error ctxt raises an error indicating the gas has been exhausted.

val consumed : since:context -> until:context -> Arith.fp

consumed since until is the operation gas level difference between context since and context until. This function returns Arith.zero if any of the two contexts allows for an unlimited gas consumption. This function also returns Arith.zero if since has less gas than until.

val block_level : context -> Arith.fp

block_level ctxt returns the block gas level in context ctxt.

type cost = Saturation_repr.may_saturate Saturation_repr.t

Costs are computed using a saturating arithmetic. See Saturation_repr.

val cost_encoding : 
  cost Tezos_protocol_environment_011_PtHangz2.Data_encoding.encoding

val pp_cost : 
  Tezos_protocol_environment_011_PtHangz2.Format.formatter ->
  cost ->
  unit

val consume : 
  context ->
  cost ->
  context Tezos_protocol_environment_011_PtHangz2.Error_monad.tzresult

consume ctxt cost subtracts cost to the current operation gas level in ctxt. This operation may fail with Operation_quota_exceeded if the operation gas level would go below zero.

type Tezos_protocol_environment_011_PtHangz2.Error_monad.error +=

| Operation_quota_exceeded

val consume_limit_in_block : 
  context ->
  'a Arith.t ->
  context Tezos_protocol_environment_011_PtHangz2.Error_monad.tzresult

consume_limit_in_block ctxt limit consumes limit in the current block gas level of the context. This operation may fail with error Block_quota_exceeded if not enough gas remains in the block. This operation may also fail with Gas_limit_too_high if limit is greater than the allowed limit for operation gas level.

type Tezos_protocol_environment_011_PtHangz2.Error_monad.error +=

| Block_quota_exceeded

type Tezos_protocol_environment_011_PtHangz2.Error_monad.error +=

| Gas_limit_too_high

val free : cost

The cost of free operation is 0.

val atomic_step_cost : _ Saturation_repr.t -> cost

atomic_step_cost x corresponds to x milliunit of gas.

val step_cost : _ Saturation_repr.t -> cost

step_cost x corresponds to x units of gas.

val alloc_cost : _ Saturation_repr.t -> cost

Cost of allocating qwords of storage. alloc_cost n estimates the cost of allocating n qwords of storage.

val alloc_bytes_cost : int -> cost

Cost of allocating bytes in the storage. alloc_bytes_cost b estimates the cost of allocating b bytes of storage.

val alloc_mbytes_cost : int -> cost

Cost of allocating bytes in the storage.

alloc_mbytes_cost b estimates the cost of allocating b bytes of storage and the cost of an header to describe these bytes.

val read_bytes_cost : int -> cost

Cost of reading the storage. read_bytes_cost n estimates the cost of reading n bytes of storage.

val write_bytes_cost : int -> cost

Cost of writing to storage. write_bytes_const n estimates the cost of writing n bytes to the storage.

val (*@) : _ Saturation_repr.t -> cost -> cost

Multiply a cost by a factor. Both arguments are saturated arithmetic values, so no negative numbers are involved.

val (+@) : cost -> cost -> cost

Add two costs together.

val cost_of_repr : Gas_limit_repr.cost -> cost

cost_of_repr is an internal operation needed to inject costs for Storage_costs into Gas.cost.

package tezos-protocol-011-PtHangz2