+// See LICENSE for license details.
+
#include "sim.h"
-#include "applink.h"
-#include "common.h"
-#include "load_elf.h"
-#include <sys/mman.h>
+#include "htif.h"
#include <map>
#include <iostream>
+#include <climits>
+#include <cstdlib>
+#include <cassert>
+#include <signal.h>
-class memory_t : public loader_t
+volatile bool ctrlc_pressed = false;
+static void handle_signal(int sig)
{
-public:
- memory_t(char* _mem, size_t _size) : mem(_mem), size(_size) {}
+ if (ctrlc_pressed)
+ exit(-1);
+ ctrlc_pressed = true;
+ signal(sig, &handle_signal);
+}
- void write(size_t addr, size_t bytes, const void* src = NULL)
- {
- demand(addr < size && addr + bytes <= size, "out of bounds!");
- if(src)
- memcpy(mem+addr, src, bytes);
- else
- memset(mem+addr, 0, bytes);
- }
+sim_t::sim_t(const char* isa, size_t nprocs, size_t mem_mb,
+ const std::vector<std::string>& args)
+ : htif(new htif_isasim_t(this, args)), procs(std::max(nprocs, size_t(1))),
+ rtc(0), current_step(0), current_proc(0), debug(false)
+{
+ signal(SIGINT, &handle_signal);
+ // allocate target machine's memory, shrinking it as necessary
+ // until the allocation succeeds
+ size_t memsz0 = (size_t)mem_mb << 20;
+ size_t quantum = 1L << 20;
+ if (memsz0 == 0)
+ memsz0 = 1L << (sizeof(size_t) == 8 ? 32 : 30);
-private:
- char* mem;
- size_t size;
-};
+ memsz = memsz0;
+ while ((mem = (char*)calloc(1, memsz)) == NULL)
+ memsz = memsz*10/11/quantum*quantum;
-sim_t::sim_t(int _nprocs, size_t _memsz, appserver_link_t* _applink)
- : 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)))
-{
- demand(mem != MAP_FAILED, "couldn't allocate target machine's memory");
+ if (memsz != memsz0)
+ fprintf(stderr, "warning: only got %lu bytes of target mem (wanted %lu)\n",
+ (unsigned long)memsz, (unsigned long)memsz0);
+
+ debug_mmu = new mmu_t(mem, memsz);
- for(int i = 0; i < (int)procs.size(); i++)
- procs[i].init(i);
+ for (size_t i = 0; i < procs.size(); i++)
+ procs[i] = new processor_t(isa, this, i);
}
sim_t::~sim_t()
{
+ for (size_t i = 0; i < procs.size(); i++)
+ delete procs[i];
+ delete debug_mmu;
+ free(mem);
}
-void sim_t::load_elf(const char* fn)
+void sim_t::send_ipi(reg_t who)
{
- memory_t loader(mem, memsz);
- ::load_elf(fn,&loader);
-}
-void sim_t::set_tohost(reg_t val)
-{
- fromhost = 0;
- tohost = val;
+ if (who < procs.size())
+ procs[who]->deliver_ipi();
}
-reg_t sim_t::get_fromhost()
+reg_t sim_t::get_scr(int which)
{
- while(fromhost == 0)
- applink->wait_for_packet();
- return fromhost;
+ switch (which)
+ {
+ case 0: return procs.size();
+ case 1: return memsz >> 20;
+ default: return -1;
+ }
}
-void sim_t::run(bool debug)
+int sim_t::run()
{
- applink->wait_for_start();
-
- while(1)
+ while (htif->tick())
{
- 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::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::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["mem"] = &sim_t::interactive_mem;
- funcs["until"] = &sim_t::interactive_until;
- funcs["q"] = &sim_t::interactive_quit;
-
- try
- {
- if(funcs.count(cmd))
- (this->*funcs[cmd])(args);
- }
- catch(trap_t t) {}
- }
+ step(INTERLEAVE);
}
+ return htif->exit_code();
}
-void sim_t::step_all(size_t n, size_t interleave, bool noisy)
-{
- for(size_t j = 0; j < n; j+=interleave)
- for(int i = 0; i < (int)procs.size(); i++)
- procs[i].step(interleave,noisy);
-}
-
-void sim_t::interactive_run_noisy(const std::vector<std::string>& args)
-{
- interactive_run(args,true);
-}
-
-void sim_t::interactive_run_silent(const std::vector<std::string>& args)
+void sim_t::step(size_t n)
{
- interactive_run(args,false);
-}
-
-void sim_t::interactive_run(const std::vector<std::string>& args, bool noisy)
-{
- if(args.size())
- step_all(atoi(args[0].c_str()),1,noisy);
- else
- while(1) step_all(1,1,noisy);
-}
+ 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_proc_noisy(const std::vector<std::string>& args)
-{
- interactive_run_proc(args,true);
-}
+ current_step += steps;
+ if (current_step == INTERLEAVE)
+ {
+ current_step = 0;
+ procs[current_proc]->yield_load_reservation();
+ if (++current_proc == procs.size()) {
+ current_proc = 0;
+ rtc += INTERLEAVE / INSNS_PER_RTC_TICK;
+ }
-void sim_t::interactive_run_proc_silent(const std::vector<std::string>& args)
-{
- interactive_run_proc(args,false);
+ htif->tick();
+ }
+ }
}
-void sim_t::interactive_run_proc(const std::vector<std::string>& a, bool noisy)
+bool sim_t::running()
{
- if(a.size() == 0)
- return;
-
- int p = atoi(a[0].c_str());
- if(p >= (int)procs.size())
- return;
-
- if(a.size() == 2)
- procs[p].step(atoi(a[1].c_str()),noisy);
- else
- while(1) procs[p].step(1,noisy);
+ for (size_t i = 0; i < procs.size(); i++)
+ if (procs[i]->running())
+ return true;
+ return false;
}
-void sim_t::interactive_quit(const std::vector<std::string>& args)
+void sim_t::stop()
{
- exit(0);
+ procs[0]->state.tohost = 1;
+ while (htif->tick())
+ ;
}
-reg_t sim_t::get_pc(const std::vector<std::string>& args)
+void sim_t::set_debug(bool value)
{
- if(args.size() != 1)
- throw trap_illegal_instruction;
-
- int p = atoi(args[0].c_str());
- if(p >= (int)procs.size())
- throw trap_illegal_instruction;
-
- return procs[p].pc;
+ debug = value;
}
-reg_t sim_t::get_reg(const std::vector<std::string>& args)
+void sim_t::set_histogram(bool value)
{
- 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)procs.size() || r >= NGPR)
- throw trap_illegal_instruction;
-
- return procs[p].R[r];
-}
-
-void sim_t::interactive_reg(const std::vector<std::string>& args)
-{
- printf("0x%016llx\n",(unsigned long long)get_reg(args));
-}
-
-reg_t sim_t::get_mem(const std::vector<std::string>& args)
-{
- if(args.size() != 1)
- throw trap_illegal_instruction;
-
- reg_t addr = strtol(args[0].c_str(),NULL,16), val;
- mmu_t mmu(mem,memsz);
- 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;
+ histogram_enabled = value;
+ for (size_t i = 0; i < procs.size(); i++) {
+ procs[i]->set_histogram(histogram_enabled);
}
- return val;
}
-void sim_t::interactive_mem(const std::vector<std::string>& args)
+void sim_t::set_procs_debug(bool value)
{
- printf("0x%016llx\n",(unsigned long long)get_mem(args));
+ for (size_t i=0; i< procs.size(); i++)
+ procs[i]->set_debug(value);
}
-void sim_t::interactive_until(const std::vector<std::string>& args)
-{
- if(args.size() < 3)
- return;
-
- std::string cmd = args[0];
- reg_t val = strtol(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(args[0] == "reg")
- current = get_reg(args2);
- else if(args[0] == "pc")
- current = get_pc(args2);
- else if(args[0] == "mem")
- current = get_mem(args2);
- else
- return;
-
- if(current == val)
- break;
-
- step_all(1,1,false);
- }
-}