$NetBSD$ --- plugins/DebuggerCore/unix/netbsd/PlatformState.cpp.orig 2017-02-19 02:10:30.326045942 +0000 +++ plugins/DebuggerCore/unix/netbsd/PlatformState.cpp @@ -0,0 +1,392 @@ +/* +Copyright (C) 2006 - 2015 Evan Teran + evan.teran@gmail.com + +This program is free software: you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation, either version 2 of the License, or +(at your option) any later version. + +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 for more details. + +You should have received a copy of the GNU General Public License +along with this program. If not, see . +*/ + +#include "PlatformState.h" + +namespace DebuggerCore { + +//------------------------------------------------------------------------------ +// Name: PlatformState +// Desc: +//------------------------------------------------------------------------------ +PlatformState::PlatformState() { + memset(®s_, 0, sizeof(regs_)); + memset(&fpregs_, 0, sizeof(fpregs_)); + memset(&dr_, 0, sizeof(dr_)); + fs_base = 0; + gs_base = 0; +} + +//------------------------------------------------------------------------------ +// Name: PlatformState::clone +// Desc: makes a copy of the state object +//------------------------------------------------------------------------------ +IState *PlatformState::clone() const { + return new PlatformState(*this); +} + +//------------------------------------------------------------------------------ +// Name: flags_to_string +// Desc: returns the flags in a string form appropriate for this platform +//------------------------------------------------------------------------------ +QString PlatformState::flags_to_string(edb::reg_t flags) const { + char buf[14]; + qsnprintf( + buf, + sizeof(buf), + "%c %c %c %c %c %c %c", + ((flags & 0x001) ? 'C' : 'c'), + ((flags & 0x004) ? 'P' : 'p'), + ((flags & 0x010) ? 'A' : 'a'), + ((flags & 0x040) ? 'Z' : 'z'), + ((flags & 0x080) ? 'S' : 's'), + ((flags & 0x400) ? 'D' : 'd'), + ((flags & 0x800) ? 'O' : 'o')); + + return buf; +} + +//------------------------------------------------------------------------------ +// Name: flags_to_string +// Desc: returns the flags in a string form appropriate for this platform +//------------------------------------------------------------------------------ +QString PlatformState::flags_to_string() const { + return flags_to_string(flags()); +} + +//------------------------------------------------------------------------------ +// Name: value +// Desc: returns a Register object which represents the register with the name +// supplied +//------------------------------------------------------------------------------ +Register PlatformState::value(const QString ®) const { + const QString lreg = reg.toLower(); + +#if defined(EDB_X86) + if(lreg == "eax") return Register("eax", regs_.r_eax, Register::TYPE_GPR); + else if(lreg == "ebx") return Register("ebx", regs_.r_ebx, Register::TYPE_GPR); + else if(lreg == "ecx") return Register("ecx", regs_.r_ecx, Register::TYPE_GPR); + else if(lreg == "edx") return Register("edx", regs_.r_edx, Register::TYPE_GPR); + else if(lreg == "ebp") return Register("ebp", regs_.r_ebp, Register::TYPE_GPR); + else if(lreg == "esp") return Register("esp", regs_.r_esp, Register::TYPE_GPR); + else if(lreg == "esi") return Register("esi", regs_.r_esi, Register::TYPE_GPR); + else if(lreg == "edi") return Register("edi", regs_.r_edi, Register::TYPE_GPR); + else if(lreg == "eip") return Register("eip", regs_.r_eip, Register::TYPE_IP); + else if(lreg == "ax") return Register("ax", regs_.r_eax & 0xffff, Register::TYPE_GPR); + else if(lreg == "bx") return Register("bx", regs_.r_ebx & 0xffff, Register::TYPE_GPR); + else if(lreg == "cx") return Register("cx", regs_.r_ecx & 0xffff, Register::TYPE_GPR); + else if(lreg == "dx") return Register("dx", regs_.r_edx & 0xffff, Register::TYPE_GPR); + else if(lreg == "bp") return Register("bp", regs_.r_ebp & 0xffff, Register::TYPE_GPR); + else if(lreg == "sp") return Register("sp", regs_.r_esp & 0xffff, Register::TYPE_GPR); + else if(lreg == "si") return Register("si", regs_.r_esi & 0xffff, Register::TYPE_GPR); + else if(lreg == "di") return Register("di", regs_.r_edi & 0xffff, Register::TYPE_GPR); + else if(lreg == "al") return Register("al", regs_.r_eax & 0xff, Register::TYPE_GPR); + else if(lreg == "bl") return Register("bl", regs_.r_ebx & 0xff, Register::TYPE_GPR); + else if(lreg == "cl") return Register("cl", regs_.r_ecx & 0xff, Register::TYPE_GPR); + else if(lreg == "dl") return Register("dl", regs_.r_edx & 0xff, Register::TYPE_GPR); + else if(lreg == "ah") return Register("ah", (regs_.r_eax >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "bh") return Register("bh", (regs_.r_ebx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "ch") return Register("ch", (regs_.r_ecx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "dh") return Register("dh", (regs_.r_edx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "cs") return Register("cs", regs_.r_cs, Register::TYPE_SEG); + else if(lreg == "ds") return Register("ds", regs_.r_ds, Register::TYPE_SEG); + else if(lreg == "es") return Register("es", regs_.r_es, Register::TYPE_SEG); + else if(lreg == "fs") return Register("fs", regs_.r_fs, Register::TYPE_SEG); + else if(lreg == "gs") return Register("gs", regs_.r_gs, Register::TYPE_SEG); + else if(lreg == "ss") return Register("ss", regs_.r_ss, Register::TYPE_SEG); + else if(lreg == "fs_base") return Register("fs_base", fs_base, Register::TYPE_SEG); + else if(lreg == "gs_base") return Register("gs_base", gs_base, Register::TYPE_SEG); + else if(lreg == "eflags") return Register("eflags", regs_.r_eflags, Register::TYPE_COND); +#elif defined(EDB_X86_64) + if(lreg == "rax") return Register("rax", regs_.r_rax, Register::TYPE_GPR); + else if(lreg == "rbx") return Register("rbx", regs_.r_rbx, Register::TYPE_GPR); + else if(lreg == "rcx") return Register("rcx", regs_.r_rcx, Register::TYPE_GPR); + else if(lreg == "rdx") return Register("rdx", regs_.r_rdx, Register::TYPE_GPR); + else if(lreg == "rbp") return Register("rbp", regs_.r_rbp, Register::TYPE_GPR); + else if(lreg == "rsp") return Register("rsp", regs_.r_rsp, Register::TYPE_GPR); + else if(lreg == "rsi") return Register("rsi", regs_.r_rsi, Register::TYPE_GPR); + else if(lreg == "rdi") return Register("rdi", regs_.r_rdi, Register::TYPE_GPR); + else if(lreg == "rip") return Register("rip", regs_.r_rip, Register::TYPE_IP); + else if(lreg == "r8") return Register("r8", regs_.r_r8, Register::TYPE_GPR); + else if(lreg == "r9") return Register("r9", regs_.r_r9, Register::TYPE_GPR); + else if(lreg == "r10") return Register("r10", regs_.r_r10, Register::TYPE_GPR); + else if(lreg == "r11") return Register("r11", regs_.r_r11, Register::TYPE_GPR); + else if(lreg == "r12") return Register("r12", regs_.r_r12, Register::TYPE_GPR); + else if(lreg == "r13") return Register("r13", regs_.r_r13, Register::TYPE_GPR); + else if(lreg == "r14") return Register("r14", regs_.r_r14, Register::TYPE_GPR); + else if(lreg == "r15") return Register("r15", regs_.r_r15, Register::TYPE_GPR); + else if(lreg == "eax") return Register("eax", regs_.r_rax & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "ebx") return Register("ebx", regs_.r_rbx & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "ecx") return Register("ecx", regs_.r_rcx & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "edx") return Register("edx", regs_.r_rdx & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "ebp") return Register("ebp", regs_.r_rbp & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "esp") return Register("esp", regs_.r_rsp & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "esi") return Register("esi", regs_.r_rsi & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "edi") return Register("edi", regs_.r_rdi & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r8d") return Register("r8d", regs_.r_r8 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r9d") return Register("r9d", regs_.r_r9 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r10d") return Register("r10d", regs_.r_r10 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r11d") return Register("r11d", regs_.r_r11 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r12d") return Register("r12d", regs_.r_r12 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r13d") return Register("r13d", regs_.r_r13 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r14d") return Register("r14d", regs_.r_r14 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "r15d") return Register("r15d", regs_.r_r15 & 0xffffffff, Register::TYPE_GPR); + else if(lreg == "ax") return Register("ax", regs_.r_rax & 0xffff, Register::TYPE_GPR); + else if(lreg == "bx") return Register("bx", regs_.r_rbx & 0xffff, Register::TYPE_GPR); + else if(lreg == "cx") return Register("cx", regs_.r_rcx & 0xffff, Register::TYPE_GPR); + else if(lreg == "dx") return Register("dx", regs_.r_rdx & 0xffff, Register::TYPE_GPR); + else if(lreg == "bp") return Register("bp", regs_.r_rbp & 0xffff, Register::TYPE_GPR); + else if(lreg == "sp") return Register("sp", regs_.r_rsp & 0xffff, Register::TYPE_GPR); + else if(lreg == "si") return Register("si", regs_.r_rsi & 0xffff, Register::TYPE_GPR); + else if(lreg == "di") return Register("di", regs_.r_rdi & 0xffff, Register::TYPE_GPR); + else if(lreg == "r8w") return Register("r8w", regs_.r_r8 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r9w") return Register("r9w", regs_.r_r9 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r10w") return Register("r10w", regs_.r_r10 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r11w") return Register("r11w", regs_.r_r11 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r12w") return Register("r12w", regs_.r_r12 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r13w") return Register("r13w", regs_.r_r13 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r14w") return Register("r14w", regs_.r_r14 & 0xffff, Register::TYPE_GPR); + else if(lreg == "r15w") return Register("r15w", regs_.r_r15 & 0xffff, Register::TYPE_GPR); + else if(lreg == "al") return Register("al", regs_.r_rax & 0xff, Register::TYPE_GPR); + else if(lreg == "bl") return Register("bl", regs_.r_rbx & 0xff, Register::TYPE_GPR); + else if(lreg == "cl") return Register("cl", regs_.r_rcx & 0xff, Register::TYPE_GPR); + else if(lreg == "dl") return Register("dl", regs_.r_rdx & 0xff, Register::TYPE_GPR); + else if(lreg == "ah") return Register("ah", (regs_.r_rax >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "bh") return Register("bh", (regs_.r_rbx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "ch") return Register("ch", (regs_.r_rcx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "dh") return Register("dh", (regs_.r_rdx >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "spl") return Register("spl", (regs_.r_rsp >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "bpl") return Register("bpl", (regs_.r_rbp >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "sil") return Register("sil", (regs_.r_rsi >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "dil") return Register("dil", (regs_.r_rdi >> 8) & 0xff, Register::TYPE_GPR); + else if(lreg == "r8b") return Register("r8b", regs_.r_r8 & 0xff, Register::TYPE_GPR); + else if(lreg == "r9b") return Register("r9b", regs_.r_r9 & 0xff, Register::TYPE_GPR); + else if(lreg == "r10b") return Register("r10b", regs_.r_r10 & 0xff, Register::TYPE_GPR); + else if(lreg == "r11b") return Register("r11b", regs_.r_r11 & 0xff, Register::TYPE_GPR); + else if(lreg == "r12b") return Register("r12b", regs_.r_r12 & 0xff, Register::TYPE_GPR); + else if(lreg == "r13b") return Register("r13b", regs_.r_r13 & 0xff, Register::TYPE_GPR); + else if(lreg == "r14b") return Register("r14b", regs_.r_r14 & 0xff, Register::TYPE_GPR); + else if(lreg == "r15b") return Register("r15b", regs_.r_r15 & 0xff, Register::TYPE_GPR); + else if(lreg == "cs") return Register("cs", regs_.r_cs, Register::TYPE_SEG); + else if(lreg == "ds") return Register("ds", regs_.r_ds, Register::TYPE_SEG); + else if(lreg == "es") return Register("es", regs_.r_es, Register::TYPE_SEG); + else if(lreg == "fs") return Register("fs", regs_.r_fs, Register::TYPE_SEG); + else if(lreg == "gs") return Register("gs", regs_.r_gs, Register::TYPE_SEG); + else if(lreg == "ss") return Register("ss", regs_.r_ss, Register::TYPE_SEG); + else if(lreg == "fs_base") return Register("fs_base", fs_base, Register::TYPE_SEG); + else if(lreg == "gs_base") return Register("gs_base", gs_base, Register::TYPE_SEG); + else if(lreg == "rflags") return Register("rflags", regs_.r_rflags, Register::TYPE_COND); +#endif + + return Register(); +} + +//------------------------------------------------------------------------------ +// Name: frame_pointer +// Desc: returns what is conceptually the frame pointer for this platform +//------------------------------------------------------------------------------ +edb::address_t PlatformState::frame_pointer() const { +#if defined(EDB_X86) + return regs_.r_ebp; +#elif defined(EDB_X86_64) + return regs_.r_rbp; +#endif +} + +//------------------------------------------------------------------------------ +// Name: instruction_pointer +// Desc: returns the instruction pointer for this platform +//------------------------------------------------------------------------------ +edb::address_t PlatformState::instruction_pointer() const { +#if defined(EDB_X86) + return regs_.r_eip; +#elif defined(EDB_X86_64) + return regs_.r_rip; +#endif +} + +//------------------------------------------------------------------------------ +// Name: stack_pointer +// Desc: returns the stack pointer for this platform +//------------------------------------------------------------------------------ +edb::address_t PlatformState::stack_pointer() const { +#if defined(EDB_X86) + return regs_.r_esp; +#elif defined(EDB_X86_64) + return regs_.r_rsp; +#endif +} + +//------------------------------------------------------------------------------ +// Name: debug_register +// Desc: +//------------------------------------------------------------------------------ +edb::reg_t PlatformState::debug_register(int n) const { + return dr_[n]; +} + +//------------------------------------------------------------------------------ +// Name: flags +// Desc: +//------------------------------------------------------------------------------ +edb::reg_t PlatformState::flags() const { +#if defined(EDB_X86) + return regs_.r_eflags; +#elif defined(EDB_X86_64) + return regs_.r_rflags; +#endif +} + +//------------------------------------------------------------------------------ +// Name: fpu_register +// Desc: +//------------------------------------------------------------------------------ +long double PlatformState::fpu_register(int n) const { + return reinterpret_cast(&fpregs_)[n]; +} + +//------------------------------------------------------------------------------ +// Name: adjust_stack +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::adjust_stack(int bytes) { +#if defined(EDB_X86) + regs_.r_esp += bytes; +#elif defined(EDB_X86_64) + regs_.r_rsp += bytes; +#endif +} + +//------------------------------------------------------------------------------ +// Name: clear +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::clear() { + memset(®s_, 0, sizeof(regs_)); + memset(&fpregs_, 0, sizeof(fpregs_)); + memset(&dr_, 0, sizeof(dr_)); +#if defined(EDB_X86) + fs_base = 0; + gs_base = 0; +#endif +} + +//------------------------------------------------------------------------------ +// Name: set_debug_register +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::set_debug_register(int n, edb::reg_t value) { + dr_[n] = value; +} + +//------------------------------------------------------------------------------ +// Name: set_flags +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::set_flags(edb::reg_t flags) { +#if defined(EDB_X86) + regs_.r_eflags = flags; +#elif defined(EDB_X86_64) + regs_.r_rflags = flags; +#endif +} + +//------------------------------------------------------------------------------ +// Name: set_instruction_pointer +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::set_instruction_pointer(edb::address_t value) { +#if defined(EDB_X86) + regs_.r_eip = value; +#elif defined(EDB_X86_64) + regs_.r_rip = value; +#endif + +} + +//------------------------------------------------------------------------------ +// Name: set_register +// Desc: +//------------------------------------------------------------------------------ +void PlatformState::set_register(const QString &name, edb::reg_t value) { + + const QString lreg = name.toLower(); +#if defined(EDB_X86) + if(lreg == "eax") { regs_.r_eax = value; } + else if(lreg == "ebx") { regs_.r_ebx = value; } + else if(lreg == "ecx") { regs_.r_ecx = value; } + else if(lreg == "edx") { regs_.r_edx = value; } + else if(lreg == "ebp") { regs_.r_ebp = value; } + else if(lreg == "esp") { regs_.r_esp = value; } + else if(lreg == "esi") { regs_.r_esi = value; } + else if(lreg == "edi") { regs_.r_edi = value; } + else if(lreg == "eip") { regs_.r_eip = value; } + else if(lreg == "cs") { regs_.r_cs = value; } + else if(lreg == "ds") { regs_.r_ds = value; } + else if(lreg == "es") { regs_.r_es = value; } + else if(lreg == "fs") { regs_.r_fs = value; } + else if(lreg == "gs") { regs_.r_gs = value; } + else if(lreg == "ss") { regs_.r_ss = value; } + else if(lreg == "eflags") { regs_.r_eflags = value; } +#elif defined(EDB_X86_64) + if(lreg == "rax") { regs_.r_rax = value; } + else if(lreg == "rbx") { regs_.r_rbx = value; } + else if(lreg == "rcx") { regs_.r_rcx = value; } + else if(lreg == "rdx") { regs_.r_rdx = value; } + else if(lreg == "rbp") { regs_.r_rbp = value; } + else if(lreg == "rsp") { regs_.r_rsp = value; } + else if(lreg == "rsi") { regs_.r_rsi = value; } + else if(lreg == "rdi") { regs_.r_rdi = value; } + else if(lreg == "r8") { regs_.r_r8 = value; } + else if(lreg == "r9") { regs_.r_r9 = value; } + else if(lreg == "r10") { regs_.r_r10 = value; } + else if(lreg == "r11") { regs_.r_r11 = value; } + else if(lreg == "r12") { regs_.r_r12 = value; } + else if(lreg == "r13") { regs_.r_r13 = value; } + else if(lreg == "r14") { regs_.r_r14 = value; } + else if(lreg == "r15") { regs_.r_r15 = value; } + else if(lreg == "rip") { regs_.r_rip = value; } + else if(lreg == "cs") { regs_.r_cs = value; } + else if(lreg == "ds") { regs_.r_ds = value; } + else if(lreg == "es") { regs_.r_es = value; } + else if(lreg == "fs") { regs_.r_fs = value; } + else if(lreg == "gs") { regs_.r_gs = value; } + else if(lreg == "ss") { regs_.r_ss = value; } + else if(lreg == "rflags") { regs_.r_rflags = value; } +#endif +} + +//------------------------------------------------------------------------------ +// Name: +// Desc: +//------------------------------------------------------------------------------ +quint64 PlatformState::mmx_register(int n) const { + Q_UNUSED(n); + return 0; +} + +//------------------------------------------------------------------------------ +// Name: +// Desc: +//------------------------------------------------------------------------------ +QByteArray PlatformState::xmm_register(int n) const { + Q_UNUSED(n); + return QByteArray(); +} + +}