EAJRGO.rar_书籍源码

// --------------------------------------------------------------------------- // - Mexecute.cpp - // - iato:isa library - M execution unit class implementation - // --------------------------------------------------------------------------- // - (c) inria 2002-2004 - // --------------------------------------------------------------------------- // - authors Amaury Darsch 2002:2004 - // - Pierre Villalon 2002:2003 - // - Andre Seznec 2002:2004 - // --------------------------------------------------------------------------- // - This program is free software; you can redistribute it and/or modify - // - it under the terms of the GNU General Public License version 2, as - // - published by the Free Software Foundation. - // - - // - This program is distributed in the hope that it will be useful, - // - but without any warranty; without even the implied warranty of - // - merchantability or fitness for a particular purpose. - // - - // - See the GNU General Public License version 2 for more details - // --------------------------------------------------------------------------- #include "Cfm.hpp" #include "Psr.hpp" #include "Bits.hpp" #include "Utils.hpp" #include "Mexecute.hpp" #include "Interrupt.hpp" namespace iato { // ------------------------------------------------------------------------ // - M01 instruction group - // ------------------------------------------------------------------------ // M_LD1 static Result exec_ld1 (const Instr& inst, const Operand& oprd) { // if nat bit is true, there is a register nat consumption fault if (oprd.getbval (1) == true) throw Interrupt (FAULT_IT_RNAT_CONS, inst); // build result Result result = inst.getresl (); // compute nat bit bool natr = false; // compute result t_octa addr = oprd.getoval (1); // set result result.setbval (0, natr); result.setaddr (0, Result::REG_LD1, addr); return result; } // M_LD2 static Result exec_ld2 (const Instr& inst, const Operand& oprd) { // if nat bit is true, there is a register nat consumption fault if (oprd.getbval (1) == true) throw Interrupt (FAULT_IT_RNAT_CONS, inst); // build result Result result = inst.getresl (); // compute nat bit bool natr = false; // compute result t_octa addr = oprd.getoval (1); // set result result.setbval (0, natr); result.setaddr (0, Result::REG_LD2, addr); return result; } // M_LD4 static Result exec_ld4 (const Instr& inst, const Operand& oprd) { // if nat bit is true, there is a register nat consumption fault if (oprd.getbval (1) == true) throw Interrupt (FAULT_IT_RNAT_CONS, inst); // build result Result result = inst.getresl (); // compute nat bit bool natr = false; // compute result t_octa addr = oprd.getoval (1); // set result result.setbval (0, natr); result.setaddr (0, Result::REG_LD4, addr); return result; } // M_LD8 static Result exec_ld8 (const Instr& inst, const Operand& oprd) { // if nat bit is true, there is a register nat consumption fault if (oprd.getbval (1) == true) throw Interrupt (FAULT_IT_RNAT_CONS, inst); // build result Result result = inst.getresl (); // compute nat bit bool natr = false; // compute result t_octa addr = oprd.getoval (1); // set result result.setbval (0, natr); result.setaddr (0, Result::REG_LD8, addr); return result; } // M_LD1_S static Result exec_ld1_s (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD1, addr); result.setspec (0, true); return result; } // M_LD2_S static Result exec_ld2_s (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD2, addr); result.setspec (0, true); return result; } // M_LD4_S static Result exec_ld4_s (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD4, addr); result.setspec (0, true); return result; } // M_LD8_S static Result exec_ld8_s (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD8, addr); result.setspec (0, true); return result; } // M_LD1_SA static Result exec_ld1_sa (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD1, addr); result.setaset (0, true); result.setspec (0, true); return result; } // M_LD2_SA static Result exec_ld2_sa (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD2, addr); result.setaset (0, true); result.setspec (0, true); return result; } // M_LD4_SA static Result exec_ld4_sa (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD4, addr); result.setaset (0, true); result.setspec (0, true); return result; } // M_LD8_SA static Result exec_ld8_sa (const Instr& inst, const Operand& oprd) { // build result Result result = inst.getresl (); t_octa addr = oprd.getoval (1); // if nat bit is true the target register has its nat bit set if (oprd.getbval (1) == true) { result.setbval (0, true); return result; } // set result result.setbval (0, false); result.setaddr (0, Result::REG_LD8, addr); result.setaset (0,