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.1 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, GByteArray *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_regl(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 env->active_fpu.fpr[n - 38].d = tmp; 103 } else { 104 env->active_fpu.fpr[n - 38].w[FP_ENDIAN_IDX] = tmp; 105 } 106 break; 107 } 108 return sizeof(target_ulong); 109 } 110 switch (n) { 111 case 32: 112 #ifndef CONFIG_USER_ONLY 113 cpu_mips_store_status(env, tmp); 114 #endif 115 break; 116 case 33: 117 env->active_tc.LO[0] = tmp; 118 break; 119 case 34: 120 env->active_tc.HI[0] = tmp; 121 break; 122 case 35: 123 env->CP0_BadVAddr = tmp; 124 break; 125 case 36: 126 #ifndef CONFIG_USER_ONLY 127 cpu_mips_store_cause(env, tmp); 128 #endif 129 break; 130 case 37: 131 env->active_tc.PC = tmp & ~(target_ulong)1; 132 if (tmp & 1) { 133 env->hflags |= MIPS_HFLAG_M16; 134 } else { 135 env->hflags &= ~(MIPS_HFLAG_M16); 136 } 137 break; 138 case 72: /* fp, ignored */ 139 break; 140 default: 141 if (n > 89) { 142 return 0; 143 } 144 /* Other registers are readonly. Ignore writes. */ 145 break; 146 } 147 148 return sizeof(target_ulong); 149 } 150