sim: added uart extension
[calu.git] / 3b_sim / ccpu.cpp
1 #include "ccpu.hpp"
2
3 /*              CDat m_pc, m_pc_next;
4                 CMem m_regfile, m_ram;
5 */
6
7 //void registerExtension() {};
8
9 const char* expression = "(;.*)|(r0)|(rX)|(r1[0-5])|(r[1-5])|(r[6-9])|(0x[a-fA-F0-9]+)|([-]?\\d+)";
10 const char* format = "(?1$&)"
11                                         //Return-Register: violett
12                                         "(?2\033[0m\033[35m$&\033[0m\\3:)"
13                                         // Callee-saved Register: rot
14                                         "(?4\033[0m\033[31m$&\033[0m\\3:)"
15                                         //Argument-Register: gruen
16                                         "(?5\033[0m\033[32m$&\033[0m\\3:)"
17                                         // Temporary Register: gelb
18                                         "(?6\033[0m\033[33m$&\033[0m\\3:)"
19                                         // Zahlenwerte: tuerkis
20                                         "(?7\033[0m\033[36m$&\033[0m\\3:)"
21                                         "(?8\033[0m\033[36m$&\033[0m\\3:)";
22
23
24 string CCpu::colorifyInstr(string instr)
25 {
26         boost::regex e;
27         e.assign(expression);
28         return boost::regex_replace(instr, e, format, boost::match_default | boost::format_all);
29 }
30
31 void CCpu::registerExtension(Iext* ext)
32 {
33         m_exts.push_back(ext);
34 }
35
36 void CCpu::applyToExtensions(const vector<string>& in)
37 {
38         for(auto iter = m_exts.begin(); iter != m_exts.end(); ++iter) {
39                 (*iter)->parseInput(in);
40         }
41 }
42
43 void CCpu::tick()
44 {
45         // signal extensions
46         // Todo
47
48         m_pc = m_pc_next;
49         m_pc_next += 4;
50         Iinstr* instr = this->getProg(m_pc);
51
52         if(instr == NULL) {
53                 throw string("Out of Instructions!");
54         }
55
56         for(auto iter = m_exts.begin(); iter != m_exts.end(); ++iter) {
57                 (*iter)->applyTick();
58         }
59
60         if(this->conditionMet(instr->getCondition())) {
61                 cout << color(green,black) << "Executing: " << color(white,black) << colorifyInstr(instr->toString()) << endl;
62                 instr->execInstr();
63                 this->incPerfBy(instr->getClockCount());
64         }
65         else {
66                 cout << color(red,black) << "Didn't Execute " << color(white,black) << colorifyInstr(instr->toString()) << "; condition wasn't met" << endl;
67                 this->incPerf();
68         }
69
70 }
71
72 bool CCpu::conditionMet(short cond)
73 {
74         switch(cond) {
75                 case NOT_EQUAL:
76                         return !this->m_Z;
77                         break;
78                 case EQUAL:
79                         return this->m_Z;
80                         break;
81                 case NOT_OVERFLOW:
82                         return !this->m_O;
83                         break;
84                 case OVER_FLOW:
85                         return this->m_O;
86                         break;
87                 case NOT_CARRY:
88                         return !this->m_C;
89                         break;
90                 case CARRY:
91                         return this->m_C;
92                         break;
93                 case NOT_SIGNED:
94                         return !this->m_S;
95                         break;
96                 case SIGNED:
97                         return this->m_S;
98                         break;
99                 case ABOVE:
100                         return (!this->m_C && !this->m_Z);
101                         break;
102                 case BELOW_EQ:
103                         return (this->m_C || this->m_Z);
104                         break;
105                 case GREATER_EQ:
106                         return (this->m_S == this->m_O);
107                         break;
108                 case LESS:
109                         return (this->m_S != this->m_O);
110                         break;
111                 case GREATER:
112                         return (!this->m_Z && (this->m_S == this->m_O));
113                         break;
114                 case LESS_EQ:
115                         return (!this->m_Z || (this->m_S != this->m_O));
116                         break;
117                 case ALWAYS:
118                         return true;
119                         break;
120                 case NEVER:
121                         return false;
122                         break;
123                 default:
124                         cerr << "What did you do? more than 16 values in 5 bits?!" << endl;
125                         return false;
126         }
127
128 }
129
130 CDat CCpu::getNextPC() const
131 {
132         return m_pc_next;
133 }
134
135 CDat CCpu::getCurPC() const
136 {
137         return m_pc;
138 }
139
140 void CCpu::setNextPC(CDat val)
141 {
142         m_pc_next = val;
143 }
144
145 CDat CCpu::getFlags() const {
146         CDat psw = 0;
147         psw += (this->m_Z ? 1 : 0);
148         psw += (this->m_O ? 2 : 0);
149         psw += (this->m_C ? 4 : 0);
150         psw += (this->m_S ? 8 : 0);
151         return psw;
152 }
153
154 void CCpu::setFlags(CDat psw) {
155         this->m_Z = ((psw & 0x1) != 0);
156         this->m_O = ((psw & 0x2) != 0);
157         this->m_C = ((psw & 0x4) != 0);
158         this->m_S = ((psw & 0x8) != 0);
159 }
160
161 void CCpu::updateFlags(CDat val) {
162         this->m_Z = (val == 0);
163         this->m_S = ((val >> (BIT_LEN-1)) & 0x1);
164 /*      this->m_C = false;
165         this->m_O = false; */
166 }
167
168 void CCpu::updateFlags(CDatd val, CDat a, CDat b) {
169         this->m_Z = (val == 0);
170         this->m_S = ((val >> (BIT_LEN-1)) & 0x1);
171         this->m_C = ((val >> (BIT_LEN)) & 0x1);
172         bool a_31 = ((a >> (BIT_LEN-1)) & 0x1);
173         bool b_31 = ((b >> (BIT_LEN-1)) & 0x1);
174         bool val_31 = ((val >> (BIT_LEN-1)) & 0x1);
175         this->m_O = ((a_31 && b_31 && !val_31) || (!a_31 && !b_31 && val_31));
176 }
177
178 void CCpu::updateCarry(bool c)
179 {
180         this->m_C = c;
181 }
182
183 bool CCpu::getCarry()
184 {
185         return this->m_C;
186 }
187
188 void CCpu::updateFlags(bool z, bool o, bool c, bool s)
189 {
190         this->m_Z = z;
191         this->m_O = o;
192         this->m_C = c;
193         this->m_S = s;
194 }
195
196 CDat CCpu::getRegister(const int addr) const
197 {
198         return m_reg.getDirect(addr);
199 }
200
201 void CCpu::setRegister(const int addr, CDat data)
202 {
203         m_reg.setDirect(addr, data);
204 }
205
206 CDat CCpu::getRAM(const int addr) const
207 {
208         if((addr & EXT_MODEL_OFFSET) == 0) {
209                 return m_ram.get(addr);
210         }
211         else {
212                 CDat result = 0;
213                 for(auto iter = m_exts.begin(); iter != m_exts.end(); ++iter) {
214                         result = (*iter)->readData(addr);
215                         if(result != 0) {
216                                 break;
217                         }
218                 }
219                 return result;
220         }
221 }
222
223 void CCpu::setRAM(const int addr, CDat data)
224 {
225         if((addr & EXT_MODEL_OFFSET) == 0) {
226                 m_ram.set(addr, data);
227         }
228         else {
229                 for(auto iter = m_exts.begin(); iter != m_exts.end(); ++iter) {
230                         (*iter)->loadData(addr, data);
231                 }
232         }
233 }
234
235 void CCpu::setProg(int addr, Iinstr* instr)
236 {
237         m_prog.set(addr, instr);
238 }
239
240 Iinstr* CCpu::getProg(const int addr) const
241 {
242         return m_prog.get(addr);
243 }
244
245 int CCpu::getStack() const
246 {
247         return this->m_stack;
248 }
249
250 void CCpu::setStack(const int val)
251 {
252         this->m_stack = val;
253 }
254
255 CDat CCpu::getPerf() const
256 {
257         return this->m_perf;
258 }
259
260 void CCpu::setPerf(CDat val)
261 {
262         this->m_perf = val;
263 }
264
265 void CCpu::incPerf()
266 {
267         this->m_perf++;
268 }
269
270 void CCpu::incPerfBy(short inc)
271 {
272         this->m_perf += inc;
273 }
274
275
276 CCpu::CCpu(int regs, int ram, int prog) : m_Z(false), m_S(false), m_C(false), m_O(false), m_pc(0), m_pc_next(0), m_perf(0), m_reg(regs), m_ram(ram), m_prog(prog), m_exts(0), m_stack(0)
277 {
278 }
279
280