2003-11-23 17:58:08 +01:00
|
|
|
/*
|
2005-07-02 22:59:34 +02:00
|
|
|
* PowerPC emulation micro-operations for qemu.
|
2003-11-23 17:58:08 +01:00
|
|
|
*
|
2005-07-02 22:59:34 +02:00
|
|
|
* Copyright (c) 2003-2005 Jocelyn Mayer
|
2003-11-23 17:58:08 +01:00
|
|
|
*
|
|
|
|
* 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
|
|
|
|
*/
|
|
|
|
|
2004-01-04 23:58:38 +01:00
|
|
|
/* General purpose registers moves */
|
2003-11-23 17:58:08 +01:00
|
|
|
void OPPROTO glue(op_load_gpr_T0_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
T0 = regs->gpr[REG];
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_load_gpr_T1_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
T1 = regs->gpr[REG];
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_load_gpr_T2_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
T2 = regs->gpr[REG];
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T0_gpr_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->gpr[REG] = T0;
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T1_gpr_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->gpr[REG] = T1;
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T2_gpr_gpr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->gpr[REG] = T2;
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
#if REG <= 7
|
2004-01-04 23:58:38 +01:00
|
|
|
/* Condition register moves */
|
2003-11-23 17:58:08 +01:00
|
|
|
void OPPROTO glue(op_load_crf_T0_crf, REG)(void)
|
|
|
|
{
|
|
|
|
T0 = regs->crf[REG];
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_load_crf_T1_crf, REG)(void)
|
|
|
|
{
|
|
|
|
T1 = regs->crf[REG];
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T0_crf_crf, REG)(void)
|
|
|
|
{
|
|
|
|
regs->crf[REG] = T0;
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T1_crf_crf, REG)(void)
|
|
|
|
{
|
|
|
|
regs->crf[REG] = T1;
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
2004-01-04 15:57:11 +01:00
|
|
|
/* Floating point condition and status register moves */
|
|
|
|
void OPPROTO glue(op_load_fpscr_T0_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
T0 = regs->fpscr[REG];
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
#if REG == 0
|
|
|
|
void OPPROTO glue(op_store_T0_fpscr_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = (regs->fpscr[REG] & 0x9) | (T0 & ~0x9);
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T0_fpscri_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = (regs->fpscr[REG] & ~0x9) | (PARAM(1) & 0x9);
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_clear_fpscr_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = (regs->fpscr[REG] & 0x9);
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
#else
|
|
|
|
void OPPROTO glue(op_store_T0_fpscr_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = T0;
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_T0_fpscri_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = PARAM(1);
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_clear_fpscr_fpscr, REG)(void)
|
|
|
|
{
|
|
|
|
regs->fpscr[REG] = 0x0;
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2003-11-23 17:58:08 +01:00
|
|
|
#endif /* REG <= 7 */
|
|
|
|
|
2004-01-04 15:57:11 +01:00
|
|
|
/* floating point registers moves */
|
|
|
|
void OPPROTO glue(op_load_fpr_FT0_fpr, REG)(void)
|
2003-11-23 17:58:08 +01:00
|
|
|
{
|
|
|
|
FT0 = env->fpr[REG];
|
2004-01-04 15:57:11 +01:00
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
2004-01-04 15:57:11 +01:00
|
|
|
void OPPROTO glue(op_store_FT0_fpr_fpr, REG)(void)
|
2003-11-23 17:58:08 +01:00
|
|
|
{
|
|
|
|
env->fpr[REG] = FT0;
|
2004-01-04 15:57:11 +01:00
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_load_fpr_FT1_fpr, REG)(void)
|
|
|
|
{
|
|
|
|
FT1 = env->fpr[REG];
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_FT1_fpr_fpr, REG)(void)
|
|
|
|
{
|
|
|
|
env->fpr[REG] = FT1;
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_load_fpr_FT2_fpr, REG)(void)
|
|
|
|
{
|
|
|
|
FT2 = env->fpr[REG];
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_FT2_fpr_fpr, REG)(void)
|
|
|
|
{
|
|
|
|
env->fpr[REG] = FT2;
|
|
|
|
RETURN();
|
2003-11-23 17:58:08 +01:00
|
|
|
}
|
|
|
|
|
2004-01-04 23:58:38 +01:00
|
|
|
#if REG <= 15
|
|
|
|
/* Segment register moves */
|
|
|
|
void OPPROTO glue(op_load_sr, REG)(void)
|
|
|
|
{
|
|
|
|
T0 = env->sr[REG];
|
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
|
|
|
|
void OPPROTO glue(op_store_sr, REG)(void)
|
|
|
|
{
|
2005-07-02 22:59:34 +02:00
|
|
|
do_store_sr(env, REG, T0);
|
2004-01-04 23:58:38 +01:00
|
|
|
RETURN();
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2003-11-23 17:58:08 +01:00
|
|
|
#undef REG
|