4 #include <boost/tokenizer.hpp>
5 #include <boost/program_options.hpp>
6 #include <boost/lexical_cast.hpp>
11 #include <boost/function.hpp>
12 #include <boost/functional.hpp>
13 #include <boost/tuple/tuple.hpp>
17 #include "CInstrFactory.hpp"
18 #include "uint32_from_hex.hpp"
20 #include "SReadline/SReadline.h"
21 using namespace swift;
23 #define RAM_END (1000)
24 #define PROG_END (1000)
25 #define REG_COUNT (16)
27 typedef boost::function<void (const vector<string> &)> Func;
28 typedef boost::tuple<string, Func, string> CompleterElement;
30 typedef list<CompleterElement> MyCompleterContainer;
35 // Creates a functor and memorises tokens
36 LookupFunctor(const vector<string>& tokens) : Tokens(tokens) {}
38 // Compares the first token only
39 bool operator()(const CompleterElement& ele) const
41 return (strncmp(Tokens.begin()->c_str(), ele.get<0>().c_str(), Tokens.begin()->size()) == 0);
45 const vector<string> &Tokens;
54 const MyCompleterContainer &m_completers;
57 CHelpExec(const MyCompleterContainer &cont) : m_completers(cont) {}
59 void operator() (const vector<string>&)
61 cout << "Available commands: " << endl;
62 for(auto iter = m_completers.begin(); iter != m_completers.end(); ++iter) {
63 cout << setw(19) << setfill(' ') << (*iter).get<0>() << ": " << (*iter).get<2>() << endl;
68 void close_prog(const std::vector<std::string> &);
71 disasm* Iinstr::m_disasm;
73 CCpu* global_cpu = NULL;
75 vector<CDat> breakpoints;
77 bool ignoreBreak = false;
79 void doExit(const vector<string>&)
84 unsigned int convertStringToNum(const std::string& in)
86 if(in.substr(0,2) == "0x") {
87 return lexical_cast<uint32_from_hex>(in);
90 return lexical_cast<unsigned int>(in);
95 void execStep(const vector<string>& in)
100 count = convertStringToNum(in.back());
103 cerr << "given parameter to step is not a number" << endl;
108 auto breakp = find(breakpoints.begin(), breakpoints.end(), global_cpu->getNextPC());
109 if(breakp == breakpoints.end() || ignoreBreak) {
115 cout << "Breakpoint 0x" << std::hex << setw(8) << setfill('0') << *breakp << std::hex << " hit" << endl;
119 catch(std::string& e) {
126 void execRun(const vector<string>&)
130 auto breakp = find(breakpoints.begin(), breakpoints.end(), global_cpu->getNextPC());
131 if(breakp == breakpoints.end() || ignoreBreak) {
137 cout << "Breakpoint 0x" << std::hex << setw(8) << setfill('0') << *breakp << std::hex << " hit" << endl;
141 catch(std::string& e) {
148 void setPC(const vector<string>& in)
153 addr = convertStringToNum(in.back());
156 cerr << "given parameter is not a number" << endl;
160 global_cpu->setNextPC(addr);
161 cout << "Set programcounter to 0x" << std::hex << setw(8) << setfill('0') << addr << std::dec << endl;
165 void printReg(const vector<string>& in)
167 int i, start = 0, end = REG_COUNT-1;
174 start = convertStringToNum(in[1]);
175 if(start < 0 || start > (REG_COUNT-1)) {
176 cerr << "start is out of range" << endl;
182 cerr << "given parameter is not a number" << endl;
189 end = convertStringToNum(in[2]);
190 if(start > end || end > (REG_COUNT-1)) {
191 cerr << "end is out of range or smaller than start" << endl;
196 cerr << "given parameter is not a number" << endl;
201 for(i = start; i <= end; i++) {
202 cout << setw(2) << setfill('0') << i << ": 0x";
203 cout << std::hex << setw(8) << setfill('0') << global_cpu->getRegister(i) << " ";
204 cout << std::dec << setw(10) << setfill(' ') << global_cpu->getRegister(i) << " ";
205 cout << std::dec << setw(10) << setfill(' ') << (int)global_cpu->getRegister(i) << endl;
209 void setReg(const vector<string>& in)
216 reg = convertStringToNum(in[1]);
217 if(reg < 0 || reg > (REG_COUNT-1)) {
218 cerr << "register is out of range" << endl;
222 val = convertStringToNum(in[2]);
224 cout << "Setting register " << reg << " to 0x" << std::hex << setw(8) << setfill('0') << val << std::dec << endl;
225 global_cpu->setRegister(reg,val);
228 cerr << "given parameter is not a number" << endl;
234 void printRAM(const vector<string>& in)
236 int i, start = 0, end = 15;
243 start = convertStringToNum(in[1]);
244 if(start < 0 || start > (RAM_END-1)) {
245 cerr << "start is out of range" << endl;
248 start = (start & (~(BYTE_COUNT-1))) / BYTE_COUNT;
252 cerr << "given parameter is not a number" << endl;
259 end = convertStringToNum(in[2]);
260 if(start > end || end > (RAM_END-1)) {
261 cerr << "end is out of range or smaller than start" << endl;
264 if(end % BYTE_COUNT != 0) {
265 end = ((end & (~(BYTE_COUNT-1))) / BYTE_COUNT)+1;
268 end = ((end & (~(BYTE_COUNT-1))) / BYTE_COUNT);
272 cerr << "given parameter is not a number" << endl;
276 for(i = start*BYTE_COUNT; i <= end*BYTE_COUNT; i += BYTE_COUNT) {
277 cout << std::hex << "0x" << setw(8) << setfill('0') << i << ": 0x";
278 cout << std::hex << setw(8) << setfill('0') << global_cpu->getRAM(i) << " ";
279 cout << std::dec << setw(10) << setfill(' ') << global_cpu->getRAM(i) << " ";
280 cout << std::dec << setw(10) << setfill(' ') << (int)global_cpu->getRAM(i) << endl;
284 void setRam(const vector<string>& in)
291 addr = convertStringToNum(in[1]);
292 if(addr < 0 || addr > (RAM_END-1)) {
293 cerr << "RAM-Address is out of range" << endl;
297 addr = (addr & (~(BYTE_COUNT-1))) / BYTE_COUNT;
298 val = convertStringToNum(in[2]);
302 cout << "Setting RAM-Address 0x" << std::hex << setw(8) << setfill('0') << addr;
303 cout << " to 0x" << setw(8) << setfill('0') << val << std::dec << endl;
304 global_cpu->setRAM(addr,val);
307 cerr << "given parameter is not a number" << endl;
312 void printPROG(const vector<string>& in)
314 int i, start = 0, end = 15;
319 if(in.size() >= 2 && in[1][0] == 'c') {
320 start = global_cpu->getCurPC() / BYTE_COUNT;
323 else if(in.size() >= 2) {
325 start = convertStringToNum(in[1]);
326 if(start < 0 || start > (PROG_END-1)) {
327 cerr << "start is out of range" << endl;
330 start = (start & (~(BYTE_COUNT-1))) / BYTE_COUNT;
334 cerr << "given parameter is not a number" << endl;
341 end = convertStringToNum(in[2]);
342 if(start > end || end > (PROG_END-1)) {
343 cerr << "end is out of range or smaller than start" << endl;
346 if(end % BYTE_COUNT != 0) {
347 end = ((end & (~(BYTE_COUNT-1))) / BYTE_COUNT)+1;
350 end = ((end & (~(BYTE_COUNT-1))) / BYTE_COUNT);
355 cerr << "given parameter is not a number" << endl;
361 for(i = start*BYTE_COUNT; i <= end*BYTE_COUNT; i += BYTE_COUNT) {
362 Iinstr* pi = global_cpu->getProg(i);
364 cout << std::hex << "0x" << setw(8) << setfill('0') << i << ": NOP" << endl;
367 cout << std::hex << "0x" << setw(8) << setfill('0') << i << ": " << std::dec << pi->toString() << endl;
372 void setBreak(const vector<string>& in)
374 unsigned int addr = 0;
377 addr = convertStringToNum(in.back());
378 breakpoints.push_back(addr);
379 cout << "Breakpoint 0x" << std::hex << setw(8) << setfill('0') << addr << std::dec << " set" << endl;
382 cerr << "Given parameter is not a valid address" << endl;
386 cerr << "Invalid parameter count!" << endl;
390 void listBreaks(const vector<string>&)
392 for(auto iter = breakpoints.begin(); iter != breakpoints.end(); ++iter) {
393 cout << "Breakpoint at 0x" << std::hex << setw(8) << setfill('0') << *iter << std::dec << endl;
397 void printStatus(const vector<string>&)
399 CDat stackp = global_cpu->getStack();
400 CDat stackd = global_cpu->getRAM(stackp);
401 cout << "Stack pointer: 0x" << std::hex << setw(8) << setfill('0') << stackp << " @stackpointer: 0x" << setw(8) << stackd << std::dec << " (" << stackd << ")" << endl;
402 cout << "PSW: 0x" << std::hex << setw(8) << setfill('0') << global_cpu->getFlags() << std::dec << endl;
403 cout << "cur PC: 0x" << std::hex << setw(8) << setfill('0') << global_cpu->getCurPC() << " next PC: 0x" << setw(8) << setfill('0') << global_cpu->getNextPC() << std::dec << endl;
407 using boost::lexical_cast;
408 using boost::bad_lexical_cast;
412 using namespace boost::program_options;
413 namespace po = boost::program_options;
415 std::string progName;
417 int main(int argc, char* argv[])
422 po::options_description desc("Allowed options");
424 ("help,h","produce help message")
425 ("file,f",value<string>(), "input file")
428 po::positional_options_description p;
431 po::variables_map vm;
432 po::store(po::command_line_parser(argc, argv).options(desc).positional(p).run(), vm);
435 if(vm.count("help")) {
436 cout << desc << endl;
440 if(vm.count("file")) {
442 cout << "going to open file " << vm["file"].as<string>() << endl;
444 inFile.open(vm["file"].as<string>(), ios::in);
446 cerr << "Error opening file " << vm["file"].as<string>() << endl;
451 cout << "not input file given!" << endl << endl;
452 cout << desc << endl;
456 catch(std::exception& ex) {
457 cout << ex.what() << endl;
461 string dir = "./instr/";
463 map<short, Iinstr*> instr;
465 CInstrFactory instrFab;
467 instrFab.loadLibsIntoMap(instr, dir);
469 catch(std::bad_alloc& e) {
470 cerr << progName << ": bad_alloc caught " << e.what() << endl;
473 catch(std::string& s) {
474 cerr << progName << ": " << s << endl;
478 CCpu cpu(REG_COUNT, RAM_END, PROG_END);
482 Iinstr::setCPU(&cpu);
484 disasm disasm(instr);
486 Iinstr::setDisasm(&disasm);
488 std::string str = "";
490 boost::char_separator<char> sep(";", "", boost::keep_empty_tokens);
491 boost::tokenizer<boost::char_separator<char> > tokens(str, sep);
492 while(getline(inFile, str)) {
497 for(auto tok_iter = tokens.begin(); tok_iter != tokens.end(); ++tok_iter) {
498 if(tok_iter == tokens.begin()) {
500 type = lexical_cast<int>(*tok_iter);
504 catch(bad_lexical_cast &) {
513 addr = lexical_cast<uint32_from_hex>(*tok_iter);
515 catch(bad_lexical_cast& e) {
516 cerr << e.what() << endl;
520 else if(count == 2) {
522 CDat data = lexical_cast<uint32_from_hex>(*tok_iter);
523 cpu.setRAM(addr, data);
525 catch(bad_lexical_cast& e) {
526 cerr << e.what() << endl;
534 addr = lexical_cast<uint32_from_hex>(*tok_iter);
536 catch(bad_lexical_cast& e) {
537 cerr << e.what() << endl;
541 else if(count == 2) {
542 Iinstr *pi = disasm.decode(*tok_iter);
543 cpu.setProg(addr, pi);
548 cerr << "ignoring labels and comments for now" << endl;
551 cerr << "i was to lazy to implement the other format types for now" << endl;
561 for(int i = 0; i <= 32; i += 4) {
562 Iinstr *pinstr = cpu.getProg(i);
564 cout << i << " : " << std::hex << i << std::dec << " " << pinstr->toString() << endl;
567 cout << "Null at " << i << " : " << std::hex << i << endl;
571 for(int i = 0; i <= 32; i += 4) {
572 CDat data = cpu.getRAM(i);
573 cout << i << " : " << std::hex << i << std::dec << " " << data << endl;
576 cpu.setRegister(1, 4);
577 cpu.setRegister(2, 0);
579 cpu.setRAM(4,0x66334455);
583 // following: job of the bootloader
586 //set return to nowhere for ret
591 MyCompleterContainer Completers;
593 CHelpExec HelpExec(Completers);
595 Completers.push_back(CompleterElement("help", boost::bind1st( boost::mem_fun( &CHelpExec::operator()), &HelpExec), "Prints this message"));
596 Completers.push_back(CompleterElement("quit", &doExit, "Exits program"));
597 Completers.push_back(CompleterElement("exit", &doExit, "Exits program"));
598 Completers.push_back(CompleterElement("step [count]",&execStep, "Runs [count] ticks. if count is not given one tick is executed."));
599 Completers.push_back(CompleterElement("dreg [s] [e]",&printReg, "Prints registers. if s is given, only register s is printed. if s and e are given the registers from s to e are printed. if omitted all registers a printed."));
600 Completers.push_back(CompleterElement("ddata [s] [e]",&printRAM, "Prints RAM. if s is given, only RAM-Addr. s is printed. if s and e are given the RAM-Addrs from s to e are printed. if omitted the first 16 RAM-Addrs are printed."));
601 Completers.push_back(CompleterElement("dprog [s] [e]",&printPROG, "Prints program. if s is given, only Prog-Addr. s is printed. if s and e are given the Prog-Addrs from s to e are printed. if omitted the first 16 Prog-Addrs are printed."));
602 Completers.push_back(CompleterElement("break addr",&setBreak, "Sets a breakpoint for address addr."));
603 Completers.push_back(CompleterElement("listbreaks",&listBreaks, "Lists all breakpoints."));
604 Completers.push_back(CompleterElement("run",&execRun, "Runs till next breakpoint or end of program."));
605 Completers.push_back(CompleterElement("setpc [num]",&setPC, "Sets PC to num. if num is omitted 0 is used."));
606 Completers.push_back(CompleterElement("setreg [s] [num]",&setReg, "Sets Register s to num."));
607 Completers.push_back(CompleterElement("setdata [s] [num]",&setRam, "Sets RAM-Addr s to num."));
608 Completers.push_back(CompleterElement("status",&printStatus, "Prints status of CPU."));
610 Reader.RegisterCompletions(Completers);
613 vector<string> Tokens, lastTokens;
614 bool EndOfInput = false;
616 //tilab g++44 doesn't like auto here
617 MyCompleterContainer::iterator Found(Completers.end());
619 Func lastFunc = NULL;
623 UserInput = Reader.GetLine("> ", Tokens, EndOfInput);
628 if(!Tokens.empty()) {
629 Found = find_if(Completers.begin(), Completers.end(), LookupFunctor(Tokens));
631 if(Found != Completers.end()) {
632 if((*Found).get<1>() != 0) {
633 lastFunc = (*Found).get<1>();
636 //(*Found).get<1>()(Tokens);
641 cout << "Unknown command. 'help' displays help" << endl;
645 if(lastFunc != NULL) {
646 lastFunc(lastTokens);
649 cout << "Unknown command. 'help' displays help" << endl;
656 for(int i = 0; ; i++) {
659 cout << " reg0: " << cpu.getRegister(0) << " reg1: " << cpu.getRegister(1);
660 cout << " reg2: " << cpu.getRegister(2) << " reg3: " << cpu.getRegister(3);
661 cout << " reg4: " << cpu.getRegister(4) << " reg5: " << cpu.getRegister(5);
662 cout << endl << endl;