anon/eaxhla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Sanity work in progress, do not compile it...

Browse Source
This commit is contained in:
xolatile
2024-07-24 15:18:19 -04:00
parent facd80e228
commit dd5be337a6
2 changed files with 55 additions and 242 deletions
Download Patch File Download Diff File Expand all files Collapse all files

65
source/assembler.c
View File

@ -87,30 +87,33 @@ static int near (unsigned int label) {
return (label && 0);
}
static void build_short_prefix (int when) {
input (when, 0x66);
static void short_prefix (unsigned int size) {
input (size == D16, 0x66);
}
static void build_long_prefix (unsigned int registers, unsigned int to, unsigned int from) {
input (registers || to || from, 0x40 + 0x01 * to + 0x04 * from + 0x08 * registers);
static void long_prefix (unsigned int size, unsigned int to, unsigned int destination, unsigned int from, unsigned int source) {
int to_upper = (to == REG) && (upper (destination));
int from_upper = (to == REG) && (upper (destination));
input ((size == D64) || (to_upper) || (from_upper), 0x40 + 0x01 * to_upper + 0x04 * from_upper + 0x08 * (size == D64));
}
static void build_co (int when, unsigned int destination, unsigned int source) {
input (when, 0xc0 + 0x01 * (destination & 0x07) + 0x08 * (source & 0x07));
static void modify_registers (unsigned int to, unsigned int destination, unsigned int from, unsigned int source) {
input ((to == REG) && (from == REG), 0xc0 + 0x01 * (destination & 0x07) + 0x08 * (source & 0x07));
}
static void build_at (int when, unsigned int direction) {
input (when, 0x05 + 0x08 * (direction & 0x07));
static void modify_memory (unsigned int operation, unsigned int to, unsigned int from) {
input (((to == MEM) && (from == REG)) || ((to == REG) && (from == MEM)), 0x05 + 0x08 * operation * ((to == MEM) && (from == IMM)));
}
static void build_constant (int when, unsigned int size) {
input (when, 0x80 + 0x01 * (size != D8));
static void modify_register_0 (unsigned int size) {
input (! ((to == REG) && (destination == 0)) && (from == IMM), 0x80 + 0x01 * (size != D8));
}
static void build_regular (unsigned int operation, unsigned int size, unsigned int to, unsigned int destination, unsigned int from, unsigned int source) {
build_short_prefix (size == D16);
short_prefix (size);
build_long_prefix (size == D64, (to == REG) && (upper (destination)), (from == REG) && (upper (source)));
long_prefix (size, to, destination, from, source);
input ((size == D8) && (to == REG)
&& ((from == REG) || (from == IMM))
@ -121,7 +124,7 @@ static void build_regular (unsigned int operation, unsigned int size, unsigned i
input ((from == IMM) && (to == REG) && (destination == 0), 0x05 + 0x08 * (operation & 0x07) - 0x01 * (size == D8));
build_constant ((from == IMM) && ! ((to == REG) && (destination == 0)), size);
modify_register_0 (size);
input (! ((from == IMM) && (to == REG) && (destination == 0)),
(destination & 0x07) * ((to == REG) && (from == IMM))
@ -133,10 +136,10 @@ static void build_regular (unsigned int operation, unsigned int size, unsigned i
+ 0x04 * ((to == MEM) && (from == IMM))
+ 0xc0 * ((to == REG) && (from == IMM)));
build_co ((to == REG) && (from == REG), destination, source);
modify_registers (to, destination, from, source);
build_at ((to == REG) && (from == MEM), destination);
build_at ((to == MEM) && (from == REG), source);
modify_memory ((to == REG) && (from == MEM), destination);
modify_memory ((to == MEM) && (from == REG), source);
input_by ((to == REG) && (from == MEM), D32, ~0x0u);
input_by ((to == REG) && (from == IMM), size, source);
@ -146,9 +149,9 @@ static void build_regular (unsigned int operation, unsigned int size, unsigned i
}
static void build_irregular (unsigned int operation, unsigned int size, unsigned int to, unsigned int destination) {
build_short_prefix (size == D16);
short_prefix (size);
build_long_prefix (size == D64, (to == REG) && (upper (destination)), 0);
long_prefix (size, to, destination, 0, 0);
input ((size == D8) && (to == REG) && front (destination), 0x40);
@ -187,15 +190,15 @@ static void build_jump_if (unsigned int operation, unsigned int size, unsigned i
}
static void build_move_if (unsigned int operation, unsigned int size, unsigned int to, unsigned int destination, unsigned int from, unsigned int source) {
build_short_prefix (size == D16);
short_prefix (size);
build_long_prefix (size == D64, (to == REG) && (upper (destination)), (from == REG) && (upper (source)));
long_prefix (size, to, destination, from, source);
input (1, 0x0f);
input (1, 0x40 + operation - MOVE_IF_BEGIN);
build_co ((to == REG) && (from == REG), destination, source);
build_at ((to == REG) && (from == MEM), destination);
modify_registers (to, destination, from, source);
modify_memory ((to == REG) && (from == MEM), destination);
}
static void build_jump (unsigned int size, unsigned int to, unsigned int destination) {
@ -212,18 +215,18 @@ static void build_jump (unsigned int size, unsigned int to, unsigned int destina
}
static void build_move (unsigned int size, unsigned int to, unsigned int destination, unsigned int from, unsigned int source) {
build_short_prefix (size == D16);
short_prefix (size);
build_long_prefix (size == D64, (to == REG) && (upper (destination)), (from == REG) && (upper (source)));
long_prefix (size, to, destination, from, source);
input ((to == REG) && (from == REG), 0x88 + 0x01 * (size != D8));
input ((to == REG) && (from == MEM), 0x8a + 0x01 * (size != D8));
input ((to == MEM) && (from == REG), 0x88 + 0x01 * (size != D8));
build_at ((to == REG) && (from == MEM), destination);
build_at ((to == MEM) && (from == REG), source);
modify_memory ((to == REG) && (from == MEM), destination);
modify_memory ((to == MEM) && (from == REG), source);
build_co ((to == REG) && (from == REG), destination, source);
modify_registers (to, destination, from, source);
input ((to == REG) && ((from == IMM) || (from == REL)), 0xb8 + 0x01 * (destination & 0x07));
@ -259,7 +262,7 @@ static void build_enter (unsigned int dynamic_storage, unsigned int nesting_leve
}
static void build_in_out (unsigned int move, unsigned int size, unsigned int type, unsigned int port) {
build_short_prefix (size == D16);
short_prefix (size);
input (1, 0xe4 + 0x01 * (size != D8) + 0x02 * (move != OUT) + 0x08 * (type == REG));
@ -267,7 +270,7 @@ static void build_in_out (unsigned int move, unsigned int size, unsigned int typ
}
static void build_pop (unsigned int size, unsigned int to, unsigned int destination) {
build_short_prefix (size == D16);
short_prefix (size);
input ((to == REG) && (upper (destination)), 0x41);
@ -279,7 +282,7 @@ static void build_pop (unsigned int size, unsigned int to, unsigned int destinat
}
static void build_push (unsigned int size, unsigned int from, unsigned int source) {
build_short_prefix (size == D16);
short_prefix (size);
input ((from == REG) && (upper (source)), 0x41);
@ -295,7 +298,7 @@ static void build_push (unsigned int size, unsigned int from, unsigned int sourc
static void build_float (unsigned int operation, unsigned int size, unsigned int from, unsigned int source) {
input (from == MEM, 0xd8 + 0x04 * (size == D64));
build_at (from == MEM, operation);
modify_memory (from == MEM, operation);
input_at (from == MEM, size, source, 0);
}

232
source/assembler.h
View File

@ -2,226 +2,36 @@
#define ASSEMBLER_H
enum {
D8,
D16,
D32,
D64
D8, D16, D32, D64
};
enum {
REL,
REG,
MEM,
IMM
REL, REG, MEM, IMM
};
enum {
ASMDIRMEM,
ASMDIRREL,
ASMDIRIMM,
ASMDIRREP,
ADD,
OR,
ADC,
SBB,
AND,
SUB,
XOR,
CMP,
INC,
DEC,
NOT,
NEG,
MUL,
IMUL,
DIV,
IDIV,
NOP,
RETN,
RETF,
LEAVE,
LOCK,
HLT,
POPF,
PUSHF,
WAIT,
CLC,
CLD,
CLI,
STC,
STD,
STI,
CMC,
INSB,
INSD,
OUTSB,
OUTSD,
CDQ,
CWDE,
INAL,
INEAX,
INT3,
IRETD,
LODSB,
LODSD,
OUTAL,
OUTEAX,
SCASB,
SCASD,
STOSB,
STOSD,
SYSENTER,
SYSEXIT,
SYSCALL,
SYSRET,
PAUSE,
CPUID,
EMMS,
RSM,
FNOP,
FCHS,
FABS,
FTST,
FXAM,
FLD1,
FLDL2T,
FLDL2E,
FLDPI,
FLDLG2,
FLDLN2,
FLDZ,
F2XM1,
FYL2X,
FPTAN,
FPATAN,
FXTRACT,
FPREM1,
FDECSTP,
FINCSTP,
FPREM,
FYL2XP1,
FSQRT,
FSINCOS,
FRNDINT,
FSCALE,
FSIN,
FCOS,
INSW,
OUTSW,
CWD,
CQO,
CBW,
CDQE,
INVD,
WBINVD,
UD2,
CLTS,
INAX,
IRETQ,
LODSW,
LODSQ,
OUTAX,
RDPMC,
RDMSR,
RDTSC,
SCASW,
SCASQ,
STOSW,
STOSQ,
WRMSR,
XLATB,
ENTER,
CALL,
IN,
OUT,
JMP,
JO,
JNO,
JB,
JAE,
JE,
JNE,
JBE,
JA,
JS,
JNS,
JPE,
JPO,
JL,
JGE,
JLE,
JG,
MOV,
CMOVO,
CMOVNO,
CMOVB,
CMOVAE,
CMOVE,
CMOVNE,
CMOVBE,
CMOVA,
CMOVS,
CMOVNS,
CMOVPE,
CMOVPO,
CMOVL,
CMOVGE,
CMOVLE,
CMOVG,
PUSH,
POP,
BSWAP,
TEST,
RCL,
RCR,
ROL,
ROR,
SHL,
SHR,
SAL,
SAR,
REP,
REPE,
REPNE,
REPZ,
REPNZ,
LOOP,
LOOPE,
LOOPNE,
MOVBE,
XADD,
XCHG,
LEA,
POPCNT,
BSF,
BSR,
FADD,
FMUL,
FCOM,
FCOMP,
FSUB,
FSUBR,
FDIV,
FDIVR
ASMDIRMEM, ASMDIRREL, ASMDIRIMM, ASMDIRREP,
ADD, OR, ADC, SBB, AND, SUB, XOR, CMP,
INC, DEC, NOT, NEG, MUL, IMUL, DIV, IDIV,
FADD, FMUL, FCOM, FCOMP, FSUB, FSUBR, FDIV, FDIVR,
NOP, RETN, RETF, LEAVE, POPF, PUSHF,
SYSCALL, CPUID, FNOP, FCHS, FABS, FTST, FXAM, FLD1,
FLDL2T, FLDL2E, FLDPI, FLDLG2, FLDLN2, FLDZ, F2XM1, FYL2X,
FPTAN, FPATAN, FXTRACT, FPREM1, FDECSTP, FINCSTP, FPREM, FYL2XP1,
FSQRT, FSINCOS, FRNDINT, FSCALE, FSIN, FCOS,
ENTER, CALL, IN, OUT, JMP, MOV, POP, PUSH,
JO, JNO, JB, JAE, JE, JNE, JBE, JA,
JS, JNS, JPE, JPO, JL, JGE, JLE, JG,
CMOVO, CMOVNO, CMOVB, CMOVAE, CMOVE, CMOVNE, CMOVBE, CMOVA,
CMOVS, CMOVNS, CMOVPE, CMOVPO, CMOVL, CMOVGE, CMOVLE, CMOVG,
BSWAP, TEST, XCHG, LEA, BSF, BSR,
RCL, RCR, ROL, ROR, SHL, SHR, SAL, SAR,
REP, REPE, REPNE, REPZ, REPNZ, LOOP, LOOPE, LOOPNE
};
enum {
GR0,
GR1,
GR2,
GR3,
GR4,
GR5,
GR6,
GR7,
GR8,
GR9,
GR10,
GR11,
GR12,
GR13,
GR14,
GR15
GR0, GR1, GR2, GR3, GR4, GR5, GR6, GR7,
GR8, GR9, GR10, GR11, GR12, GR13, GR14, GR15
};
extern unsigned int text_entry_point;