///////////////////////////////////////////////////////////////////////// // $Id: instrument.cc,v 1.22 2009-01-20 19:34:16 sshwarts Exp $ ///////////////////////////////////////////////////////////////////////// // // Copyright (C) 2001 MandrakeSoft S.A. // // MandrakeSoft S.A. // 43, rue d'Aboukir // 75002 Paris - France // http://www.linux-mandrake.com/ // http://www.mandrakesoft.com/ // // This library is free software; you can redistribute it and/or // modify it under the terms of the GNU Lesser General Public // License as published by the Free Software Foundation; either // version 2 of the License, or (at your option) any later version. // // This library 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 // Lesser General Public License for more details. // // You should have received a copy of the GNU Lesser General Public // License along with this library; if not, write to the Free Software // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA #include #include "bochs.h" #include "cpu/cpu.h" bxInstrumentation *icpu = NULL; static disassembler bx_disassembler; void bx_instr_init_env(void) {} void bx_instr_exit_env(void) {} void bx_instr_initialize(unsigned cpu) { assert(cpu < BX_SMP_PROCESSORS); if (icpu == NULL) icpu = new bxInstrumentation[BX_SMP_PROCESSORS]; icpu[cpu].set_cpu_id(cpu); fprintf(stderr, "Initialize cpu %d\n", cpu); } void bxInstrumentation::bx_instr_reset(unsigned type) { valid = is_branch = 0; num_data_accesses = 0; active = 1; } void bxInstrumentation::bx_instr_new_instruction() { if (!active) return; if (valid) { char disasm_tbuf[512]; // buffer for instruction disassembly unsigned length = opcode_size, n; bx_disassembler.disasm(is32, is64, 0, 0, opcode, disasm_tbuf); if(length != 0) { fprintf(stderr, "----------------------------------------------------------\n"); fprintf(stderr, "CPU: %d: %s\n", cpu_id, disasm_tbuf); fprintf(stderr, "LEN: %d\tBYTES: ", length); for(n=0;nget_laddr(BX_SEG_REG_CS, new_eip); is_branch = 1; is_taken = 1; target_linear = laddr; } void bxInstrumentation::bx_instr_cnear_branch_taken(bx_address new_eip) { branch_taken(new_eip); } void bxInstrumentation::bx_instr_cnear_branch_not_taken() { if (!active || !valid) return; is_branch = 1; is_taken = 0; } void bxInstrumentation::bx_instr_ucnear_branch(unsigned what, bx_address new_eip) { branch_taken(new_eip); } void bxInstrumentation::bx_instr_far_branch(unsigned what, Bit16u new_cs, bx_address new_eip) { branch_taken(new_eip); } void bxInstrumentation::bx_instr_opcode(const Bit8u *opcode_bytes, unsigned len, bx_bool is32, bx_bool is64) { if (!active) return; for(unsigned i=0;i= MAX_DATA_ACCESSES) { return; } bx_address lin = BX_CPU(cpu_id)->get_laddr(seg, offset); bx_bool page_valid = BX_CPU(cpu_id)->dbg_xlate_linear2phy(lin, &phy); phy = A20ADDR(phy); // If linear translation doesn't exist, a paging exception will occur. // Invalidate physical address data for now. if (!page_valid) { phy = 0; } data_access[num_data_accesses].laddr = lin; data_access[num_data_accesses].paddr = phy; data_access[num_data_accesses].op = rw; data_access[num_data_accesses].size = len; num_data_accesses++; }