1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
|
#!/usr/bin/perl -w
use strict;
use warnings;
use Devel::CheckLib;
use ExtUtils::CppGuess;
use Module::Build::WithXSpp;
my $cpp_guess = ExtUtils::CppGuess->new;
my $mswin = $^O eq 'MSWin32';
# _GLIBCXX_USE_C99 : to get the long long type for g++
# HAS_BOOL : stops Perl/lib/CORE/handy.h from doing "# define bool char" for MSVC
# NOGDI : prevents inclusion of wingdi.h which defines functions Polygon() and Polyline() in global namespace
# BOOST_ASIO_DISABLE_KQUEUE : prevents a Boost ASIO bug on OS X: https://svn.boost.org/trac/boost/ticket/5339
my @cflags = qw(-D_GLIBCXX_USE_C99 -DHAS_BOOL -DNOGDI -DSLIC3RXS -DBOOST_ASIO_DISABLE_KQUEUE -DGLEW_STATIC);
my @ldflags = ();
if ($^O eq 'darwin') {
push @ldflags, qw(-framework IOKit -framework CoreFoundation);
}
if ($mswin) {
# In case windows.h is included, we don't want the min / max macros to be active.
# If <math.h> is included, we want the #defines to be active (M_PI etc.)
push @cflags, qw(-D_WIN32 -DNOMINMAX -D_USE_MATH_DEFINES);
}
my @early_includes = ();
my @INC = qw(-Isrc/libslic3r -Isrc/glew/include);
my @LIBS = $cpp_guess->is_msvc ? qw(-LIBPATH:src/libslic3r) : qw(-Lsrc/libslic3r);
if ($ENV{SLIC3R_GUI})
{
print "Slic3r will be built with GUI support\n";
require Alien::wxWidgets;
Alien::wxWidgets->load;
push @INC, Alien::wxWidgets->include_path;
push @cflags, qw(-DSLIC3R_GUI -DUNICODE), Alien::wxWidgets->defines, Alien::wxWidgets->c_flags;
my $alienwx_libraries = Alien::wxWidgets->libraries(qw(gl html));
$alienwx_libraries =~ s/-L/-LIBPATH:/g if ($cpp_guess->is_msvc);
push @ldflags, Alien::wxWidgets->link_flags, $alienwx_libraries;
# push @early_includes, qw(slic3r/GUI/wxinit.h);
}
# search for Boost in a number of places
my @boost_include = ();
if (defined $ENV{BOOST_INCLUDEDIR}) {
push @boost_include, $ENV{BOOST_INCLUDEDIR}
} elsif (defined $ENV{BOOST_DIR}) {
my $subdir = $ENV{BOOST_DIR} . (($mswin == 1) ? '\include' : '/include');
if (-d $subdir) {
push @boost_include, $subdir;
} else {
push @boost_include, $ENV{BOOST_DIR};
}
} else {
# Boost library was not defined by the environment.
# Try to guess at some default paths.
if ($mswin) {
for my $path (glob('C:\dev\boost*\include'), glob ('C:\boost*\include')) {
push @boost_include, $path;
}
if (! @boost_include) {
# No boost\include. Try to include the boost root.
for my $path (glob('C:\dev\boost*'), glob ('C:\boost*')) {
push @boost_include, $path;
}
}
} else {
push @boost_include, grep { -d $_ }
qw(/opt/local/include /usr/local/include /opt/include /usr/include);
}
}
my @boost_libs = ();
if (defined $ENV{BOOST_LIBRARYDIR}) {
push @boost_libs, $ENV{BOOST_LIBRARYDIR}
} elsif (defined $ENV{BOOST_DIR}) {
my $subdir = $ENV{BOOST_DIR} . ($mswin ? '\stage\lib' : '/stage/lib');
if (-d $subdir) {
push @boost_libs, $subdir;
} else {
push @boost_libs, $ENV{BOOST_DIR};
}
} else {
# Boost library was not defined by the environment.
# Try to guess at some default paths.
if ($mswin) {
for my $path (
glob('C:\dev\boost*\lib'), glob ('C:\boost*\lib'),
glob('C:\dev\boost*\stage\lib'), glob ('C:\boost*\stage\lib')) {
push @boost_libs, $path;
}
} else {
push @boost_libs, grep { -d $_ }
qw(/opt/local/lib /usr/local/lib /opt/lib /usr/lib /lib);
}
}
# In order to generate the -l switches we need to know how Boost libraries are named
my $have_boost = 0;
my @boost_libraries = qw(system thread); # we need these
# check without explicit lib path (works on Linux)
if (! $mswin) {
$have_boost = 1
if check_lib(
lib => [ map "boost_${_}", @boost_libraries ],
);
}
if (!$ENV{SLIC3R_STATIC} && $have_boost) {
# The boost library was detected by check_lib on Linux.
push @LIBS, map "-lboost_${_}", @boost_libraries;
} else {
# Either static linking, or check_lib could not be used to find the boost libraries.
my $lib_prefix = 'libboost_';
my $lib_ext = ${$cpp_guess}{config}{lib_ext};
PATH: foreach my $path (@boost_libs) {
# Try to find the boost system library.
my @files = glob "$path/${lib_prefix}system*$lib_ext";
next if !@files;
if ($files[0] =~ /${lib_prefix}system([^.]+)$lib_ext$/) {
# Suffix contains the version number, the build type etc.
my $suffix = $1;
# Verify existence of all required boost libraries at $path.
for my $lib (map "${lib_prefix}${_}${suffix}${lib_ext}", @boost_libraries) {
# If the library file does not exist, try next library path.
-f "$path/$lib" or next PATH;
}
if (! $cpp_guess->is_msvc) {
# Test the correctness of boost libraries by linking them to a minimal C program.
check_lib(
lib => [ map "boost_${_}${suffix}", @boost_libraries ],
INC => join(' ', map "-I$_", @INC, @boost_include),
LIBS => "-L$path",
) or next;
}
push @INC, (map " -I$_", @boost_include); # TODO: only use the one related to the chosen lib path
if ($ENV{SLIC3R_STATIC} || $cpp_guess->is_msvc) {
push @LIBS, map "${path}/${lib_prefix}$_${suffix}${lib_ext}", @boost_libraries;
} else {
push @LIBS, " -L$path", (map " -lboost_$_$suffix", @boost_libraries);
}
$have_boost = 1;
last;
}
}
}
push @cflags, '-DBOOST_LIBS' if $have_boost;
die <<'EOF' if !$have_boost;
Slic3r requires the Boost libraries. Please make sure they are installed.
If they are installed, this script should be able to locate them in several
standard locations. If this is not the case, you might want to supply their
path through the BOOST_DIR environment variable:
BOOST_DIR=/path/to/boost perl Build.PL
Or you may specify BOOST_INCLUDEPATH and BOOST_LIBRARYPATH separatly, which
is handy, if you have built Boost libraries with mutliple settings.
EOF
# Add the OpenGL and GLU libraries.
if ($ENV{SLIC3R_GUI}) {
if ($mswin) {
if ($cpp_guess->is_msvc) {
push @LIBS, qw(OpenGL32.Lib GlU32.Lib);
} else {
push @LIBS, qw(-lopengl32);
}
} else {
push @LIBS, qw(-lgl -lglu);
}
}
if ($ENV{SLIC3R_DEBUG}) {
# only on newer GCCs: -ftemplate-backtrace-limit=0
push @cflags, '-DSLIC3R_DEBUG';
push @cflags, $cpp_guess->is_msvc ? '-Gd' : '-g';
} else {
# Disable asserts in the release builds.
push @cflags, '-DNDEBUG';
}
if ($cpp_guess->is_gcc) {
# check whether we're dealing with a buggy GCC version
# see https://github.com/alexrj/Slic3r/issues/1965
if (`cc --version` =~ / 4\.7\.[012]/) {
# Workaround suggested by Boost devs:
# https://svn.boost.org/trac/boost/ticket/8695
push @cflags, qw(-fno-inline-small-functions);
}
}
my $build = Module::Build::WithXSpp->new(
module_name => 'Slic3r::XS',
dist_abstract => 'XS code for Slic3r',
build_requires => {qw(
ExtUtils::ParseXS 3.18
ExtUtils::Typemaps 1.00
ExtUtils::Typemaps::Default 1.05
ExtUtils::XSpp 0.17
Module::Build 0.3601
Test::More 0
)},
configure_requires => {qw(
ExtUtils::CppGuess 0.07
Module::Build 0.38
Module::Build::WithXSpp 0.13
)},
extra_compiler_flags => [ @INC, @cflags ],
extra_linker_flags => [ @LIBS, @ldflags ],
# Provides extra C typemaps that are auto-merged
extra_typemap_modules => {
'ExtUtils::Typemaps::Basic' => '1.05',
},
# for MSVC builds
early_includes => [qw(
cstring
cstdlib
ostream
sstream
libslic3r/GCodeSender.hpp
), @early_includes]
);
$build->create_build_script;
__END__
|
