2019-05-30 18:31:50 +02:00
|
|
|
// The OS/K Team licenses this file to you under the MIT license.
|
|
|
|
// See the LICENSE file in the project root for more information.
|
|
|
|
|
2019-06-05 12:53:09 +02:00
|
|
|
#include <in/instrs.h>
|
2019-05-30 18:31:50 +02:00
|
|
|
|
2019-05-30 20:23:27 +02:00
|
|
|
IMPL_COND(lea);
|
2019-06-03 15:16:11 +02:00
|
|
|
IMPL_COND(mov);
|
2019-05-30 20:23:27 +02:00
|
|
|
IMPL_COND(xchg);
|
2019-06-02 16:33:28 +02:00
|
|
|
IMPL_COND(cmpxchg);
|
2019-05-30 20:23:27 +02:00
|
|
|
|
2019-06-03 15:16:11 +02:00
|
|
|
/*
|
|
|
|
IMPL_COND(xchgb);
|
|
|
|
IMPL_COND(xchgw);
|
|
|
|
IMPL_COND(xchgl);
|
|
|
|
IMPL_COND(xchgt);
|
|
|
|
*/
|
|
|
|
|
2019-05-30 18:31:50 +02:00
|
|
|
//
|
|
|
|
// Movement instructions
|
|
|
|
//
|
|
|
|
|
|
|
|
IMPL_START_2(mov)
|
|
|
|
{
|
|
|
|
v1 = v2;
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
2019-06-03 15:16:11 +02:00
|
|
|
IMPL_START_2(movb)
|
|
|
|
{
|
|
|
|
v1 = (v1 & 0xFFFFFFFFFFFFFF00)
|
|
|
|
| (v2 & 0x00000000000000FF);
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
|
|
|
IMPL_START_2(movw)
|
|
|
|
{
|
|
|
|
v1 = (v1 & 0xFFFFFFFFFFFF0000)
|
|
|
|
| (v2 & 0x000000000000FFFF);
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
|
|
|
IMPL_START_2(movl)
|
|
|
|
{
|
|
|
|
v1 = (v1 & 0xFFFFFFFF00000000)
|
|
|
|
| (v2 & 0x00000000FFFFFFFF);
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
|
|
|
IMPL_START_2(movt)
|
|
|
|
{
|
|
|
|
v1 = (v1 & 0xFFFF000000000000)
|
|
|
|
| (v2 & 0x0000FFFFFFFFFFFF);
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
2019-06-07 13:38:34 +02:00
|
|
|
IMPL_COND(movb);
|
|
|
|
IMPL_COND(movw);
|
|
|
|
IMPL_COND(movl);
|
|
|
|
IMPL_COND(movt);
|
|
|
|
|
2019-05-30 18:31:50 +02:00
|
|
|
IMPL_START_2(xchg)
|
|
|
|
{
|
|
|
|
ulong t = v1;
|
|
|
|
v1 = v2;
|
|
|
|
v2 = t;
|
|
|
|
}
|
2019-06-05 22:59:32 +02:00
|
|
|
IMPL_OUT_2;
|
2019-05-30 18:31:50 +02:00
|
|
|
|
|
|
|
IMPL_START_1(lea)
|
|
|
|
{
|
2019-06-06 14:57:34 +02:00
|
|
|
ulong v2 = (p2->type == A_REG ? R(p2->val) : p2->val);
|
|
|
|
|
|
|
|
if (p2->mem) {
|
|
|
|
v2 += p2->off + R(p2->offreg);
|
|
|
|
}
|
|
|
|
|
|
|
|
v1 = v2;
|
2019-05-30 18:31:50 +02:00
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
2019-06-02 16:33:28 +02:00
|
|
|
IMPL_START_2(cmpxchg)
|
|
|
|
{
|
|
|
|
if (rax == v1) {
|
|
|
|
flg |= ZF;
|
|
|
|
v1 = v2;
|
|
|
|
}
|
|
|
|
|
|
|
|
else {
|
|
|
|
flg &= ~ZF;
|
|
|
|
rax = v1;
|
|
|
|
}
|
2019-05-30 18:31:50 +02:00
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
2019-06-07 13:38:34 +02:00
|
|
|
IMPL_START_1(gco)
|
|
|
|
{
|
|
|
|
v1 = cr1;
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
|
|
|
IMPL_START_1(gcd)
|
|
|
|
{
|
|
|
|
v1 = cr2;
|
|
|
|
}
|
|
|
|
IMPL_OUT;
|
|
|
|
|
|
|
|
|