add a bunch of code and a ton of stub files for later

1 files changed, 239 insertions, 0 deletions

diff --git a/includes/compiler/InlineAsm.h b/includes/compiler/InlineAsm.h
new file mode 100644
index 0000000..aadbc1f
--- /dev/null
+++ b/includes/compiler/InlineAsm.h
@@ -0,0 +1,239 @@
+#ifndef COMPILER_INLINEASM_H
+#define COMPILER_INLINEASM_H
+
+#include "compiler/common.h"
+#include "compiler/PCodeInfo.h"
+
+#ifdef __MWERKS__
+#pragma options align=mac68k
+#endif
+typedef struct IAMnemonic {
+    char *name;
+    UInt32 x4;
+    char *format;
+    UInt32 cpu;
+    UInt32 x10;
+} IAMnemonic;
+
+typedef struct IARegister {
+    char *name;
+    char rclass;
+    SInt32 num;
+    Object *object;
+} IARegister;
+
+typedef enum IAOperandType {
+    IAOpnd_0,
+    IAOpnd_Imm,
+    IAOpnd_Reg,
+    IAOpnd_3,
+    IAOpnd_4,
+    IAOpnd_Lab,
+    IAOpnd_6,
+    IAOpnd_7,
+    IAOpnd_LabDiff
+} IAOperandType;
+typedef struct IAOperand {
+    IAOperandType type;
+    Boolean negated;
+    union {
+        // type 1
+        struct {
+            SInt32 value;
+        } imm;
+        // type 2
+        struct {
+            SInt32 num;
+            Object *object;
+            short effect;
+            short rclass;
+        } reg;
+        // type 3, 4
+        struct {
+            SInt32 offset;
+            Object *obj;
+            short unk;
+        } obj;
+        // type 5
+        struct {
+            CLabel *label;
+        } lab;
+        // type 6
+        struct {
+            SInt32 num;
+            UInt8 unk4;
+            short effect;
+            short rclass;
+        } unk6;
+        // type 7
+        struct {
+            SInt32 value;
+            Boolean unk1;
+            short unk2;
+            short unk3;
+        } unk7;
+        // type 8
+        struct {
+            CLabel *label1;
+            CLabel *label2;
+            SInt32 offset;
+        } labdiff;
+    } u;
+} IAOperand;
+
+typedef enum IAExprType {
+    IAExpr_0,
+    IAExpr_1,
+    IAExpr_2,
+    IAExpr_3,
+    IAExpr_4,
+    IAExpr_5,
+    IAExpr_6,
+    IAExpr_7,
+    IAExpr_8,
+    IAExpr_9,
+    IAExpr_10
+} IAExprType;
+
+typedef struct IAExpr {
+    IAExprType type;
+    UInt8 flags;
+    short reg;
+    SInt32 value;
+    Object *object;
+    Object *xC;
+    Object *x10;
+    CLabel *label;
+    CLabel *x18;
+} IAExpr;
+
+enum {
+    IAFlag1 = 1,
+    IAFlag2 = 2
+};
+enum {
+    IAFlagsB_1 = 1,
+    IAFlagsB_2 = 2,
+    IAFlagsB_4 = 4,
+    IAFlagsB_8 = 8,
+    IAFlagsB_10 = 0x10,
+    IAFlagsB_20 = 0x20,
+    IAFlagsB_40 = 0x40
+};
+
+typedef struct InlineAsm {
+    Opcode opcode;
+    unsigned char flags;
+    unsigned char flags2;
+    short argcount;
+    IAOperand args[0];
+} InlineAsm;
+
+typedef struct IALookupResult {
+    HashNameNode *name;
+    CLabel *label;
+    Object *object;
+    Type *type;
+    UInt32 value;
+    Boolean has_value;
+} IALookupResult;
+
+typedef struct IAEntryPoint {
+    short x0;
+    char x2;
+    int x4;
+    Object *x8;
+    SInt32 size;
+} IAEntryPoint;
+
+typedef enum IAEffectType {
+    IAEffect_0,
+    IAEffect_1,
+    IAEffect_2,
+    IAEffect_3
+} IAEffectType;
+typedef struct IAEffect {
+    IAEffectType type;
+    Object *object;
+    SInt32 offset;
+    SInt32 size;
+} IAEffect;
+
+typedef struct IAEffects {
+    Boolean x0;
+    Boolean x1;
+    Boolean x2;
+    Boolean x3;
+    Boolean x4;
+    Boolean x5;
+    UInt32 numoperands;
+    UInt32 numlabels;
+    IAEffect operands[16];
+    CLabel *labels[16];
+} IAEffects;
+
+#ifdef __MWERKS__
+#pragma options align=reset
+#endif
+
+extern int backtracking;
+extern jmp_buf backtrack;
+extern jmp_buf InlineAsm_assemblererror;
+
+extern int allow_array_expressions;
+
+extern void AssemblerError(void);
+extern void InlineAsm_SyntaxError(short code);
+extern CLabel *InlineAsm_LookupLabel(HashNameNode *name);
+extern CLabel *InlineAsm_DeclareLabel(HashNameNode *name);
+extern Boolean InlineAsm_LookupSymbolOrTag(HashNameNode *name, IALookupResult *result, Boolean allow_tag);
+extern Boolean InlineAsm_LookupSymbol(HashNameNode *name, IALookupResult *result);
+extern SInt32 InlineAsm_StructMemberOffset(Type *type);
+extern SInt32 InlineAsm_StructArrayMemberOffset(Type *type);
+extern SInt32 InlineAsm_StructPointerMemberOffset(Type *type);
+extern SInt32 InlineAsm_ConstantExpression(void);
+extern HashNameNode *MakeLocalLabel(CInt64 num);
+extern void InlineAsm_ScanStatements(volatile short endToken);
+extern void InlineAsm_ScanFunction(volatile short endToken);
+extern void InlineAsm_Assemble(void);
+extern void InlineAsm_PackAsmStatement(Statement *stmt, Statement *first, void **output, SInt32 *outsize);
+extern void InlineAsm_UnpackAsmStatement(Statement *stmt, CLabel **labelArray, Boolean flag, void *data, SInt32 size);
+extern void InlineAsm_CheckLocalUsage(Statement *stmt);
+extern CLabel *InlineAsm_GetReferencedLabel(Statement *stmt);
+extern CLabel *InlineAsm_GetReferencedLabel2(Statement *stmt);
+extern Object *InlineAsm_GetObjectOffset(InlineAsm *ia, SInt32 index, SInt32 *offset);
+extern char *InlineAsm_DumpStatement(Statement *stmt);
+
+// unknown name
+inline void InlineAsm_InitExpr5(IAExpr *expr, SInt32 value) {
+    expr->type = IAExpr_5;
+    expr->flags = 0;
+    expr->value = value;
+    expr->reg = 0;
+    expr->object = NULL;
+    expr->xC = NULL;
+    expr->x10 = NULL;
+    expr->label = NULL;
+    expr->x18 = NULL;
+}
+
+// unknown name
+inline int InlineAsm_CheckExpr(IAExpr *expr) {
+    return (expr->xC == NULL && expr->object == NULL && expr->label == NULL);
+}
+
+// unknown name
+inline SInt32 InlineAsm_GetExprValue(IAExpr *expr) {
+    switch (expr->type) {
+        case IAExpr_8:
+            return HIGH_PART(expr->value);
+        case IAExpr_7:
+            return (short) (expr->value >> 16);
+        case IAExpr_6:
+            return (short) expr->value;
+        default:
+            return expr->value;
+    }
+}
+
+#endif