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

Comparing EV/Makefile.PL (file contents):
Revision 1.50 by root, Thu Dec 30 07:43:03 2010 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
6sub have_inc($) {
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8}
9
10my $DEFINE;
11
7unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_iouring.c") {
8 print <<EOF; 13 print <<EOF;
9 14
10*** 15***
11*** 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,
12*** 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
44will otherwise be autodetected at both compile- and runtime. (this setting 49will otherwise be autodetected at both compile- and runtime. (this setting
45currently affects the use of nanosleep over select as well). 50currently affects the use of nanosleep over select as well).
46 51
47EOF 52EOF
48 53
49my $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}
50 57
51print <<EOF; 58print <<EOF;
52 59
53*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
54 61
93 100
94EOF 101EOF
95 102
96 if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) { 103 if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) {
97 $DEFINE .= " -DEV_SELECT_USE_FD_SET"; 104 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
98 } 105 }
99} else { 106} else {
100 $DEFINE .= " -DEV_USE_SELECT=0"; 107 $DEFINE .= " -DEV_USE_SELECT=0";
101} 108}
102 109
103print <<EOF; 110print <<EOF;
104 111
105*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 112*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
106 113
107 114
108The 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
109and 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
110doesn'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
111the 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.
112 119
113EOF 120EOF
114 121
115$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (-e "/usr/include/poll.h") ? "y" : "n") =~ /[yY]/)); 122$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (have_inc "poll.h") ? "y" : "n") =~ /[yY]/));
116 123
117print <<EOF; 124print <<EOF;
118 125
119*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 126*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
120 127
127fall back to using select when epoll isn't available. If unsure, accept 134fall back to using select when epoll isn't available. If unsure, accept
128the default. 135the default.
129 136
130EOF 137EOF
131 138
132my $can_epoll = -e "/usr/include/sys/epoll.h"; 139my $can_epoll = have_inc "sys/epoll.h";
133$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL}; 140$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
134$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/)); 141$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/));
135 142
136print <<EOF; 143print <<EOF;
137 144
138*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
139 146
140 147
141Similarly to the epoll backend above, EV can take advantage of kqueue on 148Linux 4.18 introduced another event polling interface, this time using
142many 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
143safe 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.
144 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
145Note 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
146won'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
147loop with kqueue backend if you ask specifically for it. 237event loop with kqueue backend if you ask specifically for it.
148 238
149Here is what we know: 239Here is what we know:
150 240
151NetBSD: partially working in at least 3.1 and later. Yeah! :) 241NetBSD: partially working in at least 3.1 and later. Yeah! :)
152FreeBSD: broken on at least 6.2-STABLE, spotty in later versions, 242FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
155 (similar problems as on FreeBSD). 245 (similar problems as on FreeBSD).
156OS X: completely, utterly broken on at least <= 10.6. 246OS X: completely, utterly broken on at least <= 10.6.
157 247
158EOF 248EOF
159 249
160my $can_kqueue = -e "/usr/include/sys/event.h"; 250# minix has all the header files, but no implementation. won-der-ful.
251my $can_kqueue = have_inc "sys/event.h" && $^O ne "minix";
161$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE}; 252$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
162$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]/));
163 254
164print <<EOF; 255print <<EOF;
165 256
170solaris 10 event port interface. Support for event ports will be detected 261solaris 10 event port interface. Support for event ports will be detected
171at runtime, with a safe fallback to other methods when it cannot be used. 262at runtime, with a safe fallback to other methods when it cannot be used.
172 263
173EOF 264EOF
174 265
175$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (-e "/usr/include/sys/port.h") ? "y" : "n") =~ /[yY]/)); 266$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
176 267
177print <<EOF; 268print <<EOF;
178 269
179*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 270*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
180 271
182EV needs the functions pthread_atfork and clock_gettime. On most systems 273EV needs the functions pthread_atfork and clock_gettime. On most systems
183you need some special libraries for this (such as -lrt and -lpthread). You 274you need some special libraries for this (such as -lrt and -lpthread). You
184can specify additional libraries to provide these calls (and any other 275can specify additional libraries to provide these calls (and any other
185required by EV) now, or accept the default. 276required by EV) now, or accept the default.
186 277
278On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
279to avoid the dependency on libpthread, and directly uses the clock_gettime
280syscall to avoid a dependency on librt.
281
187EOF 282EOF
188 283
189my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : ""; 284my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
190#my $librt = $^O =~ /linux/i ? "-lpthread" : "-lpthread -lrt"; 285my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
191my $librt = "-lpthread -lrt"; 286my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
192my $LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "$librt $solaris_libs"; 287$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
193 288
194 289
195print <<EOF; 290print <<EOF;
196 291
197*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 292*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
202you have the include file and libc support for it, it is usually a good 297you have the include file and libc support for it, it is usually a good
203idea to enable it, as kernel availability is detected at runtime. 298idea to enable it, as kernel availability is detected at runtime.
204 299
205EOF 300EOF
206 301
207my $can_inotify = -e "/usr/include/sys/inotify.h"; 302my $can_inotify = have_inc "sys/inotify.h";
208$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY}; 303$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
209$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/)); 304$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
210 305
211print <<EOF; 306print <<EOF;
212 307
219your libc must contain the necessary wrapper. Glibc 2.7 and later should 314your libc must contain the necessary wrapper. Glibc 2.7 and later should
220have this wrapper. 315have this wrapper.
221 316
222EOF 317EOF
223 318
224my $can_eventfd = -e "/usr/include/sys/eventfd.h"; 319my $can_eventfd = have_inc "sys/eventfd.h";
225$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD}; 320$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
226$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/)); 321$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
227 322
228print <<EOF; 323print <<EOF;
229 324
235this will be probed at runtime, but your libc must contain the necessary 330this will be probed at runtime, but your libc must contain the necessary
236wrapper. Glibc 2.7 and later should have this wrapper. 331wrapper. Glibc 2.7 and later should have this wrapper.
237 332
238EOF 333EOF
239 334
240my $can_signalfd = -e "/usr/include/sys/signalfd.h"; 335my $can_signalfd = have_inc "sys/signalfd.h";
241$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD}; 336$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
242$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/)); 337$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/));
243 338
244print <<EOF; 339print <<EOF;
245 340
246*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 341*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
247 342
248 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
249Very 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
250or incldue certain watcher types or backends. Thisc na be done by adding 384or include certain watcher types or backends. This can be done by adding
251extra -D options here, or via the EV_EXTRA_DEFS environment variable. 385extra -D options here, or via the EV_EXTRA_DEFS environment variable.
252Normal persons just press enter. 386
387For example, if you run into compilation problems because of missing memory
388fences (or you just want extra performance), you can tell EV to not support
389smp and threads via -DEV_NO_THREADS.
390
391Most people would just press enter.
253 392
254EOF 393EOF
255 394
256$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}"; 395$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
257 396
270 COMPRESS => 'gzip -9v', 409 COMPRESS => 'gzip -9v',
271 SUFFIX => '.gz', 410 SUFFIX => '.gz',
272 }, 411 },
273 depend => { 412 depend => {
274 "EV.c" => "EV/EVAPI.h " 413 "EV.c" => "EV/EVAPI.h "
275 . "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 "
276 . "libev/ev_vars.h libev/ev_wrap.h", 415 . "libev/ev_vars.h libev/ev_wrap.h",
277 }, 416 },
278 INC => "-Ilibev", 417 INC => "-Ilibev",
279 DEFINE => "$DEFINE", 418 DEFINE => "$DEFINE",
280 NAME => "EV", 419 NAME => "EV",
281 LIBS => [$LIBS], 420 LIBS => [$LIBS],
282 PREREQ_PM => { 421 PREREQ_PM => {
283 @anyevent, 422 @anyevent,
284 "common::sense" => 0, 423 "common::sense" => 0,
285 }, 424 },
425 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
286 VERSION_FROM => "EV.pm", 426 VERSION_FROM => "EV.pm",
287 PM => { 427 PM => {
288 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 428 'EV.pm' => '$(INST_LIB)/EV.pm',
289 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 429 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
290 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 430 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
291 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 431 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
292 'libev/ev.pod' => '$(INST_LIBDIR)/EV/libev.pod', 432 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
293 }, 433 },
294 MAN3PODS => { 434 MAN3PODS => {
295 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)', 435 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
296 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 436 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
297 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)', 437 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
298 }, 438 },
299); 439);
300 440
301

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines