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

Comparing EV/Makefile.PL (file contents):
Revision 1.56 by root, Sat Sep 6 19:03:28 2014 UTC vs.
Revision 1.68 by root, Tue Feb 18 18:26:47 2020 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
11my $DEFINE; 10my $DEFINE;
12 11
13unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_iouring.c") {
14 print <<EOF; 13 print <<EOF;
15 14
16*** 15***
17*** 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,
18*** 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
114 113
115 114
116The second very portable backend is poll(2). It does not exist on windows 115The second very portable backend is poll(2). It does not exist on windows
117and various versions of Mac OS X (and on the other versions it simply 116and various versions of Mac OS X (and on the other versions it simply
118doesn't work), but works basically everywhere else. It is recommended to use 117doesn't work), but works basically everywhere else. It is recommended to use
119the default here unless you run into compile problems in ev_poll.c. 118the default here unless you run into compilation problems in ev_poll.c.
120 119
121EOF 120EOF
122 121
123$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (have_inc "poll.h") ? "y" : "n") =~ /[yY]/)); 122$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (have_inc "poll.h") ? "y" : "n") =~ /[yY]/));
124 123
144print <<EOF; 143print <<EOF;
145 144
146*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
147 146
148 147
149Similarly to the epoll backend above, EV can take advantage of kqueue on 148Linux 4.18 introduced another event polling interface, this time using
150many BSD systems. Support for kqueue will be detected at runtime, with a 149the Linux AIO API. While this API is far superior to epoll and almost
151safe fallback to other methods when it cannot be used. 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.
152 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
190Linux 4.19 introduced another event polling interface, "io_uring". While
191this API is far superior to epoll and almost rivals linuxaio, it also
192suffers from the same issues as kqueue typically does: only a subset of
193file types are supported (as of 5.2). It is also very buggy still, and
194most importantly, very very slow for most workloads. Therefore, this
195backend is not used by default, even when it is compiled in, and you have
196to request it explicitly, e.g. with LIBEV_FLAGS=128. If unsure, accept the
197default.
198
199EOF
200
201my $can_iouring = have_inc "linux/fs.h";
202$can_iouring = $ENV{EV_IOURING} if exists $ENV{EV_IOURING};
203$can_iouring = 0 + (prompt ("Enable linux io_uring backend (y/n)?", $can_iouring ? "y" : "n") =~ /[yY]/);
204$DEFINE .= " -DEV_USE_IOURING=$can_iouring";
205
206if ($can_iouring) {
207print <<EOF;
208
209*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
210
211
212The previously mentioned Linux io_uring is experimental and will not be
213used unless requested explicitly. You can, howeer, choose to make ti a
214recommended basckend, which means it will be chosen if available even when
215not explicitly asked for, in preference to epoll on GNU/Linux. This option
216is likely temporary. When unsure, accept the default.
217
218EOF
219
220my $recommend_iouring = 0;
221$recommend_iouring = $ENV{EV_RECOMMEND_IOURING} if exists $ENV{EV_RECOMMEND_IOURING};
222$recommend_iouring = 0 + (prompt ("Treat io_uring as a recommended backend (y/n)?", $recommend_iouring ? "y" : "n") =~ /[yY]/);
223$DEFINE .= " -DEV_RECOMMEND_IOURING=$recommend_iouring";
224}
225
226print <<EOF;
227
228*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
229
230
231EV can take advantage of kqueue on many BSD systems. Support for kqueue
232will be detected at runtime, with a safe fallback to other methods when it
233cannot be used.
234
153Note that kqueue is broken on most operating systems, so by default it 235Note that kqueue is subtly broken on most operating systems, so by default
154won't be used on many platforms, but you can still create your own event 236it won't be used on many platforms, but you can still create your own
155loop with kqueue backend if you ask specifically for it. 237event loop with kqueue backend if you ask specifically for it.
156 238
157Here is what we know: 239Here is what we know:
158 240
159NetBSD: partially working in at least 3.1 and later. Yeah! :) 241NetBSD: partially working in at least 3.1 and later. Yeah! :)
160FreeBSD: broken on at least 6.2-STABLE, spotty in later versions, 242FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
163 (similar problems as on FreeBSD). 245 (similar problems as on FreeBSD).
164OS X: completely, utterly broken on at least <= 10.6. 246OS X: completely, utterly broken on at least <= 10.6.
165 247
166EOF 248EOF
167 249
250# minix has all the header files, but no implementation. won-der-ful.
168my $can_kqueue = have_inc "sys/event.h"; 251my $can_kqueue = have_inc "sys/event.h" && $^O ne "minix";
169$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE}; 252$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
170$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/)); 253$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
171 254
172print <<EOF; 255print <<EOF;
173 256
256print <<EOF; 339print <<EOF;
257 340
258*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 341*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
259 342
260 343
344Linux kernels can notify userspace about realtime clock timejumps
345using timerfd. Libev by default will try to take advantage of this if
346possible. You can completely disable the detection and use of timerfd for
347this purpose by answering 'n' here. Support for timerfd will otherwise be
348autodetected at both compile- and runtime.
349
350EOF
351
352unless (prompt ("Enable optional support for timerfd to detect timejumps (y/n)?", "y") =~ /[yY]/) {
353 $DEFINE .= " -DEV_USE_TIMERFD=0";
354}
355
356print <<EOF;
357
358*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
359
360
361Libev contains numerous internal assert() invocations to check for
362consistency and user errors. These are normally enabled, but most
363perl builds disable this error reporting mechanism by default. You
364can re-enable these asserts here. Enabling them might help you catch
365programming bugs earlier, but might cause a small slowdown. Also, failures
366will be reported by aboritng your program, instead of throwing a perl
367exception.
368
369If unsure, enable this if you only use this perl installation for
370development, and leave it off for use in production environments.
371
372EOF
373
374my $enable_assertions = 0;
375$enable_assertions = 0 + (prompt ("Make sure assertions are enabled? (y/n)?", $enable_assertions ? "y" : "n") =~ /[yY]/);
376$DEFINE .= " -DEV_ENABLE_ASSERTIONS=1" if $enable_assertions;
377
378print <<EOF;
379
380*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
381
382
261Very rarely, people want to tweak EV even more, e.g. to exclude 383Very rarely, people want to tweak EV even more, e.g. to exclude
262or include certain watcher types or backends. This can be done by adding 384or include certain watcher types or backends. This can be done by adding
263extra -D options here, or via the EV_EXTRA_DEFS environment variable. 385extra -D options here, or via the EV_EXTRA_DEFS environment variable.
264 386
265For example, if you run into compile problems because of missing memory 387For example, if you run into compilation problems because of missing memory
266fences (or you just want extra performance), you can tell EV to not support 388fences (or you just want extra performance), you can tell EV to not support
267smp and threads via -DEV_NO_THREADS. 389smp and threads via -DEV_NO_THREADS.
268 390
269Normal persons just press enter. 391Most people would just press enter.
270 392
271EOF 393EOF
272 394
273$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}"; 395$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
274 396
287 COMPRESS => 'gzip -9v', 409 COMPRESS => 'gzip -9v',
288 SUFFIX => '.gz', 410 SUFFIX => '.gz',
289 }, 411 },
290 depend => { 412 depend => {
291 "EV.c" => "EV/EVAPI.h " 413 "EV.c" => "EV/EVAPI.h "
292 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 414 . "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 "
293 . "libev/ev_vars.h libev/ev_wrap.h", 415 . "libev/ev_vars.h libev/ev_wrap.h",
294 }, 416 },
295 INC => "-Ilibev", 417 INC => "-Ilibev",
296 DEFINE => "$DEFINE", 418 DEFINE => "$DEFINE",
297 NAME => "EV", 419 NAME => "EV",
298 LIBS => [$LIBS], 420 LIBS => [$LIBS],
299 PREREQ_PM => { 421 PREREQ_PM => {
300 @anyevent, 422 @anyevent,
301 "common::sense" => 0, 423 "common::sense" => 0,
302 }, 424 },
425 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
303 VERSION_FROM => "EV.pm", 426 VERSION_FROM => "EV.pm",
304 PM => { 427 PM => {
305 'EV.pm' => '$(INST_LIB)/EV.pm', 428 'EV.pm' => '$(INST_LIB)/EV.pm',
306 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h', 429 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
307 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm', 430 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
313 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 436 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
314 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)', 437 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
315 }, 438 },
316); 439);
317 440
318

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines