source: dev/BasicCompiler32/MakePeHdr.cpp@ 75

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

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