v86/src/arith.js
github-jane-doe 15ff296628
Typos (#371)
Fix typos
2020-10-04 19:46:41 +02:00

1626 lines
39 KiB
JavaScript

/*
* Arithmatic functions
* This file contains:
*
* add, adc, sub, sbc, cmp
* inc, dec
* neg, not
* imul, mul, idiv, div
* xadd
*
* das, daa, aad, aam
*
* and, or, xor, test
* shl, shr, sar, ror, rol, rcr, rcl
* shld, shrd
*
* bts, btr, btc, bt
* bsf, bsr
*
* popcnt
*/
"use strict";
CPU.prototype.add8 = function(dest, src) { return this.add(dest, src, OPSIZE_8); }
CPU.prototype.add16 = function(dest, src) { return this.add(dest, src, OPSIZE_16); }
CPU.prototype.add32 = function(dest, src) { return this.add(dest, src, OPSIZE_32); }
CPU.prototype.adc8 = function(dest, src) { return this.adc(dest, src, OPSIZE_8); }
CPU.prototype.adc16 = function(dest, src) { return this.adc(dest, src, OPSIZE_16); }
CPU.prototype.adc32 = function(dest, src) { return this.adc(dest, src, OPSIZE_32); }
CPU.prototype.sub8 = function(dest, src) { return this.sub(dest, src, OPSIZE_8); }
CPU.prototype.sub16 = function(dest, src) { return this.sub(dest, src, OPSIZE_16); }
CPU.prototype.sub32 = function(dest, src) { return this.sub(dest, src, OPSIZE_32); }
CPU.prototype.cmp8 = function(dest, src) { return this.sub(dest, src, OPSIZE_8); }
CPU.prototype.cmp16 = function(dest, src) { return this.sub(dest, src, OPSIZE_16); }
CPU.prototype.cmp32 = function(dest, src) { return this.sub(dest, src, OPSIZE_32); }
CPU.prototype.sbb8 = function(dest, src) { return this.sbb(dest, src, OPSIZE_8); }
CPU.prototype.sbb16 = function(dest, src) { return this.sbb(dest, src, OPSIZE_16); }
CPU.prototype.sbb32 = function(dest, src) { return this.sbb(dest, src, OPSIZE_32); }
CPU.prototype.add = function(dest_operand, source_operand, op_size)
{
//if(this.safe_read32s(this.instruction_pointer + 1) === 0 && this.safe_read32s(this.instruction_pointer + 5) === 0) throw "0000000";
this.last_op1 = dest_operand;
this.last_op2 = source_operand;
this.last_add_result = this.last_result = dest_operand + source_operand | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all;
return this.last_result;
}
CPU.prototype.adc = function(dest_operand, source_operand, op_size)
{
var cf = this.getcf();
this.last_op1 = dest_operand;
this.last_op2 = source_operand;
this.last_add_result = this.last_result = (dest_operand + source_operand | 0) + cf | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all;
return this.last_result;
}
CPU.prototype.sub = function(dest_operand, source_operand, op_size)
{
this.last_add_result = dest_operand;
this.last_op2 = source_operand;
this.last_op1 = this.last_result = dest_operand - source_operand | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all;
return this.last_result;
}
CPU.prototype.sbb = function(dest_operand, source_operand, op_size)
{
var cf = this.getcf();
this.last_add_result = dest_operand;
this.last_op2 = source_operand;
this.last_op1 = this.last_result = dest_operand - source_operand - cf | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all;
return this.last_result;
}
/*
* inc and dec
*/
CPU.prototype.inc8 = function(dest) { return this.inc(dest, OPSIZE_8); }
CPU.prototype.inc16 = function(dest) { return this.inc(dest, OPSIZE_16); }
CPU.prototype.inc32 = function(dest) { return this.inc(dest, OPSIZE_32); }
CPU.prototype.dec8 = function(dest) { return this.dec(dest, OPSIZE_8); }
CPU.prototype.dec16 = function(dest) { return this.dec(dest, OPSIZE_16); }
CPU.prototype.dec32 = function(dest) { return this.dec(dest, OPSIZE_32); }
CPU.prototype.inc = function(dest_operand, op_size)
{
this.flags = (this.flags & ~1) | this.getcf();
this.last_op1 = dest_operand;
this.last_op2 = 1;
this.last_add_result = this.last_result = dest_operand + 1 | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all & ~1;
return this.last_result;
}
CPU.prototype.dec = function(dest_operand, op_size)
{
this.flags = (this.flags & ~1) | this.getcf();
this.last_add_result = dest_operand;
this.last_op2 = 1;
this.last_op1 = this.last_result = dest_operand - 1 | 0;
this.last_op_size = op_size;
this.flags_changed = flags_all & ~1;
return this.last_result;
}
/*
* neg
*/
CPU.prototype.neg8 = function(dest) { return this.neg(dest, OPSIZE_8); }
CPU.prototype.neg16 = function(dest) { return this.neg(dest, OPSIZE_16); }
CPU.prototype.neg32 = function(dest) { return this.neg(dest, OPSIZE_32); }
CPU.prototype.neg = function(dest_operand, op_size)
{
this.last_op1 = this.last_result = -dest_operand | 0;
this.flags_changed = flags_all;
this.last_add_result = 0;
this.last_op2 = dest_operand;
this.last_op_size = op_size;
return this.last_result;
}
/*
* mul, imul, div, idiv
*
* Note: imul has some extra opcodes
* while other functions only allow
* ax * modrm
*/
CPU.prototype.mul8 = function(source_operand)
{
var result = source_operand * this.reg8[reg_al];
this.reg16[reg_ax] = result;
this.last_result = result & 0xFF;
this.last_op_size = OPSIZE_8;
if(result < 0x100)
{
this.flags = this.flags & ~1 & ~flag_overflow;
}
else
{
this.flags = this.flags | 1 | flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
}
CPU.prototype.imul8 = function(source_operand)
{
var result = source_operand * this.reg8s[reg_al];
this.reg16[reg_ax] = result;
this.last_result = result & 0xFF;
this.last_op_size = OPSIZE_8;
if(result > 0x7F || result < -0x80)
{
this.flags = this.flags | 1 | flag_overflow;
}
else
{
this.flags = this.flags & ~1 & ~flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
}
CPU.prototype.mul16 = function(source_operand)
{
var result = source_operand * this.reg16[reg_ax],
high_result = result >>> 16;
//console.log(h(a) + " * " + h(this.reg16[reg_ax]) + " = " + h(result));
this.reg16[reg_ax] = result;
this.reg16[reg_dx] = high_result;
this.last_result = result & 0xFFFF;
this.last_op_size = OPSIZE_16;
if(high_result === 0)
{
this.flags &= ~1 & ~flag_overflow;
}
else
{
this.flags |= 1 | flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
}
/*
* imul with 1 argument
* ax = ax * r/m
*/
CPU.prototype.imul16 = function(source_operand)
{
var result = source_operand * this.reg16s[reg_ax];
this.reg16[reg_ax] = result;
this.reg16[reg_dx] = result >> 16;
this.last_result = result & 0xFFFF;
this.last_op_size = OPSIZE_16;
if(result > 0x7FFF || result < -0x8000)
{
this.flags |= 1 | flag_overflow;
}
else
{
this.flags &= ~1 & ~flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
}
/*
* imul with 2 or 3 arguments
* reg = reg * r/m
* reg = imm * r/m
*/
CPU.prototype.imul_reg16 = function(operand1, operand2)
{
dbg_assert(operand1 < 0x8000 && operand1 >= -0x8000);
dbg_assert(operand2 < 0x8000 && operand2 >= -0x8000);
var result = operand1 * operand2;
this.last_result = result & 0xFFFF;
this.last_op_size = OPSIZE_16;
if(result > 0x7FFF || result < -0x8000)
{
this.flags |= 1 | flag_overflow;
}
else
{
this.flags &= ~1 & ~flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
return result;
}
CPU.prototype.mul32 = function(source_operand)
{
var dest_operand = this.reg32s[reg_eax];
var lo = v86util.mul_low(dest_operand, source_operand);
var hi = v86util.mul_high(dest_operand, source_operand);
this.reg32s[reg_eax] = lo;
this.reg32s[reg_edx] = hi;
this.last_result = lo;
this.last_op_size = OPSIZE_32;
if(hi === 0)
{
this.flags &= ~1 & ~flag_overflow;
}
else
{
this.flags |= 1 | flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
//console.log(h(source_operand >>> 0, 8) + " * " + h(dest_operand >>> 0, 8));
//console.log("= " + h(this.reg32[reg_edx], 8) + ":" + h(this.reg32[reg_eax], 8));
}
CPU.prototype.imul32 = function(source_operand)
{
dbg_assert(source_operand < 0x80000000 && source_operand >= -0x80000000);
var dest_operand = this.reg32s[reg_eax];
var lo = v86util.imul_low(dest_operand, source_operand);
var hi = v86util.imul_high(dest_operand, source_operand);
this.reg32s[reg_eax] = lo;
this.reg32s[reg_edx] = hi;
this.last_result = lo;
this.last_op_size = OPSIZE_32;
if(hi === (lo >> 31))
{
this.flags &= ~1 & ~flag_overflow;
}
else
{
this.flags |= 1 | flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
//console.log(target_operand + " * " + source_operand);
//console.log("= " + h(this.reg32[reg_edx]) + " " + h(this.reg32[reg_eax]));
}
/*
* imul with 2 or 3 arguments
* reg = reg * r/m
* reg = imm * r/m
*/
CPU.prototype.imul_reg32 = function(operand1, operand2)
{
dbg_assert(operand1 < 0x80000000 && operand1 >= -0x80000000);
dbg_assert(operand2 < 0x80000000 && operand2 >= -0x80000000);
var lo = v86util.imul_low(operand1, operand2);
var hi = v86util.imul_high(operand1, operand2);
this.last_result = lo;
this.last_op_size = OPSIZE_32;
if(hi === (lo >> 31))
{
this.flags &= ~1 & ~flag_overflow;
}
else
{
this.flags |= 1 | flag_overflow;
}
this.flags_changed = flags_all & ~1 & ~flag_overflow;
return lo;
//console.log(operand + " * " + source_operand);
//console.log("= " + this.reg32[reg]);
}
CPU.prototype.div8 = function(source_operand)
{
dbg_assert(source_operand >= 0 && source_operand < 0x100);
if(source_operand === 0)
{
this.trigger_de();
return;
}
var target_operand = this.reg16[reg_ax],
result = target_operand / source_operand | 0;
if(result >= 0x100)
{
this.trigger_de();
}
else
{
this.reg8[reg_al] = result;
this.reg8[reg_ah] = target_operand % source_operand;
}
}
CPU.prototype.idiv8 = function(source_operand)
{
dbg_assert(source_operand >= -0x80 && source_operand < 0x80);
if(source_operand === 0)
{
this.trigger_de();
return;
}
var target_operand = this.reg16s[reg_ax],
result = target_operand / source_operand | 0;
if(result >= 0x80 || result <= -0x81)
{
this.trigger_de();
}
else
{
this.reg8[reg_al] = result;
this.reg8[reg_ah] = target_operand % source_operand;
}
}
CPU.prototype.div16 = function(source_operand)
{
dbg_assert(source_operand >= 0 && source_operand < 0x10000);
if(source_operand === 0)
{
this.trigger_de();
return;
}
var
target_operand = (this.reg16[reg_ax] | this.reg16[reg_dx] << 16) >>> 0,
result = target_operand / source_operand | 0;
if(result >= 0x10000 || result < 0)
{
this.trigger_de();
}
else
{
this.reg16[reg_ax] = result;
this.reg16[reg_dx] = target_operand % source_operand;
}
}
CPU.prototype.idiv16 = function(source_operand)
{
dbg_assert(source_operand >= -0x8000 && source_operand < 0x8000);
if(source_operand === 0)
{
this.trigger_de();
return;
}
var target_operand = this.reg16[reg_ax] | (this.reg16[reg_dx] << 16),
result = target_operand / source_operand | 0;
if(result >= 0x8000 || result <= -0x8001)
{
this.trigger_de();
}
else
{
this.reg16[reg_ax] = result;
this.reg16[reg_dx] = target_operand % source_operand;
}
}
// If the dividend is too large, the division cannot be done precisely using
// JavaScript's double floating point numbers. Run simple long division until
// the dividend is small enough
CPU.prototype.do_div32 = function(div_low, div_high, quot)
{
if(div_high >= quot || quot === 0)
{
dbg_log("div32 #DE: " + h(div_high, 8) + ":" + h(div_low, 8) + " div " + h(quot, 8));
this.trigger_de();
}
var result = 0;
if(div_high > 0x100000)
{
var m = 0;
var i = 32;
var q = quot;
while(q > div_high)
{
q >>>= 1;
i--;
}
while(div_high > 0x100000)
{
if(div_high >= q)
{
div_high -= q;
var sub = quot << i >>> 0;
if(sub > div_low)
{
div_high--;
}
div_low = div_low - sub >>> 0;
result |= 1 << i
}
i--;
q >>= 1;
}
result >>>= 0;
}
var div = div_low + div_high * 0x100000000;
var mod = div % quot;
result += div / quot | 0;
this.div32_result[0] = result;
this.div32_result[1] = mod;
return this.div32_result;
}
CPU.prototype.div32 = function(source_operand)
{
dbg_assert(source_operand >= 0 && source_operand <= 0xffffffff);
var dest_operand_low = this.reg32[reg_eax],
dest_operand_high = this.reg32[reg_edx];
var result_mod = this.do_div32(dest_operand_low, dest_operand_high, source_operand);
var result = result_mod[0];
var mod = result_mod[1];
// XXX
dbg_assert(source_operand);
if(result >= 0x100000000)
{
dbg_log("div32 #DE: " + h(dest_operand_high, 8) + ":" + h(dest_operand_low, 8) + " div " + h(source_operand, 8));
dbg_log("-> " + h(result));
this.trigger_de();
}
else
{
this.reg32s[reg_eax] = result;
this.reg32s[reg_edx] = mod;
}
//console.log(h(dest_operand_high) + ":" + h(dest_operand_low) + " / " + h(source_operand));
//console.log("= " + h(this.reg32[reg_eax]) + " rem " + h(this.reg32[reg_edx]));
}
CPU.prototype.idiv32 = function(source_operand)
{
dbg_assert(source_operand < 0x80000000 && source_operand >= -0x80000000);
var dest_operand_low = this.reg32[reg_eax],
dest_operand_high = this.reg32s[reg_edx],
div_is_neg = false,
is_neg = false;
if(source_operand < 0)
{
is_neg = true;
source_operand = -source_operand;
}
if(dest_operand_high < 0)
{
div_is_neg = true;
is_neg = !is_neg;
dest_operand_low = -dest_operand_low >>> 0;
dest_operand_high = ~dest_operand_high + !dest_operand_low;
}
var result_mod = this.do_div32(dest_operand_low, dest_operand_high, source_operand);
var result = result_mod[0];
var mod = result_mod[1];
if(is_neg)
{
result = -result | 0;
}
if(div_is_neg)
{
mod = -mod | 0;
}
dbg_assert(source_operand);
if(result >= 0x80000000 || result <= -0x80000001)
{
dbg_log("div32 #DE: " + h(dest_operand_high, 8) + ":" + h(dest_operand_low, 8) + " div " + h(source_operand, 8));
dbg_log("-> " + h(result));
this.trigger_de();
}
else
{
this.reg32s[reg_eax] = result;
this.reg32s[reg_edx] = mod;
}
//console.log(h(dest_operand_high) + ":" + h(dest_operand_low) + " / " + h(source_operand));
//console.log("= " + h(this.reg32[reg_eax]) + " rem " + h(this.reg32[reg_edx]));
}
CPU.prototype.xadd8 = function(source_operand, reg)
{
var tmp = this.reg8[reg];
this.reg8[reg] = source_operand;
return this.add(source_operand, tmp, OPSIZE_8);
}
CPU.prototype.xadd16 = function(source_operand, reg)
{
var tmp = this.reg16[reg];
this.reg16[reg] = source_operand;
return this.add(source_operand, tmp, OPSIZE_16);
}
CPU.prototype.xadd32 = function(source_operand, reg)
{
var tmp = this.reg32s[reg];
this.reg32s[reg] = source_operand;
return this.add(source_operand, tmp, OPSIZE_32);
}
CPU.prototype.bcd_daa = function()
{
//dbg_log("daa");
// decimal adjust after addition
var old_al = this.reg8[reg_al],
old_cf = this.getcf(),
old_af = this.getaf();
this.flags &= ~1 & ~flag_adjust
if((old_al & 0xF) > 9 || old_af)
{
this.reg8[reg_al] += 6;
this.flags |= flag_adjust;
}
if(old_al > 0x99 || old_cf)
{
this.reg8[reg_al] += 0x60;
this.flags |= 1;
}
this.last_result = this.reg8[reg_al];
this.last_op_size = OPSIZE_8;
this.last_op1 = this.last_op2 = 0;
this.flags_changed = flags_all & ~1 & ~flag_adjust & ~flag_overflow;
}
CPU.prototype.bcd_das = function()
{
//dbg_log("das");
// decimal adjust after subtraction
var old_al = this.reg8[reg_al],
old_cf = this.getcf();
this.flags &= ~1;
if((old_al & 0xF) > 9 || this.getaf())
{
this.reg8[reg_al] -= 6;
this.flags |= flag_adjust;
this.flags = this.flags & ~1 | old_cf | (old_al < 6);
}
else
{
this.flags &= ~flag_adjust;
}
if(old_al > 0x99 || old_cf)
{
this.reg8[reg_al] -= 0x60;
this.flags |= 1;
}
this.last_result = this.reg8[reg_al];
this.last_op_size = OPSIZE_8;
this.last_op1 = this.last_op2 = 0;
this.flags_changed = flags_all & ~1 & ~flag_adjust & ~flag_overflow;
}
CPU.prototype.bcd_aam = function(imm8)
{
//dbg_log("aam");
// ascii adjust after multiplication
if(imm8 === 0)
{
this.trigger_de();
}
else
{
var temp = this.reg8[reg_al];
this.reg8[reg_ah] = temp / imm8;
this.reg8[reg_al] = temp % imm8;
this.last_result = this.reg8[reg_al];
this.flags_changed = flags_all & ~1 & ~flag_adjust & ~flag_overflow;
this.flags &= ~1 & ~flag_adjust & ~flag_overflow;
}
}
CPU.prototype.bcd_aad = function(imm8)
{
//dbg_log("aad");
// ascii adjust before division
var result = this.reg8[reg_al] + this.reg8[reg_ah] * imm8;
this.last_result = result & 0xFF;
this.reg16[reg_ax] = this.last_result;
this.last_op_size = OPSIZE_8;
this.flags_changed = flags_all & ~1 & ~flag_adjust & ~flag_overflow;
this.flags &= ~1 & ~flag_adjust & ~flag_overflow;
if(result > 0xFFFF)
{
this.flags |= 1;
}
}
CPU.prototype.bcd_aaa = function()
{
//dbg_log("aaa");
if((this.reg8[reg_al] & 0xF) > 9 || this.getaf())
{
this.reg16[reg_ax] += 6;
this.reg8[reg_ah] += 1;
this.flags |= flag_adjust | 1;
}
else
{
this.flags &= ~flag_adjust & ~1;
}
this.reg8[reg_al] &= 0xF;
this.flags_changed &= ~flag_adjust & ~1;
};
CPU.prototype.bcd_aas = function()
{
//dbg_log("aas");
if((this.reg8[reg_al] & 0xF) > 9 || this.getaf())
{
this.reg16[reg_ax] -= 6;
this.reg8[reg_ah] -= 1;
this.flags |= flag_adjust | 1;
}
else
{
this.flags &= ~flag_adjust & ~1;
}
this.reg8[reg_al] &= 0xF;
this.flags_changed &= ~flag_adjust & ~1;
}
/* \O
* bitwise functions |\
* / \
*
* and, or, xor, test
* shl, shr, sar, rol, ror, rcl, ror
* shrd, shld
*
* bt, bts, btr, btc
* bsf, bsr
*/
CPU.prototype.and8 = function(dest, src) { return this.and(dest, src, OPSIZE_8); }
CPU.prototype.and16 = function(dest, src) { return this.and(dest, src, OPSIZE_16); }
CPU.prototype.and32 = function(dest, src) { return this.and(dest, src, OPSIZE_32); }
CPU.prototype.test8 = function(dest, src) { return this.and(dest, src, OPSIZE_8); }
CPU.prototype.test16 = function(dest, src) { return this.and(dest, src, OPSIZE_16); }
CPU.prototype.test32 = function(dest, src) { return this.and(dest, src, OPSIZE_32); }
CPU.prototype.or8 = function(dest, src) { return this.or(dest, src, OPSIZE_8); }
CPU.prototype.or16 = function(dest, src) { return this.or(dest, src, OPSIZE_16); }
CPU.prototype.or32 = function(dest, src) { return this.or(dest, src, OPSIZE_32); }
CPU.prototype.xor8 = function(dest, src) { return this.xor(dest, src, OPSIZE_8); }
CPU.prototype.xor16 = function(dest, src) { return this.xor(dest, src, OPSIZE_16); }
CPU.prototype.xor32 = function(dest, src) { return this.xor(dest, src, OPSIZE_32); }
CPU.prototype.and = function(dest_operand, source_operand, op_size)
{
this.last_result = dest_operand & source_operand;
this.last_op_size = op_size;
this.flags &= ~1 & ~flag_overflow & ~flag_adjust;
this.flags_changed = flags_all & ~1 & ~flag_overflow & ~flag_adjust;
return this.last_result;
}
CPU.prototype.or = function(dest_operand, source_operand, op_size)
{
this.last_result = dest_operand | source_operand;
this.last_op_size = op_size;
this.flags &= ~1 & ~flag_overflow & ~flag_adjust;
this.flags_changed = flags_all & ~1 & ~flag_overflow & ~flag_adjust;
return this.last_result;
}
CPU.prototype.xor = function(dest_operand, source_operand, op_size)
{
this.last_result = dest_operand ^ source_operand;
this.last_op_size = op_size;
this.flags &= ~1 & ~flag_overflow & ~flag_adjust;
this.flags_changed = flags_all & ~1 & ~flag_overflow & ~flag_adjust;
return this.last_result;
}
/*
* rotates and shifts
*/
CPU.prototype.rol8 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
count &= 7;
var result = dest_operand << count | dest_operand >> (8 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result & 1)
| (result << 11 ^ result << 4) & flag_overflow;
return result;
}
CPU.prototype.rol16 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
count &= 15;
var result = dest_operand << count | dest_operand >> (16 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result & 1)
| (result << 11 ^ result >> 4) & flag_overflow;
return result;
}
CPU.prototype.rol32 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
var result = dest_operand << count | dest_operand >>> (32 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result & 1)
| (result << 11 ^ result >> 20) & flag_overflow;
return result;
}
CPU.prototype.rcl8 = function(dest_operand, count)
{
count %= 9;
if(!count)
{
return dest_operand;
}
var result = dest_operand << count | this.getcf() << (count - 1) | dest_operand >> (9 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 8 & 1)
| (result << 3 ^ result << 4) & flag_overflow;
return result;
}
CPU.prototype.rcl16 = function(dest_operand, count)
{
count %= 17;
if(!count)
{
return dest_operand;
}
var result = dest_operand << count | this.getcf() << (count - 1) | dest_operand >> (17 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 16 & 1)
| (result >> 5 ^ result >> 4) & flag_overflow;
return result;
}
CPU.prototype.rcl32 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
var result = dest_operand << count | this.getcf() << (count - 1);
if(count > 1)
{
result |= dest_operand >>> (33 - count);
}
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow) | (dest_operand >>> (32 - count) & 1);
this.flags |= (this.flags << 11 ^ result >> 20) & flag_overflow;
return result;
}
CPU.prototype.ror8 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
count &= 7;
var result = dest_operand >> count | dest_operand << (8 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 7 & 1)
| (result << 4 ^ result << 5) & flag_overflow;
return result;
}
CPU.prototype.ror16 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
count &= 15;
var result = dest_operand >> count | dest_operand << (16 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 15 & 1)
| (result >> 4 ^ result >> 3) & flag_overflow;
return result;
}
CPU.prototype.ror32 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
var result = dest_operand >>> count | dest_operand << (32 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 31 & 1)
| (result >> 20 ^ result >> 19) & flag_overflow;
return result;
}
CPU.prototype.rcr8 = function(dest_operand, count)
{
count %= 9;
if(!count)
{
return dest_operand;
}
var result = dest_operand >> count | this.getcf() << (8 - count) | dest_operand << (9 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 8 & 1)
| (result << 4 ^ result << 5) & flag_overflow;
return result;
}
CPU.prototype.rcr16 = function(dest_operand, count)
{
count %= 17;
if(!count)
{
return dest_operand;
}
var result = dest_operand >> count | this.getcf() << (16 - count) | dest_operand << (17 - count);
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (result >> 16 & 1)
| (result >> 4 ^ result >> 3) & flag_overflow;
return result;
}
CPU.prototype.rcr32 = function(dest_operand, count)
{
if(!count)
{
return dest_operand;
}
var result = dest_operand >>> count | this.getcf() << (32 - count);
if(count > 1)
{
result |= dest_operand << (33 - count);
}
this.flags_changed &= ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (dest_operand >> (count - 1) & 1)
| (result >> 20 ^ result >> 19) & flag_overflow;
return result;
}
CPU.prototype.shl8 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand << count;
this.last_op_size = OPSIZE_8;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (this.last_result >> 8 & 1)
| (this.last_result << 3 ^ this.last_result << 4) & flag_overflow;
return this.last_result;
}
CPU.prototype.shl16 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand << count;
this.last_op_size = OPSIZE_16;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (this.last_result >> 16 & 1)
| (this.last_result >> 5 ^ this.last_result >> 4) & flag_overflow;
return this.last_result;
}
CPU.prototype.shl32 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand << count;
this.last_op_size = OPSIZE_32;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
// test this
this.flags = (this.flags & ~1 & ~flag_overflow) | (dest_operand >>> (32 - count) & 1);
this.flags |= ((this.flags & 1) ^ (this.last_result >> 31 & 1)) << 11 & flag_overflow;
return this.last_result;
}
CPU.prototype.shr8 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand >> count;
this.last_op_size = OPSIZE_8;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (dest_operand >> (count - 1) & 1)
| (dest_operand >> 7 & 1) << 11 & flag_overflow;
return this.last_result;
}
CPU.prototype.shr16 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand >> count;
this.last_op_size = OPSIZE_16;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (dest_operand >> (count - 1) & 1)
| (dest_operand >> 4) & flag_overflow;
return this.last_result;
}
CPU.prototype.shr32 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand >>> count;
this.last_op_size = OPSIZE_32;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow)
| (dest_operand >>> (count - 1) & 1)
| (dest_operand >> 20) & flag_overflow;
return this.last_result;
}
CPU.prototype.sar8 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
if(count < 8)
{
this.last_result = dest_operand << 24 >> count + 24;
// of is zero
this.flags = (this.flags & ~1 & ~flag_overflow) | (dest_operand >> (count - 1) & 1);
}
else
{
this.last_result = dest_operand << 24 >> 31;
this.flags = (this.flags & ~1 & ~flag_overflow) | (this.last_result & 1);
}
this.last_op_size = OPSIZE_8;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
return this.last_result;
}
CPU.prototype.sar16 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
if(count < 16)
{
this.last_result = dest_operand << 16 >> count + 16;
this.flags = (this.flags & ~1 & ~flag_overflow) | (dest_operand >> (count - 1) & 1);
}
else
{
this.last_result = dest_operand << 16 >> 31;
this.flags = (this.flags & ~1 & ~flag_overflow) | (this.last_result & 1);
}
this.last_op_size = OPSIZE_16;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
return this.last_result;
}
CPU.prototype.sar32 = function(dest_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand >> count;
this.last_op_size = OPSIZE_32;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1 & ~flag_overflow) | (dest_operand >>> (count - 1) & 1);
return this.last_result;
}
CPU.prototype.shrd16 = function(dest_operand, source_operand, count)
{
if(count === 0)
{
return dest_operand;
}
if(count <= 16)
{
this.last_result = dest_operand >> count | source_operand << (16 - count);
this.flags = (this.flags & ~1) | (dest_operand >> (count - 1) & 1);
}
else
{
this.last_result = dest_operand << (32 - count) | source_operand >> (count - 16);
this.flags = (this.flags & ~1) | (source_operand >> (count - 17) & 1);
}
this.last_op_size = OPSIZE_16;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~flag_overflow) | ((this.last_result ^ dest_operand) >> 4 & flag_overflow);
return this.last_result;
}
CPU.prototype.shrd32 = function(dest_operand, source_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand >>> count | source_operand << (32 - count);
this.last_op_size = OPSIZE_32;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1) | (dest_operand >>> (count - 1) & 1);
this.flags = (this.flags & ~flag_overflow) | ((this.last_result ^ dest_operand) >> 20 & flag_overflow);
return this.last_result;
}
CPU.prototype.shld16 = function(dest_operand, source_operand, count)
{
if(count === 0)
{
return dest_operand;
}
if(count <= 16)
{
this.last_result = dest_operand << count | source_operand >>> (16 - count);
this.flags = (this.flags & ~1) | (dest_operand >>> (16 - count) & 1);
}
else
{
this.last_result = dest_operand >> (32 - count) | source_operand << (count - 16);
this.flags = (this.flags & ~1) | (source_operand >>> (32 - count) & 1);
}
this.last_op_size = OPSIZE_16;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~flag_overflow) | ((this.flags & 1) ^ (this.last_result >> 15 & 1)) << 11;
return this.last_result;
}
CPU.prototype.shld32 = function(dest_operand, source_operand, count)
{
if(count === 0)
{
return dest_operand;
}
this.last_result = dest_operand << count | source_operand >>> (32 - count);
this.last_op_size = OPSIZE_32;
this.flags_changed = flags_all & ~1 & ~flag_overflow;
this.flags = (this.flags & ~1) | (dest_operand >>> (32 - count) & 1);
if(count === 1)
{
this.flags = (this.flags & ~flag_overflow) | ((this.flags & 1) ^ (this.last_result >> 31 & 1)) << 11;
}
else
{
this.flags &= ~flag_overflow;
}
return this.last_result;
}
CPU.prototype.bt_reg = function(bit_base, bit_offset)
{
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
}
CPU.prototype.btc_reg = function(bit_base, bit_offset)
{
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
return bit_base ^ 1 << bit_offset;
}
CPU.prototype.bts_reg = function(bit_base, bit_offset)
{
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
return bit_base | 1 << bit_offset;
}
CPU.prototype.btr_reg = function(bit_base, bit_offset)
{
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
return bit_base & ~(1 << bit_offset);
}
CPU.prototype.bt_mem = function(virt_addr, bit_offset)
{
var bit_base = this.safe_read8(virt_addr + (bit_offset >> 3) | 0);
bit_offset &= 7;
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
}
CPU.prototype.btc_mem = function(virt_addr, bit_offset)
{
var phys_addr = this.translate_address_write(virt_addr + (bit_offset >> 3) | 0);
var bit_base = this.read8(phys_addr);
bit_offset &= 7;
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
this.write8(phys_addr, bit_base ^ 1 << bit_offset);
}
CPU.prototype.btr_mem = function(virt_addr, bit_offset)
{
var phys_addr = this.translate_address_write(virt_addr + (bit_offset >> 3) | 0);
var bit_base = this.read8(phys_addr);
bit_offset &= 7;
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
this.write8(phys_addr, bit_base & ~(1 << bit_offset));
}
CPU.prototype.bts_mem = function(virt_addr, bit_offset)
{
var phys_addr = this.translate_address_write(virt_addr + (bit_offset >> 3) | 0);
var bit_base = this.read8(phys_addr);
bit_offset &= 7;
this.flags = (this.flags & ~1) | (bit_base >> bit_offset & 1);
this.flags_changed &= ~1;
this.write8(phys_addr, bit_base | 1 << bit_offset);
}
CPU.prototype.bsf16 = function(old, bit_base)
{
this.flags_changed = flags_all & ~flag_zero;
this.last_op_size = OPSIZE_16;
if(bit_base === 0)
{
this.flags |= flag_zero;
this.last_result = bit_base;
// not defined in the docs, but value doesn't change on my intel machine
return old;
}
else
{
this.flags &= ~flag_zero;
// http://jsperf.com/lowest-bit-index
return this.last_result = v86util.int_log2(-bit_base & bit_base);
}
}
CPU.prototype.bsf32 = function(old, bit_base)
{
this.flags_changed = flags_all & ~flag_zero;
this.last_op_size = OPSIZE_32;
if(bit_base === 0)
{
this.flags |= flag_zero;
this.last_result = bit_base;
return old;
}
else
{
this.flags &= ~flag_zero;
return this.last_result = v86util.int_log2((-bit_base & bit_base) >>> 0);
}
}
CPU.prototype.bsr16 = function(old, bit_base)
{
this.flags_changed = flags_all & ~flag_zero;
this.last_op_size = OPSIZE_16;
if(bit_base === 0)
{
this.flags |= flag_zero;
this.last_result = bit_base;
return old;
}
else
{
this.flags &= ~flag_zero;
return this.last_result = v86util.int_log2(bit_base);
}
}
CPU.prototype.bsr32 = function(old, bit_base)
{
this.flags_changed = flags_all & ~flag_zero;
this.last_op_size = OPSIZE_32;
if(bit_base === 0)
{
this.flags |= flag_zero;
this.last_result = bit_base;
return old;
}
else
{
this.flags &= ~flag_zero;
return this.last_result = v86util.int_log2(bit_base >>> 0);
}
}
CPU.prototype.popcnt = function(v)
{
this.flags_changed = 0;
this.flags &= ~flags_all;
if(v)
{
// http://graphics.stanford.edu/~seander/bithacks.html#CountBitsSetParallel
v = v - ((v >> 1) & 0x55555555);
v = (v & 0x33333333) + ((v >> 2) & 0x33333333);
return ((v + (v >> 4) & 0xF0F0F0F) * 0x1010101) >> 24;
}
else
{
this.flags |= flag_zero;
return 0;
}
};
CPU.prototype.saturate_sw_to_ub = function(v)
{
dbg_assert((v & 0xFFFF0000) === 0);
let ret = v >>> 0;
if (ret >= 0x8000) {
ret = 0;
}
else if (ret > 0xFF) {
ret = 0xFF;
}
dbg_assert((ret & 0xFFFFFF00) === 0);
return ret;
};
CPU.prototype.saturate_sw_to_sb = function(v)
{
dbg_assert((v & 0xFFFF0000) === 0);
let ret = v;
if (ret > 0xFF80) {
ret = ret & 0xFF;
}
else if (ret > 0x7FFF) {
ret = 0x80;
}
else if (ret > 0x7F) {
ret = 0x7F;
}
dbg_assert((ret & 0xFFFFFF00) === 0);
return ret;
};
CPU.prototype.saturate_sd_to_sw = function(v)
{
let ret = v >>> 0;
if (ret > 0xFFFF8000) {
ret = ret & 0xFFFF;
}
else if (ret > 0x7FFFFFFF) {
ret = 0x8000;
}
else if (ret > 0x7FFF) {
ret = 0x7FFF;
}
dbg_assert((ret & 0xFFFF0000) === 0);
return ret;
};
CPU.prototype.saturate_sd_to_sb = function(v)
{
let ret = v >>> 0;
if (ret > 0xFFFFFF80) {
ret = ret & 0xFF;
}
else if (ret > 0x7FFFFFFF) {
ret = 0x80;
}
else if (ret > 0x7F) {
ret = 0x7F;
}
dbg_assert((ret & 0xFFFFFF00) === 0);
return ret;
};
CPU.prototype.saturate_sd_to_ub = function(v)
{
let ret = v | 0;
if (ret < 0) {
ret = 0;
}
dbg_assert((ret & 0xFFFFFF00) === 0);
return ret;
};
CPU.prototype.saturate_ud_to_ub = function(v)
{
let ret = v >>> 0;
if (ret > 0xFF) {
ret = 0xFF;
}
dbg_assert((ret & 0xFFFFFF00) === 0);
return ret;
};
CPU.prototype.saturate_uw = function(v)
{
dbg_assert(v >= 0);
return v > 0xFFFF ? 0xFFFF : v;
};
CPU.prototype.integer_round = function(f, rc)
{
if(rc === 0)
{
// Round to nearest, or even if equidistant
var rounded = Math.round(f);
if(rounded - f === 0.5 && (rounded % 2))
{
// Special case: Math.round rounds to positive infinity
// if equidistant
rounded--;
}
return rounded;
}
// rc=3 is truncate -> floor for positive numbers
else if(rc === 1 || (rc === 3 && f > 0))
{
return Math.floor(f);
}
else
{
return Math.ceil(f);
}
}