mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

diff options

Diffstat (limited to 'html/302stack_allocate.subx.html')

0 files changed, 0 insertions, 0 deletions

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> <title>Mu - 039debug.cc</title> <meta name="Generator" content="Vim/8.1"> <meta name="plugin-version" content="vim8.1_v1"> <meta name="syntax" content="cpp"> <meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy="> <meta name="colorscheme" content="minimal-light"> <style type="text/css">  </style> <script type='text/javascript'>  </script> </head> <body onload='JumpToLine();'> <a href='https://github.com/akkartik/mu/blob/master/039debug.cc'>https://github.com/akkartik/mu/blob/master/039debug.cc</a> <pre id='vimCodeElement'> 1 //:: Some helpers for debugging. 2 3 //: Load the 'map' file generated during 'subx --debug translate' when running 4 //: 'subx --debug --trace run'. 5 //: (It'll only affect the trace.) 6 7 :(before "End Globals") 8 map</*address*/uint32_t, string> <a href='039debug.cc.html#L8'>Symbol_name</a>; // used only by 'subx run' 9 map</*address*/uint32_t, string> <a href='039debug.cc.html#L9'>Source_line</a>; // used only by 'subx run' 10 :(before "End --debug Settings") 11 <a href='039debug.cc.html#L14'>load_labels</a>(); 12 <a href='039debug.cc.html#L26'>load_source_lines</a>(); 13 :(code) 14 void <a href='039debug.cc.html#L14'>load_labels</a>() { 15 ifstream fin("labels"); 16 fin >> std::hex; 17 while (<a href='001help.cc.html#L272'>has_data</a>(fin)) { 18 uint32_t addr = 0; 19 fin >> addr; 20 string <a href='011run.cc.html#L112'>name</a>; 21 fin >> <a href='011run.cc.html#L112'>name</a>; 22 <a href='001help.cc.html#L250'>put</a>(<a href='039debug.cc.html#L8'>Symbol_name</a>, addr, <a href='011run.cc.html#L112'>name</a>); 23 } 24 } 25 26 void <a href='039debug.cc.html#L26'>load_source_lines</a>() { 27 ifstream fin("source_lines"); 28 fin >> std::hex; 29 while (<a href='001help.cc.html#L272'>has_data</a>(fin)) { 30 uint32_t addr = 0; 31 fin >> addr; 32 string <a href='011run.cc.html#L122'>line</a>; 33 getline(fin, <a href='011run.cc.html#L122'>line</a>); 34 <a href='001help.cc.html#L250'>put</a>(<a href='039debug.cc.html#L9'>Source_line</a>, addr, <a href='039debug.cc.html#L111'>hacky_squeeze_out_whitespace</a>(<a href='011run.cc.html#L122'>line</a>)); 35 } 36 } 37 38 :(after "Run One Instruction") 39 if (<a href='001help.cc.html#L254'>contains_key</a>(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>)) 40 <a href='003trace.cc.html#L96'>trace</a>(Callstack_depth, "run") << "== label " << get(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>) << end(); 41 if (<a href='001help.cc.html#L254'>contains_key</a>(<a href='039debug.cc.html#L9'>Source_line</a>, <a href='010---vm.cc.html#L32'>EIP</a>)) 42 <a href='003trace.cc.html#L96'>trace</a>(Callstack_depth, "run") << "0x" << <a href='010---vm.cc.html#L401'>HEXWORD</a> << <a href='010---vm.cc.html#L32'>EIP</a> << ": " << get(<a href='039debug.cc.html#L9'>Source_line</a>, <a href='010---vm.cc.html#L32'>EIP</a>) << end(); 43 else 44 // no source line info; do what you can 45 <a href='003trace.cc.html#L96'>trace</a>(Callstack_depth, "run") << "0x" << <a href='010---vm.cc.html#L401'>HEXWORD</a> << <a href='010---vm.cc.html#L32'>EIP</a> << ": " << <a href='039debug.cc.html#L48'>debug_info</a>(<a href='010---vm.cc.html#L32'>EIP</a>) << end(); 46 47 :(code) 48 string <a href='039debug.cc.html#L48'>debug_info</a>(uint32_t inst_address) { 49 uint8_t op = <a href='010---vm.cc.html#L171'>read_mem_u8</a>(inst_address); 50 if (op != 0xe8) { 51 ostringstream out; 52 out << <a href='010---vm.cc.html#L400'>HEXBYTE</a> << <a href='010---vm.cc.html#L403'>NUM</a>(op); 53 return out.str(); 54 } 55 int32_t offset = <a href='010---vm.cc.html#L182'>read_mem_i32</a>(inst_address+/*skip op*/1); 56 uint32_t next_eip = inst_address+/*inst length*/5+offset; 57 if (<a href='001help.cc.html#L254'>contains_key</a>(<a href='039debug.cc.html#L8'>Symbol_name</a>, next_eip)) 58 return "e8/call "+get(<a href='039debug.cc.html#L8'>Symbol_name</a>, next_eip); 59 ostringstream out; 60 out << "e8/call 0x" << <a href='010---vm.cc.html#L401'>HEXWORD</a> << next_eip; 61 return out.str(); 62 } 63 64 //: If a label starts with '$watch-', make a note of the effective address 65 //: computed by the next instruction. Start dumping out its contents to the 66 //: trace after every subsequent instruction. 67 68 :(after "Run One Instruction") 69 <a href='039debug.cc.html#L75'>dump_watch_points</a>(); 70 :(before "End Globals") 71 map<string, uint32_t> <a href='039debug.cc.html#L71'>Watch_points</a>; 72 :(before "End Reset") 73 <a href='039debug.cc.html#L71'>Watch_points</a>.clear(); 74 :(code) 75 void <a href='039debug.cc.html#L75'>dump_watch_points</a>() { 76 if (<a href='039debug.cc.html#L71'>Watch_points</a>.empty()) return; 77 <a href='003trace.cc.html#L96'>trace</a>(Callstack_depth, "dbg") << "watch points:" << end(); 78 for (map<string, uint32_t>::iterator p = <a href='039debug.cc.html#L71'>Watch_points</a>.begin(); p != <a href='039debug.cc.html#L71'>Watch_points</a>.end(); ++p) 79 <a href='003trace.cc.html#L96'>trace</a>(Callstack_depth, "dbg") << " " << p->first << ": " << <a href='010---vm.cc.html#L401'>HEXWORD</a> << p->second << " -> " << <a href='010---vm.cc.html#L401'>HEXWORD</a> << <a href='010---vm.cc.html#L178'>read_mem_u32</a>(p->second) << end(); 80 } 81 82 :(before "End Globals") 83 string Watch_this_effective_address; 84 :(after "Run One Instruction") 85 Watch_this_effective_address = ""; 86 if (<a href='001help.cc.html#L254'>contains_key</a>(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>) && <a href='001help.cc.html#L100'>starts_with</a>(get(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>), "$watch-")) 87 Watch_this_effective_address = get(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>); 88 :(after "Found effective_address(addr)") 89 if (!Watch_this_effective_address.empty()) { 90 <a href='003trace.cc.html#L439'>dbg</a> << "now watching " << <a href='010---vm.cc.html#L401'>HEXWORD</a> << addr << " for " << Watch_this_effective_address << end(); 91 <a href='001help.cc.html#L250'>put</a>(<a href='039debug.cc.html#L71'>Watch_points</a>, Watch_this_effective_address, addr); 92 } 93 94 //: Special label that dumps regions of memory. 95 //: Not a general mechanism; by the time you get here you're willing to hack 96 //: on the emulator. 97 :(after "Run One Instruction") 98 if (<a href='001help.cc.html#L254'>contains_key</a>(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>) && get(<a href='039debug.cc.html#L8'>Symbol_name</a>, <a href='010---vm.cc.html#L32'>EIP</a>) == "$dump-stream-at-EAX") 99 <a href='039debug.cc.html#L101'>dump_stream_at</a>(<a href='010---vm.cc.html#L31'>Reg</a>[EAX].u); 100 :(code) 101 void <a href='039debug.cc.html#L101'>dump_stream_at</a>(uint32_t stream_start) { 102 int32_t stream_length = <a href='010---vm.cc.html#L182'>read_mem_i32</a>(stream_start + 8); 103 <a href='003trace.cc.html#L439'>dbg</a> << "stream length: " << std::dec << stream_length << end(); 104 for (int i = 0; i < stream_length + 12; ++i) 105 <a href='003trace.cc.html#L439'>dbg</a> << "0x" << <a href='010---vm.cc.html#L401'>HEXWORD</a> << (stream_start+i) << ": " << <a href='010---vm.cc.html#L400'>HEXBYTE</a> << <a href='010---vm.cc.html#L403'>NUM</a>(<a href='010---vm.cc.html#L171'>read_mem_u8</a>(stream_start+i)) << end(); 106 } 107 108 //: helpers 109 110 :(code) 111 string <a href='039debug.cc.html#L111'>hacky_squeeze_out_whitespace</a>(const string& s) { 112 // strip whitespace at start 113 string::const_iterator first = s.begin(); 114 while (first != s.end() && isspace(*first)) 115 ++first; 116 if (first == s.end()) return ""; 117 118 // strip whitespace at end 119 string::const_iterator last = --s.end(); 120 while (last != s.begin() && isspace(*last)) 121 --last; 122 ++last; 123 124 // replace runs of spaces/dots with single space until comment or string 125 // TODO: 126 // leave alone dots not surrounded by whitespace 127 // leave alone '#' within word 128 // leave alone '"' within word 129 // squeeze spaces after end of string 130 ostringstream out; 131 bool previous_was_space = false; 132 bool in_comment_or_string = false; 133 for (string::const_iterator curr = first; curr != last; ++curr) { 134 if (in_comment_or_string) 135 out << *curr; 136 else if (isspace(*curr) || *curr == '.') 137 previous_was_space = true; 138 else { 139 if (previous_was_space) 140 out << ' '; 141 out << *curr; 142 previous_was_space = false; 143 if (*curr == '#' || *curr == '"') in_comment_or_string = true; 144 } 145 } 146 return out.str(); 147 } </pre> </body> </html>


context:
space:
mode: