dfbc799d8e
Signed-off-by: Aurelien Jarno <aurelien@aurel32.net> git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@5828 c046a42c-6fe2-441c-8c8c-71466251a162
318 lines
7.7 KiB
C
318 lines
7.7 KiB
C
/*
|
|
* PowerPC emulation micro-operations for qemu.
|
|
*
|
|
* Copyright (c) 2003-2007 Jocelyn Mayer
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "op_mem_access.h"
|
|
|
|
/* Load and set reservation */
|
|
void OPPROTO glue(op_lwarx, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu32, MEMSUFFIX)((uint32_t)T0);
|
|
env->reserve = (uint32_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_lwarx_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu32, MEMSUFFIX)((uint64_t)T0);
|
|
env->reserve = (uint64_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_ldarx, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu64, MEMSUFFIX)((uint32_t)T0);
|
|
env->reserve = (uint32_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_ldarx_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu64, MEMSUFFIX)((uint64_t)T0);
|
|
env->reserve = (uint64_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
void OPPROTO glue(op_lwarx_le, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu32r, MEMSUFFIX)((uint32_t)T0);
|
|
env->reserve = (uint32_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_lwarx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu32r, MEMSUFFIX)((uint64_t)T0);
|
|
env->reserve = (uint64_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_ldarx_le, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu64r, MEMSUFFIX)((uint32_t)T0);
|
|
env->reserve = (uint32_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_ldarx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
T1 = glue(ldu64r, MEMSUFFIX)((uint64_t)T0);
|
|
env->reserve = (uint64_t)T0;
|
|
}
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
/* Store with reservation */
|
|
void OPPROTO glue(op_stwcx, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint32_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st32, MEMSUFFIX)((uint32_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_stwcx_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint64_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st32, MEMSUFFIX)((uint64_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_stdcx, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint32_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st64, MEMSUFFIX)((uint32_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_stdcx_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint64_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st64, MEMSUFFIX)((uint64_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
void OPPROTO glue(op_stwcx_le, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint32_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st32r, MEMSUFFIX)((uint32_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_stwcx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint64_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st32r, MEMSUFFIX)((uint64_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_stdcx_le, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint32_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st64r, MEMSUFFIX)((uint32_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
|
|
void OPPROTO glue(op_stdcx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
if (unlikely(T0 & 0x03)) {
|
|
raise_exception(env, POWERPC_EXCP_ALIGN);
|
|
} else {
|
|
if (unlikely(env->reserve != (uint64_t)T0)) {
|
|
env->crf[0] = xer_so;
|
|
} else {
|
|
glue(st64r, MEMSUFFIX)((uint64_t)T0, T1);
|
|
env->crf[0] = xer_so | 0x02;
|
|
}
|
|
}
|
|
env->reserve = (target_ulong)-1ULL;
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
/* External access */
|
|
void OPPROTO glue(op_eciwx, MEMSUFFIX) (void)
|
|
{
|
|
T1 = glue(ldu32, MEMSUFFIX)((uint32_t)T0);
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_eciwx_64, MEMSUFFIX) (void)
|
|
{
|
|
T1 = glue(ldu32, MEMSUFFIX)((uint64_t)T0);
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
void OPPROTO glue(op_ecowx, MEMSUFFIX) (void)
|
|
{
|
|
glue(st32, MEMSUFFIX)((uint32_t)T0, T1);
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_ecowx_64, MEMSUFFIX) (void)
|
|
{
|
|
glue(st32, MEMSUFFIX)((uint64_t)T0, T1);
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
void OPPROTO glue(op_eciwx_le, MEMSUFFIX) (void)
|
|
{
|
|
T1 = glue(ldu32r, MEMSUFFIX)((uint32_t)T0);
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_eciwx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
T1 = glue(ldu32r, MEMSUFFIX)((uint64_t)T0);
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
void OPPROTO glue(op_ecowx_le, MEMSUFFIX) (void)
|
|
{
|
|
glue(st32r, MEMSUFFIX)((uint32_t)T0, T1);
|
|
RETURN();
|
|
}
|
|
|
|
#if defined(TARGET_PPC64)
|
|
void OPPROTO glue(op_ecowx_le_64, MEMSUFFIX) (void)
|
|
{
|
|
glue(st32r, MEMSUFFIX)((uint64_t)T0, T1);
|
|
RETURN();
|
|
}
|
|
#endif
|
|
|
|
/* XXX: those micro-ops need tests ! */
|
|
/* PowerPC 601 specific instructions (POWER bridge) */
|
|
void OPPROTO glue(op_POWER_lscbx, MEMSUFFIX) (void)
|
|
{
|
|
/* When byte count is 0, do nothing */
|
|
if (likely(T1 != 0)) {
|
|
glue(do_POWER_lscbx, MEMSUFFIX)(PARAM1, PARAM2, PARAM3);
|
|
}
|
|
RETURN();
|
|
}
|
|
|
|
#undef MEMSUFFIX
|