diff options
author | Bruce Momjian | 2012-06-10 19:20:04 +0000 |
---|---|---|
committer | Bruce Momjian | 2012-06-10 19:20:04 +0000 |
commit | 927d61eeff78363ea3938c818d07e511ebaf75cf (patch) | |
tree | 2f0bcecf53327f76272a8ce690fa62505520fab9 /src/tools/msvc/MSBuildProject.pm | |
parent | 60801944fa105252b48ea5688d47dfc05c695042 (diff) |
Run pgindent on 9.2 source tree in preparation for first 9.3
commit-fest.
Diffstat (limited to 'src/tools/msvc/MSBuildProject.pm')
-rw-r--r-- | src/tools/msvc/MSBuildProject.pm | 325 |
1 files changed, 163 insertions, 162 deletions
diff --git a/src/tools/msvc/MSBuildProject.pm b/src/tools/msvc/MSBuildProject.pm index fcce9ebb68d..4e6ea1f7409 100644 --- a/src/tools/msvc/MSBuildProject.pm +++ b/src/tools/msvc/MSBuildProject.pm @@ -13,158 +13,159 @@ use base qw(Project); sub _new { - my $classname = shift; - my $self = $classname->SUPER::_new(@_); - bless($self, $classname); + my $classname = shift; + my $self = $classname->SUPER::_new(@_); + bless($self, $classname); - $self->{filenameExtension} = '.vcxproj'; + $self->{filenameExtension} = '.vcxproj'; - return $self; + return $self; } sub WriteHeader { - my ($self, $f) = @_; + my ($self, $f) = @_; - print $f <<EOF; + print $f <<EOF; <?xml version="1.0" encoding="Windows-1252"?> <Project DefaultTargets="Build" ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> EOF - $self->WriteConfigurationHeader($f, 'Debug'); - $self->WriteConfigurationHeader($f, 'Release'); - print $f <<EOF; + $self->WriteConfigurationHeader($f, 'Debug'); + $self->WriteConfigurationHeader($f, 'Release'); + print $f <<EOF; </ItemGroup> <PropertyGroup Label="Globals"> <ProjectGuid>$self->{guid}</ProjectGuid> </PropertyGroup> <Import Project="\$(VCTargetsPath)\\Microsoft.Cpp.Default.props" /> EOF - $self->WriteConfigurationPropertyGroup($f, 'Release',{ wholeopt=>'false' }); - $self->WriteConfigurationPropertyGroup($f, 'Debug',{ wholeopt=>'false' }); - print $f <<EOF; + $self->WriteConfigurationPropertyGroup($f, 'Release',{wholeopt=>'false'}); + $self->WriteConfigurationPropertyGroup($f, 'Debug',{wholeopt=>'false'}); + print $f <<EOF; <Import Project="\$(VCTargetsPath)\\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> EOF - $self->WritePropertySheetsPropertyGroup($f, 'Release'); - $self->WritePropertySheetsPropertyGroup($f, 'Debug'); - print $f <<EOF; + $self->WritePropertySheetsPropertyGroup($f, 'Release'); + $self->WritePropertySheetsPropertyGroup($f, 'Debug'); + print $f <<EOF; <PropertyGroup Label="UserMacros" /> <PropertyGroup> <_ProjectFileVersion>10.0.30319.1</_ProjectFileVersion> EOF - $self->WriteAdditionalProperties($f, 'Debug'); - $self->WriteAdditionalProperties($f, 'Release'); - print $f <<EOF; + $self->WriteAdditionalProperties($f, 'Debug'); + $self->WriteAdditionalProperties($f, 'Release'); + print $f <<EOF; </PropertyGroup> EOF - $self->WriteItemDefinitionGroup( - $f, 'Debug', - { - defs=>'_DEBUG;DEBUG=1;', - opt=>'Disabled', - strpool=>'false', - runtime=>'MultiThreadedDebugDLL' - } - ); - $self->WriteItemDefinitionGroup($f, 'Release', - { defs=>'', opt=>'Full', strpool=>'true', runtime=>'MultiThreadedDLL' }); + $self->WriteItemDefinitionGroup( + $f, 'Debug', + { + defs=>'_DEBUG;DEBUG=1;', + opt=>'Disabled', + strpool=>'false', + runtime=>'MultiThreadedDebugDLL' + } + ); + $self->WriteItemDefinitionGroup($f, 'Release', + {defs=>'', opt=>'Full', strpool=>'true', runtime=>'MultiThreadedDLL'}); } sub AddDefine { - my ($self, $def) = @_; + my ($self, $def) = @_; - $self->{defines} .= $def . ';'; + $self->{defines} .= $def . ';'; } sub WriteReferences { - my ($self, $f) = @_; + my ($self, $f) = @_; - my @references = @{$self->{references}}; + my @references = @{$self->{references}}; - if (scalar(@references)) - { - print $f <<EOF; + if (scalar(@references)) + { + print $f <<EOF; <ItemGroup> EOF - foreach my $ref (@references) - { - print $f <<EOF; + foreach my $ref (@references) + { + print $f <<EOF; <ProjectReference Include="$ref->{name}$ref->{filenameExtension}"> <Project>$ref->{guid}</Project> </ProjectReference> EOF - } - print $f <<EOF; + } + print $f <<EOF; </ItemGroup> EOF - } + } } sub WriteFiles { - my ($self, $f) = @_; - print $f <<EOF; + my ($self, $f) = @_; + print $f <<EOF; <ItemGroup> EOF - my @grammarFiles = (); - my @resourceFiles = (); - my %uniquefiles; - foreach my $fileNameWithPath (sort keys %{ $self->{files} }) - { - confess "Bad format filename '$fileNameWithPath'\n" - unless ($fileNameWithPath =~ /^(.*)\\([^\\]+)\.[r]?[cyl]$/); - my $dir = $1; - my $fileName = $2; - if ($fileNameWithPath =~ /\.y$/ or $fileNameWithPath =~ /\.l$/) - { - push @grammarFiles, $fileNameWithPath; - } - elsif ($fileNameWithPath =~ /\.rc$/) - { - push @resourceFiles, $fileNameWithPath; - } - elsif (defined($uniquefiles{$fileName})) - { - - # File already exists, so fake a new name - my $obj = $dir; - $obj =~ s/\\/_/g; - - print $f <<EOF; + my @grammarFiles = (); + my @resourceFiles = (); + my %uniquefiles; + foreach my $fileNameWithPath (sort keys %{$self->{files}}) + { + confess "Bad format filename '$fileNameWithPath'\n" + unless ($fileNameWithPath =~ /^(.*)\\([^\\]+)\.[r]?[cyl]$/); + my $dir = $1; + my $fileName = $2; + if ($fileNameWithPath =~ /\.y$/ or $fileNameWithPath =~ /\.l$/) + { + push @grammarFiles, $fileNameWithPath; + } + elsif ($fileNameWithPath =~ /\.rc$/) + { + push @resourceFiles, $fileNameWithPath; + } + elsif (defined($uniquefiles{$fileName})) + { + + # File already exists, so fake a new name + my $obj = $dir; + $obj =~ s/\\/_/g; + + print $f <<EOF; <ClCompile Include="$fileNameWithPath"> <ObjectFileName Condition="'\$(Configuration)|\$(Platform)'=='Debug|$self->{platform}'">.\\debug\\$self->{name}\\${obj}_$fileName.obj</ObjectFileName> <ObjectFileName Condition="'\$(Configuration)|\$(Platform)'=='Release|$self->{platform}'">.\\release\\$self->{name}\\${obj}_$fileName.obj</ObjectFileName> </ClCompile> EOF - } - else - { - $uniquefiles{$fileName} = 1; - print $f <<EOF; + } + else + { + $uniquefiles{$fileName} = 1; + print $f <<EOF; <ClCompile Include="$fileNameWithPath" /> EOF - } + } - } - print $f <<EOF; + } + print $f <<EOF; </ItemGroup> EOF - if (scalar(@grammarFiles)) - { - print $f <<EOF; + if (scalar(@grammarFiles)) + { + print $f <<EOF; <ItemGroup> EOF - foreach my $grammarFile (@grammarFiles) - { - (my $outputFile = $grammarFile) =~ s/\.(y|l)$/.c/; - if ($grammarFile =~ /\.y$/) - { - $outputFile =~ s{^src\\pl\\plpgsql\\src\\gram.c$}{src\\pl\\plpgsql\\src\\pl_gram.c}; - print $f <<EOF; + foreach my $grammarFile (@grammarFiles) + { + (my $outputFile = $grammarFile) =~ s/\.(y|l)$/.c/; + if ($grammarFile =~ /\.y$/) + { + $outputFile =~ +s{^src\\pl\\plpgsql\\src\\gram.c$}{src\\pl\\plpgsql\\src\\pl_gram.c}; + print $f <<EOF; <CustomBuild Include="$grammarFile"> <Message Condition="'\$(Configuration)|\$(Platform)'=='Debug|$self->{platform}'">Running bison on $grammarFile</Message> <Command Condition="'\$(Configuration)|\$(Platform)'=='Debug|$self->{platform}'">perl "src\\tools\\msvc\\pgbison.pl" "$grammarFile"</Command> @@ -176,10 +177,10 @@ EOF <Outputs Condition="'\$(Configuration)|\$(Platform)'=='Release|$self->{platform}'">$outputFile;%(Outputs)</Outputs> </CustomBuild> EOF - } - else #if ($grammarFile =~ /\.l$/) - { - print $f <<EOF; + } + else #if ($grammarFile =~ /\.l$/) + { + print $f <<EOF; <CustomBuild Include="$grammarFile"> <Message Condition="'\$(Configuration)|\$(Platform)'=='Debug|$self->{platform}'">Running flex on $grammarFile</Message> <Command Condition="'\$(Configuration)|\$(Platform)'=='Debug|$self->{platform}'">perl "src\\tools\\msvc\\pgflex.pl" "$grammarFile"</Command> @@ -191,33 +192,33 @@ EOF <Outputs Condition="'\$(Configuration)|\$(Platform)'=='Release|$self->{platform}'">$outputFile;%(Outputs)</Outputs> </CustomBuild> EOF - } - } - print $f <<EOF; + } + } + print $f <<EOF; </ItemGroup> EOF - } - if (scalar(@resourceFiles)) - { - print $f <<EOF; + } + if (scalar(@resourceFiles)) + { + print $f <<EOF; <ItemGroup> EOF - foreach my $rcFile (@resourceFiles) - { - print $f <<EOF; + foreach my $rcFile (@resourceFiles) + { + print $f <<EOF; <ResourceCompile Include="$rcFile" /> EOF - } - print $f <<EOF; + } + print $f <<EOF; </ItemGroup> EOF - } + } } sub WriteConfigurationHeader { - my ($self, $f, $cfgname) = @_; - print $f <<EOF; + my ($self, $f, $cfgname) = @_; + print $f <<EOF; <ProjectConfiguration Include="$cfgname|$self->{platform}"> <Configuration>$cfgname</Configuration> <Platform>$self->{platform}</Platform> @@ -227,13 +228,13 @@ EOF sub WriteConfigurationPropertyGroup { - my ($self, $f, $cfgname, $p) = @_; - my $cfgtype = - ($self->{type} eq "exe") - ?'Application' - :($self->{type} eq "dll"?'DynamicLibrary':'StaticLibrary'); + my ($self, $f, $cfgname, $p) = @_; + my $cfgtype = + ($self->{type} eq "exe") + ?'Application' + :($self->{type} eq "dll"?'DynamicLibrary':'StaticLibrary'); - print $f <<EOF; + print $f <<EOF; <PropertyGroup Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'" Label="Configuration"> <ConfigurationType>$cfgtype</ConfigurationType> <UseOfMfc>false</UseOfMfc> @@ -245,8 +246,8 @@ EOF sub WritePropertySheetsPropertyGroup { - my ($self, $f, $cfgname) = @_; - print $f <<EOF; + my ($self, $f, $cfgname) = @_; + print $f <<EOF; <ImportGroup Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'" Label="PropertySheets"> <Import Project="\$(UserRootDir)\\Microsoft.Cpp.\$(Platform).user.props" Condition="exists('\$(UserRootDir)\\Microsoft.Cpp.\$(Platform).user.props')" Label="LocalAppDataPlatform" /> </ImportGroup> @@ -255,8 +256,8 @@ EOF sub WriteAdditionalProperties { - my ($self, $f, $cfgname) = @_; - print $f <<EOF; + my ($self, $f, $cfgname) = @_; + print $f <<EOF; <OutDir Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'">.\\$cfgname\\$self->{name}\\</OutDir> <IntDir Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'">.\\$cfgname\\$self->{name}\\</IntDir> <LinkIncremental Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'">false</LinkIncremental> @@ -265,21 +266,21 @@ EOF sub WriteItemDefinitionGroup { - my ($self, $f, $cfgname, $p) = @_; - my $cfgtype = - ($self->{type} eq "exe") - ?'Application' - :($self->{type} eq "dll"?'DynamicLibrary':'StaticLibrary'); - my $libs = $self->GetAdditionalLinkerDependencies($cfgname, ';'); - - my $targetmachine = $self->{platform} eq 'Win32' ? 'MachineX86' : 'MachineX64'; - - my $includes = $self->{includes}; - unless ($includes eq '' or $includes =~ /;$/) - { - $includes .= ';'; - } - print $f <<EOF; + my ($self, $f, $cfgname, $p) = @_; + my $cfgtype = + ($self->{type} eq "exe") + ?'Application' + :($self->{type} eq "dll"?'DynamicLibrary':'StaticLibrary'); + my $libs = $self->GetAdditionalLinkerDependencies($cfgname, ';'); + + my $targetmachine = $self->{platform} eq 'Win32' ? 'MachineX86' : 'MachineX64'; + + my $includes = $self->{includes}; + unless ($includes eq '' or $includes =~ /;$/) + { + $includes .= ';'; + } + print $f <<EOF; <ItemDefinitionGroup Condition="'\$(Configuration)|\$(Platform)'=='$cfgname|$self->{platform}'"> <ClCompile> <Optimization>$p->{opt}</Optimization> @@ -314,49 +315,49 @@ sub WriteItemDefinitionGroup <SubSystem>Console</SubSystem> <TargetMachine>$targetmachine</TargetMachine> EOF - if ($self->{disablelinkerwarnings}) - { - print $f + if ($self->{disablelinkerwarnings}) + { + print $f " <AdditionalOptions>/ignore:$self->{disablelinkerwarnings} \%(AdditionalOptions)</AdditionalOptions>\n"; - } - if ($self->{implib}) - { - my $l = $self->{implib}; - $l =~ s/__CFGNAME__/$cfgname/g; - print $f " <ImportLibrary>$l</ImportLibrary>\n"; - } - if ($self->{def}) - { - my $d = $self->{def}; - $d =~ s/__CFGNAME__/$cfgname/g; - print $f " <ModuleDefinitionFile>$d</ModuleDefinitionFile>\n"; - } - print $f <<EOF; + } + if ($self->{implib}) + { + my $l = $self->{implib}; + $l =~ s/__CFGNAME__/$cfgname/g; + print $f " <ImportLibrary>$l</ImportLibrary>\n"; + } + if ($self->{def}) + { + my $d = $self->{def}; + $d =~ s/__CFGNAME__/$cfgname/g; + print $f " <ModuleDefinitionFile>$d</ModuleDefinitionFile>\n"; + } + print $f <<EOF; </Link> <ResourceCompile> <AdditionalIncludeDirectories>src\\include;\%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories> </ResourceCompile> EOF - if ($self->{builddef}) - { - print $f <<EOF; + if ($self->{builddef}) + { + print $f <<EOF; <PreLinkEvent> <Message>Generate DEF file</Message> <Command>perl src\\tools\\msvc\\gendef.pl $cfgname\\$self->{name} $self->{platform}</Command> </PreLinkEvent> EOF - } - print $f <<EOF; + } + print $f <<EOF; </ItemDefinitionGroup> EOF } sub Footer { - my ($self, $f) = @_; - $self->WriteReferences($f); + my ($self, $f) = @_; + $self->WriteReferences($f); - print $f <<EOF; + print $f <<EOF; <Import Project="\$(VCTargetsPath)\\Microsoft.Cpp.targets" /> <ImportGroup Label="ExtensionTargets"> </ImportGroup> @@ -376,13 +377,13 @@ use base qw(MSBuildProject); sub new { - my $classname = shift; - my $self = $classname->SUPER::_new(@_); - bless($self, $classname); + my $classname = shift; + my $self = $classname->SUPER::_new(@_); + bless($self, $classname); - $self->{vcver} = '10.00'; + $self->{vcver} = '10.00'; - return $self; + return $self; } 1; |