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

Comparing EV/Makefile.PL (file contents):
Revision 1.60 by root, Mon Jun 24 21:38:08 2019 UTC vs.
Revision 1.66 by root, Fri Nov 22 14:44:08 2019 UTC

… …
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth} 7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8} 8}
9 9
10my $DEFINE; 10my $DEFINE;
11 11
12unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_iouring.c") {
13 print <<EOF; 13 print <<EOF;
14 14
15*** 15***
16*** 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,
17*** 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
… …
113 113
114 114
115The 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
116and 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
117doesn'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
118the 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.
119 119
120EOF 120EOF
121 121
122$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]/));
123 123
… …
185print <<EOF; 185print <<EOF;
186 186
187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
188 188
189 189
190Similarly to the epoll backend above, EV can take advantage of kqueue on 190Linux 4.19 introduced another event polling interface, "io_uring". While
191many BSD systems. Support for kqueue will be detected at runtime, with a 191this API is far superior to epoll and almost rivals linuxaio, it also
192safe fallback to other methods when it cannot be used. 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.
193 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
194Note 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
195won'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
196loop with kqueue backend if you ask specifically for it. 237event loop with kqueue backend if you ask specifically for it.
197 238
198Here is what we know: 239Here is what we know:
199 240
200NetBSD: partially working in at least 3.1 and later. Yeah! :) 241NetBSD: partially working in at least 3.1 and later. Yeah! :)
201FreeBSD: broken on at least 6.2-STABLE, spotty in later versions, 242FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
… …
204 (similar problems as on FreeBSD). 245 (similar problems as on FreeBSD).
205OS X: completely, utterly broken on at least <= 10.6. 246OS X: completely, utterly broken on at least <= 10.6.
206 247
207EOF 248EOF
208 249
250# minix has all the header files, but no implementation. won-der-ful.
209my $can_kqueue = have_inc "sys/event.h"; 251my $can_kqueue = have_inc "sys/event.h" && $^O ne "minix";
210$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE}; 252$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
211$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]/));
212 254
213print <<EOF; 255print <<EOF;
214 256
… …
297print <<EOF; 339print <<EOF;
298 340
299*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 341*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
300 342
301 343
344Libev contains numerous internal assert() invocations to check for
345consistency and user errors. These are normally enabled, but most
346perl builds disable this error reporting mechanism by default. You
347can re-enable these asserts here. Enabling them might help you catch
348programming bugs earlier, but might cause a small slowdown. Also, failures
349will be reported by aboritng your program, instead of throwing a perl
350exception.
351
352If unsure, enable this if you only use this perl installation for
353development, and leave it off for use in production environments.
354
355EOF
356
357my $enable_assertions = 0;
358$enable_assertions = 0 + (prompt ("Make sure assertions are enabled? (y/n)?", $enable_assertions ? "y" : "n") =~ /[yY]/);
359$DEFINE .= " -DEV_ENABLE_ASERTIONS=1" if $enable_assertions;
360
361print <<EOF;
362
363*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
364
365
302Very rarely, people want to tweak EV even more, e.g. to exclude 366Very rarely, people want to tweak EV even more, e.g. to exclude
303or include certain watcher types or backends. This can be done by adding 367or include certain watcher types or backends. This can be done by adding
304extra -D options here, or via the EV_EXTRA_DEFS environment variable. 368extra -D options here, or via the EV_EXTRA_DEFS environment variable.
305 369
306For example, if you run into compile problems because of missing memory 370For example, if you run into compilation problems because of missing memory
307fences (or you just want extra performance), you can tell EV to not support 371fences (or you just want extra performance), you can tell EV to not support
308smp and threads via -DEV_NO_THREADS. 372smp and threads via -DEV_NO_THREADS.
309 373
310Normal persons just press enter. 374Most people would just press enter.
311 375
312EOF 376EOF
313 377
314$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}"; 378$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
315 379
… …
328 COMPRESS => 'gzip -9v', 392 COMPRESS => 'gzip -9v',
329 SUFFIX => '.gz', 393 SUFFIX => '.gz',
330 }, 394 },
331 depend => { 395 depend => {
332 "EV.c" => "EV/EVAPI.h " 396 "EV.c" => "EV/EVAPI.h "
333 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 397 . "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 "
334 . "libev/ev_vars.h libev/ev_wrap.h", 398 . "libev/ev_vars.h libev/ev_wrap.h",
335 }, 399 },
336 INC => "-Ilibev", 400 INC => "-Ilibev",
337 DEFINE => "$DEFINE", 401 DEFINE => "$DEFINE",
338 NAME => "EV", 402 NAME => "EV",
… …
355 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 419 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
356 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)', 420 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
357 }, 421 },
358); 422);
359 423
360

Diff Legend

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