mirror of
https://github.com/postgres/postgres.git
synced 2025-06-27 23:21:58 +03:00
Adjust the way we detect the locale. As a result the minumum Windows version supported by VS2015 and later is Windows Vista. Add some tweaks to remove new compiler warnings. Remove documentation references to the now obsolete msysGit. Michael Paquier, somewhat edited by me, reviewed by Christian Ullrich. Rather belated backpatch to 9.4 and 9.3
149 lines
2.9 KiB
Perl
149 lines
2.9 KiB
Perl
package VSObjectFactory;
|
|
|
|
#
|
|
# Package that creates Visual Studio wrapper objects for msvc build
|
|
#
|
|
# src/tools/msvc/VSObjectFactory.pm
|
|
#
|
|
|
|
use Carp;
|
|
use strict;
|
|
use warnings;
|
|
|
|
use Exporter;
|
|
use Project;
|
|
use Solution;
|
|
use VCBuildProject;
|
|
use MSBuildProject;
|
|
|
|
our (@ISA, @EXPORT);
|
|
@ISA = qw(Exporter);
|
|
@EXPORT = qw(CreateSolution CreateProject DetermineVisualStudioVersion);
|
|
|
|
sub CreateSolution
|
|
{
|
|
my $visualStudioVersion = shift;
|
|
|
|
if (!defined($visualStudioVersion))
|
|
{
|
|
$visualStudioVersion = DetermineVisualStudioVersion();
|
|
}
|
|
|
|
if ($visualStudioVersion eq '8.00')
|
|
{
|
|
return new VS2005Solution(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '9.00')
|
|
{
|
|
return new VS2008Solution(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '10.00')
|
|
{
|
|
return new VS2010Solution(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '11.00')
|
|
{
|
|
return new VS2012Solution(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '12.00')
|
|
{
|
|
return new VS2013Solution(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '14.00')
|
|
{
|
|
return new VS2015Solution(@_);
|
|
}
|
|
else
|
|
{
|
|
croak "The requested Visual Studio version is not supported.";
|
|
}
|
|
}
|
|
|
|
sub CreateProject
|
|
{
|
|
my $visualStudioVersion = shift;
|
|
|
|
if (!defined($visualStudioVersion))
|
|
{
|
|
$visualStudioVersion = DetermineVisualStudioVersion();
|
|
}
|
|
|
|
if ($visualStudioVersion eq '8.00')
|
|
{
|
|
return new VC2005Project(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '9.00')
|
|
{
|
|
return new VC2008Project(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '10.00')
|
|
{
|
|
return new VC2010Project(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '11.00')
|
|
{
|
|
return new VC2012Project(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '12.00')
|
|
{
|
|
return new VC2013Project(@_);
|
|
}
|
|
elsif ($visualStudioVersion eq '14.00')
|
|
{
|
|
return new VC2015Project(@_);
|
|
}
|
|
else
|
|
{
|
|
croak "The requested Visual Studio version is not supported.";
|
|
}
|
|
}
|
|
|
|
sub DetermineVisualStudioVersion
|
|
{
|
|
my $nmakeVersion = shift;
|
|
|
|
if (!defined($nmakeVersion))
|
|
{
|
|
|
|
# Determine version of nmake command, to set proper version of visual studio
|
|
# we use nmake as it has existed for a long time and still exists in current visual studio versions
|
|
open(P, "nmake /? 2>&1 |")
|
|
|| croak
|
|
"Unable to determine Visual Studio version: The nmake command wasn't found.";
|
|
while (<P>)
|
|
{
|
|
chomp;
|
|
if (/(\d+)\.(\d+)\.\d+(\.\d+)?$/)
|
|
{
|
|
return _GetVisualStudioVersion($1, $2);
|
|
}
|
|
}
|
|
close(P);
|
|
}
|
|
elsif ($nmakeVersion =~ /(\d+)\.(\d+)\.\d+(\.\d+)?$/)
|
|
{
|
|
return _GetVisualStudioVersion($1, $2);
|
|
}
|
|
croak
|
|
"Unable to determine Visual Studio version: The nmake version could not be determined.";
|
|
}
|
|
|
|
sub _GetVisualStudioVersion
|
|
{
|
|
my ($major, $minor) = @_;
|
|
if ($major > 14)
|
|
{
|
|
carp
|
|
"The determined version of Visual Studio is newer than the latest supported version. Returning the latest supported version instead.";
|
|
return '14.00';
|
|
}
|
|
elsif ($major < 6)
|
|
{
|
|
croak
|
|
"Unable to determine Visual Studio version: Visual Studio versions before 6.0 aren't supported.";
|
|
}
|
|
return "$major.$minor";
|
|
}
|
|
|
|
1;
|