[SOFT386]

Implement opcode group 0xD0 (instructions ROL, ROR, RCL, RCR, SHL, SHR, SAL, SAR).


svn path=/branches/ntvdm/; revision=60455
This commit is contained in:
Aleksandar Andrejevic 2013-09-29 18:39:59 +00:00
parent 9328c2226b
commit 4490103840

View file

@ -347,8 +347,134 @@ SOFT386_OPCODE_HANDLER(Soft386OpcodeGroupC7)
SOFT386_OPCODE_HANDLER(Soft386OpcodeGroupD0)
{
UNIMPLEMENTED;
return FALSE; // TODO: NOT IMPLEMENTED
UCHAR Result, Dummy, Value;
SOFT386_MOD_REG_RM ModRegRm;
BOOLEAN AddressSize = State->SegmentRegs[SOFT386_REG_CS].Size;
if (State->PrefixFlags & SOFT386_PREFIX_ADSIZE)
{
/* The ADSIZE prefix toggles the size */
AddressSize = !AddressSize;
}
if (!Soft386ParseModRegRm(State, AddressSize, &ModRegRm))
{
/* Exception occurred */
return FALSE;
}
/* Read the operands */
if (!Soft386ReadModrmByteOperands(State, &ModRegRm, &Dummy, &Value))
{
/* Exception occurred */
return FALSE;
}
/* Check which operation is this */
switch (ModRegRm.Register)
{
/* ROL */
case 0:
{
Result = (Value << 1) | (Value >> 7);
/* Update CF and OF */
State->Flags.Cf = Value >> 7;
State->Flags.Of = ((Result & SIGN_FLAG_BYTE) ? TRUE : FALSE)
^ (State->Flags.Cf ? TRUE : FALSE);
break;
}
/* ROR */
case 1:
{
Result = (Value >> 1) | (Value << 7);
/* Update CF and OF */
State->Flags.Cf = Value & 1;
State->Flags.Of = ((Result & SIGN_FLAG_BYTE) ? TRUE : FALSE)
^ ((Result & (SIGN_FLAG_BYTE >> 1)) ? TRUE : FALSE);
break;
}
/* RCL */
case 2:
{
Result = (Value << 1) | (State->Flags.Cf ? 1 : 0);
/* Update CF and OF */
State->Flags.Cf = (Value & SIGN_FLAG_BYTE) ? TRUE : FALSE;
State->Flags.Of = ((Result & SIGN_FLAG_BYTE) ? TRUE : FALSE)
^ (State->Flags.Cf ? TRUE : FALSE);
break;
}
/* RCR */
case 3:
{
Result = (Value >> 1) | (State->Flags.Cf ? SIGN_FLAG_BYTE : 0);
/* Update CF and OF */
State->Flags.Cf = Value & 1;
State->Flags.Of = ((Result & SIGN_FLAG_BYTE) ? TRUE : FALSE)
^ ((Result & (SIGN_FLAG_BYTE >> 1)) ? TRUE : FALSE);
break;
}
/* SHL/SAL */
case 4:
case 6:
{
Result = Value << 1;
/* Update CF and OF */
State->Flags.Cf = (Value & SIGN_FLAG_BYTE) ? TRUE : FALSE;
State->Flags.Of = ((Result & SIGN_FLAG_BYTE) ? TRUE : FALSE)
^ (State->Flags.Cf ? TRUE : FALSE);
break;
}
/* SHR */
case 5:
{
Result = Value >> 1;
/* Update CF and OF */
State->Flags.Cf = Value & 1;
State->Flags.Of = (Value & SIGN_FLAG_BYTE) ? TRUE : FALSE;
break;
}
/* SAR */
case 7:
{
Result = (Value >> 1) | (Value & SIGN_FLAG_BYTE);
/* Update CF and OF */
State->Flags.Cf = Value & 1;
State->Flags.Of = FALSE;
break;
}
}
/* Update ZF, SF and PF */
State->Flags.Zf = (Result == 0) ? TRUE : FALSE;
State->Flags.Sf = (Result & SIGN_FLAG_BYTE) ? TRUE : FALSE;
State->Flags.Pf = Soft386CalculateParity(Result);
/* Write back the result */
return Soft386WriteModrmByteOperands(State,
&ModRegRm,
FALSE,
Value);
}
SOFT386_OPCODE_HANDLER(Soft386OpcodeGroupD1)