100b70788SNikunj A Dadhania /* 200b70788SNikunj A Dadhania * PowerPC CPU routines for qemu. 300b70788SNikunj A Dadhania * 400b70788SNikunj A Dadhania * Copyright (c) 2017 Nikunj A Dadhania, IBM Corporation. 500b70788SNikunj A Dadhania * 600b70788SNikunj A Dadhania * This library is free software; you can redistribute it and/or 700b70788SNikunj A Dadhania * modify it under the terms of the GNU Lesser General Public 800b70788SNikunj A Dadhania * License as published by the Free Software Foundation; either 96bd039cdSChetan Pant * version 2.1 of the License, or (at your option) any later version. 1000b70788SNikunj A Dadhania * 1100b70788SNikunj A Dadhania * This library is distributed in the hope that it will be useful, 1200b70788SNikunj A Dadhania * but WITHOUT ANY WARRANTY; without even the implied warranty of 1300b70788SNikunj A Dadhania * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 1400b70788SNikunj A Dadhania * Lesser General Public License for more details. 1500b70788SNikunj A Dadhania * 1600b70788SNikunj A Dadhania * You should have received a copy of the GNU Lesser General Public 1700b70788SNikunj A Dadhania * License along with this library; if not, see <http://www.gnu.org/licenses/>. 1800b70788SNikunj A Dadhania */ 1900b70788SNikunj A Dadhania 2000b70788SNikunj A Dadhania #include "qemu/osdep.h" 2100b70788SNikunj A Dadhania #include "cpu.h" 2200b70788SNikunj A Dadhania #include "cpu-models.h" 23172d74efSBruno Larsen (billionai) #include "cpu-qom.h" 24172d74efSBruno Larsen (billionai) #include "exec/log.h" 25c19940dbSBruno Larsen (billionai) #include "fpu/softfloat-helpers.h" 26172d74efSBruno Larsen (billionai) #include "mmu-hash64.h" 27a3f5c315SBruno Larsen (billionai) #include "helper_regs.h" 28fe43ba97SBruno Larsen (billionai) #include "sysemu/tcg.h" 2900b70788SNikunj A Dadhania 3010de0521SMatheus Ferst target_ulong cpu_read_xer(const CPUPPCState *env) 3100b70788SNikunj A Dadhania { 32dd09c361SNikunj A Dadhania if (is_isa300(env)) { 33dd09c361SNikunj A Dadhania return env->xer | (env->so << XER_SO) | 34dd09c361SNikunj A Dadhania (env->ov << XER_OV) | (env->ca << XER_CA) | 35dd09c361SNikunj A Dadhania (env->ov32 << XER_OV32) | (env->ca32 << XER_CA32); 36dd09c361SNikunj A Dadhania } 37dd09c361SNikunj A Dadhania 3800b70788SNikunj A Dadhania return env->xer | (env->so << XER_SO) | (env->ov << XER_OV) | 3900b70788SNikunj A Dadhania (env->ca << XER_CA); 4000b70788SNikunj A Dadhania } 4100b70788SNikunj A Dadhania 4200b70788SNikunj A Dadhania void cpu_write_xer(CPUPPCState *env, target_ulong xer) 4300b70788SNikunj A Dadhania { 4400b70788SNikunj A Dadhania env->so = (xer >> XER_SO) & 1; 4500b70788SNikunj A Dadhania env->ov = (xer >> XER_OV) & 1; 4600b70788SNikunj A Dadhania env->ca = (xer >> XER_CA) & 1; 47dd09c361SNikunj A Dadhania /* write all the flags, while reading back check of isa300 */ 48dd09c361SNikunj A Dadhania env->ov32 = (xer >> XER_OV32) & 1; 49dd09c361SNikunj A Dadhania env->ca32 = (xer >> XER_CA32) & 1; 50dd09c361SNikunj A Dadhania env->xer = xer & ~((1ul << XER_SO) | 51dd09c361SNikunj A Dadhania (1ul << XER_OV) | (1ul << XER_CA) | 52dd09c361SNikunj A Dadhania (1ul << XER_OV32) | (1ul << XER_CA32)); 5300b70788SNikunj A Dadhania } 54c19940dbSBruno Larsen (billionai) 55c19940dbSBruno Larsen (billionai) void ppc_store_vscr(CPUPPCState *env, uint32_t vscr) 56c19940dbSBruno Larsen (billionai) { 57c19940dbSBruno Larsen (billionai) env->vscr = vscr & ~(1u << VSCR_SAT); 58c19940dbSBruno Larsen (billionai) /* Which bit we set is completely arbitrary, but clear the rest. */ 59c19940dbSBruno Larsen (billionai) env->vscr_sat.u64[0] = vscr & (1u << VSCR_SAT); 60c19940dbSBruno Larsen (billionai) env->vscr_sat.u64[1] = 0; 61c19940dbSBruno Larsen (billionai) set_flush_to_zero((vscr >> VSCR_NJ) & 1, &env->vec_status); 62c19940dbSBruno Larsen (billionai) } 63c19940dbSBruno Larsen (billionai) 64c19940dbSBruno Larsen (billionai) uint32_t ppc_get_vscr(CPUPPCState *env) 65c19940dbSBruno Larsen (billionai) { 66c19940dbSBruno Larsen (billionai) uint32_t sat = (env->vscr_sat.u64[0] | env->vscr_sat.u64[1]) != 0; 67c19940dbSBruno Larsen (billionai) return env->vscr | (sat << VSCR_SAT); 68c19940dbSBruno Larsen (billionai) } 69172d74efSBruno Larsen (billionai) 702060436aSHarsh Prateek Bora void ppc_set_cr(CPUPPCState *env, uint64_t cr) 712060436aSHarsh Prateek Bora { 722060436aSHarsh Prateek Bora for (int i = 7; i >= 0; i--) { 732060436aSHarsh Prateek Bora env->crf[i] = cr & 0xf; 742060436aSHarsh Prateek Bora cr >>= 4; 752060436aSHarsh Prateek Bora } 762060436aSHarsh Prateek Bora } 772060436aSHarsh Prateek Bora 782060436aSHarsh Prateek Bora uint64_t ppc_get_cr(const CPUPPCState *env) 792060436aSHarsh Prateek Bora { 802060436aSHarsh Prateek Bora uint64_t cr = 0; 812060436aSHarsh Prateek Bora for (int i = 0; i < 8; i++) { 822060436aSHarsh Prateek Bora cr |= (env->crf[i] & 0xf) << (4 * (7 - i)); 832060436aSHarsh Prateek Bora } 842060436aSHarsh Prateek Bora return cr; 852060436aSHarsh Prateek Bora } 862060436aSHarsh Prateek Bora 87a3f5c315SBruno Larsen (billionai) /* GDBstub can read and write MSR... */ 88a3f5c315SBruno Larsen (billionai) void ppc_store_msr(CPUPPCState *env, target_ulong value) 89a3f5c315SBruno Larsen (billionai) { 90a3f5c315SBruno Larsen (billionai) hreg_store_msr(env, value, 0); 91a3f5c315SBruno Larsen (billionai) } 92a3f5c315SBruno Larsen (billionai) 936a8e8188SMatheus Ferst #if !defined(CONFIG_USER_ONLY) 94a3f5c315SBruno Larsen (billionai) void ppc_store_lpcr(PowerPCCPU *cpu, target_ulong val) 95a3f5c315SBruno Larsen (billionai) { 96a3f5c315SBruno Larsen (billionai) PowerPCCPUClass *pcc = POWERPC_CPU_GET_CLASS(cpu); 97a3f5c315SBruno Larsen (billionai) CPUPPCState *env = &cpu->env; 98a3f5c315SBruno Larsen (billionai) 99a3f5c315SBruno Larsen (billionai) env->spr[SPR_LPCR] = val & pcc->lpcr_mask; 100a3f5c315SBruno Larsen (billionai) /* The gtse bit affects hflags */ 101a3f5c315SBruno Larsen (billionai) hreg_compute_hflags(env); 1022fdedcbcSMatheus Ferst 1032fdedcbcSMatheus Ferst ppc_maybe_interrupt(env); 104a3f5c315SBruno Larsen (billionai) } 1056a8e8188SMatheus Ferst #endif 106fe43ba97SBruno Larsen (billionai) 107fe43ba97SBruno Larsen (billionai) static inline void fpscr_set_rounding_mode(CPUPPCState *env) 108fe43ba97SBruno Larsen (billionai) { 109fe43ba97SBruno Larsen (billionai) int rnd_type; 110fe43ba97SBruno Larsen (billionai) 111fe43ba97SBruno Larsen (billionai) /* Set rounding mode */ 112208d8033SVíctor Colombo switch (env->fpscr & FP_RN) { 113fe43ba97SBruno Larsen (billionai) case 0: 114fe43ba97SBruno Larsen (billionai) /* Best approximation (round to nearest) */ 115fe43ba97SBruno Larsen (billionai) rnd_type = float_round_nearest_even; 116fe43ba97SBruno Larsen (billionai) break; 117fe43ba97SBruno Larsen (billionai) case 1: 118fe43ba97SBruno Larsen (billionai) /* Smaller magnitude (round toward zero) */ 119fe43ba97SBruno Larsen (billionai) rnd_type = float_round_to_zero; 120fe43ba97SBruno Larsen (billionai) break; 121fe43ba97SBruno Larsen (billionai) case 2: 122fe43ba97SBruno Larsen (billionai) /* Round toward +infinite */ 123fe43ba97SBruno Larsen (billionai) rnd_type = float_round_up; 124fe43ba97SBruno Larsen (billionai) break; 125fe43ba97SBruno Larsen (billionai) default: 126fe43ba97SBruno Larsen (billionai) case 3: 127fe43ba97SBruno Larsen (billionai) /* Round toward -infinite */ 128fe43ba97SBruno Larsen (billionai) rnd_type = float_round_down; 129fe43ba97SBruno Larsen (billionai) break; 130fe43ba97SBruno Larsen (billionai) } 131fe43ba97SBruno Larsen (billionai) set_float_rounding_mode(rnd_type, &env->fp_status); 132fe43ba97SBruno Larsen (billionai) } 133fe43ba97SBruno Larsen (billionai) 134fe43ba97SBruno Larsen (billionai) void ppc_store_fpscr(CPUPPCState *env, target_ulong val) 135fe43ba97SBruno Larsen (billionai) { 13625ee608dSLucas Mateus Castro (alqotel) val &= FPSCR_MTFS_MASK; 137fe43ba97SBruno Larsen (billionai) if (val & FPSCR_IX) { 138fe43ba97SBruno Larsen (billionai) val |= FP_VX; 139fe43ba97SBruno Larsen (billionai) } 140fe43ba97SBruno Larsen (billionai) if ((val >> FPSCR_XX) & (val >> FPSCR_XE) & 0x1f) { 141fe43ba97SBruno Larsen (billionai) val |= FP_FEX; 142fe43ba97SBruno Larsen (billionai) } 143fe43ba97SBruno Larsen (billionai) env->fpscr = val; 14408e185caSLucas Mateus Castro (alqotel) env->fp_status.rebias_overflow = (FP_OE & env->fpscr) ? true : false; 14508e185caSLucas Mateus Castro (alqotel) env->fp_status.rebias_underflow = (FP_UE & env->fpscr) ? true : false; 146fe43ba97SBruno Larsen (billionai) if (tcg_enabled()) { 147fe43ba97SBruno Larsen (billionai) fpscr_set_rounding_mode(env); 148fe43ba97SBruno Larsen (billionai) } 149fe43ba97SBruno Larsen (billionai) } 150