# Copyright (c) 1999-2009 Nokia Corporation and/or its subsidiary(-ies).

# All rights reserved.

# This component and the accompanying materials are made available

# under the terms of "Eclipse Public License v1.0"

# which accompanies this distribution, and is available

# at the URL "http://www.eclipse.org/legal/epl-v10.html".

#

# Initial Contributors:

# Nokia Corporation - initial contribution.

#

# Contributors:

#

# Description:

# Makmake-module for creating MAKMAKE MSVC6 IDE makefiles shared by windows platform modules

# 

#

package Ide_vc6;

# declare variables global for module

my $BaseAddressFlag;

my @CppCall;

my %IdeBlds=();

my %PrjHdrs=();

my @Win32LibList=();

my $Win32Resrc;

my $Win32StdHeaders;

my $MSVCVer;

my $SupText='';

require Exporter;

@ISA=qw(Exporter);

@EXPORT=qw(

	PMHelp_Mmp

	PMCheckPlatformL

	PMPlatProcessMmp

	PMStartBldList

		PMBld

	PMEndBldList

	PMStartSrcList

			PMResrcBld

			PMDoc

			PMStartSrc

			PMSrcDepend

	PMEndSrcList

);

use strict;

use Winutl;

use Pathutl;

sub PMHelp_Mmp {

# get the windows help from WINUTL

	&Winutl_Help_Mmp;

}

sub PMCheckPlatformL {

	if ((&main::Plat eq 'TOOLS') and (&main::BasicTrgType ne 'EXE') and (&main::BasicTrgType ne 'LIB')) {

		die "Can't specify anything but EXE or LIB targettypes for this platform\n";

	}

}

sub PMPlatProcessMmp (@) {

	# get WINUTL to do the windows mmp file processing

	&Winutl_DoMmp(\@_, $ENV{INCLUDE});

	$BaseAddressFlag=&Winutl_BaseAddress;

	$BaseAddressFlag=~s/^(.+$)$/ \/base:\"$1\"/o;

	@Win32LibList=&Winutl_Win32LibList;

	my $MSVCVer = &Winutl_MSVCVer;

	push @Win32LibList, "kernel32.lib";

	$Win32Resrc=&Winutl_Win32Resrc;

	$Win32StdHeaders=&Winutl_Win32StdHeaders;

}

sub PMStartBldList($) {

	my ($makecmd) = @_;

	die "Cannot generate $makecmd makefiles\n" if ($makecmd ne "nmake");

	my $BaseTrg=&main::BaseTrg;

	my @BldList=&main::BldList;

	my $BldPath=&main::BldPath;

	my $ChopDataPath=&main::Path_Chop(&main::DataPath);

	my $ChopTrgPath=&main::Path_Chop(&main::TrgPath);

	my $DefFile=&main::DefFile;

	my $BasicTrgType=&main::BasicTrgType;

	my $ExportLibrary=&main::ExportLibrary;

	my $LibPath=&main::LibPath;

	my $MSVCVer = &Winutl_MSVCVer;

	my $LinkPath=&main::LinkPath;

	my $Plat=&main::Plat;

	my $RelPath=&main::RelPath;

	my $Trg=&main::Trg;

	my $StatLinkPath=&main::StatLinkPath;

	my $TrgType=&main::TrgType;

	# set up global IDE builds variable

	%IdeBlds= (

		UREL=> "$BaseTrg - Win32 Uni Release",

		UDEB=> "$BaseTrg - Win32 Uni Debug",

	);

	if (&main::Plat eq 'TOOLS') {

		%IdeBlds= (

			REL=> "$BaseTrg - Win32 Release",

			DEB=> "$BaseTrg - Win32 Debug",

		);

	}

#	Start the supplementary makefile

	$SupText.=join('',

		"\n",

#			need to set path here because MSDEV might be set up so that

#			it does not take account of the PATH environment variable

		"PATH=$ENV{PATH}\n",

		"\n",

		"# EPOC DEFINITIONS\n",

		"\n",

		"EPOCBLD = $BldPath #\n",

		"EPOCTRG = $RelPath #\n",

		"EPOCLIB = $LibPath #\n",

		"EPOCLINK = $LinkPath #\n",

		"EPOCSTATLINK = $StatLinkPath #\n",

		"\n"

	);

	if ($BasicTrgType eq 'DLL' || $TrgType eq 'EXEXP') {

		foreach (@BldList) {

			$SupText.=join('',

				"EPOCBLD$_ = \$(EPOCBLD)$_\n",

				"EPOCTRG$_ = \$(EPOCTRG)$_\n",

				"EPOCLIB$_ = \$(EPOCLIB)UDEB\n",

				"EPOCLINK$_ = \$(EPOCLINK)UDEB\n",

				"EPOCSTATLINK$_ = \$(EPOCSTATLINK)$_\n",

				"\n"

			);

		}

		$SupText.="\nTRGDIR = ";

		if ($Plat!~/^WINC$/o && $ChopTrgPath) {	# target path not allowed under WINC

			$SupText.=$ChopTrgPath;

		}

		else {

			$SupText.=".\\";

		}

		$SupText.="\n\nDATADIR = $ChopDataPath\n\n";

#		commands for creating the import library

		$SupText.="LIBRARY :";

		if ($DefFile) {

			unless (&main::ExportUnfrozen) {

				if (-e $DefFile) { # effectively "if project frozen ..."

					$SupText.=" \"\$(EPOCLIB)UDEB\\$ExportLibrary.lib\"\n";

				}

				else {

					$SupText.=join('',

						"\n",

						"\t\@echo WARNING: Not attempting to create \"\$(EPOCLIB)UDEB\\$ExportLibrary.lib\".\n",

						"\t\@echo When exports are frozen in \"$DefFile\", regenerate Makefile.\n"

					);

				}

			}

			else {

				$SupText.=join('',

					"\n",

					"\t\@echo Not attempting to create \"\$(EPOCLIB)UDEB\\$ExportLibrary.lib\"\n",

					"\t\@echo from frozen .DEF file, since EXPORTUNFROZEN specified.\n"

				);

			}

			$SupText.=join('',

				"\n",

				"\n",

				"# REAL TARGET - IMPORT LIBRARY\n",

				"\n",

				"\"\$(EPOCLIB)UDEB\\$ExportLibrary.lib\" : \"$DefFile\" MAKEWORKLIBRARY\n",

				"\tperl -S prepdef.pl \"$DefFile\" \"\$(EPOCBLD)\\$ExportLibrary.prep.def\"\n",

				"\tlib.exe /nologo /machine:i386 /nodefaultlib /name:\"$Trg\" /def:\"\$(EPOCBLD)\\$ExportLibrary.prep.def\" /out:\"\$(EPOCLIB)UDEB\\$ExportLibrary.lib\"\n",

				"\tdel \"\$(EPOCLIB)UDEB\\$ExportLibrary.exp\"\n"

			);

		}

		$SupText.=join('',

			"\n",

			"\n",

			"MAKEWORKLIBRARY : \"${LibPath}UDEB\"\n",

			"\n",

			"\"${LibPath}UDEB\" :\n"

		);

		$SupText.="\t\@perl -w -S emkdir.pl \"${LibPath}UDEB\"\n\n\n";

	}

	&main::Output(

		"# Microsoft Developer Studio Project File - Name=\"$BaseTrg\" - Package Owner=<4>\n",

		"# Microsoft Developer Studio Generated Build File, Format Version 6.00\n",

		"# ** DO NOT EDIT **\n",

		"\n"

	);

	if ($BasicTrgType=~/^DLL$/o) {

		&main::Output(

			"# TARGTYPE \"Win32 (x86) Dynamic-Link Library\" 0x0102\n"

		);

	}

	elsif ($BasicTrgType=~/^EXE$/o) {

		if (not &main::Plat=~/^(WINC|TOOLS)$/o) {

			&main::Output(

				"# TARGTYPE \"Win32 (x86) Application\" 0x0101\n"

			);

		}

		else {

			&main::Output(

				"# TARGTYPE \"Win32 (x86) Console Application\" 0x0103\n"

			);

		}

	}

	elsif ($BasicTrgType=~/^(LIB)$/o) {

		&main::Output(

			"# TARGTYPE \"Win32 (x86) Static Library\" 0x0104\n"

		);

	}

	&main::Output(

		"\n",

		"CFG=",$IdeBlds{$BldList[0]},"\n",

		"!MESSAGE This is not a valid makefile. To build this project using NMAKE,\n",

		"!MESSAGE use the Export Makefile command and run\n",

		"!MESSAGE \n",

		"!MESSAGE NMAKE /f \"",$BaseTrg,".mak\".\n",

		"!MESSAGE \n",

		"!MESSAGE You can specify a configuration when running NMAKE\n",

		"!MESSAGE by defining the macro CFG on the command line. For example:\n",

		"!MESSAGE \n",

		"!MESSAGE NMAKE /f \"",$BaseTrg,".mak\" CFG=\"".$IdeBlds{$BldList[0]}."\"\n",

		"!MESSAGE \n",

		"!MESSAGE Possible choices for configuration are:\n",

		"!MESSAGE \n"

	);

	&main::OutSetLength(79);

	if ($BasicTrgType=~/^DLL$/o) {

		foreach (reverse @BldList) { # reverse because VC6 takes last as the default

			&main::OutFormat(

				"!MESSAGE \"",$IdeBlds{$_},"\" (based on \"Win32 (x86) Dynamic-Link Library\")"

			);

			&main::Output();

		}

	}

	elsif ($BasicTrgType=~/^EXE$/o) {

		if (not &main::Plat=~/^(WINC|TOOLS)$/o) {

			foreach (reverse @BldList) {

				&main::OutFormat(

					"!MESSAGE \"",$IdeBlds{$_},"\" (based on \"Win32 (x86) Application\")"

				);

				&main::Output();

			}

		}

		else {

			foreach (reverse @BldList) {

				&main::OutFormat(

					"!MESSAGE \"",$IdeBlds{$_},"\" (based on \"Win32 (x86) Console Application\")"

				);

				&main::Output();

			}

		}

	}

	elsif ($BasicTrgType=~/^(LIB)$/o) {

		foreach (@BldList) {

			&main::OutFormat(

				"!MESSAGE \"",$IdeBlds{$_},"\" (based on \"Win32 (x86) Static Library\")"

			);

			&main::Output();

		}

	}

	&main::OutSetLength();

	&main::Output(

		"!MESSAGE \n",

		"\n"

	);

	# BEGIN THE PROJECT

	#------------------

	&main::Output(

		"# Begin Project\n",

		"# PROP Scc_ProjName \"\"\n",

		"# PROP Scc_LocalPath \"\"\n",

		"CPP=cl.exe\n",

		"MTL=midl.exe\n",

		"RSC=rc.exe\n",

		"\n"

	);

}

sub PMBld {

	my @BaseSrcList=&main::BaseSrcList;

	my $BaseTrg=&main::BaseTrg;

	my $Bld=&main::Bld;

	my @BldList=&main::BldList;

	my $ChopBldPath=&main::Path_Chop(&main::BldPath);

	my $ChopLinkPath=&main::Path_Chop(&main::LinkPath);

	my $ChopRelPath=&main::Path_Chop(&main::RelPath);

	my $ChopStatLinkPath=&main::Path_Chop(&main::StatLinkPath);

	my @ChopSysIncPaths=&main::Path_Chop(&main::SysIncPaths);

	my @ChopUserIncPaths=&main::Path_Chop(&main::UserIncPaths);

	my $ExportLibrary=&main::ExportLibrary;

	my $DefFile=&main::DefFile;

	my $FirstLib=&main::FirstLib;

	my $BasicTrgType=&main::BasicTrgType;

	my @MacroList=&main::MacroList();

	push @MacroList, "__SUPPORT_CPP_EXCEPTIONS__";

    my $VariantFile=&main::VariantFile();

	my @LibList;

	my $PathBaseDsp=&main::MakeFilePath.&main::BaseMak;

	my @StatLibList=&main::StatLibList;

	my $Trg=&main::Trg;

	my $TrgPath=&main::TrgPath;

	my $TrgType=&main::TrgType;

	my $newlib = main::NewLib(); # Check if newlib has been set in the MMP file.

	my $NewLib = 'scppnwdl.lib'; # This is where operator new and operator delete

                                 # are defined for user side targets.

	my $NewKernLib = 'scppnwdl_kern.lib'; # This is where operator new and operator delete

                                 	  # are defined for kernel side targets.

	if ($Bld =~ /DEB/) {

		@LibList=&main::DebugLibList;

	} else {

		@LibList=&main::LibList;

	}

	my $NotUseWin32LibsFlag="";

	unless ($Win32StdHeaders or &main::Plat eq 'TOOLS') {

		$NotUseWin32LibsFlag=" /X"; # this flag suppresses searching of the standard directories for header files

	}

	if ($Bld eq $BldList[0]) {

		&main::Output(

			"!IF  \"\$(CFG)\" == \"$IdeBlds{$Bld}\"\n",

			"\n"

		);

	}

	else {

		&main::Output(

			"!ELSEIF  \"\$(CFG)\" == \"$IdeBlds{$Bld}\"\n",

			"\n"

		);

	}

	&main::Output(

		"# PROP BASE Use_MFC 0\n"

	);

	if ($Bld=~/REL$/o) {

		&main::Output(

			"# PROP BASE Use_Debug_Libraries 0\n",

			"# PROP BASE Output_Dir \".\\Win32_Un\"\n",

			"# PROP BASE Intermediate_Dir \".\\Win32_Un\"\n"

		);

	}

	elsif ($Bld=~/DEB$/o) {

		&main::Output(

			"# PROP BASE Use_Debug_Libraries 1\n",

			"# PROP BASE Output_Dir \".\\Win32_U0\"\n",

			"# PROP BASE Intermediate_Dir \".\\Win32_U0\"\n"

		);

	}

	&main::Output(

			"# PROP Use_MFC 0\n"

	);

	if ($Bld=~/REL$/o) {

		&main::Output(

			"# PROP Use_Debug_Libraries 0\n"

		);

	}

	elsif ($Bld=~/DEB$/o) {

		&main::Output(

			"# PROP Use_Debug_Libraries 1\n"

		);

	}

	&main::Output(

		"# PROP Output_Dir \"$ChopRelPath\"\n",

		"# PROP Intermediate_Dir \"$ChopBldPath\"\n",

	);

	&main::Output(

		"# ADD CPP",

		" /nologo",		# suppress "sign-on" banner message

		" /Zp4"	,		# packs structures on 4 byte boundaries

		" /GF"			# Pools strings and places them in read-only memory 

	);

	$MSVCVer = &Winutl_MSVCVer;

	if ($MSVCVer >= 7) {

		&main::Output(

			" /wd4996",			# C4996: 'xxxx' was declared deprecated

			" /wd4571"			# C4571: catch(...) blocks compiled with /EHs do not catch or re-throw Structured Exceptions

		);	

		if (&main::Plat ne 'TOOLS') {

			&main::Output(

				" /EHsc",			# Exceptions on

				" /GR"				# RTTI on

			);

			if ($MSVCVer >= 8) {

				&main::Output(

					" /GS-"			# Buffer checking off

				);

			}

		} else {

			&main::Output(

				" /EHsc",			# Exceptions on

				" /GR",				# RTTI on

				" /GS"				# Buffer checking on

			);

		}

	} else {

		if (&main::Plat ne 'TOOLS') {

			&main::Output(

					" /GX",				# Exceptions on

					" /GR"				# RTTI on

			);

		}

	}

	if ($BasicTrgType=~/^EXE$/o) {

		&main::Output(

			' /MT'			# Creates a multi-threaded executable file, using libcmt.lib

		);

		if ($Bld=~/DEB$/o) {

			&main::Output(

				"d"			# i.e. /MTd, debug executable using debug version of libcmt

			);

		}

	}

	elsif (($BasicTrgType=~/^(DLL|LIB)$/o) and (&main::Plat ne 'TOOLS')) {

		&main::Output(

			" /MD"			# Creates a multithreaded DLL, using MSVCRT.LIB

		);

		if ($Bld=~/DEB$/o) {

			&main::Output(

				"d"			# i.e. /MDd, debug executable using debug version of msvcrt

			);

		}

	}

	if ($MSVCVer >= 8) {

		&main::Output(

			" /Zc:wchar_t-"				# Don't make wchar_t a built-in; breaks mangled names

		);		

	}

	if (($MSVCVer >= 7) || (&main::Plat ne 'TOOLS')) {

		&main::Output(

			" /W4"

		);

	}

	if ($Bld=~/DEB$/o) {

		&main::Output(

			" /Zi",		# Generates complete debugging information

			" /Od"		# Disables optimization

		);

#		euser change to apply inlining on the _NAKED functions

		if ($BaseTrg=~/^EUSER$/oi) {

			&main::Output(

				' /Ob1'	# Specific control of expension of inline functions

			);

		}

	}

	elsif ($Bld=~/REL$/o) {

		&main::Output(

			' /O1'				# Creates small code

		);

		if ($MSVCVer >= 8) {

			&main::Output(

				' /fp:strict'		# Improves floating-point consistency

			);

		} else {

			&main::Output(

				' /Op'				# Improves floating-point consistency

			);

		}

	}

	&main::Output(

		"$NotUseWin32LibsFlag"

	);

	my @incList=();

	my $candidate;

	INCLOOP: foreach $candidate (@ChopUserIncPaths,@ChopSysIncPaths) {

		my $accepted;	# remove duplicates

		foreach $accepted (@incList) {

			if ($candidate eq $accepted) {

				next INCLOOP;

			}

		}

		push @incList, $candidate;

		&main::Output(

			" /I \"$candidate\""

		);

	}

	foreach (@MacroList) {

		&main::Output(

			" /D \"$_\""

		);

	}

   if($VariantFile){

        my $VariantFileFileName  = Path_Split('FILE',$VariantFile);

        &main::Output(

              " /FI\"$VariantFileFileName\""

              );

	}

	if ($Bld=~/DEB$/o) {