diff options
| -rw-r--r-- | make/utilities.pm | 17 | ||||
| -rwxr-xr-x | tools/test-build | 67 |
2 files changed, 83 insertions, 1 deletions
diff --git a/make/utilities.pm b/make/utilities.pm index 8b6c1b225..48713fe9e 100644 --- a/make/utilities.pm +++ b/make/utilities.pm @@ -36,7 +36,7 @@ use File::Spec::Functions qw(rel2abs); use Getopt::Long; use POSIX; -our @EXPORT = qw(module_installed prompt_bool prompt_dir prompt_string make_rpath pkgconfig_get_include_dirs pkgconfig_get_lib_dirs pkgconfig_check_version translate_functions promptstring); +our @EXPORT = qw(module_installed prompt_bool prompt_dir prompt_string get_cpu_count make_rpath pkgconfig_get_include_dirs pkgconfig_get_lib_dirs pkgconfig_check_version translate_functions promptstring); # Parse the output of a *_config program, # such as pcre_config, take out the -L @@ -88,6 +88,21 @@ sub prompt_string($$$) { return $answer ? $answer : $default; } +sub get_cpu_count { + my $count = 1; + if ($^O =~ /bsd/) { + $count = `sysctl -n hw.ncpu`; + } elsif ($^O eq 'darwin') { + $count = `sysctl -n hw.activecpu`; + } elsif ($^O eq 'linux') { + $count = `getconf _NPROCESSORS_ONLN`; + } elsif ($^O eq 'solaris') { + $count = `psrinfo -p`; + } + chomp($count); + return $count; +} + sub promptstring($$$$$) { my ($prompt, $configitem, $default, $package, $commandlineswitch) = @_; diff --git a/tools/test-build b/tools/test-build new file mode 100755 index 000000000..7f1bf68cd --- /dev/null +++ b/tools/test-build @@ -0,0 +1,67 @@ +#!/usr/bin/env perl +# +# InspIRCd -- Internet Relay Chat Daemon +# +# Copyright (C) 2013 Peter Powell <petpow@saberuk.com> +# +# This file is part of InspIRCd. InspIRCd is free software: you can +# redistribute it and/or modify it under the terms of the GNU General Public +# License as published by the Free Software Foundation, version 2. +# +# This program is distributed in the hope that it will be useful, but WITHOUT +# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS +# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more +# details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. +# + + +BEGIN { + require 5.8.0; + unless (-f 'configure') { + print "Error: test-build must be run from the main source directory!\n"; + exit 1; + } +} + +use strict; +use warnings FATAL => qw(all); + +use make::configure; +use make::utilities; + +$ENV{D} = $ENV{V} = 1; + +system 'git', 'clean', '-dfx'; + +foreach my $compiler ('g++', 'clang++', 'icpc') { + next if system "$compiler -v > /dev/null 2>&1"; + $ENV{CXX} = $compiler; + my @socketengines = ( 'select' ); + push @socketengines, 'epoll' if test_header $compiler, 'sys/epoll.h'; + push @socketengines, 'kqueue' if test_file $compiler, 'kqueue.cpp'; + push @socketengines, 'poll' if test_header $compiler, 'poll.h'; + push @socketengines, 'ports' if test_header $compiler, 'ports.h'; + foreach my $socketengine (@socketengines) { + print "Attempting to build using the $compiler compiler and the $socketengine socket engine...\n"; + if (system './configure', '--disable-interactive', "--socketengine=$socketengine") { + print "Failed to configure using the $compiler compiler and the $socketengine socket engine!\n"; + exit 1; + } + $ENV{PURE_STATIC} = 1; + if (system 'make', '-j'.get_cpu_count, 'install') { + print "Failed to compile with static modules using the $compiler compiler and the $socketengine socket engine!\n"; + exit 1; + } + delete $ENV{PURE_STATIC}; + if (system 'make', '-j'.get_cpu_count, 'install') { + print "Failed to compile with dynamic modules using the $compiler compiler and the $socketengine socket engine!\n"; + exit 1; + } + print "Building using the $compiler compiler and the $socketengine socket engine succeeded!\n"; + } + + system 'git', 'clean', '-dfx'; +} |