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

Comparing EV/Makefile.PL (file contents):
Revision 1.39 by root, Fri Feb 6 20:17:43 2009 UTC vs.
Revision 1.60 by root, Mon Jun 24 21:38:08 2019 UTC

1use 5.006;
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;
5
6sub have_inc($) {
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8}
9
10my $DEFINE;
6 11
7unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_epoll.c") {
8 print <<EOF; 13 print <<EOF;
9 14
10*** 15***
… …
35 40
36*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 41*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
37 42
38 43
39POSIX optionally offers support for a monotonic clock source. EV 44POSIX optionally offers support for a monotonic clock source. EV
40can take advantage of this clock source to detect time jumps 45can take advantage of this clock source to detect time jumps more
41reliably. Unfortunately, some systems are bound to be broken, so you can 46reliably. Unfortunately, some systems are bound to be broken, so you can
42disable this here: you can completely disable the detection and use of 47disable this here: you can completely disable the detection and use of
43the monotonic clock by answering 'n' here. Support for this clock type 48the monotonic clock by answering 'n' here. Support for this clock type
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
55 62
56POSIX optionally offers support for a (potentially) high-resolution 63POSIX optionally offers support for a (potentially) high-resolution
57realtime clock interface. In a good implementation, using it is faster 64realtime clock interface. In a good implementation, using it is faster
58than the normal method of using gettimeofday. Unfortunately, this option 65than the normal method of using gettimeofday. Unfortunately, this option
59is also bound to be broken on some systems, and current EV versions do not 66is also bound to be broken on some systems, and current EV versions do not
60actually call C<gettimeofday> very often, so ti defaults to no. 67actually call gettimeofday very often, so it defaults to no.
61 68
62EOF 69EOF
63 70
64$DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "n") =~ /[yY]/)); 71$DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "n") =~ /[yY]/));
65 72
66print <<EOF; 73print <<EOF;
67 74
68*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 75*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
69 76
70 77
71EV can use various backends with various portability issue. The select 78EV can use various backends with various portability issues. The select
72backend is the most portable and makes for a good fallback, but it can be 79backend is the most portable and makes for a good fallback, but it can be
73limited to a low number of file descriptors and/or might not compile. If 80limited to a low number of file descriptors and/or might not compile. If
74you have problems with compiling ev_select.c, you might try to play around 81you have problems with compiling ev_select.c, you might try to play around
75with disabling it here, or forcing it to use the fd_set provided by your 82with disabling it here, or forcing it to use the fd_set provided by your
76OS, via the next question. I highly recommend keeping it in. 83OS, via the next question. I highly recommend keeping it in.
… …
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
… …
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 compile 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]/));
142
143print <<EOF;
144
145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
146
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}
135 184
136print <<EOF; 185print <<EOF;
137 186
138*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
139 188
… …
142many 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
143safe fallback to other methods when it cannot be used. 192safe fallback to other methods when it cannot be used.
144 193
145Note 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
146won't be used on many platforms, but you can still create your own event 195won't be used on many platforms, but you can still create your own event
147loop with kqueue backend. 196loop with kqueue backend if you ask specifically for it.
148 197
149Here is what we know: 198Here is what we know:
150 199
151NetBSD: partially working in at least 3.1. Yeah! :) 200NetBSD: partially working in at least 3.1 and later. Yeah! :)
152FreeBSD: broken on at least 6.2-STABLE, 201FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
153 sockets *likely* work, ptys definitely don't. 202 sockets *likely* work, ptys definitely don't.
154OpenBSD: reports indicate that it likely doesn't work 203OpenBSD: reports indicate that it likely doesn't work
155 (similar problems as on FreeBSD). 204 (similar problems as on FreeBSD).
156OS X: completely, utterly broken on at least < 10.5. 205OS X: completely, utterly broken on at least <= 10.6.
157 206
158EOF 207EOF
159 208
160my $can_kqueue = -e "/usr/include/sys/event.h"; 209my $can_kqueue = have_inc "sys/event.h";
161$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE}; 210$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]/)); 211$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
163 212
164print <<EOF; 213print <<EOF;
165 214
… …
170solaris 10 event port interface. Support for event ports will be detected 219solaris 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. 220at runtime, with a safe fallback to other methods when it cannot be used.
172 221
173EOF 222EOF
174 223
175$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (-e "/usr/include/sys/port.h") ? "y" : "n") =~ /[yY]/)); 224$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
176 225
177print <<EOF; 226print <<EOF;
178 227
179*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 228*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
180 229
… …
182EV needs the functions pthread_atfork and clock_gettime. On most systems 231EV needs the functions pthread_atfork and clock_gettime. On most systems
183you need some special libraries for this (such as -lrt and -lpthread). You 232you need some special libraries for this (such as -lrt and -lpthread). You
184can specify additional libraries to provide these calls (and any other 233can specify additional libraries to provide these calls (and any other
185required by EV) now, or accept the default. 234required by EV) now, or accept the default.
186 235
236On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
237to avoid the dependency on libpthread, and directly uses the clock_gettime
238syscall to avoid a dependency on librt.
239
187EOF 240EOF
188 241
189my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : ""; 242my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
190my $librt = $^O =~ /linux/i ? "-lpthread" : "-lpthread -lrt"; 243my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
244my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
191my $LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "$librt $solaris_libs"; 245$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
192 246
193 247
194print <<EOF; 248print <<EOF;
195 249
196*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 250*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
197 251
198 252
199A backend of a different kind is the Linux inotify(7) interface, which can 253A backend of a different kind is the Linux inotify(7) interface, which can
200be used to speed up (and reduce resource consumption) of stat watchers. If 254be used to speed up (and reduce resource consumption) of stat watchers. If
201you have it, it is usually a good idea to enable it. 255you have the include file and libc support for it, it is usually a good
256idea to enable it, as kernel availability is detected at runtime.
202 257
203EOF 258EOF
204 259
205my $can_inotify = -e "/usr/include/sys/inotify.h"; 260my $can_inotify = have_inc "sys/inotify.h";
206$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY}; 261$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
207$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/)); 262$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
208 263
209print <<EOF; 264print <<EOF;
210 265
… …
217your libc must contain the necessary wrapper. Glibc 2.7 and later should 272your libc must contain the necessary wrapper. Glibc 2.7 and later should
218have this wrapper. 273have this wrapper.
219 274
220EOF 275EOF
221 276
222my $can_eventfd = -e "/usr/include/sys/eventfd.h"; 277my $can_eventfd = have_inc "sys/eventfd.h";
223$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD}; 278$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
224$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/)); 279$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
225 280
226print <<EOF; 281print <<EOF;
227 282
228*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 283*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
229 284
230 285
231EOF 286Another sometimes useful bit of functionality is the Linux signalfd, which
287is useful for faster signal handling (don't care). Kernel support for
288this will be probed at runtime, but your libc must contain the necessary
289wrapper. Glibc 2.7 and later should have this wrapper.
232 290
291EOF
292
293my $can_signalfd = have_inc "sys/signalfd.h";
294$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
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
302Very 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
304extra -D options here, or via the EV_EXTRA_DEFS environment variable.
305
306For example, if you run into compile problems because of missing memory
307fences (or you just want extra performance), you can tell EV to not support
308smp and threads via -DEV_NO_THREADS.
309
310Normal persons just press enter.
311
312EOF
313
314$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
315
316print <<EOF;
317
318*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
319
320
321EOF
322
233my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 2.6 } ? (AnyEvent => 2.6) : (); 323my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
234 324
235WriteMakefile( 325WriteMakefile(
236 dist => { 326 dist => {
237 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', 327 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
238 COMPRESS => 'gzip -9v', 328 COMPRESS => 'gzip -9v',
… …
247 DEFINE => "$DEFINE", 337 DEFINE => "$DEFINE",
248 NAME => "EV", 338 NAME => "EV",
249 LIBS => [$LIBS], 339 LIBS => [$LIBS],
250 PREREQ_PM => { 340 PREREQ_PM => {
251 @anyevent, 341 @anyevent,
342 "common::sense" => 0,
252 }, 343 },
344 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
253 VERSION_FROM => "EV.pm", 345 VERSION_FROM => "EV.pm",
254 PM => { 346 PM => {
255 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 347 'EV.pm' => '$(INST_LIB)/EV.pm',
256 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 348 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
257 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 349 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
258 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 350 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
259 'libev/ev.pod' => '$(INST_LIBDIR)/EV/libev.pod', 351 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
260 }, 352 },
261 MAN3PODS => { 353 MAN3PODS => {
262 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)', 354 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
263 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 355 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
264 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)', 356 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',

Diff Legend

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