Context Navigation

source: dev/trunk/abdev/BasicCompiler32/MakePeHdr.cpp@ 210

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

File size: 56.0 KB

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

Note: See TracBrowser for help on using the repository browser.

Download in other formats: