source: dev/BasicCompiler32/Opcode.h@ 117

Last change on this file since 117 was 111, checked in by dai_9181, 18 years ago

ObjPtr(This)がエラーになるバグを修正。
オーバーロードのチェックレベルを一つ増やした(整数型のサイズ照合によるオーバーロードチェックを可能にした)。

File size: 11.9 KB
Line 
1//Opcode.h
2
3//未定義の定数情報
4#define IMAGE_FILE_MACHINE_AMD64 0x8664
5
6
7//レジスタを示す定数
8#define REG_NON -1
9#define REG_EAX 0x00 //reg:000
10#define REG_ECX 0x01 //reg:001
11#define REG_EDX 0x02 //reg:010
12#define REG_EBX 0x03 //reg:011
13#define REG_ESP 0x04 //reg:100
14#define REG_EBP 0x05 //reg:101
15#define REG_ESI 0x06 //reg:110
16#define REG_EDI 0x07 //reg:111
17
18#define REG_RAX REG_EAX
19#define REG_RCX REG_ECX
20#define REG_RDX REG_EDX
21#define REG_RBX REG_EBX
22#define REG_RSP REG_ESP
23#define REG_RBP REG_EBP
24#define REG_RSI REG_ESI
25#define REG_RDI REG_EDI
26
27#define REGISTER_OPERAND(reg) (reg&0x07)
28
29//変数の種類
30#define NON_VAR 0
31#define VAR_GLOBAL 1 // Global Variable
32#define VAR_REFGLOBAL 2 // Global Refference Variable
33#define VAR_LOCAL 3 // Local Variable
34#define VAR_REFLOCAL 4 // Local Refference Variable
35#define VAR_DIRECTMEM 5 // Direct memory
36
37
38extern int cp;
39extern int obp;
40extern char *OpBuffer;
41
42#define breakpoint OpBuffer[obp++]=(char)0xCC;
43
44
45//ラベルアドレス
46struct LABEL{
47 char *pName;
48 int line;
49 DWORD address;
50};
51
52//Goto未知ラベル
53struct GOTOLABELSCHEDULE{
54 char *pName;
55 int line;
56 DWORD pos;
57 DWORD now_cp;
58};
59
60//プロシージャの種類
61#define PROC_DEFAULT 1 //ユーザー定義関数
62#define PROC_DLL 2 //DLL関数
63#define PROC_BUILTIN 3 //コンパイラ埋め込み型
64#define PROC_PTR 4 //関数ポインタ
65
66//プロシージャ
67struct PROCEDURE{
68 char name[255];
69 int address;
70 int types[MAX_PARMS];
71 _int8 ByVal[MAX_PARMS];
72 BOOL ReturnType;
73};
74
75//With情報
76struct WITHINFO{
77 char **ppName;
78 int *pWithCp;
79 int num;
80};
81
82
83//RSrcSection.cpp
84char *GetRSrcSectionBuffer(int *pLen);
85
86//Compile.cpp
87void ChangeOpcode(char *Command);
88void GetGlobalDataForDll(void);
89DWORD CompileBuffer(char Return_Sequence,WORD Return_Command);
90
91//Compile_Calc.cpp
92void ChangeTypeToDouble_ToFpuReg(int OldType);
93void ChangeTypeToDouble(int OldType);
94void ChangeTypeToSingle(int OldType);
95void ChangeTypeToInt64(int OldType);
96void ChangeTypeToLong(int OldType);
97void ChangeTypeToInteger(int OldType);
98void ChangeTypeToByte(int OldType);
99void SetVariableFromEax(int VarType,int CalcType,RELATIVE_VAR *pRelativeVar);
100void OpcodeCalc(char *Command);
101
102//NumOpe.cpp
103void PushReturnValue(int type);
104bool NumOpe( int reg,
105 const char *expression,
106 const Type &baseType,
107 Type &resultType,
108 BOOL *pbUseHeap = NULL );
109bool NumOpe( const char *Command,
110 const Type &baseType,
111 Type &resultType,
112 BOOL *pbUseHeap = NULL );
113
114//NumOpe_Arithmetic.cpp
115void GetStackData_ToRegister(int *type,int sp);
116BOOL CalcTwoTerm_Arithmetic(int idCalc,int *type,LONG_PTR *index_stack,int *pStackPointer);
117BOOL Calc_Mod(int *type,int *pStackPointer);
118BOOL Calc_Divide(int *type,int *pStackPointer,int BaseType);
119BOOL Calc_IntDivide(int *type,LONG_PTR *index_stack,int *pStackPointer);
120BOOL Calc_MinusMark(int *type,int sp);
121BOOL Calc_Power(int *type,int *pStackPointer);
122BOOL Calc_Cast(int *type,LONG_PTR *index_stack,int *pStackPointer);
123BOOL Calc_SHL(int *type,int *pStackPointer);
124BOOL Calc_SHR(int *type,int *pStackPointer);
125
126//NumOpe_Logical.cpp
127BOOL Calc_Xor(int *type,LONG_PTR *index_stack,int *pStackPointer);
128BOOL Calc_Or(int *type,LONG_PTR *index_stack,int *pStackPointer);
129BOOL Calc_And(int *type,LONG_PTR *index_stack,int *pStackPointer);
130BOOL Calc_Not(int *type,int sp);
131
132//NumOpe_Relation.cpp
133BOOL Calc_Relation_PE(int *type_stack,LONG_PTR *index_stack,int *pStackPointer);
134BOOL Calc_Relation_QE(int *type_stack,LONG_PTR *index_stack,int *pStackPointer);
135BOOL Calc_Relation_P(int *type_stack,LONG_PTR *index_stack,int *pStackPointer);
136BOOL Calc_Relation_Q(int *type_stack,LONG_PTR *index_stack,int *pStackPointer);
137BOOL Calc_Relation_NotEqual(int *type,int *pStackPointer);
138BOOL Calc_Relation_Equal(int *type,int *pStackPointer);
139
140//NumOpe_TypeOperation.cpp
141void ExtendStackTo64(int type);
142void ChangeTypeToWhole(int OldType,int NewType);
143
144//Compile_Set_Var.cpp
145BOOL IsUse_ecx(RELATIVE_VAR *pRelativeVar);
146void SetStructVariable( const Type &varType, const Type &calcType, BOOL bUseHeap);
147void SetRealVariable(int VarType, int CalcType, RELATIVE_VAR *pRelativeVar);
148void SetWholeVariable( int varSize,int calcType, RELATIVE_VAR *pRelative );
149
150void SetDoubleVariable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
151void SetSingleVariable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
152void SetInt64Variable(int type,RELATIVE_VAR *pRelative);
153void SetDWordVariable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
154void SetLongVariable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
155void Set16Variable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
156void Set8Variable(int type,DWORD VarKind,DWORD offset,BOOL bOffsetOffset);
157void SetBooleanVariable(int type,RELATIVE_VAR *pRelative);
158void ExtendTypeTo64(int type);
159void ExtendTypeTo32(int type,int reg);
160void ExtendTypeTo16(int type,int reg);
161
162//increment.cpp
163void IncDec(int idCalc, char *lpszLeft, char *lpszRight);
164
165//calc2.cpp
166#define EXP_TYPE_NUMBER 1
167#define EXP_TYPE_EAX 2
168#define EXP_TYPE_FPU 3
169#define EXP_TYPE_VAR 4
170int NumOpEx(char *Command,double *pDbl,DWORD *pdwType,RELATIVE_VAR *pRelativeVar);
171
172//SetVar.cpp
173BOOL SetVariable(DWORD dwVarType,RELATIVE_VAR *pVarRelativeVar,
174 DWORD dwExpType,DWORD dwType,void *data);
175
176//Compile_Calc_PushVar.cpp
177void SetReg_RealVariable(int type,RELATIVE_VAR *pRelativeVar);
178void SetReg_WholeVariable(int type,RELATIVE_VAR *pRelativeVar,int reg, bool is64Head = false);
179void PushDoubleVariable(RELATIVE_VAR *pRelativeVar);
180void PushLongVariable(RELATIVE_VAR *pRelativeVar);
181void PushIntegerVariable(RELATIVE_VAR *pRelativeVar);
182void PushWordVariable(RELATIVE_VAR *pRelativeVar);
183void PushCharVariable(RELATIVE_VAR *pRelativeVar);
184void PushByteVariable(RELATIVE_VAR *pRelativeVar);
185
186//Compile_Object.cpp
187void Operator_New( const CClass &classObj, const char *objectSizeStr, const char *parameter, const Type &baseType );
188void OpcodeDelete(const char *Parameter, bool isSweeping);
189
190//Compile_Var.cpp
191void SetRelativeOffset( RELATIVE_VAR &relativeVar );
192bool _member_offset(bool isErrorEnabled, bool isWriteAccess, const CClass &objClass, const char *member, RELATIVE_VAR *pRelativeVar, Type &resultType, BOOL bPrivateAccess);
193void SetThisPtrToReg(int reg);
194bool GetVarOffset(bool isErrorEnabled,bool isWriteAccess,const char *NameBuffer,RELATIVE_VAR *pRelativeVar,Type &resultType,int *pss = 0);
195bool SetInitGlobalData(int offset,const Type &type,const int *SubScripts,char *InitBuf);
196#define DIMFLAG_INITDEBUGVAR 1
197#define DIMFLAG_NONCALL_CONSTRACTOR 2
198#define DIMFLAG_STATIC 4
199#define DIMFLAG_CONST 8
200void dim( char *VarName,int *SubScripts,Type &type,char *InitBuf,char *ConstractParameter,DWORD dwFlags);
201void SetVarPtrToEax(RELATIVE_VAR *pRelativeVar);
202void SetVarPtrToReg(int reg,RELATIVE_VAR *pRelativeVar);
203bool Compile_AddGlobalRootsForGc();
204
205//ParamImpl.cpp
206class ParamImpl{
207 char *Parms[255];
208 vector<Type> types;
209 int ParmsNum;
210
211 Type returnType;
212
213 //一時オブジェクト管理用
214 bool useTempObject;
215 bool useTempParameters[255];
216 int nCountOfTempObjects;
217
218public:
219 ParamImpl(const char *buffer);
220 ParamImpl(const Parameters &params);
221 ~ParamImpl();
222 void SetReturnType( const Type &returnType );
223
224private:
225 bool _overload_check( int level, const Parameters &targetParms, const Type &targetResultType );
226 UserProc *OverloadSolutionWithReturnType( const char *name, std::vector<UserProc *> &subs );
227public:
228 UserProc *OverloadSolution( const char *name, std::vector<UserProc *> &subs );
229
230 void ApplyDefaultParameters( const Parameters &params );
231 bool ErrorCheck( const string &procName, const Parameters &params, int SecondParmNum = -1 );
232 void MacroParameterSupport( const Parameters &params );
233 void SetStructParameter( const Type &baseType, const char *expression );
234 int SetParameter( const string &procName, const Parameters &params, int SecondParmNum = -1 );
235
236 //一時オブジェクトパラメータの生成と破棄
237 int NewTempParameters( const string &procName, const Parameters &params, int SecondParmNum = -1 );
238 void DeleteTempParameters();
239};
240
241//Compile_CallProc.cpp
242void AddLocalVarAddrSchedule();
243#define PROCFLAG_NEW 1
244bool Opcode_CallProcPtr( const char *variable, const char *lpszParms,ProcPointer *pProcPointer);
245bool Opcode_CallProc(const char *Parameter,UserProc *pUserProc,DWORD dwFlags,const char *ObjectName,int RefType);
246bool Opcode_CallDllProc( const char *lpszParms, DllProc *pDllProc );
247
248//Compile_ProcOp.cpp
249void CompileLocal();
250
251//Compile_Func.cpp
252int GetFunctionFromName(char *FuncName);
253bool Opcode_CallFunc( const char *Parameter, const int FuncNum, Type &resultType, bool isCallOn = true );
254
255//OperatorProc.cpp
256void FreeTempObject(int reg,const CClass *pobj_c);
257int CallOperatorProc(int idCalc, const Type &baseType, int *type_stack,LONG_PTR *index_stack,BOOL *bUseHeap,int &sp);
258void CallCastOperatorProc(Type &calcType,BOOL bCalcUseHeap,const Type &toType);
259void CallIndexerGetterProc(const CClass *pobj_Class,char *ObjectName,char *Parameter,Type &resultType);
260
261//Compile_Statement.cpp
262void OpcodeOthers(char *Command);
263void OpcodeIf(char *Parameter);
264void OpcodeGoto(char *Parameter);
265void OpcodeWhile(char *Parameter);
266void OpcodeFor(char *Parameter);
267void OpcodeDo(char *Parameter);
268void OpcodeContinue(void);
269void OpcodeExitSub(void);
270void OpcodeSelect(const char *lpszParms);
271void OpcodeCase(char *Parameter);
272void OpcodeGosub(char *Parameter);
273void OpcodeReturn(char *Parameter);
274void OpcodeSetPtrData(char *Parameter,int type);
275
276
277
278
279////////////////////////////////
280// IA-32機械語生成に利用する関数郡
281////////////////////////////////
282
283//Mod(モード)
284#define MOD_BASE (char)0x00
285#define MOD_DISP32 (char)0xFF
286#define MOD_BASE_DISP8 (char)0x40
287#define MOD_BASE_DISP32 (char)0x80
288#define MOD_REG (char)0xC0
289
290#define USE_OFFSET 1
291#define NON_OFFSET 0
292
293//op32_main.cpp
294BOOL IsSafeReg(int reg);
295void op_mov_RV (int reg,int offset);
296void op_mov_RV (int op_size,int reg,int offset);
297void op_mov_RR (int reg1,int reg2);
298void op_mov_RM (int op_size,int reg,int base_reg,int offset,char mod);
299void op_mov_RM_ex (int op_size,int reg,int base_reg1,int base_reg2,int offset,BOOL bUseOffset);
300void op_mov_MR (int op_size,int reg,int base_reg,int offset,char mod);
301void op_mov_MR_ex (int op_size,int reg,int base_reg1,int base_reg2,int offset,BOOL bUseOffset);
302void op_movsx_R32R16 (int reg32,int reg16);
303void op_movsx_R32R8 (int reg32,int reg8);
304void op_movsx_R16R8 (int reg16,int reg8);
305void op_inc (int reg);
306void op_dec (int reg);
307void op_add_RV8 (int reg,char cValue);
308void op_add_RM (int op_size,int reg,int base_reg,int offset,char mod);
309void op_adc_RV8 (int reg,char cValue);
310void op_sub_RV8 (int reg,char cValue);
311void op_sbb_RV8 (int reg,char cValue);
312void op_sbb_RR ( int reg1, int reg2 );
313void op_imul_RR (int reg1,int reg2);
314void op_imul_RV (int reg,int i32data);
315void op_and_RV (int reg,int value);
316void op_or_RR ( int op_size, int reg1, int reg2 );
317void op_neg ( int reg );
318void op_cdq ();
319
320void op_rep_movs (int op_size);
321
322void op_push(int reg);
323void op_push_V(long data);
324void op_pop(int reg = REG_NON);
325void op_add_esp(int num);
326void op_sub_esp(int num);
327void op_cmp_RR( int reg1, int reg2 );
328void op_cmp_value(int op_size,int reg,char byte_data);
329void op_setne( int reg );
330void op_test(int reg1,int reg2);
331void op_fld_ptr_esp(int type);
332void op_fld_basereg (int type,int base_reg);
333void op_fld_base_offset (int type,int base_reg,int offset);
334void op_fld_base_offset_ex (int type,int base_reg1,int base_reg2,int offset,BOOL bUseOffset);
335void op_fstp_basereg (int type,int base_reg);
336void op_fstp_base_offset (int type,int base_reg,int offset);
337void op_fstp_base_offset_ex (int type,int base_reg1,int base_reg2,int offset,BOOL bUseOffset);
338void op_fstp_push ( Type &type );
339void op_fistp_ptr_esp ( int typeSize );
340void op_zero_reg(int reg);
341void fpu_cast();
342void fpu_cast_end();
343
344void op_call(UserProc *pUserProc);
Note: See TracBrowser for help on using the repository browser.