source: dev/BasicCompiler32/MakePeHdr.cpp@ 76

Last change on this file since 76 was 76, checked in by dai_9181, 19 years ago

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