blob: 760e27df76095c2826dc4818c085b6d073e8ffc1 [file] [log] [blame]
cristy1454be72011-12-19 01:52:48 +00001# Copyright 1999-2012 ImageMagick Studio LLC, a non-profit organization
cristy3ed852e2009-09-05 21:47:34 +00002# dedicated to making software imaging solutions freely available.
3#
4# You may not use this file except in compliance with the License. You may
5# obtain a copy of the License at
6#
7# http://www.imagemagick.org/script/license.php
8#
9# Unless required by applicable law or agreed to in writing, software
10# distributed under the License is distributed on an "AS IS" BASIS,
11# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12# See the License for the specific language governing permissions and
13# limitations under the License.
14#
15# Exercise all regression tests:
cristy6b1a5722010-10-08 17:35:00 +000016#
cristy3ed852e2009-09-05 21:47:34 +000017# make test
18#
19# Exersise one regression test:
20#
21# make TEST_VERBOSE=1 TEST_FILES=t/filter.t test
22#
23
24use ExtUtils::MakeMaker;
25use Config;
cristye9d0a412009-10-09 01:49:39 +000026use File::Spec::Functions qw/catfile catdir devnull catpath splitpath/;
27use Cwd;
28
29sub AutodetectWin32gcc {
30 my $wrkdir = getcwd();
31 my $devnull = devnull();
cristy6b1a5722010-10-08 17:35:00 +000032
cristye9d0a412009-10-09 01:49:39 +000033 my @incdir = ();
34 my @libdir = ($wrkdir);
35 my @bindir = ();
cristy6b1a5722010-10-08 17:35:00 +000036
cristye9d0a412009-10-09 01:49:39 +000037 #try to get configuration info via identify or convert utilities
38 my $conf = `identify -list Configure 2>$devnull` || `convert -list Configure 2>$devnull`;
39 foreach my $line (split '\n', $conf) {
40 if ($line =~ /^Path:\s+(.*)/) {
41 my ($vol,$dir,$file) = splitpath($1);
42 next unless $dir;
43 my $dirpath = catpath( $vol, $dir);
44 my (@l,@b,@i) = ( (),(),() );
45
46 # try to detect 'lib' dir
47 push @l, catfile($dirpath,'..','lib');
48 push @l, catfile($dirpath,'..','..','lib');
49 push @l, catfile($dirpath,'..','..','..','lib');
50 foreach (@l) { push @libdir, $_ if (-d $_) };
51
52 # try to detect 'bin' dir
53 push @b, catfile($dirpath,'..');
54 push @b, catfile($dirpath,'..','bin');
55 push @b, catfile($dirpath,'..','..');
56 push @b, catfile($dirpath,'..','..','bin');
57 push @b, catfile($dirpath,'..','..','..');
58 push @b, catfile($dirpath,'..','..','..','bin');
59 foreach (@b) { push @bindir, $_ if (-e "$_/convert.exe" || -e "$_/identify.exe") };
60
61 # try to detect 'include' dir
62 push @i, catfile($dirpath,'..','include');
63 push @i, catfile($dirpath,'..','include','ImageMagick');
64 push @i, catfile($dirpath,'..','..','include');
65 push @i, catfile($dirpath,'..','..','include','ImageMagick');
66 push @i, catfile($dirpath,'..','..','..','include');
67 push @i, catfile($dirpath,'..','..','..','include','ImageMagick');
cristy3dc64692011-07-02 01:24:25 +000068 foreach (@i) { push @incdir, $_ if (-e "$_/MagickCore/MagickCore.h") };
cristye9d0a412009-10-09 01:49:39 +000069 }
70 };
cristy6b1a5722010-10-08 17:35:00 +000071
cristye9d0a412009-10-09 01:49:39 +000072 foreach my $bin (@bindir) {
73 opendir(my $bindir, $bin) or die qq{Cannot opendir $bin: $!};
74 my @dlls = map {catfile($bin, $_)} grep /^\S*magick[^\+]\S*?\.dll$/i, readdir $bindir;
75 foreach my $d (@dlls) {
76 unlink "$wrkdir/libMagickCore.def", "$wrkdir/libMagickCore.a";
77 system("pexports \"$d\" >\"$wrkdir/libMagickCore.def\" 2>$devnull");
78 open(DEF, "<$wrkdir/libMagickCore.def");
cristy93ebefb2009-12-08 00:51:55 +000079 my @found = grep(/MagickCoreGenesis/, <DEF>); #checking if we have taken the right DLL
cristye9d0a412009-10-09 01:49:39 +000080 close(DEF);
81 next unless(@found);
82 print STDERR "Gonna create 'libMagickCore.a' from '$d'\n";
83 system("dlltool -D \"$d\" -d \"$wrkdir/libMagickCore.def\" -l \"$wrkdir/libMagickCore.a\" 2>$devnull");
84 last if -s "$wrkdir/libMagickCore.a";
85 }
86 last if -s "$wrkdir/libMagickCore.a";
87 }
cristy6b1a5722010-10-08 17:35:00 +000088
cristye9d0a412009-10-09 01:49:39 +000089 unless(@incdir && @libdir && @bindir && (-s "$wrkdir/libMagickCore.a")) {
90 print STDERR <<EOF
91################################### WARNING! ###################################
92# It seems that you are trying to install Perl::Magick on a MS Windows box with
93# perl + gcc compiler (e.g. strawberry perl), however we cannot find ImageMagick
94# binaries installed on your system.
95#
96# Please check the following prerequisites:
97#
98# 1) You need to have installed ImageMagick Windows binaries from
99# http://www.imagemagick.org/script/binary-releases.php#windows
100#
101# 2) We only support dynamic (DLL) ImageMagick binaries
102# note: it is not possible to mix 32/64-bit binaries of perl and ImageMagick
103#
104# 3) During installation select that you want to install ImageMagick's
105# development files (libraries+headers)
106#
107# 4) You also need to have ImageMagick's directory in your PATH
108# note: we are checking the presence of convert.exe and/or identify.exe tools
109#
110# 5) You might need Visual C++ Redistributable Package installed on your system
111# see instructions on ImageMagick's Binary Release webpage
112#
113# We are gonna continue, but chances for successful build are very low!
114################################################################################
115EOF
116 }
cristy6b1a5722010-10-08 17:35:00 +0000117
cristye9d0a412009-10-09 01:49:39 +0000118 my $inc = join ' ', map "-I\"$_\"", @incdir;
119 my $lib = join ' ', map "-L\"$_\"", @libdir;
cristye9d0a412009-10-09 01:49:39 +0000120
cristyf912c452009-10-20 12:33:26 +0000121 return ($inc, $lib);
cristye9d0a412009-10-09 01:49:39 +0000122}
123
cristy6b1a5722010-10-08 17:35:00 +0000124sub AutodetectDelegates {
125 #try to get configuration info via identify or convert utilities
cristy409306f2010-10-08 17:39:19 +0000126 my $devnull = devnull();
cristy3a5962c2010-10-10 01:07:26 +0000127 my $conf = `identify -list Configure 2>$devnull` || `convert -list Configure 2>$devnull`;
128 my @delegates = ();
cristy6b1a5722010-10-08 17:35:00 +0000129 foreach my $line (split '\n', $conf) {
130 next unless $line =~ /^DELEGATES\s+/;
cristy3a5962c2010-10-10 01:07:26 +0000131 (undef, @delegates) = split /\s+/, $line;
cristy6b1a5722010-10-08 17:35:00 +0000132 last;
133 };
134 return @delegates;
135}
cristy3ed852e2009-09-05 21:47:34 +0000136
137# Compute test specification
138my $delegate_tests='t/*.t';
cristy6b1a5722010-10-08 17:35:00 +0000139my @tested_delegates = qw/bzlib djvu fftw fontconfig freetype jpeg jng jp2 lcms mpeg png rsvg tiff x11 xml wmf zlib/;
140my @supported_delegates = AutodetectDelegates();
141# find the intersection of tested and supported delegates
142my %seen_delegates = ();
143$seen_delegates{$_}++ for @supported_delegates;
144foreach my $delegate (@tested_delegates) {
cristy3a5962c2010-10-10 01:07:26 +0000145 if ( $seen_delegates{$delegate} ) {
cristy6b1a5722010-10-08 17:35:00 +0000146 if ( -d "t/$delegate" ) {
147 if ( defined($ENV{'DISPLAY'}) && ($^O ne 'MSWin32') ) {
148 if ( defined $ENV{'DISPLAY'} ) {
149 $delegate_tests .= " t/$delegate/*.t";
150 }
151 next;
cristy3ed852e2009-09-05 21:47:34 +0000152 }
cristy6b1a5722010-10-08 17:35:00 +0000153 $delegate_tests .= " t/$delegate/*.t";
cristy3ed852e2009-09-05 21:47:34 +0000154 }
cristy3ed852e2009-09-05 21:47:34 +0000155 }
156}
157
cristye9d0a412009-10-09 01:49:39 +0000158# defaults for LIBS & INC & CCFLAGS params that we later pass to Writemakefile
159my $INC_magick = '-I../ -I@top_srcdir@ @CPPFLAGS@ -I"' . $Config{'usrinc'} . '/ImageMagick"';
cristy3dc64692011-07-02 01:24:25 +0000160my $LIBS_magick = '-L../MagickCore/.libs -lMagickCore -lperl @MATH_LIBS@';
cristye9d0a412009-10-09 01:49:39 +0000161my $CCFLAGS_magick = "$Config{'ccflags'} @CFLAGS@";
cristy3dc64692011-07-02 01:24:25 +0000162my $LDFLAGS_magick = "-L../MagickCore/.libs -lMagickCore $Config{'ldflags'} @LDFLAGS@";
163my $LDDLFLAGS_magick = "-L../MagickCore/.libs -lMagickCore $Config{'lddlflags'} @LDFLAGS@";
cristye9d0a412009-10-09 01:49:39 +0000164
165if (($^O eq 'MSWin32') && ($Config{cc} =~ /gcc/)) {
cristy5b675872009-10-21 13:12:00 +0000166 my($Ipaths, $Lpaths) = AutodetectWin32gcc();
167
168 #
169 # Setup for strawberry perl.
170 #
cristyf912c452009-10-20 12:33:26 +0000171 $INC_magick = "$Ipaths";
172 $LIBS_magick = "-lMagickCore";
173 $CCFLAGS_magick = "$Config{'ccflags'}";
174 $LDFLAGS_magick = "$Config{'ldflags'} $Lpaths ";
175 $LDDLFLAGS_magick = "$Config{'lddlflags'} $Lpaths ";
cristye9d0a412009-10-09 01:49:39 +0000176}
177
cristy3ed852e2009-09-05 21:47:34 +0000178# See lib/ExtUtils/MakeMaker.pm for details of how to influence
179# the contents of the Makefile that is written.
180WriteMakefile
181 (
182 # Module description
183 'ABSTRACT' => 'ImageMagick PERL Extension',
184
185 # Perl module name is Image::Magick
186 'NAME' => 'Image::Magick',
187
cristy5b675872009-10-21 13:12:00 +0000188 # Module author
cristy3ed852e2009-09-05 21:47:34 +0000189 'AUTHOR' => 'ImageMagick Studio LLC',
190
191 # Module version
cristy878c2f12011-08-19 00:25:19 +0000192 'VERSION' => '@PACKAGE_PERL_VERSION@',
cristy3ed852e2009-09-05 21:47:34 +0000193
194 # Preprocessor defines
cristy6b1a5722010-10-08 17:35:00 +0000195 'DEFINE' => '@LFS_CPPFLAGS@ @DEFS@', # e.g., '-DHAVE_SOMETHING'
cristy3ed852e2009-09-05 21:47:34 +0000196
197 # Header search specfication and preprocessor flags
cristye9d0a412009-10-09 01:49:39 +0000198 'INC' => $INC_magick,
cristy3ed852e2009-09-05 21:47:34 +0000199
200 # C compiler
cristye6107592009-09-26 23:04:25 +0000201 #'CC' => '@CC@',
cristy3ed852e2009-09-05 21:47:34 +0000202
203 # C pre-processor flags (e.g. -I & -D options)
204 # 'CPPFLAGS' => "$Config{'cppflags'} @CPPFLAGS@",
205
206 # C compiler flags (e.g. -O -g)
cristye9d0a412009-10-09 01:49:39 +0000207 'CCFLAGS' => $CCFLAGS_magick,
cristy3ed852e2009-09-05 21:47:34 +0000208
209 # Linker
cristye6107592009-09-26 23:04:25 +0000210 #'LD' => $Config{'ld'} == $Config{'cc'} ? '@CC@' : $Config{'ld'},
cristy3ed852e2009-09-05 21:47:34 +0000211
212 # Linker flags for building an executable
cristyf912c452009-10-20 12:33:26 +0000213 'LDFLAGS' => $LDFLAGS_magick,
cristy3ed852e2009-09-05 21:47:34 +0000214
215 # Linker flags for building a dynamically loadable module
cristyf912c452009-10-20 12:33:26 +0000216 'LDDLFLAGS' => $LDDLFLAGS_magick,
cristy3ed852e2009-09-05 21:47:34 +0000217
218 # Install PerlMagick binary into ImageMagick bin directory
219 'INSTALLBIN' => '@BIN_DIR@',
220
221 # Library specification
cristye9d0a412009-10-09 01:49:39 +0000222 'LIBS' => [ $LIBS_magick ],
cristy3ed852e2009-09-05 21:47:34 +0000223
224 # Perl binary name (if a Perl binary is built)
225 'MAP_TARGET' => 'PerlMagick',
226
227 # Let CFLAGS drive optimization flags by setting OPTIMIZE to empty
228 # 'OPTIMIZE' => '',
229
230 # Use same compiler as ImageMagick
231 'PERLMAINCC' => '@PERLMAINCC@ @OPENMP_CFLAGS@',
cristyca142db2012-05-08 11:35:55 +0000232 'AR' => '@AR@',
233 'LD' => '@PERLMAINCC@',
cristy3ed852e2009-09-05 21:47:34 +0000234
235 # Set Perl installation prefix to ImageMagick installation prefix
236# 'PREFIX' => '@prefix@',
237
238 # Include delegate directories in tests
239 test => { TESTS => $delegate_tests},
240
241 ($Config{'archname'} =~ /-object$/i ? ('CAPI' => 'TRUE') : ()),
242);
243
244
245#
246# Substitutions for "makeaperl" section.
247#
248sub MY::makeaperl {
249 package MY; # so that "SUPER" works right
250 my $inherited = shift->SUPER::makeaperl(@_);
251
252 # Stinky ExtUtils::MM_Unix likes to append its own library path to $(CC),
253 # prior to any user-specified library path so that an installed library is
254 # used rather than the library just built. This substitution function
255 # tries to insert our library path first. Also, use the same compiler used
256 # to build perlmain.c to link so that a C++ compiler may be used if
257 # necessary.
258 $inherited =~ s:MAP_LINKCMD\s.*\s*\$\(CC\):MAP_LINKCMD = \$(PERLMAINCC) -L@MAGICKCORE_PATH@: ;
259 $inherited;
260 }