source: dev/BasicCompiler32/MakePeHdr.cpp@ 90

Last change on this file since 90 was 90, checked in by dai_9181, 17 years ago

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