Subversion Repositories riscv_vhdl

/**
 * @file
 * @copyright  Copyright 2016 GNSS Sensor Ltd. All right reserved.
 * @author     Sergey Khabarov - sergeykhbr@gmail.com
 * @brief      Run simulation.
 */
 
#include "cmd_run.h"
 
namespace debugger {
 
CmdRun::CmdRun(ITap *tap, ISocInfo *info) 
    : ICommand ("run", tap, info) {
 
    briefDescr_.make_string("Run simulation for a specify number of steps\"");
    detailedDescr_.make_string(
        "Description:\n"
        "    Run simulation for a specified number of steps.\n"
        "Usage:\n"
        "    run <N steps>\n"
        "Example:\n"
        "    run\n"
        "    go 1000\n"
        "    c 1\n");
}
 
 
bool CmdRun::isValid(AttributeType *args) {
    AttributeType &name = (*args)[0u];
    if ((name.is_equal("run") || name.is_equal("c") || name.is_equal("go"))
     && (args->size() == 1 || args->size() == 2)) {
        return CMD_VALID;
    }
    return CMD_INVALID;
}
 
void CmdRun::exec(AttributeType *args, AttributeType *res) {
    res->make_nil();
    if (!isValid(args)) {
        generateError(res, "Wrong argument list");
        return;
    }
    DsuMapType *dsu = info_->getpDsu();
    Reg64Type runctrl;
    uint64_t addr_run_ctrl = reinterpret_cast<uint64_t>(&dsu->udbg.v.control);
    uint64_t addr_step_cnt = 
        reinterpret_cast<uint64_t>(&dsu->udbg.v.stepping_mode_steps);
 
    if (args->size() == 1) {
        runctrl.val = 0;
        tap_->write(addr_run_ctrl, 8, runctrl.buf);
    } else if (args->size() == 2) {
        runctrl.val = (*args)[1].to_uint64();
        tap_->write(addr_step_cnt, 8, runctrl.buf);
 
        GenericCpuControlType ctrl;
        ctrl.val = 0;
        ctrl.bits.stepping = 1;
        runctrl.val = ctrl.val;
        tap_->write(addr_run_ctrl, 8, runctrl.buf);
    }
}
 
}  // namespace debugger