+// See LICENSE for license details.
+
#include "sim.h"
-#include "applink.h"
-#include "common.h"
-#include <sys/mman.h>
+#include "mmu.h"
+#include "dts.h"
+#include "remote_bitbang.h"
#include <map>
#include <iostream>
+#include <sstream>
#include <climits>
+#include <cstdlib>
+#include <cassert>
+#include <signal.h>
+#include <unistd.h>
+#include <sys/wait.h>
+#include <sys/types.h>
-sim_t::sim_t(int _nprocs, size_t _memsz, appserver_link_t* _applink, icsim_t* default_icache, icsim_t* default_dcache)
- : applink(_applink),
- memsz(_memsz),
- mem((char*)mmap64(NULL, memsz, PROT_WRITE, MAP_PRIVATE | MAP_ANON, -1, 0)),
- procs(std::vector<processor_t>(_nprocs,processor_t(this,mem,memsz)))
+volatile bool ctrlc_pressed = false;
+static void handle_signal(int sig)
{
- demand(mem != MAP_FAILED, "couldn't allocate target machine's memory");
-
- for(int i = 0; i < (int)num_cores(); i++)
- procs[i].init(i, default_icache, default_dcache);
-
- applink->init(this);
+ if (ctrlc_pressed)
+ exit(-1);
+ ctrlc_pressed = true;
+ signal(sig, &handle_signal);
}
-sim_t::~sim_t()
+sim_t::sim_t(const char* isa, size_t nprocs, bool halted, reg_t start_pc,
+ std::vector<std::pair<reg_t, mem_t*>> mems,
+ const std::vector<std::string>& args,
+ std::vector<int> const hartids, unsigned progsize,
+ unsigned max_bus_master_bits, bool require_authentication)
+ : htif_t(args), mems(mems), procs(std::max(nprocs, size_t(1))),
+ start_pc(start_pc), current_step(0), current_proc(0), debug(false),
+ remote_bitbang(NULL),
+ debug_module(this, progsize, max_bus_master_bits, require_authentication)
{
-}
+ signal(SIGINT, &handle_signal);
-void sim_t::set_tohost(reg_t val)
-{
- fromhost = 0;
- tohost = val;
- applink->wait_for_tohost();
+ for (auto& x : mems)
+ bus.add_device(x.first, x.second);
+
+ debug_module.add_device(&bus);
+
+ debug_mmu = new mmu_t(this, NULL);
+
+ if (hartids.size() == 0) {
+ for (size_t i = 0; i < procs.size(); i++) {
+ procs[i] = new processor_t(isa, this, i, halted);
+ }
+ }
+ else {
+ if (hartids.size() != procs.size()) {
+ std::cerr << "Number of specified hartids doesn't match number of processors" << strerror(errno) << std::endl;
+ exit(1);
+ }
+ for (size_t i = 0; i < procs.size(); i++) {
+ procs[i] = new processor_t(isa, this, hartids[i], halted);
+ }
+ }
+
+ clint.reset(new clint_t(procs));
+ bus.add_device(CLINT_BASE, clint.get());
}
-reg_t sim_t::get_fromhost()
+sim_t::~sim_t()
{
- applink->wait_for_fromhost();
- return fromhost;
+ for (size_t i = 0; i < procs.size(); i++)
+ delete procs[i];
+ delete debug_mmu;
}
-void sim_t::send_ipi(reg_t who)
+void sim_thread_main(void* arg)
{
- if(who < num_cores())
- procs[who].deliver_ipi();
+ ((sim_t*)arg)->main();
}
-void sim_t::run(bool debug)
+void sim_t::main()
{
- applink->wait_for_start();
-
- // start core 0
- send_ipi(0);
+ if (!debug && log)
+ set_procs_debug(true);
- while(1)
+ while (!done())
{
- if(!debug)
- step_all(100,100,false);
+ if (debug || ctrlc_pressed)
+ interactive();
else
- {
- putchar(':');
- char s[128];
- std::cin.getline(s,sizeof(s)-1);
-
- char* p = strtok(s," ");
- if(!p)
- {
- interactive_run_noisy(std::string("r"), std::vector<std::string>(1,"1"));
- continue;
- }
- std::string cmd = p;
-
- std::vector<std::string> args;
- while((p = strtok(NULL," ")))
- args.push_back(p);
-
-
- typedef void (sim_t::*interactive_func)(const std::string&, const std::vector<std::string>&);
- std::map<std::string,interactive_func> funcs;
-
- funcs["r"] = &sim_t::interactive_run_noisy;
- funcs["rs"] = &sim_t::interactive_run_silent;
- funcs["rp"] = &sim_t::interactive_run_proc_noisy;
- funcs["rps"] = &sim_t::interactive_run_proc_silent;
- funcs["reg"] = &sim_t::interactive_reg;
- funcs["fregs"] = &sim_t::interactive_fregs;
- funcs["fregd"] = &sim_t::interactive_fregd;
- funcs["mem"] = &sim_t::interactive_mem;
- funcs["str"] = &sim_t::interactive_str;
- funcs["until"] = &sim_t::interactive_until;
- funcs["while"] = &sim_t::interactive_until;
- funcs["q"] = &sim_t::interactive_quit;
-
- try
- {
- if(funcs.count(cmd))
- (this->*funcs[cmd])(cmd, args);
- }
- catch(trap_t t) {}
+ step(INTERLEAVE);
+ if (remote_bitbang) {
+ remote_bitbang->tick();
}
}
}
-void sim_t::step_all(size_t n, size_t interleave, bool noisy)
+int sim_t::run()
{
- for(size_t j = 0; j < n; j+=interleave)
- for(int i = 0; i < (int)num_cores(); i++)
- procs[i].step(interleave,noisy);
+ host = context_t::current();
+ target.init(sim_thread_main, this);
+ return htif_t::run();
}
-void sim_t::interactive_run_noisy(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::step(size_t n)
{
- interactive_run(cmd,args,true);
-}
+ for (size_t i = 0, steps = 0; i < n; i += steps)
+ {
+ steps = std::min(n - i, INTERLEAVE - current_step);
+ procs[current_proc]->step(steps);
-void sim_t::interactive_run_silent(const std::string& cmd, const std::vector<std::string>& args)
-{
- interactive_run(cmd,args,false);
-}
+ current_step += steps;
+ if (current_step == INTERLEAVE)
+ {
+ current_step = 0;
+ procs[current_proc]->yield_load_reservation();
+ if (++current_proc == procs.size()) {
+ current_proc = 0;
+ clint->increment(INTERLEAVE / INSNS_PER_RTC_TICK);
+ }
-void sim_t::interactive_run(const std::string& cmd, const std::vector<std::string>& args, bool noisy)
-{
- if(args.size())
- step_all(atoll(args[0].c_str()),1,noisy);
- else
- while(1) step_all(1,1,noisy);
+ host->switch_to();
+ }
+ }
}
-void sim_t::interactive_run_proc_noisy(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_debug(bool value)
{
- interactive_run_proc(cmd,args,true);
+ debug = value;
}
-void sim_t::interactive_run_proc_silent(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_log(bool value)
{
- interactive_run_proc(cmd,args,false);
+ log = value;
}
-void sim_t::interactive_run_proc(const std::string& cmd, const std::vector<std::string>& a, bool noisy)
+void sim_t::set_histogram(bool value)
{
- if(a.size() == 0)
- return;
-
- int p = atoi(a[0].c_str());
- if(p >= (int)num_cores())
- return;
-
- if(a.size() == 2)
- procs[p].step(atoi(a[1].c_str()),noisy);
- else
- while(1) procs[p].step(1,noisy);
+ histogram_enabled = value;
+ for (size_t i = 0; i < procs.size(); i++) {
+ procs[i]->set_histogram(histogram_enabled);
+ }
}
-void sim_t::interactive_quit(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::set_procs_debug(bool value)
{
- throw quit_sim();
+ for (size_t i=0; i< procs.size(); i++)
+ procs[i]->set_debug(value);
}
-reg_t sim_t::get_pc(const std::vector<std::string>& args)
+bool sim_t::mmio_load(reg_t addr, size_t len, uint8_t* bytes)
{
- if(args.size() != 1)
- throw trap_illegal_instruction;
-
- int p = atoi(args[0].c_str());
- if(p >= (int)num_cores())
- throw trap_illegal_instruction;
-
- return procs[p].pc;
+ if (addr + len < addr)
+ return false;
+ return bus.load(addr, len, bytes);
}
-reg_t sim_t::get_reg(const std::vector<std::string>& args)
+bool sim_t::mmio_store(reg_t addr, size_t len, const uint8_t* bytes)
{
- if(args.size() != 2)
- throw trap_illegal_instruction;
-
- int p = atoi(args[0].c_str());
- int r = atoi(args[1].c_str());
- if(p >= (int)num_cores() || r >= NXPR)
- throw trap_illegal_instruction;
-
- return procs[p].XPR[r];
+ if (addr + len < addr)
+ return false;
+ return bus.store(addr, len, bytes);
}
-reg_t sim_t::get_freg(const std::vector<std::string>& args)
+void sim_t::make_dtb()
{
- if(args.size() != 2)
- throw trap_illegal_instruction;
+ const int reset_vec_size = 8;
- int p = atoi(args[0].c_str());
- int r = atoi(args[1].c_str());
- if(p >= (int)num_cores() || r >= NFPR)
- throw trap_illegal_instruction;
+ start_pc = start_pc == reg_t(-1) ? get_entry_point() : start_pc;
- return procs[p].FPR[r];
-}
+ uint32_t reset_vec[reset_vec_size] = {
+ 0x297, // auipc t0,0x0
+ 0x28593 + (reset_vec_size * 4 << 20), // addi a1, t0, &dtb
+ 0xf1402573, // csrr a0, mhartid
+ get_core(0)->get_xlen() == 32 ?
+ 0x0182a283u : // lw t0,24(t0)
+ 0x0182b283u, // ld t0,24(t0)
+ 0x28067, // jr t0
+ 0,
+ (uint32_t) (start_pc & 0xffffffff),
+ (uint32_t) (start_pc >> 32)
+ };
-reg_t sim_t::get_tohost(const std::vector<std::string>& args)
-{
- if(args.size() != 1)
- throw trap_illegal_instruction;
+ std::vector<char> rom((char*)reset_vec, (char*)reset_vec + sizeof(reset_vec));
- int p = atoi(args[0].c_str());
- if(p >= (int)num_cores())
- throw trap_illegal_instruction;
+ dts = make_dts(INSNS_PER_RTC_TICK, CPU_HZ, procs, mems);
+ std::string dtb = dts_compile(dts);
- return procs[p].tohost;
-}
+ rom.insert(rom.end(), dtb.begin(), dtb.end());
+ const int align = 0x1000;
+ rom.resize((rom.size() + align - 1) / align * align);
-void sim_t::interactive_reg(const std::string& cmd, const std::vector<std::string>& args)
-{
- printf("0x%016llx\n",(unsigned long long)get_reg(args));
+ boot_rom.reset(new rom_device_t(rom));
+ bus.add_device(DEFAULT_RSTVEC, boot_rom.get());
}
-union fpr
-{
- reg_t r;
- float s;
- double d;
-};
-
-void sim_t::interactive_fregs(const std::string& cmd, const std::vector<std::string>& args)
-{
- fpr f;
- f.r = get_freg(args);
- printf("%g\n",f.s);
+char* sim_t::addr_to_mem(reg_t addr) {
+ auto desc = bus.find_device(addr);
+ if (auto mem = dynamic_cast<mem_t*>(desc.second))
+ if (addr - desc.first < mem->size())
+ return mem->contents() + (addr - desc.first);
+ return NULL;
}
-void sim_t::interactive_fregd(const std::string& cmd, const std::vector<std::string>& args)
+// htif
+
+void sim_t::reset()
{
- fpr f;
- f.r = get_freg(args);
- printf("%g\n",f.d);
+ make_dtb();
}
-reg_t sim_t::get_mem(const std::vector<std::string>& args)
+void sim_t::idle()
{
- if(args.size() != 1 && args.size() != 2)
- throw trap_illegal_instruction;
-
- std::string addr_str = args[0];
- mmu_t mmu(mem, memsz);
- mmu.set_supervisor(true);
- if(args.size() == 2)
- {
- int p = atoi(args[0].c_str());
- if(p >= (int)num_cores())
- throw trap_illegal_instruction;
- mmu.set_vm_enabled(!!(procs[p].sr & SR_VM));
- mmu.set_ptbr(procs[p].mmu.get_ptbr());
- addr_str = args[1];
- }
-
- reg_t addr = strtol(addr_str.c_str(),NULL,16), val;
- if(addr == LONG_MAX)
- addr = strtoul(addr_str.c_str(),NULL,16);
-
- switch(addr % 8)
- {
- case 0:
- val = mmu.load_uint64(addr);
- break;
- case 4:
- val = mmu.load_uint32(addr);
- break;
- case 2:
- case 6:
- val = mmu.load_uint16(addr);
- break;
- default:
- val = mmu.load_uint8(addr);
- break;
- }
- return val;
+ target.switch_to();
}
-void sim_t::interactive_mem(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::read_chunk(addr_t taddr, size_t len, void* dst)
{
- printf("0x%016llx\n",(unsigned long long)get_mem(args));
+ assert(len == 8);
+ auto data = debug_mmu->load_uint64(taddr);
+ memcpy(dst, &data, sizeof data);
}
-void sim_t::interactive_str(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::write_chunk(addr_t taddr, size_t len, const void* src)
{
- if(args.size() != 1)
- throw trap_illegal_instruction;
-
- reg_t addr = strtol(args[0].c_str(),NULL,16);
-
- mmu_t mmu(mem,memsz);
- char ch;
-
- while((ch = mmu.load_uint8(addr++)))
- putchar(ch);
-
- putchar('\n');
+ assert(len == 8);
+ uint64_t data;
+ memcpy(&data, src, sizeof data);
+ debug_mmu->store_uint64(taddr, data);
}
-void sim_t::interactive_until(const std::string& cmd, const std::vector<std::string>& args)
+void sim_t::proc_reset(unsigned id)
{
- if(args.size() < 3)
- return;
-
- std::string scmd = args[0];
- reg_t val = strtol(args[args.size()-1].c_str(),NULL,16);
- if(val == LONG_MAX)
- val = strtoul(args[args.size()-1].c_str(),NULL,16);
-
- std::vector<std::string> args2;
- args2 = std::vector<std::string>(args.begin()+1,args.end()-1);
-
- while(1)
- {
- reg_t current;
- if(scmd == "reg")
- current = get_reg(args2);
- else if(scmd == "pc")
- current = get_pc(args2);
- else if(scmd == "mem")
- current = get_mem(args2);
- else if(scmd == "tohost")
- current = get_tohost(args2);
- else
- return;
-
- if(cmd == "until" && current == val)
- break;
- if(cmd == "while" && current != val)
- break;
-
- step_all(1,1,false);
- }
+ debug_module.proc_reset(id);
}