source: dev/BasicCompiler32/MakePeHdr.cpp@ 14

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

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