1 /* 2 * PowerPC internal definitions for qemu. 3 * 4 * This library is free software; you can redistribute it and/or 5 * modify it under the terms of the GNU Lesser General Public 6 * License as published by the Free Software Foundation; either 7 * version 2.1 of the License, or (at your option) any later version. 8 * 9 * This library is distributed in the hope that it will be useful, 10 * but WITHOUT ANY WARRANTY; without even the implied warranty of 11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 12 * Lesser General Public License for more details. 13 * 14 * You should have received a copy of the GNU Lesser General Public 15 * License along with this library; if not, see <http://www.gnu.org/licenses/>. 16 */ 17 18 #ifndef PPC_INTERNAL_H 19 #define PPC_INTERNAL_H 20 21 #include "hw/registerfields.h" 22 23 #define FUNC_MASK(name, ret_type, size, max_val) \ 24 static inline ret_type name(uint##size##_t start, \ 25 uint##size##_t end) \ 26 { \ 27 ret_type ret, max_bit = size - 1; \ 28 \ 29 if (likely(start == 0)) { \ 30 ret = max_val << (max_bit - end); \ 31 } else if (likely(end == max_bit)) { \ 32 ret = max_val >> start; \ 33 } else { \ 34 ret = (((uint##size##_t)(-1ULL)) >> (start)) ^ \ 35 (((uint##size##_t)(-1ULL) >> (end)) >> 1); \ 36 if (unlikely(start > end)) { \ 37 return ~ret; \ 38 } \ 39 } \ 40 \ 41 return ret; \ 42 } 43 44 #if defined(TARGET_PPC64) 45 FUNC_MASK(MASK, target_ulong, 64, UINT64_MAX); 46 #else 47 FUNC_MASK(MASK, target_ulong, 32, UINT32_MAX); 48 #endif 49 FUNC_MASK(mask_u32, uint32_t, 32, UINT32_MAX); 50 FUNC_MASK(mask_u64, uint64_t, 64, UINT64_MAX); 51 52 /*****************************************************************************/ 53 /*** Instruction decoding ***/ 54 #define EXTRACT_HELPER(name, shift, nb) \ 55 static inline uint32_t name(uint32_t opcode) \ 56 { \ 57 return extract32(opcode, shift, nb); \ 58 } 59 60 #define EXTRACT_SHELPER(name, shift, nb) \ 61 static inline int32_t name(uint32_t opcode) \ 62 { \ 63 return sextract32(opcode, shift, nb); \ 64 } 65 66 #define EXTRACT_HELPER_SPLIT(name, shift1, nb1, shift2, nb2) \ 67 static inline uint32_t name(uint32_t opcode) \ 68 { \ 69 return extract32(opcode, shift1, nb1) << nb2 | \ 70 extract32(opcode, shift2, nb2); \ 71 } 72 73 #define EXTRACT_HELPER_SPLIT_3(name, \ 74 d0_bits, shift_op_d0, shift_d0, \ 75 d1_bits, shift_op_d1, shift_d1, \ 76 d2_bits, shift_op_d2, shift_d2) \ 77 static inline int16_t name(uint32_t opcode) \ 78 { \ 79 return \ 80 (((opcode >> (shift_op_d0)) & ((1 << (d0_bits)) - 1)) << (shift_d0)) | \ 81 (((opcode >> (shift_op_d1)) & ((1 << (d1_bits)) - 1)) << (shift_d1)) | \ 82 (((opcode >> (shift_op_d2)) & ((1 << (d2_bits)) - 1)) << (shift_d2)); \ 83 } 84 85 86 /* Opcode part 1 */ 87 EXTRACT_HELPER(opc1, 26, 6); 88 /* Opcode part 2 */ 89 EXTRACT_HELPER(opc2, 1, 5); 90 /* Opcode part 3 */ 91 EXTRACT_HELPER(opc3, 6, 5); 92 /* Opcode part 4 */ 93 EXTRACT_HELPER(opc4, 16, 5); 94 /* Update Cr0 flags */ 95 EXTRACT_HELPER(Rc, 0, 1); 96 /* Update Cr6 flags (Altivec) */ 97 EXTRACT_HELPER(Rc21, 10, 1); 98 /* Destination */ 99 EXTRACT_HELPER(rD, 21, 5); 100 /* Source */ 101 EXTRACT_HELPER(rS, 21, 5); 102 /* First operand */ 103 EXTRACT_HELPER(rA, 16, 5); 104 /* Second operand */ 105 EXTRACT_HELPER(rB, 11, 5); 106 /* Third operand */ 107 EXTRACT_HELPER(rC, 6, 5); 108 /*** Get CRn ***/ 109 EXTRACT_HELPER(crfD, 23, 3); 110 EXTRACT_HELPER(BF, 23, 3); 111 EXTRACT_HELPER(crfS, 18, 3); 112 EXTRACT_HELPER(crbD, 21, 5); 113 EXTRACT_HELPER(crbA, 16, 5); 114 EXTRACT_HELPER(crbB, 11, 5); 115 /* SPR / TBL */ 116 EXTRACT_HELPER(_SPR, 11, 10); 117 static inline uint32_t SPR(uint32_t opcode) 118 { 119 uint32_t sprn = _SPR(opcode); 120 121 return ((sprn >> 5) & 0x1F) | ((sprn & 0x1F) << 5); 122 } 123 /*** Get constants ***/ 124 /* 16 bits signed immediate value */ 125 EXTRACT_SHELPER(SIMM, 0, 16); 126 /* 16 bits unsigned immediate value */ 127 EXTRACT_HELPER(UIMM, 0, 16); 128 /* 5 bits signed immediate value */ 129 EXTRACT_SHELPER(SIMM5, 16, 5); 130 /* 5 bits signed immediate value */ 131 EXTRACT_HELPER(UIMM5, 16, 5); 132 /* 4 bits unsigned immediate value */ 133 EXTRACT_HELPER(UIMM4, 16, 4); 134 /* Bit count */ 135 EXTRACT_HELPER(NB, 11, 5); 136 /* Shift count */ 137 EXTRACT_HELPER(SH, 11, 5); 138 /* lwat/stwat/ldat/lwat */ 139 EXTRACT_HELPER(FC, 11, 5); 140 /* Vector shift count */ 141 EXTRACT_HELPER(VSH, 6, 4); 142 /* Mask start */ 143 EXTRACT_HELPER(MB, 6, 5); 144 /* Mask end */ 145 EXTRACT_HELPER(ME, 1, 5); 146 /* Trap operand */ 147 EXTRACT_HELPER(TO, 21, 5); 148 149 EXTRACT_HELPER(CRM, 12, 8); 150 151 #ifndef CONFIG_USER_ONLY 152 EXTRACT_HELPER(SR, 16, 4); 153 #endif 154 155 /* mtfsf/mtfsfi */ 156 EXTRACT_HELPER(FPBF, 23, 3); 157 EXTRACT_HELPER(FPIMM, 12, 4); 158 EXTRACT_HELPER(FPL, 25, 1); 159 EXTRACT_HELPER(FPFLM, 17, 8); 160 EXTRACT_HELPER(FPW, 16, 1); 161 162 /* addpcis */ 163 EXTRACT_HELPER_SPLIT_3(DX, 10, 6, 6, 5, 16, 1, 1, 0, 0) 164 #if defined(TARGET_PPC64) 165 /* darn */ 166 EXTRACT_HELPER(L, 16, 2); 167 #endif 168 169 /*** Jump target decoding ***/ 170 /* Immediate address */ 171 static inline target_ulong LI(uint32_t opcode) 172 { 173 return (opcode >> 0) & 0x03FFFFFC; 174 } 175 176 static inline uint32_t BD(uint32_t opcode) 177 { 178 return (opcode >> 0) & 0xFFFC; 179 } 180 181 EXTRACT_HELPER(BO, 21, 5); 182 EXTRACT_HELPER(BI, 16, 5); 183 /* Absolute/relative address */ 184 EXTRACT_HELPER(AA, 1, 1); 185 /* Link */ 186 EXTRACT_HELPER(LK, 0, 1); 187 188 /* DFP Z22-form */ 189 EXTRACT_HELPER(DCM, 10, 6) 190 191 /* DFP Z23-form */ 192 EXTRACT_HELPER(RMC, 9, 2) 193 EXTRACT_HELPER(Rrm, 16, 1) 194 195 EXTRACT_HELPER_SPLIT(DQxT, 3, 1, 21, 5); 196 EXTRACT_HELPER_SPLIT(xT, 0, 1, 21, 5); 197 EXTRACT_HELPER_SPLIT(xS, 0, 1, 21, 5); 198 EXTRACT_HELPER_SPLIT(xA, 2, 1, 16, 5); 199 EXTRACT_HELPER_SPLIT(xB, 1, 1, 11, 5); 200 EXTRACT_HELPER_SPLIT(xC, 3, 1, 6, 5); 201 EXTRACT_HELPER(DM, 8, 2); 202 EXTRACT_HELPER(UIM, 16, 2); 203 EXTRACT_HELPER(SHW, 8, 2); 204 EXTRACT_HELPER(SP, 19, 2); 205 EXTRACT_HELPER(IMM8, 11, 8); 206 EXTRACT_HELPER(DCMX, 16, 7); 207 EXTRACT_HELPER_SPLIT_3(DCMX_XV, 5, 16, 0, 1, 2, 5, 1, 6, 6); 208 209 void helper_compute_fprf_float16(CPUPPCState *env, float16 arg); 210 void helper_compute_fprf_float32(CPUPPCState *env, float32 arg); 211 void helper_compute_fprf_float128(CPUPPCState *env, float128 arg); 212 213 /* translate.c */ 214 215 int ppc_fixup_cpu(PowerPCCPU *cpu); 216 void create_ppc_opcodes(PowerPCCPU *cpu, Error **errp); 217 void destroy_ppc_opcodes(PowerPCCPU *cpu); 218 219 /* gdbstub.c */ 220 void ppc_gdb_init(CPUState *cs, PowerPCCPUClass *ppc); 221 gchar *ppc_gdb_arch_name(CPUState *cs); 222 223 /** 224 * prot_for_access_type: 225 * @access_type: Access type 226 * 227 * Return the protection bit required for the given access type. 228 */ 229 static inline int prot_for_access_type(MMUAccessType access_type) 230 { 231 switch (access_type) { 232 case MMU_INST_FETCH: 233 return PAGE_EXEC; 234 case MMU_DATA_LOAD: 235 return PAGE_READ; 236 case MMU_DATA_STORE: 237 return PAGE_WRITE; 238 } 239 g_assert_not_reached(); 240 } 241 242 /* PowerPC MMU emulation */ 243 244 typedef struct mmu_ctx_t mmu_ctx_t; 245 bool ppc_xlate(PowerPCCPU *cpu, vaddr eaddr, MMUAccessType access_type, 246 hwaddr *raddrp, int *psizep, int *protp, 247 int mmu_idx, bool guest_visible); 248 int get_physical_address_wtlb(CPUPPCState *env, mmu_ctx_t *ctx, 249 target_ulong eaddr, 250 MMUAccessType access_type, int type, 251 int mmu_idx); 252 /* Software driven TLB helpers */ 253 int ppc6xx_tlb_getnum(CPUPPCState *env, target_ulong eaddr, 254 int way, int is_code); 255 /* Context used internally during MMU translations */ 256 struct mmu_ctx_t { 257 hwaddr raddr; /* Real address */ 258 hwaddr eaddr; /* Effective address */ 259 int prot; /* Protection bits */ 260 hwaddr hash[2]; /* Pagetable hash values */ 261 target_ulong ptem; /* Virtual segment ID | API */ 262 int key; /* Access key */ 263 int nx; /* Non-execute area */ 264 }; 265 266 /* Common routines used by software and hardware TLBs emulation */ 267 static inline int pte_is_valid(target_ulong pte0) 268 { 269 return pte0 & 0x80000000 ? 1 : 0; 270 } 271 272 static inline void pte_invalidate(target_ulong *pte0) 273 { 274 *pte0 &= ~0x80000000; 275 } 276 277 #define PTE_PTEM_MASK 0x7FFFFFBF 278 #define PTE_CHECK_MASK (TARGET_PAGE_MASK | 0x7B) 279 280 #ifdef CONFIG_USER_ONLY 281 void ppc_cpu_record_sigsegv(CPUState *cs, vaddr addr, 282 MMUAccessType access_type, 283 bool maperr, uintptr_t ra); 284 #else 285 bool ppc_cpu_tlb_fill(CPUState *cs, vaddr address, int size, 286 MMUAccessType access_type, int mmu_idx, 287 bool probe, uintptr_t retaddr); 288 G_NORETURN void ppc_cpu_do_unaligned_access(CPUState *cs, vaddr addr, 289 MMUAccessType access_type, int mmu_idx, 290 uintptr_t retaddr); 291 #endif 292 293 FIELD(GER_MSK, XMSK, 0, 4) 294 FIELD(GER_MSK, YMSK, 4, 4) 295 FIELD(GER_MSK, PMSK, 8, 8) 296 297 static inline int ger_pack_masks(int pmsk, int ymsk, int xmsk) 298 { 299 int msk = 0; 300 msk = FIELD_DP32(msk, GER_MSK, XMSK, xmsk); 301 msk = FIELD_DP32(msk, GER_MSK, YMSK, ymsk); 302 msk = FIELD_DP32(msk, GER_MSK, PMSK, pmsk); 303 return msk; 304 } 305 306 #endif /* PPC_INTERNAL_H */ 307