mirror of
https://gitlab.os-k.eu/os-k-team/kvisc.git
synced 2023-08-25 14:05:46 +02:00
99 lines
4.5 KiB
C
99 lines
4.5 KiB
C
// The OS/K Team licenses this file to you under the MIT license.
|
|
// See the LICENSE file in the project root for more information.
|
|
|
|
#include <pc/arch.h>
|
|
|
|
#include <in/flags.h>
|
|
#include <in/arch_i.h>
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
#define DECV(v, p) \
|
|
ulong v; \
|
|
GETV(v, p)
|
|
|
|
#define GETV(v, p) \
|
|
assert(p); \
|
|
if (ACC_FMT_IS_MEM(p->type)) \
|
|
v = readmem(ctx, p->addr, p->mlen); \
|
|
else v = p->val
|
|
|
|
#define DECVZX(v, p) \
|
|
ulong v; \
|
|
GETVZX(v, p)
|
|
|
|
#define GETVZX(v, p) \
|
|
assert(p); \
|
|
if (ACC_FMT_IS_MEM(p->type)) \
|
|
v = readmemzx(ctx, p->addr, p->mlen); \
|
|
else v = p->val
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
#define IMPL_START_0(name) \
|
|
bool i_##name(ctx_t *ctx, acc_t *p1, acc_t *p2, ulong *r1, ulong *r2) \
|
|
{
|
|
|
|
#define IMPL_START_1(name) \
|
|
bool i_##name(ctx_t *ctx, acc_t *p1, acc_t *p2, ulong *r1, ulong *r2) \
|
|
{ \
|
|
DECV(v1, p1);
|
|
|
|
#define IMPL_START_2(name) \
|
|
bool i_##name(ctx_t *ctx, acc_t *p1, acc_t *p2, ulong *r1, ulong *r2) \
|
|
{ \
|
|
DECV(v1, p1); \
|
|
DECV(v2, p2);
|
|
|
|
#define IMPL_OUT_ZSF \
|
|
SET_ZSF(v1); \
|
|
IMPL_OUT
|
|
|
|
#define IMPL_OUT \
|
|
*r1 = v1; \
|
|
return 1; \
|
|
}
|
|
|
|
#define IMPL_OUT_2 \
|
|
*r1 = v1; \
|
|
*r2 = v2; \
|
|
return 2; \
|
|
}
|
|
|
|
#define IMPL_END \
|
|
return 0; \
|
|
}
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
#define CHK_SUPERV() \
|
|
do { \
|
|
if ((cr0 & UF) > 0) { \
|
|
_except(ctx, E_SYS, "Supervisor-only INSTR"); \
|
|
} \
|
|
} while (0)
|
|
|
|
#define CHK_STACK(op) \
|
|
if (rsp % 8 > 0 || rbp % 8 > 0) { \
|
|
_except(ctx, E_STA, "Misaligned stack REGS"); \
|
|
} \
|
|
if (rbp op rsp) { \
|
|
_except(ctx, E_STU, "Stack underflow"); \
|
|
}
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|
|
#define PUSH(v) \
|
|
rsp -= 8; \
|
|
writemem(ctx, v, rsp, 8);
|
|
|
|
#define POP(v) \
|
|
v = readmem(ctx, rsp, 8); \
|
|
rsp += 8;
|
|
|
|
#define JUMP(v) \
|
|
rip = v + cr1
|
|
|
|
//----------------------------------------------------------------------------//
|
|
|