Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source
Source file dal_errors_repr.ml
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248(*****************************************************************************)(* *)(* Open Source License *)(* Copyright (c) 2022 Trili Tech <contact@trili.tech> *)(* *)(* Permission is hereby granted, free of charge, to any person obtaining a *)(* copy of this software and associated documentation files (the "Software"),*)(* to deal in the Software without restriction, including without limitation *)(* the rights to use, copy, modify, merge, publish, distribute, sublicense, *)(* and/or sell copies of the Software, and to permit persons to whom the *)(* Software is furnished to do so, subject to the following conditions: *)(* *)(* The above copyright notice and this permission notice shall be included *)(* in all copies or substantial portions of the Software. *)(* *)(* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR*)(* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, *)(* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL *)(* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER*)(* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING *)(* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER *)(* DEALINGS IN THE SOFTWARE. *)(* *)(*****************************************************************************)typeerror+=|Dal_feature_disabled|Dal_slot_index_above_hard_limitof{given:int;limit:int}|Dal_publish_commitment_invalid_indexof{given:Dal_slot_index_repr.t;maximum:Dal_slot_index_repr.t;}|Dal_publish_commitment_candidate_with_low_feesof{proposed_fees:Tez_repr.t;}|Dal_attestation_size_limit_exceededof{maximum_size:int;got:int}|Dal_publish_commitment_duplicateof{slot_header:Dal_slot_repr.Header.t}|Dal_publish_commitment_invalid_proofof{commitment:Dal.commitment;commitment_proof:Dal.commitment_proof;}|Dal_data_availibility_attester_not_in_committeeof{attester:Signature.Public_key_hash.t;level:Raw_level_repr.t;slot:Slot_repr.t;}|Dal_cryptobox_errorof{explanation:string}|Dal_register_invalid_slot_headerof{length:int;slot_header:Dal_slot_repr.Header.t;}let()=letopenData_encodinginletdescription="Data-availability layer will be enabled in a future proposal."inregister_error_kind`Permanent~id:"operation.dal_disabled"~title:"DAL is disabled"~description~pp:(funppf()->Format.fprintfppf"%s"description)Data_encoding.unit(functionDal_feature_disabled->Some()|_->None)(fun()->Dal_feature_disabled);letdescription="Slot index above hard limit"inregister_error_kind`Permanent~id:"dal_slot_index_negative_orabove_hard_limit"~title:"DAL slot index negative or above hard limit"~description~pp:(funppf(given,limit)->Format.fprintfppf"%s (given %Ld): Maximum allowed %Ld."descriptiongivenlimit)(obj2(req"given"Data_encoding.int64)(req"limit"Data_encoding.int64))(function|Dal_slot_index_above_hard_limit{given;limit}->Some(Int64.of_intgiven,Int64.of_intlimit)|_->None)(fun(given,limit)->Dal_slot_index_above_hard_limit{given=Int64.to_intgiven;limit=Int64.to_intlimit});letdescription="Bad index for slot header"inregister_error_kind`Permanent~id:"dal_publish_commitment_invalid_index"~title:"DAL slot header invalid index"~description~pp:(funppf(given,maximum)->Format.fprintfppf"%s: Given %a. Maximum %a."descriptionDal_slot_index_repr.ppgivenDal_slot_index_repr.ppmaximum)(obj2(req"given"Dal_slot_index_repr.encoding)(req"got"Dal_slot_index_repr.encoding))(function|Dal_publish_commitment_invalid_index{given;maximum}->Some(given,maximum)|_->None)(fun(given,maximum)->Dal_publish_commitment_invalid_index{given;maximum});(* DAL/FIXME https://gitlab.com/tezos/tezos/-/issues/3114
Better error message *)letdescription="Slot header with too low fees"inregister_error_kind`Permanent~id:"dal_publish_commitment_with_low_fees"~title:"DAL slot header with low fees"~description~pp:(funppfproposed->Format.fprintfppf"%s: Proposed fees %a."descriptionTez_repr.ppproposed)(obj1(req"proposed"Tez_repr.encoding))(function|Dal_publish_commitment_candidate_with_low_fees{proposed_fees}->Someproposed_fees|_->None)(funproposed_fees->Dal_publish_commitment_candidate_with_low_fees{proposed_fees});letdescription="The attestation for data availability is a too big"inregister_error_kind`Permanent~id:"dal_attestation_size_limit_exceeded"~title:"DAL attestation exceeded the limit"~description~pp:(funppf(maximum_size,got)->Format.fprintfppf"%s: Maximum is %d. Got %d."descriptionmaximum_sizegot)(obj2(req"maximum_size"int31)(req"got"int31))(function|Dal_attestation_size_limit_exceeded{maximum_size;got}->Some(maximum_size,got)|_->None)(fun(maximum_size,got)->Dal_attestation_size_limit_exceeded{maximum_size;got});(* DAL/FIXME https://gitlab.com/tezos/tezos/-/issues/3114
Better error message. *)letdescription="A slot header for this slot was already proposed"inregister_error_kind`Permanent~id:"dal_publish_commitment_duplicate"~title:"DAL publish slot header duplicate"~description~pp:(funppf_proposed->Format.fprintfppf"%s"description)(obj1(req"proposed"Dal_slot_repr.Header.encoding))(function|Dal_publish_commitment_duplicate{slot_header}->Someslot_header|_->None)(funslot_header->Dal_publish_commitment_duplicate{slot_header});letdescription="The slot header's commitment proof does not check"inregister_error_kind`Permanent~id:"dal_publish_commitment_invalid_proof"~title:"DAL publish slot header invalid proof"~description~pp:(funppf_proposed->Format.fprintfppf"%s"description)(obj2(req"commitment"Dal.Commitment.encoding)(req"commitment_proof"Dal.Commitment_proof.encoding))(function|Dal_publish_commitment_invalid_proof{commitment;commitment_proof}->Some(commitment,commitment_proof)|_->None)(fun(commitment,commitment_proof)->Dal_publish_commitment_invalid_proof{commitment;commitment_proof});register_error_kind`Permanent~id:"Dal_data_availibility_attester_not_in_committee"~title:"The attester is not part of the DAL committee for this level"~description:"The attester is not part of the DAL committee for this level"~pp:(funppf(attester,level,slot)->Format.fprintfppf"The attester %a, with slot %a, is not part of the DAL committee for \
the level %a."Signature.Public_key_hash.ppattesterSlot_repr.ppslotRaw_level_repr.pplevel)Data_encoding.(obj3(req"attester"Signature.Public_key_hash.encoding)(req"level"Raw_level_repr.encoding)(req"slot"Slot_repr.encoding))(function|Dal_data_availibility_attester_not_in_committee{attester;level;slot}->Some(attester,level,slot)|_->None)(fun(attester,level,slot)->Dal_data_availibility_attester_not_in_committee{attester;level;slot});register_error_kind`Permanent~id:"dal_cryptobox_error"~title:"DAL cryptobox error"~description:"Error occurred while initialising the cryptobox"~pp:(funppfe->Format.fprintfppf"DAL cryptobox initialisation error: %s"e)(obj1(req"error"(stringPlain)))(function|Dal_cryptobox_error{explanation}->Someexplanation|_->None)(funexplanation->Dal_cryptobox_error{explanation});register_error_kind`Permanent~id:"dal_register_invalid_slot"~title:"Dal register invalid slot"~description:"Attempt to register a slot which is invalid (the index is out of \
bounds)."~pp:(funppf(length,slot)->Format.fprintfppf"The slot provided is invalid. Slot index should be between 0 and %d. \
Found: %a."lengthDal_slot_index_repr.ppslot.Dal_slot_repr.Header.id.index)Data_encoding.(obj2(req"length"int31)(req"slot_header"Dal_slot_repr.Header.encoding))(function|Dal_register_invalid_slot_header{length;slot_header}->Some(length,slot_header)|_->None)(fun(length,slot_header)->Dal_register_invalid_slot_header{length;slot_header})