change note for 39bfc9d3d
[imager.git] / FT2 / Makefile.PL
CommitLineData
50c75381
TC
1#!perl -w
2use strict;
d24404be 3use ExtUtils::MakeMaker;
50c75381
TC
4use Getopt::Long;
5use Config;
6
7my $verbose = $ENV{IM_VERBOSE};
8my @libpaths;
9my @incpaths;
10
11GetOptions("incpath=s", \@incpaths,
12 "libpath=s" => \@libpaths,
13 "verbose|v" => \$verbose);
14
15our $BUILDING_IMAGER;
d97c8dbd 16our %IMAGER_LIBS;
50c75381 17
50c75381
TC
18my $MM_ver = eval $ExtUtils::MakeMaker::VERSION;
19
20my %opts =
21 (
22 NAME => 'Imager::Font::FT2',
23 VERSION_FROM => 'FT2.pm',
24 OBJECT => 'FT2.o freetyp2.o',
25 clean => { FILES => 'testout' },
26 );
27
28my @inc;
29if ($BUILDING_IMAGER) {
30 push @inc, "-I..";
31 unshift @INC, "../lib";
32}
33else {
34 unshift @INC, "inc";
35 print "FreeType 2: building independently\n";
36 require Imager::ExtUtils;
37 push @inc, Imager::ExtUtils->includes;
38 $opts{TYPEMAPS} = [ Imager::ExtUtils->typemap ];
39
40 # Imager required configure through use
32d74dbe 41 my @Imager_req = ( Imager => "0.86" );
50c75381
TC
42 if ($MM_ver >= 6.46) {
43 $opts{META_MERGE} =
44 {
45 configure_requires =>
46 {
47 @Imager_req,
48 },
49 build_requires =>
50 {
51 @Imager_req,
52 "Test::More" => "0.47",
53 },
54 resources =>
55 {
56 homepage => "http://imager.perl.org/",
04b6f77c
TC
57 repository => "git://git.imager.perl.org/imager.git",
58 bugtracker => "http://rt.cpan.org/NoAuth/Bugs.html?Dist=Imager",
50c75381
TC
59 },
60 };
61 $opts{PREREQ_PM} =
62 {
63 @Imager_req,
17f8d455 64 'Scalar::Util' => 1.00,
a5919365 65 XSLoader => 0,
50c75381
TC
66 };
67 }
68}
69
70require Imager::Probe;
71
72my %probe =
73 (
74 name => "FreeType 2",
75 code => \&freetype2_probe_ftconfig,
76 inccheck =>
77 sub { -e File::Spec->catfile($_[0], "freetype/ftbitmap.h") },
78 libbase => "freetype",
79 testcode => _ft2_test_code(),
80 testcodeheaders => [ "stdio.h", "string.h", "ft2build.h" ],
b73378f5 81 testcodeprologue => _ft2_test_code_prologue(),
0c3c1180
TC
82 incpath => \@incpaths,
83 libpath => \@libpaths,
50c75381
TC
84 alternatives =>
85 [
86 {
87 incsuffix => "freetype2",
88 },
89 {
90 incsuffix => "freetype",
91 },
92 ],
93 );
94
95my $probe_res = Imager::Probe->probe(\%probe);
96if ($probe_res) {
d97c8dbd
TC
97 $IMAGER_LIBS{FT2} = 1;
98
50c75381
TC
99 push @inc, $probe_res->{INC};
100 $opts{LIBS} = $probe_res->{LIBS};
03e49392 101 $opts{DEFINE} = $probe_res->{DEFINE};
50c75381 102 $opts{INC} = "@inc";
ba751dab
TC
103 $opts{LDDLFLAGS} = $probe_res->{LDDLFLAGS}
104 if $probe_res->{LDDLFLAGS};
50c75381
TC
105
106 if ($MM_ver > 6.06) {
5b480b14 107 $opts{AUTHOR} = 'Tony Cook <tonyc@cpan.org>';
50c75381
TC
108 $opts{ABSTRACT} = 'FreeType 2 font driver for Imager';
109 }
110
111 WriteMakefile(%opts);
112}
113else {
d97c8dbd
TC
114 $IMAGER_LIBS{FT2} = 0;
115
50c75381 116 if ($BUILDING_IMAGER) {
d24404be 117 ExtUtils::MakeMaker::WriteEmptyMakefile(%opts);
50c75381
TC
118 }
119 else {
120 # fail in good way
121 die "OS unsupported: FreeType 2 headers/libraries not found\n";
122 }
123}
124
125sub _ft2_test_code {
126 return <<'CODE';
b73378f5
TC
127FT_Library library = 0;
128FT_Face face = 0;
129FT_Error error;
130error = FT_Init_FreeType(&library);
131if (error) {
132 fprintf(stderr, "FreeType 2: cannot initialize library: %d\n", error);
133 return 1;
134}
135error = FT_New_Face(library, "fontfiles/dodge.ttf", 0, &face);
136if (error) {
137 fprintf(stderr, "FreeType 2: cannot load font: %d\n", error);
138 return 1;
139}
50c75381
TC
140return 0;
141CODE
142}
143
b73378f5
TC
144sub _ft2_test_code_prologue {
145 return <<'CODE';
146#include FT_FREETYPE_H
147
148CODE
149}
150
50c75381
TC
151sub is_exe {
152 my ($name) = @_;
153
154 my @exe_suffix = $Config{_exe};
155 if ($^O eq 'MSWin32') {
156 push @exe_suffix, qw/.bat .cmd/;
157 }
39bfc9d3
TC
158 elsif ($^O eq 'cygwin') {
159 push @exe_suffix, "";
160 }
50c75381
TC
161
162 for my $dir (File::Spec->path) {
163 for my $suffix (@exe_suffix) {
8eb5a69c 164 -x File::Spec->catfile($dir, "$name$suffix")
50c75381
TC
165 and return 1;
166 }
167 }
168
169 return;
170}
171
172# probes for freetype2 by trying to run freetype-config
173sub freetype2_probe_ftconfig {
174 my ($req) = @_;
175
176 is_exe('freetype-config') or return;
177
178 my $cflags = `freetype-config --cflags`
179 and !$? or return;
180 chomp $cflags;
181
182 my $lflags = `freetype-config --libs`
183 and !$? or return;
184 chomp $lflags;
185
186 # before 2.1.5 freetype-config --cflags could output
187 # the -I options in the wrong order, causing a conflict with
188 # freetype1.x installed with the same --prefix
189 #
190 # can happen iff:
191 # - both -Iprefix/include and -Iprefix/include/freetype2 are in cflags
192 # in that order
193 # - freetype 1.x headers are in prefix/include/freetype
194 my @incdirs = map substr($_, 2), grep /^-I/, split ' ', $cflags;
195 if (@incdirs == 2
196 && $incdirs[1] eq "$incdirs[0]/freetype2"
197 && -e "$incdirs[0]/freetype/freetype.h"
198 && -e "$incdirs[0]/freetype/fterrid.h") {
199 print "** freetype-config provided -I options out of order, correcting\n"
200 if $verbose;
201 $cflags = join(' ', grep(!/-I/, split ' ', $cflags),
202 map "-I$_", reverse @incdirs);
203 }
204
205 print "$req->{name}: configured via freetype-config\n";
206
207 return
208 {
209 INC => $cflags,
210 LIBS => $lflags,
211 };
212}