perl/Makefile.PL

   1 # $Id: Makefile.PL,v 1.33 2002/12/15 19:40:19 skimo Exp $
   2
   3 use ExtUtils::MakeMaker;
   4 use IO::File;
   5 use Config;
   6 use Cwd 'cwd';
   7 use Getopt::Long;
   8 use File::Copy qw(copy);
   9
  10 @h1 = qw(fastcgi.h fcgiapp.h fcgimisc.h fcgios.h);
  11 @h = (@h1, 'fcgi_config.h');
  12 @o = qw(FCGI.o);
  13 @dist1 = qw(LICENSE.TERMS);
  14 @dist2 = qw(fcgiapp.c os_unix.c os_win32.c);
  15 @dist3 = (@h1, qw(fcgi_config_x86.h));
  16
  17 GetOptions ("use-installed:s" => \$useinstalled);
  18
  19 $libfound = 0;
  20 @libs = ();
  21
  22 my $cwd = cwd();
  23 my $devkit = "$cwd/..";
  24
  25 if (defined $useinstalled) {
  26     require ExtUtils::Liblist;
  27     my $libspec = $useinstalled ? "-L$useinstalled/lib " : "";
  28     $libspec .= "-lfcgi";
  29     my @l = MM->ext($libspec);
  30     if ($l[0] || $l[1] || $l[2]) {
  31         $prefix = "$useinstalled/include" if $useinstalled;
  32         $libfound = 1;
  33         push @libs, $libspec;
  34     }
  35 }
  36 if (!$libfound && -d "$devkit/libfcgi" && -d "$devkit/include") {
  37     # devkit
  38     if (grep { ! -f "$devkit/include/$_" } @dist3
  39         or grep { ! -f "$devkit/libfcgi/$_" } @dist2)
  40     {
  41         warn "This appears to be a FastCGI devkit distribution, " .
  42             "but one or more FastCGI library files are missing. \n" .
  43             "Please check the integrity of the distribution.\n";
  44         exit -1;
  45     }
  46
  47     my $extrarules = join "\n",
  48         map { $b = $_; $b =~ s/\.c$//; my $s="$devkit/libfcgi/$b.c";
  49             "$b\$(OBJ_EXT): $s\n\t".
  50             '$(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) '."$s\n"; }
  51             @dist2;
  52     eval 'package MY; sub postamble { $extrarules; }';
  53     $prefix = $devkit;
  54 }
  55
  56
  57 $sys = $^O eq 'MSWin32' ? 'win32' : 'unix';
  58 push @o, "fcgiapp.o", "os_$sys.o" unless $libfound;
  59 $inc = '-I.' unless $libfound;
  60 $inc .= " -I$prefix/include" if $prefix;
  61
  62 push(@extras, CAPI => 'TRUE')
  63      if ($] >= 5.005 and $^O eq 'MSWin32'
  64         and $Config{archname} =~ /-object\b/i);
  65
  66 push(@extras,
  67     ABSTRACT => 'Fast CGI module',
  68     AUTHOR   => 'Sven Verdoolaege (skimo@kotnet.org)'
  69 ) if ($ExtUtils::MakeMaker::VERSION >= 5.4301);
  70
  71 push @extras, META_MERGE => {
  72     resources => {
  73         repository => 'git://git.shadowcat.co.uk/catagits/fcgi2.git',
  74     },
  75 } if $ExtUtils::MakeMaker::VERSION >= 6.46;
  76
  77 $plfiles = {
  78     'echo.PL' => 'echo.fpl',
  79     'remote.PL' => 'remote.fpl',
  80     'threaded.PL' => 'threaded.fpl',
  81     'FCGI.PL' => 'FCGI.pm',
  82     'FCGI.XL' => 'FCGI.xs',
  83 };
  84
  85 if ("$sys" eq "win32") {
  86     push @libs, ":nosearch -lws2_32";
  87     push @extras, 'DEFINE' => '-DDLLAPI=__declspec(dllexport)';
  88 }
  89
  90 push @extras,
  91     'LIBS'    => [ "@libs" ],
  92     'OBJECT'    => "@o",
  93     'INC'    => $inc;
  94
  95 # See lib/ExtUtils/MakeMaker.pm for details of how to influence
  96 # the contents of the Makefile that is written.
  97
  98 # Work around bug in previous versions of MakeMaker
  99 WriteMakefile(
 100     'NAME'        => 'FCGI',
 101     'VERSION_FROM'    => 'version.pm',
 102     'dist' => {
 103         'COMPRESS' => 'gzip -9f',
 104         'SUFFIX' => 'gz',
 105         'PREOP' => '$(CP) '.join(' ',
 106             map {"../$_"} @dist1,
 107             (map {"libfcgi/$_"} @dist2),
 108             map {"include/$_"} @dist3).' $(DISTVNAME);'.
 109                 '$(CP) MANIFEST MANIFEST.old;'.
 110                 '$(ECHO) '. join('\\\n',@dist1,@dist2,@dist3) .
 111                 '>> $(DISTVNAME)/MANIFEST',
 112                   'POSTOP' =>
 113                 '$(MV) MANIFEST.old MANIFEST',
 114     },
 115     'clean'        => { FILES => 'config.cache fcgi_config.h' .
 116                       ' FCGI.xs FCGI.c ' .
 117                       (join ' ', values %$plfiles)},
 118     'PL_FILES'        => $plfiles,
 119     PM            => {'FCGI.pm' => '$(INST_ARCHLIBDIR)/FCGI.pm'},
 120     @extras,
 121 );
 122
 123 exit if -f 'fcgi_config.h' or $libfound;
 124
 125 # CPAN and no installed lib found
 126 if ($sys eq "win32") {
 127     # configure will almost certainly not run on a normal NT install,
 128     # use the pregenerated configuration file
 129
 130     print "Using prebuilt fcgi_config.h file for Windows\n";
 131     unlink("fcgi_config.h");
 132     my $confdir = $prefix ? "$prefix/include/" : '';
 133     die $! unless copy("${confdir}fcgi_config_x86.h","fcgi_config.h");
 134
 135     # Win can't deal with existence of FCGI.xs or absence of FCGI.c
 136     unlink("FCGI.xs");
 137     open(F, ">FCGI.c"); close(F);
 138     $now = time; $before = $now - 600;
 139     utime $before, $before, "FCGI.c";
 140     utime $now, $now, "FCGI.PL";
 141 } else {
 142     print "Running ./configure for you\n";
 143     print "Please read configure.readme for information on how to run it yourself\n";
 144
 145     $ENV{'CC'} = $Config{'cc'};
 146     system("$Config{sh} configure");
 147 }
 148