source: dev/trunk/abdev/BasicCompiler64/MakePeHdr.cpp@ 201

Last change on this file since 201 was 198, checked in by dai_9181, 17 years ago
File size: 55.8 KB
Line 
1#include <jenga/include/common/Environment.h>
2
3#include <jenga/include/smoothie/Smoothie.h>
4
5#include <LexicalScopingImpl.h>
6#include <ClassImpl.h>
7#include <Compiler.h>
8#include <NamespaceSupporter.h>
9
10#include "../BasicCompiler_Common/common.h"
11#include "Opcode.h"
12
13
14////////////////////////////
15// 特殊関数の構造体ポインタ
16////////////////////////////
17
18// グローバル関数、静的メソッド
19UserProc
20 *pSub_System_StartupProgram,
21 *pSub_DebugSys_StartProc,
22 *pSub_DebugSys_EndProc,
23 *pSub_DebugSys_SaveContext,
24 *pSub_System_GetEip,
25 *pSub_System_InitDllGlobalVariables,
26 *pSub_System_InitStaticLocalVariables,
27 *pSub_System_Call_Destructor_of_GlobalObject,
28 *pSub_System_GetSp,
29 *pSub_pow,
30 *pSub_calloc,
31 *pSub_realloc,
32 *pSub_free,
33 *pSub_System_GC_malloc_ForObject,
34 *pSub_System_GC_malloc_ForObjectPtr,
35 *pSub_System_GC_free_for_SweepingDelete,
36 *pSubStaticMethod_System_TypeBase_InitializeUserTypes;
37
38// 動的メソッド
39UserProc
40 *pUserProc_System_CGarbageCollection_RegisterGlobalRoots;
41
42
43//////////////////////////////
44// 各セクションの位置とサイズ
45int FileSize_CodeSection,
46 FileSize_ExportSection,
47 FileSize_ImportSection,
48 FileSize_DataSection,
49 FileSize_RWSection,
50 FileSize_RSrcSection,
51 FileSize_RelocSection,
52 FileSize_DebugSection;
53int FilePos_CodeSection,
54 FilePos_ExportSection,
55 FilePos_ImportSection,
56 FilePos_DataSection,
57 FilePos_RWSection,
58 FilePos_RSrcSection,
59 FilePos_RelocSection,
60 FilePos_DebugSection;
61int MemSize_CodeSection,
62 MemSize_ExportSection,
63 MemSize_ImportSection,
64 MemSize_DataSection,
65 MemSize_RWSection,
66 MemSize_RSrcSection,
67 MemSize_RelocSection,
68 MemSize_DebugSection;
69int MemPos_CodeSection,
70 MemPos_ExportSection,
71 MemPos_ImportSection,
72 MemPos_DataSection,
73 MemPos_RWSection,
74 MemPos_RSrcSection,
75 MemPos_RelocSection,
76 MemPos_DebugSection;
77int bUse_CodeSection,
78 bUse_ExportSection,
79 bUse_ImportSection,
80 bUse_DataSection,
81 bUse_RWSection,
82 bUse_RSrcSection,
83 bUse_RelocSection,
84 bUse_DebugSection;
85
86
87void DebugVariable(void){
88 char temporary[255];
89 sprintf(temporary,"_DebugSys_dwThreadID[255]%c%cDWord",1,ESC_AS);
90 OpcodeDim(temporary,DIMFLAG_INITDEBUGVAR);
91 sprintf(temporary,"_DebugSys_ProcNum[255]%c%cDWord",1,ESC_AS);
92 OpcodeDim(temporary,DIMFLAG_INITDEBUGVAR);
93 sprintf(temporary,"_DebugSys_lplpObp[255]%c%c*ULONG_PTR",1,ESC_AS);
94 OpcodeDim(temporary,DIMFLAG_INITDEBUGVAR);
95 sprintf(temporary,"_DebugSys_lplpSpBase[255]%c%c*ULONG_PTR",1,ESC_AS);
96 OpcodeDim(temporary,DIMFLAG_INITDEBUGVAR);
97}
98
99void Compile(void){
100 extern HWND hMainDlg;
101 extern HWND hOwnerEditor;
102 extern HANDLE hHeap;
103 extern BOOL bDebugCompile;
104 extern BOOL bDll;
105 extern DWORD ImageBase;
106 extern int obp_AllocSize;
107 extern char *basbuf;
108 extern char OutputFileName[MAX_PATH];
109 int i,i2,i3,i4,i5;
110 char temporary[MAX_PATH],*temp2;
111 HANDLE hFile;
112
113
114 //コードセクションのメモリ上の位置
115 MemPos_CodeSection= 0x1000;
116
117 //データセクションのメモリ上の位置（仮定）
118 MemPos_DataSection= 0x10000000;
119
120
121 //エクスポート セクションを利用するかどうか
122 if(bDll) bUse_ExportSection=1;
123 else bUse_ExportSection=0;
124
125
126 //////////////////
127 // データテーブル
128 compiler.GetNativeCode().GetDataTable().Init();
129 if(bDebugCompile){
130 compiler.GetNativeCode().GetDataTable().Add( (long)0x00000002 );
131 }
132
133
134 //////////////////////
135 // コード生成前の準備
136 //////////////////////
137
138 //重複エラー情報管理のメモリを確保（グローバル領域コンパイル用）
139 extern char **SynonymErrorWords;
140 extern int SynonymErrorNum;
141 SynonymErrorNum=0;
142 SynonymErrorWords=(char **)HeapAlloc(hHeap,0,1);
143
144 //列挙体に関する情報の初期化
145 CEnumParent::InitEnum();
146
147 //列挙体からクラスコードを生成
148 char *temp;
149 temp=CEnumParent::GenerateCodes();
150 AddSourceCode(temp);
151 HeapDefaultFree(temp);
152
153 //関数ポインタ情報を初期化
154 compiler.GetMeta().GetProcPointers().clear();
155
156 // 名前空間情報を取得
157 NamespaceSupporter::CollectNamespaces(
158 Smoothie::Lexical::source.GetBuffer(),
159 compiler.GetMeta().GetNamespaces()
160 );
161
162 //クラス名を取得（詳細情報はGetAllClassInfoで取得）
163 // GetSubInfo関数の中で参照されるオブジェクト名を事前に取得する。
164 // ※オブジェクトの内容までは取得しない
165 compiler.GetMeta().GetClasses().CollectClassesForNameOnly( Smoothie::Lexical::source );
166
167 //TypeDef情報を初期化
168 compiler.GetMeta().GetTypeDefs().Init();
169
170 //定数情報を取得
171 GetConstInfo();
172
173 //サブルーチン（ユーザー定義、DLL関数）の識別子、アドレスを取得
174 Smoothie::Temp::pCompilingClass = NULL;
175 GetSubInfo();
176
177 //クラス情報を取得（※注 - GetSubInfoの後に呼び出す）
178 compiler.GetMeta().GetClasses().GetAllClassInfo();
179
180 compiler.GetMeta().AutoWrite( Jenga::Common::Environment::GetAppDir() + "\\meta_test.xml" );
181
182 //コードと行番号の関係
183 extern LINEINFO *pLineInfo;
184 extern int MaxLineInfoNum;
185 pLineInfo=(LINEINFO *)HeapAlloc(hHeap,0,1);
186 MaxLineInfoNum=0;
187
188
189 ///////////////////////////
190 // 最低限必要な関数を取得
191 ///////////////////////////
192 cp=-1;
193
194 if(pSub_System_StartupProgram=GetSubHash("_System_StartupProgram",1))
195 pSub_System_StartupProgram->Using();
196
197 if(pSub_DebugSys_StartProc=GetSubHash("_DebugSys_StartProc",1))
198 pSub_DebugSys_StartProc->Using();
199
200 if(pSub_DebugSys_EndProc=GetSubHash("_DebugSys_EndProc",1))
201 pSub_DebugSys_EndProc->Using();
202
203 if(pSub_DebugSys_SaveContext=GetSubHash("_DebugSys_SaveContext",1))
204 pSub_DebugSys_SaveContext->Using();
205
206 if(pSub_System_GetEip=GetSubHash("_System_GetEip",1)){
207 pSub_System_GetEip->Using();
208 pSub_System_GetEip->ThisIsSystemProc();
209 }
210
211 if(pSub_System_InitDllGlobalVariables=GetSubHash("_System_InitDllGlobalVariables",1)){
212 pSub_System_InitDllGlobalVariables->Using();
213 pSub_System_InitDllGlobalVariables->ThisIsSystemProc();
214 }
215
216 if(pSub_System_InitStaticLocalVariables=GetSubHash("_System_InitStaticLocalVariables",1)){
217 pSub_System_InitStaticLocalVariables->Using();
218 pSub_System_InitStaticLocalVariables->ThisIsSystemProc();
219 }
220
221 if(pSub_System_Call_Destructor_of_GlobalObject=GetSubHash("_System_Call_Destructor_of_GlobalObject",1)){
222 pSub_System_Call_Destructor_of_GlobalObject->Using();
223 pSub_System_Call_Destructor_of_GlobalObject->ThisIsSystemProc();
224 }
225
226 if(pSub_System_GetSp=GetSubHash("_System_GetSp",1)){
227 pSub_System_GetSp->Using();
228 pSub_System_GetSp->ThisIsSystemProc();
229 }
230
231 if(pSub_pow=GetSubHash("pow",1))
232 pSub_pow->Using();
233
234 if(pSub_calloc=GetSubHash("calloc",1))
235 pSub_calloc->Using();
236
237 if(pSub_realloc=GetSubHash("realloc",1))
238 pSub_realloc->Using();
239
240 if(pSub_free=GetSubHash("free",1))
241 pSub_free->Using();
242
243 if( pSub_System_GC_malloc_ForObject = GetSubHash( "_System_GC_malloc_ForObject",1 ) )
244 pSub_System_GC_malloc_ForObject->Using();
245
246 if( pSub_System_GC_malloc_ForObjectPtr = GetSubHash( "_System_GC_malloc_ForObjectPtr",1 ) )
247 pSub_System_GC_malloc_ForObjectPtr->Using();
248
249 if( pSub_System_GC_free_for_SweepingDelete = GetSubHash( "_System_GC_free_for_SweepingDelete",1 ) )
250 pSub_System_GC_free_for_SweepingDelete->Using();
251
252 if( pSubStaticMethod_System_TypeBase_InitializeUserTypes = GetSubHash( "ActiveBasic.Core._System_TypeBase.InitializeUserTypes",1 ) ){
253 pSubStaticMethod_System_TypeBase_InitializeUserTypes->Using();
254 pSubStaticMethod_System_TypeBase_InitializeUserTypes->ThisIsAutoGenerationProc();
255 }
256
257 if( pUserProc_System_CGarbageCollection_RegisterGlobalRoots = GetClassMethod( "_System_CGarbageCollection", "RegisterGlobalRoots" ) ){
258 pUserProc_System_CGarbageCollection_RegisterGlobalRoots->Using();
259 pUserProc_System_CGarbageCollection_RegisterGlobalRoots->ThisIsAutoGenerationProc();
260 }
261
262
263
264 //データテーブルスケジュール
265 pobj_DataTableSchedule=new CSchedule();
266 pobj_DataTableSchedule->SetFlag(SCHEDULE_FLAG_RELOC);
267
268 //インポートテーブルスケジュール
269 //※x64はRPI（実行中アドレス）からのオフセットになるため、再配置が不要
270 pobj_ImportAddrSchedule=new CImportAddrSchedule();
271
272 //プロシージャポインタスケジュール
273 pobj_SubAddrSchedule=new CSubAddrSchedule();
274
275 //グローバル変数アドレススケジュール
276 pobj_GlobalVarSchedule=new CSchedule();
277 pobj_GlobalVarSchedule->SetFlag(SCHEDULE_FLAG_RELOC);
278
279 //グローバル変数の初期バッファ
280 extern BYTE *initGlobalBuf;
281 initGlobalBuf=(BYTE *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,1);
282
283 //リロケーション情報
284 pobj_Reloc=new CReloc();
285
286 //一時スケジューリングポインタ
287 pobj_TempSchedule=new CTempSchedule();
288
289 obp_AllocSize=8192*2;
290 OpBuffer=(char *)calloc(obp_AllocSize,1);
291 obp=0;
292
293 //レジスタのブロッキングを管理するためのオブジェクトを生成
294 pobj_BlockReg=new CBlockReg;
295
296 //レキシカルスコープ情報を初期化
297 GetLexicalScopes().Init(obp);
298
299
300 /////////////////////////////////////////////////////////////////
301 // デバッグコンパイル用のログを生成する
302 /////////////////////////////////////////////////////////////////
303#ifdef _DEBUG
304 {
305 ofstream ofs("middle_code.txt");
306 ofs << basbuf << endl;
307 ofs.close();
308 }
309#endif
310
311
312 //////////////////////
313 // グローバル実行領域
314 //////////////////////
315
316 cp=-1;
317 UserProc::CompileStartForGlobalArea();
318
319 if(!bDll){
320 // 名前空間が初期化されているかをチェック
321 if( namespaceSupporter.GetLivingNamespaceScopes().size() ){
322 SetError();
323 }
324
325 //ラベル用のメモリを確保
326 extern LABEL *pLabelNames;
327 extern int MaxLabelNum;
328 pLabelNames=(LABEL *)HeapAlloc(hHeap,0,1);
329 MaxLabelNum=0;
330
331 //Gotoラベルスケジュール
332 extern GOTOLABELSCHEDULE *pGotoLabelSchedule;
333 extern int GotoLabelScheduleNum;
334 pGotoLabelSchedule=(GOTOLABELSCHEDULE *)HeapAlloc(hHeap,0,1);
335 GotoLabelScheduleNum=0;
336
337 //With情報のメモリを確保
338 extern WITHINFO WithInfo;
339 WithInfo.ppName=(char **)HeapAlloc(hHeap,0,1);
340 WithInfo.pWithCp=(int *)HeapAlloc(hHeap,0,1);
341 WithInfo.num=0;
342
343 //Continueアドレスを初期化
344 extern DWORD dwContinueAddress;
345 dwContinueAddress=-1;
346
347 //スタックフレーム管理用クラスを初期化
348 extern CStackFrame *pobj_sf;
349 pobj_sf=new CStackFrame();
350
351
352 //未完成
353 //OpBuffer[obp++]=(char)0xCC;
354
355 //sub rsp,スタックフレームサイズ
356 int StackFrameSchedule;
357 op_sub_rsp(0xFFFFFFFF);
358 StackFrameSchedule=obp-sizeof(long);
359
360 if(bDebugCompile){
361 //デバッグ用の変数を定義
362 DebugVariable();
363 }
364
365 //GC用の変数を定義
366 InitGCVariables();
367
368 //_System_StartupProgramの呼び出し
369 op_call(pSub_System_StartupProgram);
370
371 //クラスに属する静的メンバを定義
372 compiler.GetMeta().GetClasses().InitStaticMember();
373
374 //グローバル実行領域をコンパイル開始
375 CompileBuffer(0,0);
376
377 //ラベル用のメモリを解放
378 for(i=0;i<MaxLabelNum;i++){
379 if(pLabelNames[i].pName) HeapDefaultFree(pLabelNames[i].pName);
380 }
381 HeapDefaultFree(pLabelNames);
382
383 //Goto未知ラベルスケジュールを解放
384 for(i=0;i<GotoLabelScheduleNum;i++){
385 if(pGotoLabelSchedule[i].pName){
386 SetError(6,pGotoLabelSchedule[i].pName,pGotoLabelSchedule[i].now_cp);
387 HeapDefaultFree(pGotoLabelSchedule[i].pName);
388 }
389 else{
390 sprintf(temporary,"%d",pGotoLabelSchedule[i].line);
391 SetError(6,temporary,pGotoLabelSchedule[i].now_cp);
392 }
393 }
394 HeapDefaultFree(pGotoLabelSchedule);
395
396
397 ///////////////////////////////////////
398 // グローバル文字列変数の解放処理
399 ///////////////////////////////////////
400
401 //call _System_Call_Destructor_of_GlobalObject
402 extern UserProc *pSub_System_Call_Destructor_of_GlobalObject;
403 op_call(pSub_System_Call_Destructor_of_GlobalObject);
404
405
406 //add rsp,スタックフレームサイズ
407 op_add_RV(REG_RSP,pobj_sf->GetFrameSize());
408
409 //xor rax,rax（raxを0に初期化する）
410 op_zero_reg(REG_RAX);
411
412 //ret
413 op_ret();
414
415 //グローバル実行領域のコードサイズ
416 extern int GlobalOpBufferSize;
417 GlobalOpBufferSize=obp;
418
419 //スタックフレームスケジュール（subコマンドに渡す値）
420 *((long *)(OpBuffer+StackFrameSchedule))=pobj_sf->GetFrameSize();
421
422 //スタックフレームスケジュールを実行
423 pobj_sf->RunningSchedule();
424 delete pobj_sf;
425 pobj_sf=0;
426
427 //With情報のメモリを解放
428 for(i=0;i<WithInfo.num;i++){
429 SetError(22,"With",WithInfo.pWithCp[i]);
430 HeapDefaultFree(WithInfo.ppName[i]);
431 }
432 HeapDefaultFree(WithInfo.ppName);
433 HeapDefaultFree(WithInfo.pWithCp);
434
435 // 名前空間が正しく閉じられているかをチェック
436 if( namespaceSupporter.GetLivingNamespaceScopes().size() ){
437 SetError(63,NULL,-1);
438 }
439
440 }
441 else{
442 ////////////////
443 // DLLの場合
444 ////////////////
445
446
447 }
448
449 //重複エラー情報管理のメモリを解放（グローバル領域用）
450 for(i=0;i<SynonymErrorNum;i++) HeapDefaultFree(SynonymErrorWords[i]);
451 HeapDefaultFree(SynonymErrorWords);
452
453
454 StepCompileProgress();
455
456
457 /////////////////////
458 // ローカル実行領域
459 /////////////////////
460
461 //プロシージャをコンパイル開始
462 cp=0;
463 CompileLocal();
464
465 // 終了
466 ///////////////////////
467
468 StepCompileProgress();
469
470
471 //レジスタのブロッキングを管理するためのオブジェクトを破棄
472 delete pobj_BlockReg;
473
474 //ネイティブコード生成はここまで
475 //////////////////////////////////////////////////////////
476
477
478
479 ////////////////////////////////
480 // ここで一旦ログを取る
481 ////////////////////////////////
482 Diagnose();
483
484
485
486 ////////////////////////////////
487 // 使用するDLL関数のチェック
488 ////////////////////////////////
489 for(i=0;i<MAX_HASH;i++){
490 extern DllProc **ppDeclareHash;
491 const DllProc *pDllProc = ppDeclareHash[i];
492 while(pDllProc){
493 if( !pDllProc->IsUsing() ){
494 pDllProc=pDllProc->pNextData;
495 continue;
496 }
497/*
498 //エラーチェック
499 HINSTANCE hLib;
500 hLib=LoadLibrary( pDllProc->GetDllFileName().c_str() );
501 if(!hLib){
502 extern char OutputFileName[MAX_PATH];
503 char temp2[MAX_PATH],temp3[MAX_PATH];
504 _splitpath(OutputFileName,temp2,temp3,NULL,NULL);
505 lstrcat(temp2,temp3);
506 lstrcpy(temp3,pDllProc->GetDllFileName().c_str());
507 GetFullPath(temp3,temp2);
508 hLib=LoadLibrary(temp3);
509
510 if(!hLib){
511 SetError(-106,pDllProc->GetDllFileName().c_str(),pDllProc->GetCodePos());
512 }
513 }
514
515 if(hLib){
516 if(!GetProcAddress(hLib,pDllProc->GetAlias().c_str())){
517 FreeLibrary(hLib);
518 SetError(-107,pDllProc->GetAlias(),pDllProc->GetCodePos());
519 }
520 FreeLibrary(hLib);
521 }
522*/
523 pDllProc=pDllProc->pNextData;
524 }
525 }
526
527
528
529 /////////////////////////////
530 // リソースデータを読み込む
531 /////////////////////////////
532 extern char ResourceFileName[MAX_PATH];
533 GetResourceData(ResourceFileName);
534
535
536 //////////////////////////////
537 // エクスポート情報（DLLのみ）
538 //////////////////////////////
539 IMAGE_EXPORT_DIRECTORY ImageExportDirectory;
540 DWORD *lpdwExportAddressTable;
541 DWORD *lpdwExportNamePointerTable;
542 WORD *lpwExportOrdinalTable;
543 char lpExportNames[8192];
544 int ExportNamesLength;
545 int ExportNum;
546 int DllMain_EntryPoint;
547
548 DllMain_EntryPoint=-1;
549 ExportNum=0;
550 ExportNamesLength=0;
551 lpdwExportAddressTable=(DWORD *)HeapAlloc(hHeap,0,1);
552 lpdwExportNamePointerTable=(DWORD *)HeapAlloc(hHeap,0,1);
553 lpwExportOrdinalTable=(WORD *)HeapAlloc(hHeap,0,1);
554
555 if(bUse_ExportSection){
556 _splitpath(OutputFileName,NULL,NULL,lpExportNames,temporary);
557 lstrcat(lpExportNames,temporary);
558 ExportNamesLength=lstrlen(lpExportNames)+1;
559
560 extern GlobalProc **ppSubHash;
561 GlobalProc *pUserProc,*psi2;
562 while(1){
563 //辞書順にサーチ
564 temporary[0]=0;
565 for(i=0,psi2=0;i<MAX_HASH;i++){
566 pUserProc=ppSubHash[i];
567 while(pUserProc){
568 if(pUserProc->IsExport()){
569 if(temporary[0]=='\0'){
570 lstrcpy(temporary,pUserProc->GetName().c_str());
571 psi2=pUserProc;
572 }
573 else{
574 i3=lstrlen(temporary);
575 i4=(int)pUserProc->GetName().size();
576 if(i3<i4) i3=i4;
577 if(memcmp(temporary,pUserProc->GetName().c_str(),i3)>0){
578 lstrcpy(temporary,pUserProc->GetName().c_str());
579 psi2=pUserProc;
580 }
581 }
582 }
583 pUserProc=pUserProc->pNextData;
584 }
585 }
586 if(psi2==0) break;
587 pUserProc=psi2;
588
589 pUserProc->ExportOff();
590
591 if( pUserProc->GetName() == "DllMain" ){
592 DllMain_EntryPoint=pUserProc->beginOpAddress;
593 }
594
595 lpdwExportAddressTable=(DWORD *)HeapReAlloc(hHeap,0,lpdwExportAddressTable,(ExportNum+1)*sizeof(DWORD));
596 lpdwExportAddressTable[ExportNum]=pUserProc->beginOpAddress;
597
598 lpdwExportNamePointerTable=(DWORD *)HeapReAlloc(hHeap,0,lpdwExportNamePointerTable,(ExportNum+1)*sizeof(DWORD));
599 lpdwExportNamePointerTable[ExportNum]=ExportNamesLength;
600
601 lpwExportOrdinalTable=(WORD *)HeapReAlloc(hHeap,0,lpwExportOrdinalTable,(ExportNum+1)*sizeof(WORD));
602 lpwExportOrdinalTable[ExportNum]=ExportNum;
603
604 lstrcpy(lpExportNames+ExportNamesLength,pUserProc->GetName().c_str());
605 ExportNamesLength+=lstrlen(lpExportNames+ExportNamesLength)+1;
606
607 ExportNum++;
608 }
609 for(i=0;i<ExportNum;i++){
610 lpdwExportNamePointerTable[i]+=
611 sizeof(IMAGE_EXPORT_DIRECTORY)+ //エクスポートディレクトリテーブルを飛び越す
612 ExportNum*sizeof(DWORD)+ //エクスポート アドレス テーブルを飛び越す
613 ExportNum*sizeof(DWORD)+ //エクスポート名ポインタ テーブルを飛び越す
614 ExportNum*sizeof(WORD); //エクスポート序数テーブルを飛び越す
615 }
616
617 ImageExportDirectory.Characteristics=0;
618 ImageExportDirectory.TimeDateStamp=(DWORD)time(NULL);
619 ImageExportDirectory.MajorVersion=0;
620 ImageExportDirectory.MinorVersion=0;
621 ImageExportDirectory.Name=sizeof(IMAGE_EXPORT_DIRECTORY)+
622 ExportNum*sizeof(DWORD)+ //エクスポート アドレス テーブルを飛び越す
623 ExportNum*sizeof(DWORD)+ //エクスポート名ポインタ テーブルを飛び越す
624 ExportNum*sizeof(WORD); //エクスポート序数テーブルを飛び越す
625 ImageExportDirectory.Base=1;
626 ImageExportDirectory.NumberOfFunctions=ExportNum;
627 ImageExportDirectory.NumberOfNames=ExportNum;
628 ImageExportDirectory.AddressOfFunctions=sizeof(IMAGE_EXPORT_DIRECTORY);
629 ImageExportDirectory.AddressOfNames=ImageExportDirectory.AddressOfFunctions+ExportNum*sizeof(DWORD);
630 ImageExportDirectory.AddressOfNameOrdinals=ImageExportDirectory.AddressOfNames+ExportNum*sizeof(DWORD);
631 }
632
633
634 /////////////////////
635 //インポートDLL情報
636 /////////////////////
637 extern DllProc **ppDeclareHash;
638 DllProc *pDllProc;
639 char **ppDllNames;
640 int ImportDllNum;
641
642 /*
643 インポート アドレス テーブル（ルックアップと同じ内容だが、プログラム実行時に実行アドレスに書き換えられる）
644 ルックアップ テーブル（ヒントを示すRVA）
645 IMAGE_IMPORT_DESCRIPTOR1[size=0x14] インポートヘッダ
646 IMAGE_IMPORT_DESCRIPTOR2[size=0x14]
647 IMAGE_IMPORT_DESCRIPTOR3[size=0x14]
648 ...
649 Dll名1[size=0x10]
650 Dll名2[size=0x10]
651 Dll名3[size=0x10]
652 ...
653 ヒントテーブル（関数名を羅列したもの）
654 */
655
656 /*
657 IMAGE_IMPORT_DESCRIPTOR1[size=0x14] インポートヘッダ
658 IMAGE_IMPORT_DESCRIPTOR2[size=0x14]
659 IMAGE_IMPORT_DESCRIPTOR3[size=0x14]
660 ...
661 Dll名1[size=0x10]
662 Dll名2[size=0x10]
663 Dll名3[size=0x10]
664 ...
665 ルックアップ テーブル（ヒントを示すRVA）
666 ヒントテーブル
667 インポート アドレス テーブル（ルックアップと同じ内容だが、プログラム実行時に実行アドレスに書き換えられる）
668 */
669
670 ppDllNames=(char **)HeapAlloc(hHeap,0,1);
671
672 ImportDllNum=0;
673 for(i=0;i<MAX_HASH;i++){
674 const DllProc *pDllProc=ppDeclareHash[i];
675 while(pDllProc){
676 if( !pDllProc->IsUsing() ){
677 pDllProc=pDllProc->pNextData;
678 continue;
679 }
680
681 if( pDllProc->GetDllFileName().size() > 16 ){
682 SetError(7,NULL,cp);
683 break;
684 }
685 for(i2=0;i2<ImportDllNum;i2++){
686 if( pDllProc->GetDllFileName() == ppDllNames[i2] ){
687 break;
688 }
689 }
690 if(i2==ImportDllNum){
691 ppDllNames=(char **)HeapReAlloc(hHeap,0,ppDllNames,(ImportDllNum+1)*sizeof(char **));
692 ppDllNames[ImportDllNum]=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,16);
693 lstrcpy(ppDllNames[ImportDllNum],pDllProc->GetDllFileName().c_str());
694 ImportDllNum++;
695 }
696
697 pDllProc=pDllProc->pNextData;
698 }
699 }
700
701 //IMAGE_IMPORT_DESCRIPTOR、及びルックアップ テーブル サイズの計算
702 IMAGE_IMPORT_DESCRIPTOR *pImportDescriptor;
703 int LookupSize;
704 LookupSize=0;
705 pImportDescriptor=(IMAGE_IMPORT_DESCRIPTOR *)HeapAlloc(hHeap,0,(ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR));
706 for(i=0;i<ImportDllNum;i++){
707 //IMAGE_IMPORT_DESCRIPTOR
708 pImportDescriptor[i].OriginalFirstThunk=LookupSize; //※すぐ下で再計算
709 pImportDescriptor[i].TimeDateStamp=0;
710 pImportDescriptor[i].ForwarderChain=0;
711 pImportDescriptor[i].Name=i*0x10; //※すぐ下で再計算
712 for(i2=0;i2<MAX_HASH;i2++){
713 pDllProc=ppDeclareHash[i2];
714 while(pDllProc){
715 if( !pDllProc->IsUsing() ){
716 pDllProc=pDllProc->pNextData;
717 continue;
718 }
719
720 if( pDllProc->GetDllFileName() == ppDllNames[i] ){
721 //ルックアップデータのサイズを追加
722 LookupSize+=sizeof(_int64);
723 }
724
725 pDllProc=pDllProc->pNextData;
726 }
727 }
728 LookupSize+=sizeof(_int64); //NULL用
729 }
730 memset(&pImportDescriptor[i],0,sizeof(IMAGE_IMPORT_DESCRIPTOR));
731 for(i=0;i<ImportDllNum;i++){
732 //インポートアドレステーブル分の差分を追加
733 pImportDescriptor[i].OriginalFirstThunk+=LookupSize;
734
735 //DLL名への差分を追加
736 pImportDescriptor[i].Name+=
737 LookupSize+ //インポート アドレス テーブル
738 LookupSize+ //ルックアップテーブル
739 (ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR); //IMAGE_IMPORT_DESCRIPTOR
740 }
741
742 //ルックアップ テーブル、ヒント テーブル
743 unsigned _int64 *pLookupTable;
744 pLookupTable=(unsigned _int64 *)HeapAlloc(hHeap,0,LookupSize*sizeof(_int64)+1);
745 char *pHintTable;
746 int HintSize,HintAllocSize;
747 HintSize=0;
748 HintAllocSize=128*2;
749 pHintTable=(char *)HeapAlloc(hHeap,0,HintAllocSize);
750 for(i=0,i5=0;i<ImportDllNum;i++){
751 for(i2=0;i2<MAX_HASH;i2++){
752 pDllProc=ppDeclareHash[i2];
753 while(pDllProc){
754 if( !pDllProc->IsUsing() ){
755 pDllProc=pDllProc->pNextData;
756 continue;
757 }
758
759 if( pDllProc->GetDllFileName() == ppDllNames[i] ){
760 //ルックアップの位置をセット（後にインポート アドレス テーブルにセットしなおされる）
761 pDllProc->SetLookupAddress( i5*sizeof(_int64) );
762
763 //ルックアップ テーブルの値をセット
764 pLookupTable[i5++]=
765 LookupSize+ //インポート アドレス テーブル
766 LookupSize+ //ルックアップテーブル
767 (ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR)+ //IMAGE_IMPORT_DESCRIPTOR
768 ImportDllNum*0x10+ //DLL名の羅列
769 HintSize; //ヒント名へのオフセット
770
771 //ヒント テーブル
772 pHintTable[HintSize++]=0;
773 pHintTable[HintSize++]=0;
774 lstrcpy(pHintTable+HintSize,pDllProc->GetAlias().c_str());
775 i4=(int)pDllProc->GetAlias().size();
776 HintSize+=i4+1;
777 if(i4%2==0) pHintTable[HintSize++]=0;
778
779 if(HintAllocSize<HintSize+128){
780 HintAllocSize+=128;
781 pHintTable=(char *)HeapReAlloc(hHeap,0,pHintTable,HintAllocSize);
782 }
783 }
784
785 pDllProc=pDllProc->pNextData;
786 }
787 }
788 pLookupTable[i5++]=0;
789 }
790
791
792 if(bDll){
793 //DLLの場合はリロケーション情報を仮生成
794 //※正式な生成は各セクションのメモリ上のサイズが決定してから再度行う。
795 pobj_Reloc->ResetRelocBuffer();
796 }
797
798
799
800 //グローバル変数情報を扱う構造体も初期バッファの有無による配置を行う
801 //（デバッグ情報で利用される）
802 extern int AllInitGlobalVarSize;
803 BOOST_FOREACH( Variable *pVar, globalVars ){
804 if(pVar->offset&0x80000000){
805 pVar->offset=(pVar->offset&0x7FFFFFFF)+AllInitGlobalVarSize;
806 }
807 }
808
809
810
811 ////////////////////////////////////
812 // デバッグセクションを生成
813 ////////////////////////////////////
814
815 //機械語コードとBasicコードの関係を整理
816 extern LINEINFO *pLineInfo;
817 extern int MaxLineInfoNum;
818 int MinObp,MaxObp;
819 LINEINFO *pTempLineInfo;
820 pTempLineInfo=(LINEINFO *)HeapAlloc(hHeap,0,MaxLineInfoNum*sizeof(LINEINFO));
821 i2=0;
822 MaxObp=0;
823 while(1){
824 for(i3=0,MinObp=0x0FFFFFFF;i3<MaxLineInfoNum;i3++){
825 if(pLineInfo[i3].TopObp<MinObp&&MaxObp<pLineInfo[i3].TopObp){
826 MinObp=pLineInfo[i3].TopObp;
827 i4=i3;
828 }
829 }
830 if(MinObp==0x0FFFFFFF) break;
831 pTempLineInfo[i2]=pLineInfo[i4];
832 MaxObp=pTempLineInfo[i2].TopObp;
833 i2++;
834 }
835 HeapDefaultFree(pLineInfo);
836 pLineInfo=(LINEINFO *)HeapAlloc(hHeap,0,i2*sizeof(LINEINFO));
837 memcpy(pLineInfo,pTempLineInfo,i2*sizeof(LINEINFO));
838 MaxLineInfoNum=i2;
839 HeapDefaultFree(pTempLineInfo);
840
841 //デバッグセクションを生成
842 CDebugSection *pobj_DebugSection;
843 pobj_DebugSection=new CDebugSection();
844 extern BOOL bDebugCompile;
845 extern BOOL bError;
846 if(bDebugCompile&&bError==0){
847 pobj_DebugSection->make();
848 }
849
850
851
852 /////////////////////////////////////
853 // 各セクションの位置とサイズを計算
854 /////////////////////////////////////
855
856 //コードセッションのファイル上のサイズ
857 if(obp%FILE_ALIGNMENT) FileSize_CodeSection=obp+(FILE_ALIGNMENT-obp%FILE_ALIGNMENT);
858 else FileSize_CodeSection=obp;
859 if(FileSize_CodeSection) bUse_CodeSection=1;
860 else bUse_CodeSection=0;
861
862 //エクスポートセクションのファイル上のサイズ
863 i= sizeof(IMAGE_EXPORT_DIRECTORY)+ //エクスポートディレクトリテーブルを飛び越す
864 ExportNum*sizeof(DWORD)+ //エクスポート アドレス テーブルを飛び越す
865 ExportNum*sizeof(DWORD)+ //エクスポート名ポインタ テーブルを飛び越す
866 ExportNum*sizeof(WORD)+ //エクスポート序数テーブルを飛び越す
867 ExportNamesLength; //シンボル名バッファ
868 if(bUse_ExportSection){
869 if(i%FILE_ALIGNMENT) FileSize_ExportSection=i+(FILE_ALIGNMENT-i%FILE_ALIGNMENT);
870 else FileSize_ExportSection=i;
871 }
872 else FileSize_ExportSection=0;
873
874 //インポートセクションのファイル上のサイズ
875 i=
876 LookupSize+ //インポート アドレス テーブル
877 LookupSize+ //ルックアップテーブル
878 (ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR)+ //IMAGE_IMPORT_DESCRIPTOR
879 ImportDllNum*0x10+ //DLL名の羅列
880 HintSize; //ヒント名
881 if(i%FILE_ALIGNMENT) FileSize_ImportSection=i+(FILE_ALIGNMENT-i%FILE_ALIGNMENT);
882 else FileSize_ImportSection=i;
883 bUse_ImportSection=1; //インポートセクションは必ず存在する
884
885 //データセクションのファイル上のサイズ
886 if(compiler.GetNativeCode().GetDataTable().GetSize()%FILE_ALIGNMENT) FileSize_DataSection=compiler.GetNativeCode().GetDataTable().GetSize()+(FILE_ALIGNMENT-compiler.GetNativeCode().GetDataTable().GetSize()%FILE_ALIGNMENT);
887 else FileSize_DataSection=compiler.GetNativeCode().GetDataTable().GetSize();
888 if(FileSize_DataSection) bUse_DataSection=1;
889 else bUse_DataSection=0;
890
891 //リライタブルセクションのファイル上のサイズ（グローバル変数の初期情報のみを格納）
892 extern int AllInitGlobalVarSize;
893 if(AllInitGlobalVarSize%FILE_ALIGNMENT) FileSize_RWSection=AllInitGlobalVarSize+(FILE_ALIGNMENT-AllInitGlobalVarSize%FILE_ALIGNMENT);
894 else{
895 if(AllInitGlobalVarSize) FileSize_RWSection=AllInitGlobalVarSize;
896 else FileSize_RWSection=FILE_ALIGNMENT;
897 }
898 bUse_RWSection=1;
899
900 //リソースセクションのファイル上のサイズ
901 char *RSrcSectionBuffer;
902 int RSrcSectionSize;
903 RSrcSectionBuffer=GetRSrcSectionBuffer(&RSrcSectionSize);
904 if(RSrcSectionSize%FILE_ALIGNMENT) FileSize_RSrcSection=RSrcSectionSize+(FILE_ALIGNMENT-RSrcSectionSize%FILE_ALIGNMENT);
905 else FileSize_RSrcSection=RSrcSectionSize;
906 if(FileSize_RSrcSection) bUse_RSrcSection=1;
907 else bUse_RSrcSection=0;
908
909 //リロケーションセクションのファイル上のサイズ
910 if(pobj_Reloc->length%FILE_ALIGNMENT) FileSize_RelocSection=pobj_Reloc->length+(FILE_ALIGNMENT-pobj_Reloc->length%FILE_ALIGNMENT);
911 else FileSize_RelocSection=pobj_Reloc->length;
912 if(FileSize_RelocSection) bUse_RelocSection=1;
913 else bUse_RelocSection=0;
914
915 //デバッグセクションのファイル上のサイズ
916 if(pobj_DebugSection->length%FILE_ALIGNMENT) FileSize_DebugSection=pobj_DebugSection->length+(FILE_ALIGNMENT-pobj_DebugSection->length%FILE_ALIGNMENT);
917 else FileSize_DebugSection=pobj_DebugSection->length;
918 if(FileSize_DebugSection) bUse_DebugSection=1;
919 else bUse_DebugSection=0;
920
921
922 //各セッションのファイル上の位置
923 FilePos_CodeSection= EXE_HEADER_SIZE;
924 FilePos_ExportSection= FilePos_CodeSection+
925 FileSize_CodeSection;
926 FilePos_ImportSection= FilePos_ExportSection+
927 FileSize_ExportSection;
928 FilePos_DataSection= FilePos_ImportSection+
929 FileSize_ImportSection;
930 FilePos_RWSection= FilePos_DataSection+
931 FileSize_DataSection;
932 FilePos_RSrcSection= FilePos_RWSection+
933 FileSize_RWSection;
934 FilePos_RelocSection= FilePos_RSrcSection+
935 FileSize_RSrcSection;
936 FilePos_DebugSection= FilePos_RelocSection+
937 FileSize_RelocSection;
938
939 //コードセッションのメモリ上のサイズ
940 if(FileSize_CodeSection%MEM_ALIGNMENT) MemSize_CodeSection=FileSize_CodeSection+(MEM_ALIGNMENT-FileSize_CodeSection%MEM_ALIGNMENT);
941 else MemSize_CodeSection=FileSize_CodeSection;
942
943 //エクスポートセクションのメモリ上のサイズ
944 if(FileSize_ExportSection%MEM_ALIGNMENT) MemSize_ExportSection=FileSize_ExportSection+(MEM_ALIGNMENT-FileSize_ExportSection%MEM_ALIGNMENT);
945 else MemSize_ExportSection=FileSize_ExportSection;
946
947 //インポートセクションのメモリ上のサイズ
948 if(FileSize_ImportSection%MEM_ALIGNMENT) MemSize_ImportSection=FileSize_ImportSection+(MEM_ALIGNMENT-FileSize_ImportSection%MEM_ALIGNMENT);
949 else MemSize_ImportSection=FileSize_ImportSection;
950
951 //データセクションのメモリ上のサイズ
952 if(FileSize_DataSection%MEM_ALIGNMENT) MemSize_DataSection=FileSize_DataSection+(MEM_ALIGNMENT-FileSize_DataSection%MEM_ALIGNMENT);
953 else MemSize_DataSection=FileSize_DataSection;
954
955 //リライタブルセクションのメモリ上のサイズ
956 extern int AllGlobalVarSize;
957 i=AllInitGlobalVarSize+AllGlobalVarSize;
958 if(i%MEM_ALIGNMENT) MemSize_RWSection=i+(MEM_ALIGNMENT-i%MEM_ALIGNMENT);
959 else MemSize_RWSection=i;
960
961 //リソースセクションのメモリ上のサイズ
962 if(FileSize_RSrcSection%MEM_ALIGNMENT) MemSize_RSrcSection=FileSize_RSrcSection+(MEM_ALIGNMENT-FileSize_RSrcSection%MEM_ALIGNMENT);
963 else MemSize_RSrcSection=FileSize_RSrcSection;
964
965 //リロケーションセクションのメモリ上のサイズ
966 if(FileSize_RelocSection%MEM_ALIGNMENT) MemSize_RelocSection=FileSize_RelocSection+(MEM_ALIGNMENT-FileSize_RelocSection%MEM_ALIGNMENT);
967 else MemSize_RelocSection=FileSize_RelocSection;
968
969 //デバッグセクションのメモリ上のサイズ
970 if(FileSize_DebugSection%MEM_ALIGNMENT) MemSize_DebugSection=FileSize_DebugSection+(MEM_ALIGNMENT-FileSize_DebugSection%MEM_ALIGNMENT);
971 else MemSize_DebugSection=FileSize_DebugSection;
972
973
974 //各セッションのメモリ上の位置
975 if(bUse_ExportSection) MemPos_ExportSection= 0x1000+
976 MemSize_CodeSection;
977 else MemPos_ExportSection=0;
978 if(bUse_ImportSection) MemPos_ImportSection= 0x1000+
979 MemSize_CodeSection+
980 MemSize_ExportSection;
981 else MemPos_ImportSection=0;
982 if(bUse_DataSection) MemPos_DataSection= 0x1000+
983 MemSize_CodeSection+
984 MemSize_ExportSection+
985 MemSize_ImportSection;
986 else MemPos_DataSection=0;
987 if(bUse_RWSection) MemPos_RWSection= 0x1000+
988 MemSize_CodeSection+
989 MemSize_ExportSection+
990 MemSize_ImportSection+
991 MemSize_DataSection;
992 else MemPos_RWSection=0;
993 if(bUse_RSrcSection) MemPos_RSrcSection= 0x1000+
994 MemSize_CodeSection+
995 MemSize_ExportSection+
996 MemSize_ImportSection+
997 MemSize_DataSection+
998 MemSize_RWSection;
999 else MemPos_RSrcSection=0;
1000 if(bUse_RelocSection) MemPos_RelocSection= 0x1000+
1001 MemSize_CodeSection+
1002 MemSize_ExportSection+
1003 MemSize_ImportSection+
1004 MemSize_DataSection+
1005 MemSize_RWSection+
1006 MemSize_RSrcSection;
1007 else MemPos_RelocSection=0;
1008 if(bUse_DebugSection) MemPos_DebugSection= 0x1000+
1009 MemSize_CodeSection+
1010 MemSize_ExportSection+
1011 MemSize_ImportSection+
1012 MemSize_DataSection+
1013 MemSize_RWSection+
1014 MemSize_RSrcSection+
1015 MemSize_RelocSection;
1016 else MemPos_DebugSection=0;
1017
1018
1019
1020 /////////////////////////////
1021 // GC用の変数スケジュール
1022 /////////////////////////////
1023 PerformedGcVarSchedule();
1024
1025
1026 ////////////////////////////
1027 // エクスポート情報の再配置
1028 ////////////////////////////
1029 if(bUse_ExportSection){
1030 for(i=0;i<ExportNum;i++){
1031 lpdwExportAddressTable[i]+=MemPos_CodeSection;
1032 lpdwExportNamePointerTable[i]+=MemPos_ExportSection;
1033 }
1034
1035 ImageExportDirectory.Name+= MemPos_ExportSection;
1036 ImageExportDirectory.AddressOfFunctions+= MemPos_ExportSection;
1037 ImageExportDirectory.AddressOfNames+= MemPos_ExportSection;
1038 ImageExportDirectory.AddressOfNameOrdinals+= MemPos_ExportSection;
1039 }
1040
1041
1042 ////////////////////////////
1043 // インポート情報の再配置
1044 ////////////////////////////
1045 for(i=0,i5=0;i<ImportDllNum;i++){
1046 //IMAGE_IMPORT_DESCRIPTOR
1047 pImportDescriptor[i].OriginalFirstThunk+=MemPos_ImportSection;
1048 pImportDescriptor[i].Name+=MemPos_ImportSection;
1049
1050 //インポート アドレス テーブル（ルックアップ テーブルを差し引く）
1051 pImportDescriptor[i].FirstThunk=pImportDescriptor[i].OriginalFirstThunk-
1052 LookupSize; //ルックアップテーブル
1053
1054 for(i2=0;i2<MAX_HASH;i2++){
1055 const DllProc *pDllProc=ppDeclareHash[i2];
1056 while(pDllProc){
1057 if( !pDllProc->IsUsing() ){
1058 pDllProc=pDllProc->pNextData;
1059 continue;
1060 }
1061
1062 if( pDllProc->GetDllFileName() == ppDllNames[i] ){
1063 //ルックアップ テーブル
1064 pLookupTable[i5++]+=MemPos_ImportSection;
1065 }
1066
1067 pDllProc=pDllProc->pNextData;
1068 }
1069 }
1070 i5++;
1071 }
1072
1073
1074 ////////////////////////////////////////
1075 //仮想関数データテーブルスケジュール
1076 compiler.GetMeta().GetClasses().ActionVtblSchedule(ImageBase,MemPos_CodeSection);
1077
1078
1079 //////////////////////////////
1080 // データテーブルスケジュール
1081 for(i=0;i<pobj_DataTableSchedule->num;i++){
1082 *((long *)(OpBuffer+pobj_DataTableSchedule->pObpValues[i]))+=ImageBase+MemPos_DataSection;
1083 }
1084 delete pobj_DataTableSchedule;
1085
1086
1087 //////////////////////////////////
1088 // インポートテーブルスケジュール（インポート アドレス テーブルを指し示させる）
1089 // ※x86はRVAからのオフセット。x64はRPI（実行中アドレス）からのオフセット
1090 for(i=0;i<pobj_ImportAddrSchedule->num;i++){
1091 DllProc *pDllProc;
1092 pDllProc=pobj_ImportAddrSchedule->ppdi[i];
1093 *((long *)(OpBuffer+pobj_ImportAddrSchedule->pObpValues[i]))=
1094 MemPos_ImportSection+
1095 pDllProc->GetLookupAddress()
1096 -(MemPos_CodeSection+pobj_ImportAddrSchedule->pObpValues[i]+sizeof(long));
1097 }
1098 delete pobj_ImportAddrSchedule;
1099
1100
1101 ////////////////////////////////////
1102 // プロシージャポインタスケジュール
1103 for(i=0;i<pobj_SubAddrSchedule->num;i++){
1104 if(pobj_SubAddrSchedule->ppsi[i]->beginOpAddress==0
1105 &&pobj_SubAddrSchedule->ppsi[i]->endOpAddress==0){
1106 SetError(300,NULL,-1);
1107 }
1108
1109 if(pobj_SubAddrSchedule->pbCall[i]){
1110 *((long *)(OpBuffer+pobj_SubAddrSchedule->pObpValues[i]))=
1111 pobj_SubAddrSchedule->ppsi[i]->beginOpAddress-(pobj_SubAddrSchedule->pObpValues[i]+sizeof(long));
1112 }
1113 else{
1114 *((long *)(OpBuffer+pobj_SubAddrSchedule->pObpValues[i]))=
1115 pobj_SubAddrSchedule->ppsi[i]->beginOpAddress+ImageBase+MemPos_CodeSection;
1116 }
1117 }
1118 delete pobj_SubAddrSchedule;
1119
1120
1121 if(bDll){
1122 //DLLの場合はリロケーション情報を生成
1123 pobj_Reloc->ResetRelocBuffer();
1124 }
1125
1126 delete pobj_TempSchedule;
1127
1128
1129
1130 //////////////////////////////////////
1131 // グローバル変数アドレススケジュール
1132 //////////////////////////////////////
1133
1134 /*
1135 GlobalArea1 - 初期バッファあり
1136 GlobalArea2 - 初期バッファなし
1137 */
1138 for(i=0;i<pobj_GlobalVarSchedule->num;i++){
1139 if(*((long *)(OpBuffer+pobj_GlobalVarSchedule->pObpValues[i])) & 0x80000000){
1140 //初期バッファなし
1141 *((long *)(OpBuffer+pobj_GlobalVarSchedule->pObpValues[i]))=
1142 AllInitGlobalVarSize+
1143 (*((long *)(OpBuffer+pobj_GlobalVarSchedule->pObpValues[i])) & 0x7FFFFFFF)+
1144 ImageBase+MemPos_RWSection;
1145 }
1146 else{
1147 //初期バッファあり
1148 *((long *)(OpBuffer+pobj_GlobalVarSchedule->pObpValues[i]))+=
1149 ImageBase+MemPos_RWSection;
1150 }
1151 }
1152 delete pobj_GlobalVarSchedule;
1153
1154
1155 ////////////////////////////////
1156 // リソースアドレススケジュール
1157 extern DWORD *lpdwRSrcAddrSchedule;
1158 extern int RSrcAddrScheduleNum;
1159 for(i=0;i<RSrcAddrScheduleNum;i++){
1160 *(DWORD *)(RSrcSectionBuffer+lpdwRSrcAddrSchedule[i])+=MemPos_RSrcSection;
1161 }
1162 HeapDefaultFree(lpdwRSrcAddrSchedule);
1163
1164
1165 //Dosスタブ
1166 char *DosStubBuffer;
1167 int DosStubSize;
1168 hFile=CreateFile(
1169 ( Jenga::Common::Environment::GetAppDir() + "\\SubOperation\\dosstub.pgm" ).c_str(),
1170 GENERIC_READ,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
1171 if(hFile==INVALID_HANDLE_VALUE){
1172 MessageBox(hOwnerEditor,"dosstub.pgmの読み込みに失敗","error",MB_OK);
1173 goto EndWriteOpcode;
1174 }
1175 DosStubSize=GetFileSize(hFile,NULL);
1176 DosStubBuffer=(char *)HeapAlloc(hHeap,0,DosStubSize);
1177 ReadFile(hFile,DosStubBuffer,DosStubSize,(DWORD *)&i2,NULL);
1178 CloseHandle(hFile);
1179
1180
1181 extern BOOL bError;
1182 if(bError) goto EndWriteOpcode;
1183
1184
1185 ////////////////////////////
1186 // EXEファイルのヘッダ情報
1187 ////////////////////////////
1188
1189 IMAGE_DOS_HEADER ImageDosHeader;
1190 ImageDosHeader.e_magic= 0x5A4D;
1191 ImageDosHeader.e_cblp= 0x0090;
1192 ImageDosHeader.e_cp= 0x0003;
1193 ImageDosHeader.e_crlc= 0;
1194 ImageDosHeader.e_cparhdr=4;
1195 ImageDosHeader.e_minalloc=0x0000;
1196 ImageDosHeader.e_maxalloc=0xFFFF;
1197 ImageDosHeader.e_ss= 0x0000;
1198 ImageDosHeader.e_sp= 0x00B8;
1199 ImageDosHeader.e_csum= 0x0000;
1200 ImageDosHeader.e_ip= 0x0000;
1201 ImageDosHeader.e_cs= 0x0000;
1202 ImageDosHeader.e_lfarlc=0x0040;
1203 ImageDosHeader.e_ovno= 0x0000;
1204 ImageDosHeader.e_res[0]=0;
1205 ImageDosHeader.e_res[1]=0;
1206 ImageDosHeader.e_res[2]=0;
1207 ImageDosHeader.e_res[3]=0;
1208 ImageDosHeader.e_oemid= 0x0000;
1209 ImageDosHeader.e_oeminfo=0x0000;
1210 ImageDosHeader.e_res2[0]=0;
1211 ImageDosHeader.e_res2[1]=0;
1212 ImageDosHeader.e_res2[2]=0;
1213 ImageDosHeader.e_res2[3]=0;
1214 ImageDosHeader.e_res2[4]=0;
1215 ImageDosHeader.e_res2[5]=0;
1216 ImageDosHeader.e_res2[6]=0;
1217 ImageDosHeader.e_res2[7]=0;
1218 ImageDosHeader.e_res2[8]=0;
1219 ImageDosHeader.e_res2[9]=0;
1220 ImageDosHeader.e_lfanew=0x0100; //PEヘッダの位置
1221
1222
1223 /////////////////////////////////////////////
1224 // PEヘッダ
1225 /////////////////////////////////////////////
1226
1227 IMAGE_NT_HEADERS64 ImagePeHdr;
1228 ImagePeHdr.Signature=IMAGE_NT_SIGNATURE;
1229
1230 //マシンタイプ
1231 ImagePeHdr.FileHeader.Machine= IMAGE_FILE_MACHINE_AMD64;
1232
1233 ImagePeHdr.FileHeader.NumberOfSections= bUse_CodeSection+
1234 bUse_ExportSection+
1235 bUse_ImportSection+
1236 bUse_DataSection+
1237 bUse_RWSection+
1238 bUse_RSrcSection+
1239 bUse_RelocSection+
1240 bUse_DebugSection; //セクション数
1241 ImagePeHdr.FileHeader.TimeDateStamp= (DWORD)time(NULL);
1242 ImagePeHdr.FileHeader.PointerToSymbolTable= 0x00000000;
1243 ImagePeHdr.FileHeader.NumberOfSymbols= 0x00000000;
1244 ImagePeHdr.FileHeader.SizeOfOptionalHeader= IMAGE_SIZEOF_NT_OPTIONAL64_HEADER;
1245 if(bDll){
1246 ImagePeHdr.FileHeader.Characteristics= IMAGE_FILE_EXECUTABLE_IMAGE|
1247 IMAGE_FILE_DLL|
1248 IMAGE_FILE_LARGE_ADDRESS_AWARE;
1249 }
1250 else{
1251 ImagePeHdr.FileHeader.Characteristics= IMAGE_FILE_RELOCS_STRIPPED|
1252 IMAGE_FILE_EXECUTABLE_IMAGE|
1253 IMAGE_FILE_LARGE_ADDRESS_AWARE;
1254 }
1255
1256 ImagePeHdr.OptionalHeader.Magic= IMAGE_NT_OPTIONAL_HDR64_MAGIC;
1257 ImagePeHdr.OptionalHeader.MajorLinkerVersion= 5;
1258 ImagePeHdr.OptionalHeader.MinorLinkerVersion= 0;
1259 ImagePeHdr.OptionalHeader.SizeOfCode= FileSize_CodeSection; //コードサイズ（.textのセッションサイズ）
1260 ImagePeHdr.OptionalHeader.SizeOfInitializedData=FileSize_DataSection; //データサイズ（.dataのセッションサイズ）
1261 ImagePeHdr.OptionalHeader.SizeOfUninitializedData=0; //未初期化データのサイズ（なし）
1262 if(bDll){
1263 if(DllMain_EntryPoint==-1)
1264 ImagePeHdr.OptionalHeader.AddressOfEntryPoint=0;
1265 else
1266 ImagePeHdr.OptionalHeader.AddressOfEntryPoint=MemPos_CodeSection+DllMain_EntryPoint;
1267 }
1268 else ImagePeHdr.OptionalHeader.AddressOfEntryPoint= MemPos_CodeSection;
1269 ImagePeHdr.OptionalHeader.BaseOfCode= MemPos_CodeSection; //.textのアドレス
1270
1271 ImagePeHdr.OptionalHeader.ImageBase= ImageBase; //イメージベース
1272 ImagePeHdr.OptionalHeader.SectionAlignment= MEM_ALIGNMENT; //セクションアラインメント
1273 ImagePeHdr.OptionalHeader.FileAlignment= FILE_ALIGNMENT;
1274 ImagePeHdr.OptionalHeader.MajorOperatingSystemVersion=4;
1275 ImagePeHdr.OptionalHeader.MinorOperatingSystemVersion=0;
1276 ImagePeHdr.OptionalHeader.MajorImageVersion= 0;
1277 ImagePeHdr.OptionalHeader.MinorImageVersion= 0;
1278 ImagePeHdr.OptionalHeader.MajorSubsystemVersion=4;
1279 ImagePeHdr.OptionalHeader.MinorSubsystemVersion=0;
1280 ImagePeHdr.OptionalHeader.Win32VersionValue= 0;
1281 ImagePeHdr.OptionalHeader.SizeOfImage= EXE_HEADER_SIZE+
1282 MemSize_CodeSection+
1283 MemSize_ExportSection+
1284 MemSize_ImportSection+
1285 MemSize_DataSection+
1286 MemSize_RWSection+
1287 MemSize_RSrcSection+
1288 MemSize_RelocSection+
1289 MemSize_DebugSection;//すべてのイメージサイズ
1290 ImagePeHdr.OptionalHeader.SizeOfHeaders= EXE_HEADER_SIZE;//ヘッダサイズ
1291 ImagePeHdr.OptionalHeader.CheckSum= 0;
1292 extern unsigned short TypeOfSubSystem;
1293 ImagePeHdr.OptionalHeader.Subsystem= TypeOfSubSystem;
1294 ImagePeHdr.OptionalHeader.DllCharacteristics= 0;
1295 ImagePeHdr.OptionalHeader.SizeOfStackReserve= 0x00100000;
1296 ImagePeHdr.OptionalHeader.SizeOfStackCommit= 0x00001000;
1297 ImagePeHdr.OptionalHeader.SizeOfHeapReserve= 0x00100000;
1298 ImagePeHdr.OptionalHeader.SizeOfHeapCommit= 0x00001000;
1299 ImagePeHdr.OptionalHeader.LoaderFlags= 0;
1300 ImagePeHdr.OptionalHeader.NumberOfRvaAndSizes= IMAGE_NUMBEROF_DIRECTORY_ENTRIES;
1301
1302 //データ ディクショナリ
1303 ImagePeHdr.OptionalHeader.DataDirectory[0].VirtualAddress=MemPos_ExportSection;
1304 ImagePeHdr.OptionalHeader.DataDirectory[0].Size=FileSize_ExportSection;
1305 ImagePeHdr.OptionalHeader.DataDirectory[1].VirtualAddress= //IMAGE_IMPORT_DESCRIPTORを指す
1306 MemPos_ImportSection+
1307 LookupSize+ //インポート アドレス テーブル
1308 LookupSize; //ルックアップ テーブル
1309 ImagePeHdr.OptionalHeader.DataDirectory[1].Size=(ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR);
1310 ImagePeHdr.OptionalHeader.DataDirectory[2].VirtualAddress=MemPos_RSrcSection;
1311 ImagePeHdr.OptionalHeader.DataDirectory[2].Size=RSrcSectionSize;
1312 ImagePeHdr.OptionalHeader.DataDirectory[3].VirtualAddress=0;
1313 ImagePeHdr.OptionalHeader.DataDirectory[3].Size=0;
1314 ImagePeHdr.OptionalHeader.DataDirectory[4].VirtualAddress=0;
1315 ImagePeHdr.OptionalHeader.DataDirectory[4].Size=0;
1316 ImagePeHdr.OptionalHeader.DataDirectory[5].VirtualAddress=MemPos_RelocSection;
1317 ImagePeHdr.OptionalHeader.DataDirectory[5].Size=pobj_Reloc->length;
1318 ImagePeHdr.OptionalHeader.DataDirectory[6].VirtualAddress=0;
1319 ImagePeHdr.OptionalHeader.DataDirectory[6].Size=0;
1320 ImagePeHdr.OptionalHeader.DataDirectory[7].VirtualAddress=0;
1321 ImagePeHdr.OptionalHeader.DataDirectory[7].Size=0;
1322 ImagePeHdr.OptionalHeader.DataDirectory[8].VirtualAddress=0;
1323 ImagePeHdr.OptionalHeader.DataDirectory[8].Size=0;
1324 ImagePeHdr.OptionalHeader.DataDirectory[9].VirtualAddress=0;
1325 ImagePeHdr.OptionalHeader.DataDirectory[9].Size=0;
1326 ImagePeHdr.OptionalHeader.DataDirectory[10].VirtualAddress=0;
1327 ImagePeHdr.OptionalHeader.DataDirectory[10].Size=0;
1328 ImagePeHdr.OptionalHeader.DataDirectory[11].VirtualAddress=0;
1329 ImagePeHdr.OptionalHeader.DataDirectory[11].Size=0;
1330 ImagePeHdr.OptionalHeader.DataDirectory[12].VirtualAddress=MemPos_ImportSection;//インポート アドレス テーブル
1331 ImagePeHdr.OptionalHeader.DataDirectory[12].Size=LookupSize;
1332 ImagePeHdr.OptionalHeader.DataDirectory[13].VirtualAddress=0;
1333 ImagePeHdr.OptionalHeader.DataDirectory[13].Size=0;
1334 ImagePeHdr.OptionalHeader.DataDirectory[14].VirtualAddress=0;
1335 ImagePeHdr.OptionalHeader.DataDirectory[14].Size=0;
1336 ImagePeHdr.OptionalHeader.DataDirectory[15].VirtualAddress=0;
1337 ImagePeHdr.OptionalHeader.DataDirectory[15].Size=0;
1338
1339
1340 //コードセクションヘッダ
1341 IMAGE_SECTION_HEADER CodeSectionHeader;
1342 memset((char *)CodeSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1343 lstrcpy((char *)CodeSectionHeader.Name,".text");
1344 CodeSectionHeader.Misc.VirtualSize= obp;
1345 CodeSectionHeader.VirtualAddress= MemPos_CodeSection; //開始アドレス
1346 CodeSectionHeader.SizeOfRawData= FileSize_CodeSection;
1347 CodeSectionHeader.PointerToRawData= FilePos_CodeSection; //ファイル上の開始アドレス
1348 CodeSectionHeader.PointerToRelocations= 0;
1349 CodeSectionHeader.PointerToLinenumbers= 0;
1350 CodeSectionHeader.NumberOfRelocations= 0;
1351 CodeSectionHeader.NumberOfLinenumbers= 0;
1352 CodeSectionHeader.Characteristics= IMAGE_SCN_MEM_EXECUTE|
1353 IMAGE_SCN_MEM_READ|
1354 IMAGE_SCN_CNT_CODE;
1355
1356 //エクスポートセクションヘッダ
1357 IMAGE_SECTION_HEADER ExportSectionHeader;
1358 memset((char *)ExportSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1359 lstrcpy((char *)ExportSectionHeader.Name,".edata");
1360 ExportSectionHeader.Misc.VirtualSize= MemSize_ExportSection;
1361 ExportSectionHeader.VirtualAddress= MemPos_ExportSection; //開始アドレス
1362 ExportSectionHeader.SizeOfRawData= FileSize_ExportSection; //サイズ
1363 ExportSectionHeader.PointerToRawData= FilePos_ExportSection; //ファイル上の開始アドレス
1364 ExportSectionHeader.PointerToRelocations= 0;
1365 ExportSectionHeader.PointerToLinenumbers= 0;
1366 ExportSectionHeader.NumberOfRelocations= 0;
1367 ExportSectionHeader.NumberOfLinenumbers= 0;
1368 ExportSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1369 IMAGE_SCN_MEM_READ;
1370
1371 //インポートセクションヘッダ
1372 IMAGE_SECTION_HEADER ImportSectionHeader;
1373 memset((char *)ImportSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1374 lstrcpy((char *)ImportSectionHeader.Name,".idata");
1375 ImportSectionHeader.Misc.VirtualSize=
1376 LookupSize+ //インポートアドレステーブル
1377 LookupSize+ //ルックアップテーブル
1378 (ImportDllNum+1)*sizeof(IMAGE_IMPORT_DESCRIPTOR)+
1379 16*ImportDllNum+ //DLL名
1380 HintSize; //ヒント名（関数名）テーブル
1381 ImportSectionHeader.VirtualAddress= MemPos_ImportSection; //開始アドレス
1382 ImportSectionHeader.SizeOfRawData= FileSize_ImportSection; //サイズ
1383 ImportSectionHeader.PointerToRawData= FilePos_ImportSection; //ファイル上の開始アドレス
1384 ImportSectionHeader.PointerToRelocations= 0;
1385 ImportSectionHeader.PointerToLinenumbers= 0;
1386 ImportSectionHeader.NumberOfRelocations= 0;
1387 ImportSectionHeader.NumberOfLinenumbers= 0;
1388 ImportSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1389 IMAGE_SCN_MEM_READ;
1390
1391 //データセクションヘッダ
1392 IMAGE_SECTION_HEADER DataSectionHeader;
1393 memset((char *)DataSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1394 lstrcpy((char *)DataSectionHeader.Name,".sdata");
1395 DataSectionHeader.Misc.VirtualSize= MemSize_DataSection;
1396 DataSectionHeader.VirtualAddress= MemPos_DataSection;
1397 DataSectionHeader.SizeOfRawData= FileSize_DataSection;
1398 DataSectionHeader.PointerToRawData= FilePos_DataSection;
1399 DataSectionHeader.PointerToRelocations= 0;
1400 DataSectionHeader.PointerToLinenumbers= 0;
1401 DataSectionHeader.NumberOfRelocations= 0;
1402 DataSectionHeader.NumberOfLinenumbers= 0;
1403 DataSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1404 IMAGE_SCN_MEM_READ|
1405 IMAGE_SCN_MEM_WRITE;
1406
1407 //リライタブルセクションヘッダ
1408 IMAGE_SECTION_HEADER RWSectionHeader;
1409 memset((char *)RWSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1410 lstrcpy((char *)RWSectionHeader.Name,".data");
1411 RWSectionHeader.Misc.VirtualSize= AllInitGlobalVarSize+AllGlobalVarSize;
1412 RWSectionHeader.VirtualAddress= MemPos_RWSection;
1413 RWSectionHeader.SizeOfRawData= FileSize_RWSection;
1414 RWSectionHeader.PointerToRawData= FilePos_RWSection;
1415 RWSectionHeader.PointerToRelocations= 0;
1416 RWSectionHeader.PointerToLinenumbers= 0;
1417 RWSectionHeader.NumberOfRelocations= 0;
1418 RWSectionHeader.NumberOfLinenumbers= 0;
1419 RWSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1420 IMAGE_SCN_MEM_READ|
1421 IMAGE_SCN_MEM_WRITE;
1422
1423 //リソースセクションヘッダ
1424 IMAGE_SECTION_HEADER RSrcSectionHeader;
1425 memset((char *)RSrcSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1426 lstrcpy((char *)RSrcSectionHeader.Name,".rsrc");
1427 RSrcSectionHeader.Misc.VirtualSize= RSrcSectionSize;
1428 RSrcSectionHeader.VirtualAddress= MemPos_RSrcSection;
1429 RSrcSectionHeader.SizeOfRawData= FileSize_RSrcSection;
1430 RSrcSectionHeader.PointerToRawData= FilePos_RSrcSection;
1431 RSrcSectionHeader.PointerToRelocations= 0;
1432 RSrcSectionHeader.PointerToLinenumbers= 0;
1433 RSrcSectionHeader.NumberOfRelocations= 0;
1434 RSrcSectionHeader.NumberOfLinenumbers= 0;
1435 RSrcSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1436 IMAGE_SCN_MEM_READ;
1437
1438 //リロケーションセクションヘッダ
1439 IMAGE_SECTION_HEADER RelocSectionHeader;
1440 memset((char *)RelocSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1441 lstrcpy((char *)RelocSectionHeader.Name,".reloc");
1442 RelocSectionHeader.Misc.VirtualSize= pobj_Reloc->length;
1443 RelocSectionHeader.VirtualAddress= MemPos_RelocSection; //開始アドレス
1444 RelocSectionHeader.SizeOfRawData= FileSize_RelocSection; //サイズ
1445 RelocSectionHeader.PointerToRawData= FilePos_RelocSection; //ファイル上の開始アドレス
1446 RelocSectionHeader.PointerToRelocations= 0;
1447 RelocSectionHeader.PointerToLinenumbers= 0;
1448 RelocSectionHeader.NumberOfRelocations= 0;
1449 RelocSectionHeader.NumberOfLinenumbers= 0;
1450 RelocSectionHeader.Characteristics= IMAGE_SCN_CNT_INITIALIZED_DATA|
1451 IMAGE_SCN_MEM_DISCARDABLE|
1452 IMAGE_SCN_MEM_READ;
1453
1454 //デバッグセクションヘッダ
1455 IMAGE_SECTION_HEADER DebugSectionHeader;
1456 memset((char *)DebugSectionHeader.Name,0,IMAGE_SIZEOF_SHORT_NAME);
1457 lstrcpy((char *)DebugSectionHeader.Name,".debug");
1458 DebugSectionHeader.Misc.VirtualSize= pobj_DebugSection->length;
1459 DebugSectionHeader.VirtualAddress= MemPos_DebugSection; //開始アドレス
1460 DebugSectionHeader.SizeOfRawData= FileSize_DebugSection; //サイズ
1461 DebugSectionHeader.PointerToRawData= FilePos_DebugSection; //ファイル上の開始アドレス
1462 DebugSectionHeader.PointerToRelocations= 0;
1463 DebugSectionHeader.PointerToLinenumbers= 0;
1464 DebugSectionHeader.NumberOfRelocations= 0;
1465 DebugSectionHeader.NumberOfLinenumbers= 0;
1466 DebugSectionHeader.Characteristics= IMAGE_SCN_MEM_DISCARDABLE|
1467 IMAGE_SCN_MEM_READ;
1468
1469
1470 hFile=CreateFile(OutputFileName,GENERIC_WRITE,0,NULL,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,NULL);
1471 if(hFile==INVALID_HANDLE_VALUE){
1472 SetError(53,OutputFileName,-1);
1473 goto EndWriteOpcode;
1474 }
1475
1476 //ヘッダ
1477 WriteFile(hFile,(void *)&ImageDosHeader,sizeof(IMAGE_DOS_HEADER),(DWORD *)&i2,NULL);
1478 i=i2;
1479
1480 //Dosスタブ
1481 WriteFile(hFile,DosStubBuffer,DosStubSize,(DWORD *)&i2,NULL);
1482 i+=i2;
1483
1484 //0x0100までNULLを並べる
1485 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,0x0100-i);
1486 WriteFile(hFile,temp2,0x0100-i,(DWORD *)&i2,NULL);
1487 HeapDefaultFree(temp2);
1488 i+=i2;
1489
1490 //PEヘッダ
1491 WriteFile(hFile,&ImagePeHdr,sizeof(IMAGE_NT_HEADERS64),(DWORD *)&i2,NULL);
1492 i+=i2;
1493
1494 //コード セクション ヘッダ
1495 WriteFile(hFile,&CodeSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1496 i+=i2;
1497
1498 if(bUse_ExportSection){
1499 //エクスポート セクション ヘッダ
1500 WriteFile(hFile,&ExportSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1501 i+=i2;
1502 }
1503 if(bUse_ImportSection){
1504 //インポート セクション ヘッダ
1505 WriteFile(hFile,&ImportSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1506 i+=i2;
1507 }
1508 if(bUse_DataSection){
1509 //データ セクション ヘッダ
1510 WriteFile(hFile,&DataSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1511 i+=i2;
1512 }
1513 if(bUse_RWSection){
1514 //リライタブルセクションヘッダ
1515 WriteFile(hFile,&RWSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1516 i+=i2;
1517 }
1518 if(bUse_RSrcSection){
1519 //リソースセクションヘッダ
1520 WriteFile(hFile,&RSrcSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1521 i+=i2;
1522 }
1523 if(bUse_RelocSection){
1524 //リロケーションセクションヘッダ
1525 WriteFile(hFile,&RelocSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1526 i+=i2;
1527 }
1528 if(bUse_DebugSection){
1529 //デバッグセクションヘッダ
1530 WriteFile(hFile,&DebugSectionHeader,sizeof(IMAGE_SECTION_HEADER),(DWORD *)&i2,NULL);
1531 i+=i2;
1532 }
1533
1534 //EXE_HEADER_SIZEまでNULLを並べる
1535 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,EXE_HEADER_SIZE-i);
1536 WriteFile(hFile,temp2,EXE_HEADER_SIZE-i,(DWORD *)&i2,NULL);
1537 HeapDefaultFree(temp2);
1538 i+=i2;
1539
1540 //コード
1541 WriteFile(hFile,OpBuffer,obp,(DWORD *)&i2,NULL);
1542 i+=i2;
1543
1544 //FilePos_ExportSectionまでNULLを並べる
1545 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_ExportSection-i);
1546 WriteFile(hFile,temp2,FilePos_ExportSection-i,(DWORD *)&i2,NULL);
1547 HeapDefaultFree(temp2);
1548 i+=i2;
1549
1550 if(bUse_ExportSection){
1551 //エクスポート ディレクトリ テーブル
1552 WriteFile(hFile,&ImageExportDirectory,sizeof(IMAGE_EXPORT_DIRECTORY),(DWORD *)&i2,NULL);
1553 i+=i2;
1554
1555 //エクスポート アドレス テーブル
1556 WriteFile(hFile,lpdwExportAddressTable,ExportNum*sizeof(DWORD),(DWORD *)&i2,NULL);
1557 i+=i2;
1558
1559 //エクスポート名ポインタ テーブル
1560 WriteFile(hFile,lpdwExportNamePointerTable,ExportNum*sizeof(DWORD),(DWORD *)&i2,NULL);
1561 i+=i2;
1562
1563 //エクスポート序数テーブル
1564 WriteFile(hFile,lpwExportOrdinalTable,ExportNum*sizeof(WORD),(DWORD *)&i2,NULL);
1565 i+=i2;
1566
1567 //シンボル名
1568 WriteFile(hFile,lpExportNames,ExportNamesLength,(DWORD *)&i2,NULL);
1569 i+=i2;
1570 }
1571
1572 //FilePos_ImportSectionまでNULLを並べる
1573 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_ImportSection-i);
1574 WriteFile(hFile,temp2,FilePos_ImportSection-i,(DWORD *)&i2,NULL);
1575 HeapDefaultFree(temp2);
1576 i+=i2;
1577
1578 if(bUse_ImportSection){
1579 //インポート アドレス テーブル
1580 WriteFile(hFile,pLookupTable,LookupSize,(DWORD *)&i2,NULL);
1581 i+=i2;
1582
1583 //ルックアップ テーブル
1584 WriteFile(hFile,pLookupTable,LookupSize,(DWORD *)&i2,NULL);
1585 i+=i2;
1586
1587 //インポート ディレクトリ テーブル（Nullディレクトリ テーブルを含む）
1588 for(i3=0;i3<(ImportDllNum+1);i3++){
1589 WriteFile(hFile,&pImportDescriptor[i3],sizeof(IMAGE_IMPORT_DESCRIPTOR),(DWORD *)&i2,NULL);
1590 i+=i2;
1591 }
1592
1593 //DLL名
1594 for(i3=0;i3<ImportDllNum;i3++){
1595 WriteFile(hFile,ppDllNames[i3],16,(DWORD *)&i2,NULL);
1596 i+=i2;
1597 }
1598
1599 //ヒント テーブル
1600 WriteFile(hFile,pHintTable,HintSize,(DWORD *)&i2,NULL);
1601 i+=i2;
1602 }
1603
1604 //FilePos_DataSectionまでNULLを並べる
1605 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_DataSection-i);
1606 WriteFile(hFile,temp2,FilePos_DataSection-i,(DWORD *)&i2,NULL);
1607 HeapDefaultFree(temp2);
1608 i+=i2;
1609
1610 if(bUse_DataSection){
1611 //データ テーブル
1612 WriteFile(hFile,compiler.GetNativeCode().GetDataTable().GetPtr(),compiler.GetNativeCode().GetDataTable().GetSize(),(DWORD *)&i2,NULL);
1613 i+=i2;
1614 }
1615
1616 //FilePos_RWSectionまでNULLを並べる
1617 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_RWSection-i);
1618 WriteFile(hFile,temp2,FilePos_RWSection-i,(DWORD *)&i2,NULL);
1619 HeapDefaultFree(temp2);
1620 i+=i2;
1621
1622 if(bUse_RWSection){
1623 //リライタブル データ テーブル（グローバル変数の初期バッファ）
1624 initGlobalBuf=(BYTE *)HeapReAlloc(hHeap,
1625 HEAP_ZERO_MEMORY,
1626 initGlobalBuf,
1627 FileSize_RWSection);
1628 WriteFile(hFile,initGlobalBuf,FileSize_RWSection,(DWORD *)&i2,NULL);
1629 i+=i2;
1630 }
1631
1632 //FilePos_RSrcSectionまでNULLを並べる
1633 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_RSrcSection-i);
1634 WriteFile(hFile,temp2,FilePos_RSrcSection-i,(DWORD *)&i2,NULL);
1635 HeapDefaultFree(temp2);
1636 i+=i2;
1637
1638 if(bUse_RSrcSection){
1639 //リソースバッファ
1640 WriteFile(hFile,RSrcSectionBuffer,RSrcSectionSize,(DWORD *)&i2,NULL);
1641 i+=i2;
1642 }
1643
1644 //FilePos_RelocSectionまでNULLを並べる
1645 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FilePos_RelocSection-i);
1646 WriteFile(hFile,temp2,FilePos_RelocSection-i,(DWORD *)&i2,NULL);
1647 HeapDefaultFree(temp2);
1648 i+=i2;
1649
1650 if(bUse_RelocSection){
1651 //リロケーション情報
1652 WriteFile(hFile,pobj_Reloc->buffer,pobj_Reloc->length,(DWORD *)&i2,NULL);
1653 i+=i2;
1654 }
1655
1656 //ファイルアラインメントを考慮
1657 if(i%FILE_ALIGNMENT){
1658 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FILE_ALIGNMENT-i%FILE_ALIGNMENT);
1659 WriteFile(hFile,temp2,FILE_ALIGNMENT-i%FILE_ALIGNMENT,(DWORD *)&i2,NULL);
1660 HeapDefaultFree(temp2);
1661 i+=i2;
1662 }
1663
1664 if(bUse_DebugSection){
1665 //デバッグセクション
1666 WriteFile(hFile,pobj_DebugSection->buffer,pobj_DebugSection->length,(DWORD *)&i2,NULL);
1667 i+=i2;
1668 }
1669
1670 //ファイルアラインメントを考慮
1671 if(i%FILE_ALIGNMENT){
1672 temp2=(char *)HeapAlloc(hHeap,HEAP_ZERO_MEMORY,FILE_ALIGNMENT-i%FILE_ALIGNMENT);
1673 WriteFile(hFile,temp2,FILE_ALIGNMENT-i%FILE_ALIGNMENT,(DWORD *)&i2,NULL);
1674 HeapDefaultFree(temp2);
1675 i+=i2;
1676 }
1677
1678 //書き込み終了
1679 CloseHandle(hFile);
1680
1681
1682EndWriteOpcode:
1683
1684 //Dosスタブ用のメモリを解放
1685 HeapDefaultFree(DosStubBuffer);
1686
1687 //エクスポート テーブル情報を解放
1688 HeapDefaultFree(lpdwExportAddressTable);
1689 HeapDefaultFree(lpdwExportNamePointerTable);
1690 HeapDefaultFree(lpwExportOrdinalTable);
1691
1692 //インポートDLL情報を解放
1693 HeapDefaultFree(pImportDescriptor);
1694 for(i=0;i<ImportDllNum;i++)
1695 HeapDefaultFree(ppDllNames[i]);
1696 HeapDefaultFree(ppDllNames);
1697
1698 //ルックアップテーブルに関する情報を解放
1699 HeapDefaultFree(pLookupTable);
1700
1701 //ヒントテーブルに関する情報を解放
1702 HeapDefaultFree(pHintTable);
1703
1704 //グローバル変数の初期バッファを解放
1705 HeapDefaultFree(initGlobalBuf);
1706
1707 //コードバッファを解放
1708 free(OpBuffer);
1709 OpBuffer=0;
1710
1711 //リソースセクションバッファを解放
1712 HeapDefaultFree(RSrcSectionBuffer);
1713
1714 //デバッグセクションを開放
1715 delete pobj_DebugSection;
1716
1717 //リロケーション情報を解放
1718 delete pobj_Reloc;
1719
1720 //列挙体に関する情報の破棄
1721 CEnumParent::DestroyEnum();
1722
1723 //クラスに関するメモリを解放
1724 compiler.GetMeta().GetClasses().Clear();
1725}
Note: See TracBrowser for help on using the repository browser.