]> granicus.if.org Git - imagemagick/blob - PerlMagick/Makefile.PL
(no commit message)
[imagemagick] / PerlMagick / Makefile.PL
1 #  Copyright 1999-2011 ImageMagick Studio LLC, a non-profit organization
2 #  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:
16 #
17 #    make test
18 #
19 #  Exersise one regression test:
20 #
21 #    make TEST_VERBOSE=1 TEST_FILES=t/filter.t test
22 #
23
24 use ExtUtils::MakeMaker;
25 use Config;
26 use File::Spec::Functions qw/catfile catdir devnull catpath splitpath/;
27 use Cwd;
28
29 sub AutodetectWin32gcc {
30   my $wrkdir = getcwd();
31   my $devnull = devnull();
32
33   my @incdir = ();
34   my @libdir = ($wrkdir);
35   my @bindir = ();
36
37   #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');
68       foreach (@i) { push @incdir, $_ if (-e "$_/MagickCore/MagickCore.h") };
69     }
70   };
71
72   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");
79       my @found = grep(/MagickCoreGenesis/, <DEF>); #checking if we have taken the right DLL
80       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   }
88
89   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 ################################################################################
115 EOF
116   }
117
118   my $inc = join ' ', map "-I\"$_\"", @incdir;
119   my $lib = join ' ', map "-L\"$_\"", @libdir;
120
121   return ($inc, $lib);
122 }
123
124 sub AutodetectDelegates {
125   #try to get configuration info via identify or convert utilities
126   my $devnull = devnull();
127   my $conf = `identify -list Configure 2>$devnull` || `convert -list Configure 2>$devnull`;
128   my @delegates = ();
129   foreach my $line (split '\n', $conf) {
130     next unless $line =~ /^DELEGATES\s+/;
131     (undef, @delegates) = split /\s+/, $line;
132     last;
133   };
134   return @delegates;
135 }
136
137 # Compute test specification
138 my $delegate_tests='t/*.t';
139 my @tested_delegates = qw/bzlib djvu fftw fontconfig freetype jpeg jng jp2 lcms mpeg png rsvg tiff x11 xml wmf zlib/;
140 my @supported_delegates = AutodetectDelegates();
141 # find the intersection of tested and supported delegates
142 my %seen_delegates = ();
143 $seen_delegates{$_}++ for @supported_delegates;
144 foreach my $delegate (@tested_delegates) {
145   if ( $seen_delegates{$delegate} ) {
146     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;
152       }
153       $delegate_tests .= " t/$delegate/*.t";
154     }
155   }
156 }
157
158 my $openmp_option = '';
159 if ($Config{'gccversion'} && $Config{'gccversion'} =~ m/^s*(d+).(d+)/ms) {
160     $openmp_option = ' -fopenmp' if($1 >= 4 && $2 >= 2); # openmp is only supported after gcc 4.2;
161 }
162
163 # defaults for LIBS & INC & CCFLAGS params that we later pass to Writemakefile
164 my $INC_magick = '-I../ -I.. -pthread -I/usr/include/cairo -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/pixman-1 -I/usr/include/freetype2 -I/usr/include/libpng12 -pthread -I/usr/include/pango-1.0 -I/usr/include/freetype2 -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/graphviz -I/usr/include/freetype2 -I/usr/include/libxml2 -I"' . $Config{'usrinc'} . '/ImageMagick"';
165 my $LIBS_magick = '-L../MagickCore/.libs -lMagickCore -lperl -lm';
166 my $CCFLAGS_magick = "$Config{'ccflags'} $openmp_option -g -O2 -Wall -pthread";
167 my $LDFLAGS_magick   = "-L../MagickCore/.libs -lMagickCore $Config{'ldflags'} -L/usr/lib";
168 my $LDDLFLAGS_magick = "-L../MagickCore/.libs -lMagickCore $Config{'lddlflags'} -L/usr/lib";
169
170 if (($^O eq 'MSWin32') && ($Config{cc} =~ /gcc/)) {
171   my($Ipaths, $Lpaths) = AutodetectWin32gcc();
172
173   #
174   # Setup for strawberry perl.
175   #
176   $INC_magick       = "$Ipaths";
177   $LIBS_magick      = "-lMagickCore";
178   $CCFLAGS_magick   = "$Config{'ccflags'}";
179   $LDFLAGS_magick   = "$Config{'ldflags'} $Lpaths ";
180   $LDDLFLAGS_magick = "$Config{'lddlflags'} $Lpaths ";
181 }
182
183 # See lib/ExtUtils/MakeMaker.pm for details of how to influence
184 # the contents of the Makefile that is written.
185 WriteMakefile
186   (
187    # Module description
188    'ABSTRACT'   => 'ImageMagick PERL Extension',
189
190    # Perl module name is Image::Magick
191    'NAME'       => 'Image::Magick',
192
193    # Module author
194    'AUTHOR' => 'ImageMagick Studio LLC',
195
196    # Module version
197    'VERSION' => '7.00',
198
199    # Preprocessor defines
200    'DEFINE'     => ' -D_LARGE_FILES=1 -DHAVE_CONFIG_H',     # e.g., '-DHAVE_SOMETHING'
201
202    # Header search specfication and preprocessor flags
203    'INC'        => $INC_magick,
204
205    # C compiler
206    #'CC' => 'gcc -std=gnu99 -std=gnu99',
207
208    # C pre-processor flags (e.g. -I & -D options)
209    # 'CPPFLAGS' => "$Config{'cppflags'} -pthread -I/usr/include/cairo -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/pixman-1 -I/usr/include/freetype2 -I/usr/include/libpng12 -pthread -I/usr/include/pango-1.0 -I/usr/include/freetype2 -I/usr/include/glib-2.0 -I/usr/lib64/glib-2.0/include -I/usr/include/graphviz -I/usr/include/freetype2 -I/usr/include/libxml2",
210
211    # C compiler flags (e.g. -O -g)
212    'CCFLAGS' => $CCFLAGS_magick,
213
214    # Linker
215    #'LD' => $Config{'ld'} == $Config{'cc'} ? 'gcc -std=gnu99 -std=gnu99' : $Config{'ld'},
216
217    # Linker flags for building an executable
218    'LDFLAGS' =>  $LDFLAGS_magick,
219
220    # Linker flags for building a dynamically loadable module
221    'LDDLFLAGS' => $LDDLFLAGS_magick,
222
223    # Install PerlMagick binary into ImageMagick bin directory
224    'INSTALLBIN' => '/usr/local/bin',
225
226    # Library specification
227    'LIBS' => [ $LIBS_magick ],
228
229    # Perl binary name (if a Perl binary is built)
230    'MAP_TARGET' => 'PerlMagick',
231
232    # Let CFLAGS drive optimization flags by setting OPTIMIZE to empty
233    # 'OPTIMIZE' => '',
234
235    # Use same compiler as ImageMagick
236    'PERLMAINCC' => ' -fopenmp',
237
238    # Set Perl installation prefix to ImageMagick installation prefix
239 #   'PREFIX'    => '/usr/local',
240
241    # Include delegate directories in tests
242    test => { TESTS      =>      $delegate_tests},
243
244    ($Config{'archname'} =~ /-object$/i ? ('CAPI' => 'TRUE') : ()),
245 );
246
247
248 #
249 # Substitutions for "makeaperl" section.
250 #
251 sub MY::makeaperl {
252      package MY; # so that "SUPER" works right
253      my $inherited = shift->SUPER::makeaperl(@_);
254
255      # Stinky ExtUtils::MM_Unix likes to append its own library path to $(CC),
256      # prior to any user-specified library path so that an installed library is
257      # used rather than the library just built.  This substitution function
258      # tries to insert our library path first. Also, use the same compiler used
259      # to build perlmain.c to link so that a C++ compiler may be used if
260      # necessary.
261      $inherited =~ s:MAP_LINKCMD\s.*\s*\$\(CC\):MAP_LINKCMD   = \$(PERLMAINCC) -L/usr/local/lib: ;
262      $inherited;
263  }