1 /* 2 * MIPS gdb server stub 3 * 4 * Copyright (c) 2003-2005 Fabrice Bellard 5 * Copyright (c) 2013 SUSE LINUX Products GmbH 6 * 7 * This library is free software; you can redistribute it and/or 8 * modify it under the terms of the GNU Lesser General Public 9 * License as published by the Free Software Foundation; either 10 * version 2 of the License, or (at your option) any later version. 11 * 12 * This library is distributed in the hope that it will be useful, 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 15 * Lesser General Public License for more details. 16 * 17 * You should have received a copy of the GNU Lesser General Public 18 * License along with this library; if not, see <http://www.gnu.org/licenses/>. 19 */ 20 #include "qemu/osdep.h" 21 #include "qemu-common.h" 22 #include "cpu.h" 23 #include "internal.h" 24 #include "exec/gdbstub.h" 25 26 int mips_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n) 27 { 28 MIPSCPU *cpu = MIPS_CPU(cs); 29 CPUMIPSState *env = &cpu->env; 30 31 if (n < 32) { 32 return gdb_get_regl(mem_buf, env->active_tc.gpr[n]); 33 } 34 if (env->CP0_Config1 & (1 << CP0C1_FP) && n >= 38 && n < 72) { 35 switch (n) { 36 case 70: 37 return gdb_get_regl(mem_buf, (int32_t)env->active_fpu.fcr31); 38 case 71: 39 return gdb_get_regl(mem_buf, (int32_t)env->active_fpu.fcr0); 40 default: 41 if (env->CP0_Status & (1 << CP0St_FR)) { 42 return gdb_get_reg64(mem_buf, 43 env->active_fpu.fpr[n - 38].d); 44 } else { 45 return gdb_get_regl(mem_buf, 46 env->active_fpu.fpr[n - 38].w[FP_ENDIAN_IDX]); 47 } 48 } 49 } 50 switch (n) { 51 case 32: 52 return gdb_get_regl(mem_buf, (int32_t)env->CP0_Status); 53 case 33: 54 return gdb_get_regl(mem_buf, env->active_tc.LO[0]); 55 case 34: 56 return gdb_get_regl(mem_buf, env->active_tc.HI[0]); 57 case 35: 58 return gdb_get_regl(mem_buf, env->CP0_BadVAddr); 59 case 36: 60 return gdb_get_regl(mem_buf, (int32_t)env->CP0_Cause); 61 case 37: 62 return gdb_get_regl(mem_buf, env->active_tc.PC | 63 !!(env->hflags & MIPS_HFLAG_M16)); 64 case 72: 65 return gdb_get_regl(mem_buf, 0); /* fp */ 66 case 89: 67 return gdb_get_regl(mem_buf, (int32_t)env->CP0_PRid); 68 default: 69 if (n > 89) { 70 return 0; 71 } 72 /* 16 embedded regs. */ 73 return gdb_get_regl(mem_buf, 0); 74 } 75 76 return 0; 77 } 78 79 int mips_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n) 80 { 81 MIPSCPU *cpu = MIPS_CPU(cs); 82 CPUMIPSState *env = &cpu->env; 83 target_ulong tmp; 84 85 tmp = ldtul_p(mem_buf); 86 87 if (n < 32) { 88 env->active_tc.gpr[n] = tmp; 89 return sizeof(target_ulong); 90 } 91 if (env->CP0_Config1 & (1 << CP0C1_FP) && n >= 38 && n < 72) { 92 switch (n) { 93 case 70: 94 env->active_fpu.fcr31 = (tmp & env->active_fpu.fcr31_rw_bitmask) | 95 (env->active_fpu.fcr31 & ~(env->active_fpu.fcr31_rw_bitmask)); 96 restore_fp_status(env); 97 break; 98 case 71: 99 /* FIR is read-only. Ignore writes. */ 100 break; 101 default: 102 if (env->CP0_Status & (1 << CP0St_FR)) { 103 uint64_t tmp = ldq_p(mem_buf); 104 env->active_fpu.fpr[n - 38].d = tmp; 105 } else { 106 env->active_fpu.fpr[n - 38].w[FP_ENDIAN_IDX] = tmp; 107 } 108 break; 109 } 110 return sizeof(target_ulong); 111 } 112 switch (n) { 113 case 32: 114 #ifndef CONFIG_USER_ONLY 115 cpu_mips_store_status(env, tmp); 116 #endif 117 break; 118 case 33: 119 env->active_tc.LO[0] = tmp; 120 break; 121 case 34: 122 env->active_tc.HI[0] = tmp; 123 break; 124 case 35: 125 env->CP0_BadVAddr = tmp; 126 break; 127 case 36: 128 #ifndef CONFIG_USER_ONLY 129 cpu_mips_store_cause(env, tmp); 130 #endif 131 break; 132 case 37: 133 env->active_tc.PC = tmp & ~(target_ulong)1; 134 if (tmp & 1) { 135 env->hflags |= MIPS_HFLAG_M16; 136 } else { 137 env->hflags &= ~(MIPS_HFLAG_M16); 138 } 139 break; 140 case 72: /* fp, ignored */ 141 break; 142 default: 143 if (n > 89) { 144 return 0; 145 } 146 /* Other registers are readonly. Ignore writes. */ 147 break; 148 } 149 150 return sizeof(target_ulong); 151 } 152