ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/EV/Makefile.PL
(Generate patch)

Comparing EV/Makefile.PL (file contents):
Revision 1.55 by root, Sat Sep 6 18:42:18 2014 UTC vs.
Revision 1.62 by root, Thu Jul 11 08:51:48 2019 UTC

1use 5.008002;
2
3use strict qw(vars subs); 1use strict qw(vars subs);
2use Canary::Stability EV => 1, 5.008002;
4use Config; 3use Config;
5use ExtUtils::MakeMaker; 4use ExtUtils::MakeMaker;
6 5
7sub have_inc($) { 6sub have_inc($) {
8 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth} 7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
9} 8}
10 9
10my $DEFINE;
11
11unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_linuxaio.c") {
12 print <<EOF; 13 print <<EOF;
13 14
14*** 15***
15*** ERROR: libev is missing or damaged. If you used a CVS check-out of EV, 16*** ERROR: libev is missing or damaged. If you used a CVS check-out of EV,
16*** you also have to check-out the "libev" module from the same CVS 17*** you also have to check-out the "libev" module from the same CVS
… …
48will otherwise be autodetected at both compile- and runtime. (this setting 49will otherwise be autodetected at both compile- and runtime. (this setting
49currently affects the use of nanosleep over select as well). 50currently affects the use of nanosleep over select as well).
50 51
51EOF 52EOF
52 53
53my $DEFINE .= " -DEV_USE_MONOTONIC=" . (0 + (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/)); 54unless (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) {
55 $DEFINE .= " -DEV_USE_MONOTONIC=0";
56}
54 57
55print <<EOF; 58print <<EOF;
56 59
57*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
58 61
… …
140print <<EOF; 143print <<EOF;
141 144
142*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
143 146
144 147
148Linux 4.18 introduced another event polling interface, this time using
149the Linux AIO API. While this API is far superior to epoll and almost
150rivals kqueue, it also suffers from the same issues as kqueue typically
151does: only a subset of file types are supported (as of 4.19, I have seen
152eventfd, pipes, sockets files and some devices, but no ttys). It also
153is subject arbitrary system-wide limits imposed on it. Therefore, this
154backend is not used by default, even when it is compiled in, and you have
155to request it explicitly, e.g. with LIBEV_FLAGS=64. If unsure, accept the
156default.
157
158EOF
159
160my $can_linuxaio = have_inc "linux/aio_abi.h";
161$can_linuxaio = $ENV{EV_LINUXAIO} if exists $ENV{EV_LINUXAIO};
162$can_linuxaio = 0 + (prompt ("Enable linux aio backend (y/n)?", $can_linuxaio ? "y" : "n") =~ /[yY]/);
163$DEFINE .= " -DEV_USE_LINUXAIO=$can_linuxaio";
164
165if ($can_linuxaio) {
166print <<EOF;
167
168*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
169
170
171The previously mentioned Linux AIO backend is experimental and will not
172be used unless requested explicitly. You can, howeer, choose to make ti a
173recommended basckend, which means it will be chosen if available even when
174not explicitly asked for, in preference to epoll on GNU/Linux. This option
175is likely temporary. When unsure, accept the default.
176
177EOF
178
179my $recommend_linuxaio = 0;
180$recommend_linuxaio = $ENV{EV_RECOMMEND_LINUXAIO} if exists $ENV{EV_RECOMMEND_LINUXAIO};
181$recommend_linuxaio = 0 + (prompt ("Treat linux aio as a recommended backend (y/n)?", $recommend_linuxaio ? "y" : "n") =~ /[yY]/);
182$DEFINE .= " -DEV_RECOMMEND_LINUXAIO=$recommend_linuxaio";
183}
184
185print <<EOF;
186
187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
188
189
145Similarly to the epoll backend above, EV can take advantage of kqueue on 190Similarly to the epoll backend above, EV can take advantage of kqueue on
146many BSD systems. Support for kqueue will be detected at runtime, with a 191many BSD systems. Support for kqueue will be detected at runtime, with a
147safe fallback to other methods when it cannot be used. 192safe fallback to other methods when it cannot be used.
148 193
149Note that kqueue is broken on most operating systems, so by default it 194Note that kqueue is broken on most operating systems, so by default it
… …
246EOF 291EOF
247 292
248my $can_signalfd = have_inc "sys/signalfd.h"; 293my $can_signalfd = have_inc "sys/signalfd.h";
249$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD}; 294$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
250$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/)); 295$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/));
296
297print <<EOF;
298
299*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
300
301
302Libev contains numerous internal assert() invocations to check for
303consistency and user errors. These are normally enabled, but most
304perl builds disable this error reporting mechanism by default. You
305can re-enable these asserts here. Enabling them might help you catch
306programming bugs earlier, but might cause a small slowdown. Also, failures
307will be reported by aboritng your program, instead of throwing a perl
308exception.
309
310If unsure, enable this if you only use this perl installation for
311development, and leave it off for use in production environments.
312
313EOF
314
315my $enable_assertions = 0;
316$enable_assertions = 0 + (prompt ("Make sure assertions are enabled? (y/n)?", $enable_assertions ? "y" : "n") =~ /[yY]/);
317$DEFINE .= " -DEV_ENABLE_ASERTIONS=1" if $enable_assertions;
251 318
252print <<EOF; 319print <<EOF;
253 320
254*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 321*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
255 322
… …
283 COMPRESS => 'gzip -9v', 350 COMPRESS => 'gzip -9v',
284 SUFFIX => '.gz', 351 SUFFIX => '.gz',
285 }, 352 },
286 depend => { 353 depend => {
287 "EV.c" => "EV/EVAPI.h " 354 "EV.c" => "EV/EVAPI.h "
288 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 355 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c libev/ev_linuxaio.c "
289 . "libev/ev_vars.h libev/ev_wrap.h", 356 . "libev/ev_vars.h libev/ev_wrap.h",
290 }, 357 },
291 INC => "-Ilibev", 358 INC => "-Ilibev",
292 DEFINE => "$DEFINE", 359 DEFINE => "$DEFINE",
293 NAME => "EV", 360 NAME => "EV",
294 LIBS => [$LIBS], 361 LIBS => [$LIBS],
295 PREREQ_PM => { 362 PREREQ_PM => {
296 @anyevent, 363 @anyevent,
297 "common::sense" => 0, 364 "common::sense" => 0,
298 }, 365 },
366 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
299 VERSION_FROM => "EV.pm", 367 VERSION_FROM => "EV.pm",
300 PM => { 368 PM => {
301 'EV.pm' => '$(INST_LIB)/EV.pm', 369 'EV.pm' => '$(INST_LIB)/EV.pm',
302 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h', 370 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
303 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm', 371 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
… …
309 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 377 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
310 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)', 378 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
311 }, 379 },
312); 380);
313 381
314

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines