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 "cpu.h" 22 #include "internal.h" 23 #include "exec/gdbstub.h" 24 25 int mips_cpu_gdb_read_register(CPUState *cs, uint8_t *mem_buf, int n) 26 { 27 MIPSCPU *cpu = MIPS_CPU(cs); 28 CPUMIPSState *env = &cpu->env; 29 30 if (n < 32) { 31 return gdb_get_regl(mem_buf, env->active_tc.gpr[n]); 32 } 33 if (env->CP0_Config1 & (1 << CP0C1_FP) && n >= 38 && n < 72) { 34 switch (n) { 35 case 70: 36 return gdb_get_regl(mem_buf, (int32_t)env->active_fpu.fcr31); 37 case 71: 38 return gdb_get_regl(mem_buf, (int32_t)env->active_fpu.fcr0); 39 default: 40 if (env->CP0_Status & (1 << CP0St_FR)) { 41 return gdb_get_reg64(mem_buf, 42 env->active_fpu.fpr[n - 38].d); 43 } else { 44 return gdb_get_regl(mem_buf, 45 env->active_fpu.fpr[n - 38].w[FP_ENDIAN_IDX]); 46 } 47 } 48 } 49 switch (n) { 50 case 32: 51 return gdb_get_regl(mem_buf, (int32_t)env->CP0_Status); 52 case 33: 53 return gdb_get_regl(mem_buf, env->active_tc.LO[0]); 54 case 34: 55 return gdb_get_regl(mem_buf, env->active_tc.HI[0]); 56 case 35: 57 return gdb_get_regl(mem_buf, env->CP0_BadVAddr); 58 case 36: 59 return gdb_get_regl(mem_buf, (int32_t)env->CP0_Cause); 60 case 37: 61 return gdb_get_regl(mem_buf, env->active_tc.PC | 62 !!(env->hflags & MIPS_HFLAG_M16)); 63 case 72: 64 return gdb_get_regl(mem_buf, 0); /* fp */ 65 case 89: 66 return gdb_get_regl(mem_buf, (int32_t)env->CP0_PRid); 67 default: 68 if (n > 89) { 69 return 0; 70 } 71 /* 16 embedded regs. */ 72 return gdb_get_regl(mem_buf, 0); 73 } 74 75 return 0; 76 } 77 78 int mips_cpu_gdb_write_register(CPUState *cs, uint8_t *mem_buf, int n) 79 { 80 MIPSCPU *cpu = MIPS_CPU(cs); 81 CPUMIPSState *env = &cpu->env; 82 target_ulong tmp; 83 84 tmp = ldtul_p(mem_buf); 85 86 if (n < 32) { 87 env->active_tc.gpr[n] = tmp; 88 return sizeof(target_ulong); 89 } 90 if (env->CP0_Config1 & (1 << CP0C1_FP) && n >= 38 && n < 72) { 91 switch (n) { 92 case 70: 93 env->active_fpu.fcr31 = (tmp & env->active_fpu.fcr31_rw_bitmask) | 94 (env->active_fpu.fcr31 & ~(env->active_fpu.fcr31_rw_bitmask)); 95 restore_fp_status(env); 96 break; 97 case 71: 98 /* FIR is read-only. Ignore writes. */ 99 break; 100 default: 101 if (env->CP0_Status & (1 << CP0St_FR)) { 102 uint64_t tmp = ldq_p(mem_buf); 103 env->active_fpu.fpr[n - 38].d = tmp; 104 } else { 105 env->active_fpu.fpr[n - 38].w[FP_ENDIAN_IDX] = tmp; 106 } 107 break; 108 } 109 return sizeof(target_ulong); 110 } 111 switch (n) { 112 case 32: 113 #ifndef CONFIG_USER_ONLY 114 cpu_mips_store_status(env, tmp); 115 #endif 116 break; 117 case 33: 118 env->active_tc.LO[0] = tmp; 119 break; 120 case 34: 121 env->active_tc.HI[0] = tmp; 122 break; 123 case 35: 124 env->CP0_BadVAddr = tmp; 125 break; 126 case 36: 127 #ifndef CONFIG_USER_ONLY 128 cpu_mips_store_cause(env, tmp); 129 #endif 130 break; 131 case 37: 132 env->active_tc.PC = tmp & ~(target_ulong)1; 133 if (tmp & 1) { 134 env->hflags |= MIPS_HFLAG_M16; 135 } else { 136 env->hflags &= ~(MIPS_HFLAG_M16); 137 } 138 break; 139 case 72: /* fp, ignored */ 140 break; 141 default: 142 if (n > 89) { 143 return 0; 144 } 145 /* Other registers are readonly. Ignore writes. */ 146 break; 147 } 148 149 return sizeof(target_ulong); 150 } 151