169 lines
6.6 KiB
C++
169 lines
6.6 KiB
C++
// -*- mode: C++; c-file-style: "cc-mode" -*-
|
|
//
|
|
// DESCRIPTION: Verilator: Verilog Test module
|
|
//
|
|
// This file ONLY is placed under the Creative Commons Public Domain.
|
|
// SPDX-FileCopyrightText: 2024 Wilson Snyder
|
|
// SPDX-License-Identifier: CC0-1.0
|
|
|
|
#include "verilated_cov.h"
|
|
#include <verilated.h>
|
|
#include VM_PREFIX_INCLUDE
|
|
|
|
// These require the above. Comment prevents clang-format moving them
|
|
#include "TestCheck.h"
|
|
|
|
unsigned int main_time = 0;
|
|
|
|
double sc_time_stamp() { return main_time; }
|
|
//======================================================================
|
|
|
|
int errors = 0;
|
|
|
|
void verilatedTest() {
|
|
const std::unique_ptr<VerilatedContext> contextp{new VerilatedContext};
|
|
// Assert enable/disable
|
|
contextp->assertOn(true);
|
|
TEST_CHECK_NZ(contextp->assertOn());
|
|
contextp->assertOn(false);
|
|
TEST_CHECK_Z(contextp->assertOn());
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 1));
|
|
|
|
// Setting one type
|
|
contextp->assertOnSet(1, 1);
|
|
TEST_CHECK_NZ(contextp->assertOnGet(1, 1));
|
|
TEST_CHECK_NZ(contextp->assertOn());
|
|
TEST_CHECK_Z(contextp->assertOnGet(2, 2));
|
|
|
|
// Setting types
|
|
contextp->assertOn(false);
|
|
contextp->assertOnSet(1, 3);
|
|
TEST_CHECK_NZ(contextp->assertOnGet(1, 3));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(1, 2));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(1, 1));
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 0));
|
|
TEST_CHECK_Z(contextp->assertOnGet(2, 0));
|
|
TEST_CHECK_Z(contextp->assertOnGet(0, 0));
|
|
|
|
// Setting multiple types separately
|
|
contextp->assertOn(false);
|
|
contextp->assertOnSet(0, 1);
|
|
contextp->assertOnSet(1, 2);
|
|
contextp->assertOnSet(2, 3);
|
|
TEST_CHECK_NZ(contextp->assertOn());
|
|
TEST_CHECK_Z(contextp->assertOnGet(0, 1));
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 1));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(1, 2));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(2, 1));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(2, 2));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(2, 3));
|
|
TEST_CHECK_Z(contextp->assertOnGet(0, 2));
|
|
TEST_CHECK_Z(contextp->assertOnGet(4, 1));
|
|
TEST_CHECK_Z(contextp->assertOnGet(8, 7));
|
|
|
|
// Clearing selected types
|
|
contextp->assertOn(true);
|
|
contextp->assertOnClear(1, 3);
|
|
contextp->assertOnClear(1, 4);
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 1));
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 2));
|
|
TEST_CHECK_Z(contextp->assertOnGet(1, 4));
|
|
contextp->assertOnClear(4, 4);
|
|
TEST_CHECK_Z(contextp->assertOnGet(4, 4));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(4, 1));
|
|
TEST_CHECK_NZ(contextp->assertOnGet(4, 2));
|
|
TEST_CHECK_NZ(contextp->assertOn());
|
|
|
|
// Clearing all assert types
|
|
contextp->assertOn(true);
|
|
contextp->assertOnClear(255, 7);
|
|
// Everything is disabled except internal asserts
|
|
TEST_CHECK_NZ(contextp->assertOn());
|
|
contextp->assertOn(false);
|
|
// Now everything is disabled
|
|
TEST_CHECK_Z(contextp->assertOn());
|
|
|
|
// Unified runtime query getter
|
|
using Query = VerilatedAssertCtlQuery;
|
|
constexpr uint32_t LOCK = 1;
|
|
constexpr uint32_t UNLOCK = 2;
|
|
constexpr uint32_t ON = 3;
|
|
constexpr uint32_t OFF = 4;
|
|
constexpr uint32_t KILL = 5;
|
|
constexpr uint32_t PASS_ON = 6;
|
|
constexpr uint32_t PASS_OFF = 7;
|
|
constexpr uint32_t FAIL_ON = 8;
|
|
constexpr uint32_t FAIL_OFF = 9;
|
|
constexpr uint32_t NONVACUOUS_ON = 10;
|
|
constexpr uint32_t VACUOUS_OFF = 11;
|
|
constexpr uint32_t TYPE = 1;
|
|
constexpr uint32_t DIRECTIVE = 1;
|
|
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_ON, TYPE, DIRECTIVE));
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_ON, 0, DIRECTIVE));
|
|
|
|
contextp->assertCtl(LOCK, TYPE, DIRECTIVE);
|
|
contextp->assertCtl(ON, TYPE, DIRECTIVE);
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_ON, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(UNLOCK, TYPE, DIRECTIVE);
|
|
contextp->assertCtl(ON, TYPE, DIRECTIVE);
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_ON, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(OFF, TYPE, DIRECTIVE);
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_ON, TYPE, DIRECTIVE));
|
|
|
|
const uint32_t killBefore = contextp->assertCtlGet(Query::ASSERT_CTL_KILL, TYPE, DIRECTIVE);
|
|
contextp->assertCtl(KILL, TYPE, DIRECTIVE);
|
|
TEST_CHECK_EQ(contextp->assertCtlGet(Query::ASSERT_CTL_KILL, TYPE, DIRECTIVE), killBefore + 1);
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_ON, TYPE, DIRECTIVE));
|
|
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_NONVACUOUS, TYPE, DIRECTIVE));
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_VACUOUS, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(PASS_OFF, TYPE, DIRECTIVE);
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_NONVACUOUS, TYPE, DIRECTIVE));
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_VACUOUS, TYPE, DIRECTIVE));
|
|
|
|
contextp->assertCtl(NONVACUOUS_ON, TYPE, DIRECTIVE);
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_NONVACUOUS, TYPE, DIRECTIVE));
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_VACUOUS, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(PASS_ON, TYPE, DIRECTIVE);
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_NONVACUOUS, TYPE, DIRECTIVE));
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_VACUOUS, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(VACUOUS_OFF, TYPE, DIRECTIVE);
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_NONVACUOUS, TYPE, DIRECTIVE));
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_PASS_ON_VACUOUS, TYPE, DIRECTIVE));
|
|
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_FAIL_ON, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(FAIL_OFF, TYPE, DIRECTIVE);
|
|
TEST_CHECK_Z(contextp->assertCtlGet(Query::ASSERT_CTL_FAIL_ON, TYPE, DIRECTIVE));
|
|
contextp->assertCtl(FAIL_ON, TYPE, DIRECTIVE);
|
|
TEST_CHECK_NZ(contextp->assertCtlGet(Query::ASSERT_CTL_FAIL_ON, TYPE, DIRECTIVE));
|
|
}
|
|
int main(int argc, char** argv) {
|
|
verilatedTest();
|
|
if (errors) return 10;
|
|
|
|
const std::unique_ptr<VerilatedContext> contextp{new VerilatedContext};
|
|
contextp->threads(1);
|
|
contextp->commandArgs(argc, argv);
|
|
contextp->debug(0);
|
|
|
|
srand48(5);
|
|
|
|
const std::unique_ptr<VM_PREFIX> topp{new VM_PREFIX{"top"}};
|
|
constexpr uint64_t sim_time = 100;
|
|
while ((contextp->time() < sim_time) && !contextp->gotFinish()) {
|
|
topp->clk = !topp->clk;
|
|
topp->eval();
|
|
contextp->timeInc(1);
|
|
}
|
|
const std::string filename = std::string{VL_STRINGIFY(TEST_OBJ_DIR) "/coverage.dat"};
|
|
contextp->coveragep()->write(filename);
|
|
|
|
if (!contextp->gotFinish()) {
|
|
vl_fatal(__FILE__, __LINE__, "main", "%Error: Timeout; never got a $finish");
|
|
}
|
|
topp->final();
|
|
|
|
return 0;
|
|
}
|