]> git.netwichtig.de Git - user/henk/code/inspircd.git/commitdiff
Replace arguments for toggling socketengines with --socketengine.
authorPeter Powell <petpow@saberuk.com>
Fri, 5 Jul 2013 07:07:52 +0000 (08:07 +0100)
committerPeter Powell <petpow@saberuk.com>
Sun, 7 Jul 2013 20:02:47 +0000 (21:02 +0100)
configure
make/calcdep.pl
make/configure.pm

index 32e8fc12d39253e38cf132727ca746d464a5489e..19b4e7c264a202a9a810c8aa4befe669f9c61f11 100755 (executable)
--- a/configure
+++ b/configure
@@ -53,8 +53,8 @@ use make::configure;
 #
 ###############################################################################################
 
-our ($opt_use_gnutls, $opt_use_openssl, $opt_nointeractive, $opt_ports, $opt_epoll, $opt_kqueue,
-     $opt_noports, $opt_noepoll, $opt_nokqueue, $opt_freebsd_port, $opt_system, $opt_uid);
+our ($opt_use_gnutls, $opt_use_openssl, $opt_nointeractive, $opt_socketengine, $opt_freebsd_port,
+     $opt_system, $opt_uid);
 
 our ($opt_base_dir, $opt_config_dir, $opt_module_dir, $opt_binary_dir, $opt_data_dir, $opt_log_dir);
 
@@ -73,12 +73,7 @@ GetOptions (
        'uid=s' => \$opt_uid,
        'enable-openssl' => \$opt_use_openssl,
        'disable-interactive' => \$opt_nointeractive,
-       'enable-ports' => \$opt_ports,
-       'enable-epoll' => \$opt_epoll,
-       'enable-kqueue' => \$opt_kqueue,
-       'disable-ports' => \$opt_noports,
-       'disable-epoll' => \$opt_noepoll,
-       'disable-kqueue' => \$opt_nokqueue,
+       'socketengine=s' => \$opt_socketengine,
        'enable-freebsd-ports-openssl' => \$opt_freebsd_port,
        'prefix=s' => \$opt_base_dir,
        'config-dir=s' => \$opt_config_dir,
@@ -113,13 +108,8 @@ our $interactive = !(
        (defined $opt_data_dir) ||
        (defined $opt_log_dir) ||
        (defined $opt_nointeractive) ||
-       (defined $opt_kqueue) ||
-       (defined $opt_epoll) ||
-       (defined $opt_ports) ||
+       (defined $opt_socketengine) ||
        (defined $opt_use_openssl) ||
-       (defined $opt_nokqueue) ||
-       (defined $opt_noepoll) ||
-       (defined $opt_noports) ||
        (defined $opt_system) ||
        (defined $opt_uid) ||
        (defined $opt_use_gnutls) ||
@@ -211,21 +201,6 @@ if (defined $opt_use_openssl)
 }
 
 $config{HAS_STDINT}     = "false";                                     # stdint.h check
-$config{USE_KQUEUE}     = "y";                                         # kqueue enabled
-if (defined $opt_nokqueue) {
-       $config{USE_KQUEUE} = "n";
-}
-$config{USE_POLL}     = "y";                                   # poll enabled
-$config{USE_EPOLL}       = "y";                                        # epoll enabled
-if (defined $opt_noepoll)
-{
-       $config{USE_EPOLL} = "n";
-}
-$config{USE_PORTS}       = "y";                                        # epoll enabled
-if (defined $opt_noports)
-{
-       $config{USE_PORTS} = "n";
-}
 $config{OSNAME}            = $^O;                                      # Operating System Name
 $config{STARTSCRIPT}     = "inspircd";                 # start script?
 $config{DESTINATION}     = "BASE";                             # Is target path.
@@ -262,8 +237,6 @@ sub clean
        unlink(".config.cache");
 }
 
-our ($has_epoll, $has_ports, $has_kqueue) = (0, 0, 0);
-
 sub update
 {
        eval {
@@ -278,9 +251,7 @@ sub update
                } else {
                        # We've Loaded the cache file and all our variables..
                        print "Updating files...\n";
-                       $has_epoll = $config{HAS_EPOLL};
-                       $has_ports = $config{HAS_PORTS};
-                       $has_kqueue = $config{HAS_KQUEUE};
+                       %cxx = get_compiler_info($config{CXX});
                        writefiles(1);
                        makecache();
                        print "Complete.\n";
@@ -340,19 +311,44 @@ if (test_file($config{CXX}, "tcp_defer_accept.cpp")) {
 }
 
 print "Checking whether epoll is available... ";
-$has_epoll = test_header($config{CXX}, "sys/epoll.h");
-print $has_epoll ? "yes\n" : "no\n";
+$config{HAS_EPOLL} = test_header($config{CXX}, "sys/epoll.h");
+print $config{HAS_EPOLL} ? "yes\n" : "no\n";
+$config{SOCKETENGINE} ||= "epoll" if $config{HAS_EPOLL};
 
 print "Checking whether Kqueue is available... ";
-$has_kqueue = test_file($config{CXX}, "kqueue.cpp");
-print $has_kqueue ? "yes\n" : "no\n";
+$config{HAS_KQUEUE} = test_file($config{CXX}, "kqueue.cpp");
+print $config{HAS_KQUEUE} ? "yes\n" : "no\n";
+$config{SOCKETENGINE} ||= "kqueue" if $config{HAS_KQUEUE};
 
 print 'Checking whether Solaris IOCP is available... ';
-$has_ports = test_header($config{CXX}, 'port.h');
-print $has_ports ? "yes\n" : "no\n";
-
-$config{HAS_EPOLL} = $has_epoll;
-$config{HAS_KQUEUE} = $has_kqueue;
+$config{HAS_PORTS} = test_header($config{CXX}, 'port.h');
+print $config{HAS_PORTS} ? "yes\n" : "no\n";
+$config{SOCKETENGINE} ||= "ports" if $config{HAS_PORTS};
+
+print 'Checking whether poll is available... ';
+$config{HAS_POLL} = test_header($config{CXX}, 'poll.h');
+print $config{HAS_POLL} ? "yes\n" : "no\n";
+$config{SOCKETENGINE} ||= "poll" if $config{HAS_POLL};
+
+# Select is available on all platforms
+$config{HAS_SELECT} = 1;
+$config{SOCKETENGINE} ||= "select";
+
+if (defined $opt_socketengine) {
+       my $cfgkey = "HAS_" . uc $opt_socketengine;
+       if ($config{$cfgkey} && -f "src/socketengines/socketengine_$opt_socketengine.cpp") {
+               $config{SOCKETENGINE} = $opt_socketengine;
+       } else {
+               print "Unable to use a socket engine which is not supported on this platform ($opt_socketengine)!\n";
+               print "Available socket engines are:";
+               foreach (<src/socketengines/socketengine_*.cpp>) {
+                       s/src\/socketengines\/socketengine_(\w+)\.cpp/$1/;
+                       print " $1" if $config{"HAS_" . uc $1};
+               }
+               print "\n";     
+               exit 1;
+       }
+}
 
 printf "Checking for libgnutls... ";
 if (defined($config{HAS_GNUTLS}) && (($config{HAS_GNUTLS}) || ($config{HAS_GNUTLS} eq "y"))) {
@@ -456,36 +452,47 @@ STOP
        dir_check("do you want the build to take place", "BUILD_DIR");
                
        my $chose_hiperf = 0;
-       if ($has_kqueue) {
+       if ($config{HAS_KQUEUE}) {
+               $config{USE_KQUEUE} = "y";
                yesno('USE_KQUEUE',"You are running a BSD operating system, and kqueue\nwas detected. Would you like to enable kqueue support?\nThis is likely to increase performance.\nIf you are unsure, answer yes.\n\nEnable kqueue?");
                print "\n";
                if ($config{USE_KQUEUE} eq "y") {
+                       $config{SOCKETENGINE} = "kqueue";
                        $chose_hiperf = 1;
                }
        }
-       if ($has_epoll) {
+       if ($config{HAS_EPOLL}) {
+               $config{USE_EPOLL} = "y";
                yesno('USE_EPOLL',"You are running a Linux 2.6+ operating system, and epoll\nwas detected. Would you like to enable epoll support?\nThis is likely to increase performance.\nIf you are unsure, answer yes.\n\nEnable epoll?");
                print "\n";
                if ($config{USE_EPOLL} eq "y") {
+                       $config{SOCKETENGINE} = "epoll";
                        $chose_hiperf = 1;
                }
        }
-       if ($has_ports) {
+       if ($config{HAS_PORTS}) {
+               $config{USE_PORTS} = "y";
                yesno('USE_PORTS',"You are running Solaris 10.\nWould you like to enable I/O completion ports support?\nThis is likely to increase performance.\nIf you are unsure, answer yes.\n\nEnable support for I/O completion ports?");
                print "\n";
                if ($config{USE_PORTS} eq "y") {
+                       $config{SOCKETENGINE} = "ports";
                        $chose_hiperf = 1;
                }
        }
 
-       if (!$chose_hiperf) {
-               yesno('USE_POLL', "Would you like to use poll?\n This is likely to increase performance.\nIf you are unsure, answer yes.\n\nEnable poll?");
-               if ($config{USE_POLL} ne "y")
-               {
-                       print "No high-performance socket engines are available, or you chose\n";
-                       print "not to enable one. Defaulting to select() engine.\n\n";
+       if (!$chose_hiperf && $config{HAS_POLL}) {
+               $config{USE_POLL} = "y";
+               yesno('USE_POLL', "Would you like to use poll?\nThis is likely to increase performance.\nIf you are unsure, answer yes.\n\nEnable poll?");
+               if ($config{USE_POLL} eq "y") {
+                       $config{SOCKETENGINE} = "poll";
                }
        }
+       if (!$chose_hiperf && $config{USE_POLL} ne "y")
+       {
+               print "No high-performance socket engines are available, or you chose\n";
+               print "not to enable one. Defaulting to select() engine.\n\n";
+               $config{SOCKETENGINE} = "select";
+       }
 
        $config{USE_FREEBSD_BASE_SSL} = "n";
        $config{USE_FREEBSD_PORTS_SSL} = "n";
@@ -556,8 +563,6 @@ STOP
 # We are on a POSIX system, we can enable POSIX extras without asking
 symlink "extra/m_regex_posix.cpp", "src/modules/m_regex_posix.cpp";
 
-dumphash();
-
 if (($config{USE_GNUTLS} eq "y") && ($config{HAS_GNUTLS} ne "y"))
 {
        print "Sorry, but i couldn't detect gnutls. Make sure gnutls-config is in your path.\n";
@@ -645,8 +650,9 @@ if (($config{USE_GNUTLS} eq "n") && ($config{USE_OPENSSL} eq "n")) {
 depcheck();
 writefiles(1);
 makecache();
+dumphash();
 
-print "\n\n";
+print "\n";
 print "To build your server with these settings, please run '\e[1;32mmake\e[0m' now.\n";
 if (($config{USE_GNUTLS} eq "y") || ($config{USE_OPENSSL} eq "y")) {
        print "Please note: for \e[1;32mSSL support\e[0m you will need to load required\n";
@@ -654,7 +660,7 @@ if (($config{USE_GNUTLS} eq "y") || ($config{USE_OPENSSL} eq "y")) {
        print "build process. For more info please refer to:\n";
        print "\e[1;32mhttp://wiki.inspircd.org/Installation_From_Tarball\e[0m\n";
 }
-print "*** \e[1;32mRemember to edit your configuration files!!!\e[0m ***\n\n\n";
+print "*** \e[1;32mRemember to edit your configuration files!!!\e[0m ***\n\n";
 
 ################################################################################
 #                            HELPER FUNCTIONS                          #
@@ -776,12 +782,6 @@ sub writefiles {
 
 EOF
 
-               if ($config{OSNAME} =~ /SunOS/i) {
-                       print FILEHANDLE "#define IS_SOLARIS\n";
-               }
-               if ($config{OSNAME} =~ /MINGW32/i) {
-                       print FILEHANDLE "#define IS_MINGW\n";
-               }
                if ($config{HAS_STDINT} eq "true") {
                        print FILEHANDLE "#define HAS_STDINT\n";
                }
@@ -791,38 +791,6 @@ EOF
                if ($config{HAS_CLOCK_GETTIME} eq 'true') {
                        print FILEHANDLE "#define HAS_CLOCK_GETTIME\n";
                }
-               my $use_hiperf = 0;
-               if (($has_kqueue) && ($config{USE_KQUEUE} eq "y")) {
-                       print FILEHANDLE "#define USE_KQUEUE\n";
-                       $config{SOCKETENGINE} = "socketengine_kqueue";
-                       $use_hiperf = 1;
-               }
-               if (($has_epoll) && ($config{USE_EPOLL} eq "y")) {
-                       print FILEHANDLE "#define USE_EPOLL\n";
-                       $config{SOCKETENGINE} = "socketengine_epoll";
-                       $use_hiperf = 1;
-               }
-               if (($has_ports) && ($config{USE_PORTS} eq "y")) {
-                       print FILEHANDLE "#define USE_PORTS\n";
-                       $config{SOCKETENGINE} = "socketengine_ports";
-                       $use_hiperf = 1;
-               }
-               # user didn't choose either epoll or select for their OS.
-               # default them to USE_SELECT (ewwy puke puke)
-               if (!$use_hiperf) {
-                       print "no hi-perf, " . $config{USE_POLL};
-                       if ($config{USE_POLL} eq "y")
-                       {
-                               print FILEHANDLE "#define USE_POLL\n";
-                               $config{SOCKETENGINE} = "socketengine_poll";
-                       }
-                       else
-                       {
-                               print FILEHANDLE "#define USE_SELECT\n";
-                               $config{SOCKETENGINE} = "socketengine_select";
-                       }
-               }
-
                if ($config{HAS_DEFER} eq "TCP_DEFER_ACCEPT") {
                        print FILEHANDLE "#define USE_TCP_DEFER_ACCEPT\n";
                } elsif ($config{HAS_DEFER} eq "SO_ACCEPTFILTER") {
@@ -869,10 +837,6 @@ EOF
        chomp(my $revision = getrevision());
        $version = "$version(r$revision)";
 
-       # We can actually parse any file starting with . and ending with .inc,
-       # but right now we only parse .inspircd.inc to form './inspircd'
-       prepare_dynamic_makefile();
-
        my @dotfiles = qw(main.mk inspircd);
        push @dotfiles, 'org.inspircd.plist' if $config{OSNAME} eq 'darwin';
 
@@ -947,24 +911,6 @@ sub depcheck
        }
 }
 
-sub prepare_dynamic_makefile
-{
-       my $i = 0;
-
-       if (!$has_epoll)
-       {
-               $config{USE_EPOLL} = 0;
-       }
-       if (!$has_kqueue)
-       {
-               $config{USE_KQUEUE} = 0;
-       }
-       if (!$has_ports)
-       {
-               $config{USE_PORTS} = 0;
-       }
-}
-
 # Routine to list out the extra/ modules that have been enabled.
 # Note: when getting any filenames out and comparing, it's important to lc it if the
 # file system is not case-sensitive (== Epoc, MacOS, OS/2 (incl DOS/DJGPP), VMS, Win32
index e578f585c4ff8a35018b156bebfee32674e5f32f..26be367f5b974896097f201ad661053f34934a00 100755 (executable)
@@ -78,7 +78,7 @@ END
        for my $file (<*.cpp>, <modes/*.cpp>, <socketengines/*.cpp>, "threadengines/threadengine_pthread.cpp") {
                my $out = find_output $file;
                dep_cpp $file, $out, 'gen-o';
-               next if $file =~ m#^socketengines/# && $file ne "socketengines/$ENV{SOCKETENGINE}.cpp";
+               next if $file =~ m#^socketengines/# && $file ne "socketengines/socketengine_$ENV{SOCKETENGINE}.cpp";
                push @core_deps, $out;
        }
 
@@ -148,7 +148,7 @@ END
                        mkdir "$ENV{BUILDPATH}/obj/$1";
                }
                dep_cpp $file, $out, 'gen-o';
-               next if $file =~ m#^socketengines/# && $file ne "socketengines/$ENV{SOCKETENGINE}.cpp";
+               next if $file =~ m#^socketengines/# && $file ne "socketengines/socketengine_$ENV{SOCKETENGINE}.cpp";
                push @deps, $out;
                push @srcs, $file;
        }
index 95499720f539b4f7fcae4ffe694fd6df21018965..abb706ddd6ef5942310b0e84ead1ce17ad115e06 100644 (file)
@@ -271,11 +271,9 @@ sub dumphash()
        print "\e[0mConfig path:\e[1;32m\t\t\t$main::config{CONFIG_DIR}\e[0m\n";
        print "\e[0mModule path:\e[1;32m\t\t\t$main::config{MODULE_DIR}\e[0m\n";
        print "\e[0mCompiler:\e[1;32m\t\t\t$main::cxx{NAME} $main::cxx{VERSION}\e[0m\n";
-       print "\e[0mGnuTLS Support:\e[1;32m\t\t\t$main::config{USE_GNUTLS}\e[0m\n";
-       print "\e[0mOpenSSL Support:\e[1;32m\t\t$main::config{USE_OPENSSL}\e[0m\n\n";
-       print "\e[1;32mImportant note: The maximum length values are now configured in the\e[0m\n";
-       print "\e[1;32m                configuration file, not in ./configure! See the <limits>\e[0m\n";
-       print "\e[1;32m                tag in the configuration file for more information.\e[0m\n\n";
+       print "\e[0mSocket engine:\e[1;32m\t\t\t$main::config{SOCKETENGINE}\e[0m\n";
+       print "\e[0mGnuTLS support:\e[1;32m\t\t\t$main::config{USE_GNUTLS}\e[0m\n";
+       print "\e[0mOpenSSL support:\e[1;32m\t\t$main::config{USE_OPENSSL}\e[0m\n";
 }
 
 sub is_dir
@@ -297,6 +295,12 @@ sub is_dir
 sub showhelp
 {
        chomp(my $PWD = `pwd`);
+       my (@socketengines, $SELIST);
+       foreach (<src/socketengines/socketengine_*.cpp>) {
+               s/src\/socketengines\/socketengine_(\w+)\.cpp/$1/;
+               push(@socketengines, $1);
+       }
+       $SELIST = join(", ", @socketengines);
        print <<EOH;
 Usage: configure [options]
 
@@ -321,12 +325,8 @@ InspIRCd 1.0.x, are also allowed.
   --clean                      Remove .config.cache file and go interactive
   --enable-gnutls              Enable GnuTLS module [no]
   --enable-openssl             Enable OpenSSL module [no]
-  --enable-epoll               Enable epoll() where supported [set]
-  --enable-kqueue              Enable kqueue() where supported [set]
-  --disable-epoll              Do not enable epoll(), fall back
-                               to select() [not set]
-  --disable-kqueue             Do not enable kqueue(), fall back
-                               to select() [not set]
+  --socketengine=[name]        Sets the socket engine to be used. Possible values are
+                               $SELIST.
   --prefix=[directory]         Base directory to install into (if defined,
                                can automatically define config, module, bin
                                and library dirs as subdirectories of prefix)
@@ -334,9 +334,10 @@ InspIRCd 1.0.x, are also allowed.
   --config-dir=[directory]     Config file directory for config and SSL certs
                                [$PWD/conf]
   --log-dir=[directory]               Log file directory for logs
-                              [$PWD/logs]
-  --data-dir=[directory]       Data directory for variable data, such as the permchannel configuration and the XLine database
-                              [$PWD/data]
+                               [$PWD/logs]
+  --data-dir=[directory]       Data directory for variable data, such as the permchannel
+                               configuration and the XLine database
+                               [$PWD/data]
   --module-dir=[directory]     Modules directory for loadable modules
                                [$PWD/modules]
   --binary-dir=[directory]     Binaries directory for core binary