mirror of
https://github.com/lowRISC/ibex.git
synced 2025-06-27 17:00:41 -04:00
Here's a high-level overview of what this commit does: - Compiles Sail into SystemVerilog including patchin compiler bugs - Create a TCL file that tells JasperGold what to prove and assume - Check memory operations modelling the LSU Most of these properties now prove without time-bound on the response from memory due to alternative LSUs - Check memory even with Smepmp errors: Continues on top of https://github.com/riscv/sail-riscv/pull/196 - CSR verification - Checks for instruction types such as B-Type, I-Type, R-Type - Check illegal instructions and WFI instructions - Using psgen language for proof generation - Documentation on how to use the setup - Wrap around proof that proves instructions executed in a row still match the specification. - Liveness proof to guarantee instructions will retire within a upper bound of cycles. All of these proofs make heavy use of the concept of k-induction. All the different properties and steps are necessary to help the tool get the useful properties it needs to prove the next step. The instruction correctness, wrap-around and liveness all give us increased confidence that Ibex is trace-equivalent to Sail. Throughout this process an issue was found in Ibex where the pipeline was not flushing properly on changing PMP registers using clear: #2193 Alternative LSUs: This makes all top level memory properties prove quickly and at a low proof effort (1 or 2-induction). Three 'alternative LSUs' representing three stages of memory instructions: 1. Before the first response is received, in the EX stage 2. After the first response is received, but not the second grant, also in the EX stage 3. Before the last response is received in the WB stage. In each case we ask 'if the response came now, would the result be correct?'. Similar is applied for CSRs/PC though less directly. This is particularly interesting (read: ugly) in the case of a PMP error wbexc_exists makes Wrap properties fast to prove. The bottleneck becomes SpecPastNoWbexcPC, which fails only due to a bug. See the comment in riscv.proof. Co-authored-by: Marno van der Maas <mvdmaas+git@lowrisc.org> Signed-off-by: Louis-Emile Ploix <louis-emile.ploix@lowrisc.org>
94 lines
3.2 KiB
Text
94 lines
3.2 KiB
Text
// Copyright lowRISC contributors.
|
|
// Copyright 2024 University of Oxford, see also CREDITS.md.
|
|
// Licensed under the Apache License, Version 2.0, see LICENSE for details.
|
|
// Original author: Louis-Emile Ploix
|
|
// SPDX-License-Identifier: Apache-2.0
|
|
|
|
/*
|
|
This file contains the main function which is 'invoked' by the SystemVerilog.
|
|
main is equivalent to the Sail step function, it has some differences however:
|
|
1. It uses the decompress function we added.
|
|
2. It can operate in one of three modes, based on what it has been told to do by the SV.
|
|
This is done for a couple of reasons:
|
|
1. It's difficult to compare IRQ handling, since ibex takes them later than the Sail would. This is OK since it's not really
|
|
fair to enforce that IRQs are handled between any two specific instructions, so long as it is eventually.
|
|
2. The three modes are a useful case analysis we can make. This means that to prove correctness of an I-Type instruction, for example, we
|
|
can more easily seperate out the check for instruction fetch correctness, which makes things faster and avoids repeated work.
|
|
*/
|
|
|
|
union FetchResult = {
|
|
F_Ext_Error : ext_fetch_addr_error, /* For extensions */
|
|
F_Base : word, /* Base ISA */
|
|
F_RVC : half, /* Compressed ISA */
|
|
F_Error : (ExceptionType, xlenbits) /* standard exception and PC */
|
|
}
|
|
|
|
function isRVC(h : bits(16)) -> bool = ~ (h[1 .. 0] == 0b11)
|
|
|
|
// modified version of what one can find in riscv_fetch.sail
|
|
val altFetch : (bits(16), bits(16)) -> FetchResult
|
|
function altFetch(ilo: bits(16), ihi: bits(16)) -> FetchResult =
|
|
match mem_read_i(Execute(), PC, if isRVC(ilo) then 2 else 4) {
|
|
MemException(a, e) => F_Error(e, a),
|
|
MemValue(()) => if isRVC(ilo) then F_RVC(ilo) else F_Base(ihi @ ilo)
|
|
}
|
|
|
|
|
|
enum MainMode = { MAIN_IDEX, MAIN_IFERR, MAIN_IRQ }
|
|
enum MainResult = { MAINRES_OK, MAINRES_IFERR_1, MAINRES_IFERR_2, MAINRES_NOIFERR, MAINRES_IRQ, MAINRES_NOIRQ }
|
|
|
|
function main(insn_bits, mode) : (bits(32), MainMode) -> MainResult = {
|
|
let insn = if isRVC(insn_bits[15..0]) then {
|
|
instbits = 0x0000 @ insn_bits[15..0];
|
|
encdec_compressed(insn_bits[15..0])
|
|
} else {
|
|
instbits = insn_bits;
|
|
encdec(insn_bits)
|
|
};
|
|
|
|
let irq = dispatchInterrupt(cur_privilege);
|
|
let f : FetchResult = altFetch(insn_bits[15..0], insn_bits[31..16]);
|
|
|
|
let res : MainResult = match mode {
|
|
MAIN_IDEX => {
|
|
match decompress(insn) {
|
|
Some(decompressed) => {
|
|
let _ = execute(decompressed);
|
|
},
|
|
None() => ()
|
|
};
|
|
|
|
match f {
|
|
F_Ext_Error(e) => MAINRES_IFERR_1,
|
|
F_Error(e, addr) => MAINRES_IFERR_2,
|
|
F_RVC(h) => MAINRES_OK,
|
|
F_Base(w) => MAINRES_OK
|
|
}
|
|
},
|
|
MAIN_IFERR => {
|
|
match f {
|
|
F_Ext_Error(e) => {
|
|
ext_handle_fetch_check_error(e);
|
|
MAINRES_OK
|
|
},
|
|
F_Error(e, addr) => {
|
|
handle_mem_exception(addr, e);
|
|
MAINRES_OK
|
|
},
|
|
F_RVC(h) => MAINRES_NOIFERR,
|
|
F_Base(w) => MAINRES_NOIFERR
|
|
}
|
|
},
|
|
MAIN_IRQ => {
|
|
match irq {
|
|
Some(intr, priv) => {
|
|
handle_interrupt(intr, priv);
|
|
MAINRES_OK
|
|
},
|
|
None() => MAINRES_NOIRQ
|
|
}
|
|
}
|
|
};
|
|
|
|
res
|
|
}
|