target-ppc/op_helper.h

   1 /*
   2  *  PowerPC emulation helpers header for qemu.
   3  *
   4  *  Copyright (c) 2003-2007 Jocelyn Mayer
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #if defined(MEMSUFFIX)
  22
  23 /* Memory load/store helpers */
  24 void glue(do_lsw, MEMSUFFIX) (int dst);
  25 void glue(do_stsw, MEMSUFFIX) (int src);
  26 void glue(do_lmw, MEMSUFFIX) (int dst);
  27 void glue(do_lmw_le, MEMSUFFIX) (int dst);
  28 void glue(do_stmw, MEMSUFFIX) (int src);
  29 void glue(do_stmw_le, MEMSUFFIX) (int src);
  30 void glue(do_icbi, MEMSUFFIX) (void);
  31 void glue(do_dcbz, MEMSUFFIX) (void);
  32 void glue(do_POWER_lscbx, MEMSUFFIX) (int dest, int ra, int rb);
  33 void glue(do_POWER2_lfq, MEMSUFFIX) (void);
  34 void glue(do_POWER2_lfq_le, MEMSUFFIX) (void);
  35 void glue(do_POWER2_stfq, MEMSUFFIX) (void);
  36 void glue(do_POWER2_stfq_le, MEMSUFFIX) (void);
  37
  38 #if defined(TARGET_PPC64)
  39 void glue(do_lsw_64, MEMSUFFIX) (int dst);
  40 void glue(do_stsw_64, MEMSUFFIX) (int src);
  41 void glue(do_lmw_64, MEMSUFFIX) (int dst);
  42 void glue(do_lmw_le_64, MEMSUFFIX) (int dst);
  43 void glue(do_stmw_64, MEMSUFFIX) (int src);
  44 void glue(do_stmw_le_64, MEMSUFFIX) (int src);
  45 void glue(do_icbi_64, MEMSUFFIX) (void);
  46 void glue(do_dcbz_64, MEMSUFFIX) (void);
  47 #endif
  48
  49 #else
  50
  51 void do_print_mem_EA (target_ulong EA);
  52
  53 /* Registers load and stores */
  54 void do_load_cr (void);
  55 void do_store_cr (uint32_t mask);
  56 #if defined(TARGET_PPC64)
  57 void do_store_pri (int prio);
  58 #endif
  59 void do_fpscr_setbit (int bit);
  60 void do_store_fpscr (uint32_t mask);
  61 target_ulong ppc_load_dump_spr (int sprn);
  62 void ppc_store_dump_spr (int sprn, target_ulong val);
  63
  64 /* Integer arithmetic helpers */
  65 void do_adde (void);
  66 void do_addmeo (void);
  67 void do_divwo (void);
  68 void do_divwuo (void);
  69 void do_mullwo (void);
  70 void do_nego (void);
  71 void do_subfe (void);
  72 void do_subfmeo (void);
  73 void do_subfzeo (void);
  74 void do_cntlzw (void);
  75 #if defined(TARGET_PPC64)
  76 void do_cntlzd (void);
  77 #endif
  78 void do_sraw (void);
  79 #if defined(TARGET_PPC64)
  80 void do_adde_64 (void);
  81 void do_addmeo_64 (void);
  82 void do_divdo (void);
  83 void do_divduo (void);
  84 void do_mulldo (void);
  85 void do_nego_64 (void);
  86 void do_subfe_64 (void);
  87 void do_subfmeo_64 (void);
  88 void do_subfzeo_64 (void);
  89 void do_srad (void);
  90 #endif
  91 void do_popcntb (void);
  92 #if defined(TARGET_PPC64)
  93 void do_popcntb_64 (void);
  94 #endif
  95
  96 /* Floating-point arithmetic helpers */
  97 void do_compute_fprf (int set_class);
  98 #ifdef CONFIG_SOFTFLOAT
  99 void do_float_check_status (void);
 100 #endif
 101 #if USE_PRECISE_EMULATION
 102 void do_fadd (void);
 103 void do_fsub (void);
 104 void do_fmul (void);
 105 void do_fdiv (void);
 106 #endif
 107 void do_fsqrt (void);
 108 void do_fre (void);
 109 void do_fres (void);
 110 void do_frsqrte (void);
 111 void do_fsel (void);
 112 #if USE_PRECISE_EMULATION
 113 void do_fmadd (void);
 114 void do_fmsub (void);
 115 #endif
 116 void do_fnmadd (void);
 117 void do_fnmsub (void);
 118 #if USE_PRECISE_EMULATION
 119 void do_frsp (void);
 120 #endif
 121 void do_fctiw (void);
 122 void do_fctiwz (void);
 123 #if defined(TARGET_PPC64)
 124 void do_fcfid (void);
 125 void do_fctid (void);
 126 void do_fctidz (void);
 127 #endif
 128 void do_frin (void);
 129 void do_friz (void);
 130 void do_frip (void);
 131 void do_frim (void);
 132 void do_fcmpu (void);
 133 void do_fcmpo (void);
 134
 135 /* Misc */
 136 void do_tw (int flags);
 137 #if defined(TARGET_PPC64)
 138 void do_td (int flags);
 139 #endif
 140 #if !defined(CONFIG_USER_ONLY)
 141 void do_store_msr (void);
 142 void do_rfi (void);
 143 #if defined(TARGET_PPC64)
 144 void do_rfid (void);
 145 void do_hrfid (void);
 146 #endif
 147 void do_load_6xx_tlb (int is_code);
 148 void do_load_74xx_tlb (int is_code);
 149 #endif
 150
 151 /* POWER / PowerPC 601 specific helpers */
 152 void do_POWER_abso (void);
 153 void do_POWER_clcs (void);
 154 void do_POWER_div (void);
 155 void do_POWER_divo (void);
 156 void do_POWER_divs (void);
 157 void do_POWER_divso (void);
 158 void do_POWER_dozo (void);
 159 void do_POWER_maskg (void);
 160 void do_POWER_mulo (void);
 161 #if !defined(CONFIG_USER_ONLY)
 162 void do_POWER_rac (void);
 163 void do_POWER_rfsvc (void);
 164 void do_store_hid0_601 (void);
 165 #endif
 166
 167 /* PowerPC 602 specific helper */
 168 #if !defined(CONFIG_USER_ONLY)
 169 void do_op_602_mfrom (void);
 170 #endif
 171
 172 /* PowerPC 440 specific helpers */
 173 #if !defined(CONFIG_USER_ONLY)
 174 void do_440_tlbre (int word);
 175 void do_440_tlbwe (int word);
 176 #endif
 177
 178 /* PowerPC 4xx specific helpers */
 179 void do_405_check_sat (void);
 180 void do_load_dcr (void);
 181 void do_store_dcr (void);
 182 #if !defined(CONFIG_USER_ONLY)
 183 void do_40x_rfci (void);
 184 void do_rfci (void);
 185 void do_rfdi (void);
 186 void do_rfmci (void);
 187 void do_4xx_tlbre_lo (void);
 188 void do_4xx_tlbre_hi (void);
 189 void do_4xx_tlbwe_lo (void);
 190 void do_4xx_tlbwe_hi (void);
 191 #endif
 192
 193 /* PowerPC 440 specific helpers */
 194 void do_440_dlmzb (void);
 195
 196 /* PowerPC 403 specific helpers */
 197 #if !defined(CONFIG_USER_ONLY)
 198 void do_load_403_pb (int num);
 199 void do_store_403_pb (int num);
 200 #endif
 201
 202 /* SPE extension helpers */
 203 void do_brinc (void);
 204 /* Fixed-point vector helpers */
 205 void do_evabs (void);
 206 void do_evaddw (void);
 207 void do_evcntlsw (void);
 208 void do_evcntlzw (void);
 209 void do_evneg (void);
 210 void do_evrlw (void);
 211 void do_evsel (void);
 212 void do_evrndw (void);
 213 void do_evslw (void);
 214 void do_evsrws (void);
 215 void do_evsrwu (void);
 216 void do_evsubfw (void);
 217 void do_evcmpeq (void);
 218 void do_evcmpgts (void);
 219 void do_evcmpgtu (void);
 220 void do_evcmplts (void);
 221 void do_evcmpltu (void);
 222
 223 /* Single precision floating-point helpers */
 224 void do_efscmplt (void);
 225 void do_efscmpgt (void);
 226 void do_efscmpeq (void);
 227 void do_efscfsf (void);
 228 void do_efscfuf (void);
 229 void do_efsctsf (void);
 230 void do_efsctuf (void);
 231
 232 void do_efscfsi (void);
 233 void do_efscfui (void);
 234 void do_efsctsi (void);
 235 void do_efsctui (void);
 236 void do_efsctsiz (void);
 237 void do_efsctuiz (void);
 238
 239 /* Double precision floating-point helpers */
 240 void do_efdcmplt (void);
 241 void do_efdcmpgt (void);
 242 void do_efdcmpeq (void);
 243 void do_efdcfsf (void);
 244 void do_efdcfuf (void);
 245 void do_efdctsf (void);
 246 void do_efdctuf (void);
 247
 248 void do_efdcfsi (void);
 249 void do_efdcfui (void);
 250 void do_efdctsi (void);
 251 void do_efdctui (void);
 252 void do_efdctsiz (void);
 253 void do_efdctuiz (void);
 254
 255 void do_efdcfs (void);
 256 void do_efscfd (void);
 257
 258 /* Floating-point vector helpers */
 259 void do_evfsabs (void);
 260 void do_evfsnabs (void);
 261 void do_evfsneg (void);
 262 void do_evfsadd (void);
 263 void do_evfssub (void);
 264 void do_evfsmul (void);
 265 void do_evfsdiv (void);
 266 void do_evfscmplt (void);
 267 void do_evfscmpgt (void);
 268 void do_evfscmpeq (void);
 269 void do_evfststlt (void);
 270 void do_evfststgt (void);
 271 void do_evfststeq (void);
 272 void do_evfscfsi (void);
 273 void do_evfscfui (void);
 274 void do_evfscfsf (void);
 275 void do_evfscfuf (void);
 276 void do_evfsctsf (void);
 277 void do_evfsctuf (void);
 278 void do_evfsctsi (void);
 279 void do_evfsctui (void);
 280 void do_evfsctsiz (void);
 281 void do_evfsctuiz (void);
 282
 283 /* SPE extension */
 284 /* Single precision floating-point helpers */
 285 static always_inline uint32_t _do_efsabs (uint32_t val)
 286 {
 287     return val & ~0x80000000;
 288 }
 289 static always_inline uint32_t _do_efsnabs (uint32_t val)
 290 {
 291     return val | 0x80000000;
 292 }
 293 static always_inline uint32_t _do_efsneg (uint32_t val)
 294 {
 295     return val ^ 0x80000000;
 296 }
 297 static always_inline uint32_t _do_efsadd (uint32_t op1, uint32_t op2)
 298 {
 299     union {
 300         uint32_t u;
 301         float32 f;
 302     } u1, u2;
 303     u1.u = op1;
 304     u2.u = op2;
 305     u1.f = float32_add(u1.f, u2.f, &env->spe_status);
 306     return u1.u;
 307 }
 308 static always_inline uint32_t _do_efssub (uint32_t op1, uint32_t op2)
 309 {
 310     union {
 311         uint32_t u;
 312         float32 f;
 313     } u1, u2;
 314     u1.u = op1;
 315     u2.u = op2;
 316     u1.f = float32_sub(u1.f, u2.f, &env->spe_status);
 317     return u1.u;
 318 }
 319 static always_inline uint32_t _do_efsmul (uint32_t op1, uint32_t op2)
 320 {
 321     union {
 322         uint32_t u;
 323         float32 f;
 324     } u1, u2;
 325     u1.u = op1;
 326     u2.u = op2;
 327     u1.f = float32_mul(u1.f, u2.f, &env->spe_status);
 328     return u1.u;
 329 }
 330 static always_inline uint32_t _do_efsdiv (uint32_t op1, uint32_t op2)
 331 {
 332     union {
 333         uint32_t u;
 334         float32 f;
 335     } u1, u2;
 336     u1.u = op1;
 337     u2.u = op2;
 338     u1.f = float32_div(u1.f, u2.f, &env->spe_status);
 339     return u1.u;
 340 }
 341
 342 static always_inline int _do_efststlt (uint32_t op1, uint32_t op2)
 343 {
 344     union {
 345         uint32_t u;
 346         float32 f;
 347     } u1, u2;
 348     u1.u = op1;
 349     u2.u = op2;
 350     return float32_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0;
 351 }
 352 static always_inline int _do_efststgt (uint32_t op1, uint32_t op2)
 353 {
 354     union {
 355         uint32_t u;
 356         float32 f;
 357     } u1, u2;
 358     u1.u = op1;
 359     u2.u = op2;
 360     return float32_le(u1.f, u2.f, &env->spe_status) ? 0 : 1;
 361 }
 362 static always_inline int _do_efststeq (uint32_t op1, uint32_t op2)
 363 {
 364     union {
 365         uint32_t u;
 366         float32 f;
 367     } u1, u2;
 368     u1.u = op1;
 369     u2.u = op2;
 370     return float32_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0;
 371 }
 372 /* Double precision floating-point helpers */
 373 static always_inline int _do_efdtstlt (uint64_t op1, uint64_t op2)
 374 {
 375     union {
 376         uint64_t u;
 377         float64 f;
 378     } u1, u2;
 379     u1.u = op1;
 380     u2.u = op2;
 381     return float64_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0;
 382 }
 383 static always_inline int _do_efdtstgt (uint64_t op1, uint64_t op2)
 384 {
 385     union {
 386         uint64_t u;
 387         float64 f;
 388     } u1, u2;
 389     u1.u = op1;
 390     u2.u = op2;
 391     return float64_le(u1.f, u2.f, &env->spe_status) ? 0 : 1;
 392 }
 393 static always_inline int _do_efdtsteq (uint64_t op1, uint64_t op2)
 394 {
 395     union {
 396         uint64_t u;
 397         float64 f;
 398     } u1, u2;
 399     u1.u = op1;
 400     u2.u = op2;
 401     return float64_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0;
 402 }
 403 #endif