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

Comparing EV/Makefile.PL (file contents):
Revision 1.34 by root, Thu Oct 2 12:26:25 2008 UTC vs.
Revision 1.63 by root, Fri Jul 12 06:18:37 2019 UTC

1use 5.006; 1use strict qw(vars subs);
2 2use Canary::Stability EV => 1, 5.008002;
3use Config; 3use Config;
4use ExtUtils::MakeMaker; 4use ExtUtils::MakeMaker;
5 5
6sub have_inc($) {
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8}
9
10my $DEFINE;
11
6unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_linuxaio.c") {
7 print <<EOF; 13 print <<EOF;
8 14
9*** 15***
10*** 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,
11*** 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
34 40
35*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 41*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
36 42
37 43
38POSIX optionally offers support for a monotonic clock source. EV 44POSIX optionally offers support for a monotonic clock source. EV
39can take advantage of this clock source to detect time jumps 45can take advantage of this clock source to detect time jumps more
40reliably. Unfortunately, some systems are bound to be broken, so you can 46reliably. Unfortunately, some systems are bound to be broken, so you can
41disable this here: you can completely disable the detection and use of 47disable this here: you can completely disable the detection and use of
42the monotonic clock by answering 'n' here. Support for this clock type 48the monotonic clock by answering 'n' here. Support for this clock type
43will otherwise be autodetected at both compile- and runtime. (this setting 49will otherwise be autodetected at both compile- and runtime. (this setting
44currently affects the use of nanosleep over select as well). 50currently affects the use of nanosleep over select as well).
45 51
46EOF 52EOF
47 53
48$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}
49 57
50print <<EOF; 58print <<EOF;
51 59
52*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
53 61
54 62
55POSIX optionally offers support for a (potentially) high-resolution 63POSIX optionally offers support for a (potentially) high-resolution
56realtime clock interface. In a good implementation, using it is faster 64realtime clock interface. In a good implementation, using it is faster
57than the normal method of using gettimeofday. Unfortunately, this option 65than the normal method of using gettimeofday. Unfortunately, this option
58is also bound to be broken on some systems, so you can disable use and 66is also bound to be broken on some systems, and current EV versions do not
59probing of this feature altogether here. Otherwise support for this clock 67actually call gettimeofday very often, so it defaults to no.
60type will be autodetected at compiletime.
61 68
62EOF 69EOF
63 70
64$DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "y") =~ /[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
71Another useful bit of functionality is the Linux eventfd, which is useful
72for faster signal handling (don't care) and intra-thread communications
73(mostly useful for embedding). Kernel support for this will be probed at
74runtime, but your libc must contain the necessary wrapper. Glibc 2.7 and
75later should have this wrapper.
76
77EOF
78
79$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", (-e "/usr/include/sys/eventfd.h") || $ENV{EV_EVENTFD} ? "y" : "n") =~ /[yY]/));
80
81print <<EOF;
82
83*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
84
85
86EV can use various backends with various portability issue. The select 78EV can use various backends with various portability issues. The select
87backend 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
88limited 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
89you 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
90with 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
91OS, via the next question. I highly recommend keeping it in. 83OS, via the next question. I highly recommend keeping it in.
108 100
109EOF 101EOF
110 102
111 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]/) {
112 $DEFINE .= " -DEV_SELECT_USE_FD_SET"; 104 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
113 } 105 }
114} else { 106} else {
115 $DEFINE .= " -DEV_USE_SELECT=0"; 107 $DEFINE .= " -DEV_USE_SELECT=0";
116} 108}
117 109
118print <<EOF; 110print <<EOF;
119 111
120*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 112*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
121 113
125doesn'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
126the 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.
127 119
128EOF 120EOF
129 121
130$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]/));
131 123
132print <<EOF; 124print <<EOF;
133 125
134*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 126*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
135 127
142fall 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
143the default. 135the default.
144 136
145EOF 137EOF
146 138
139my $can_epoll = have_inc "sys/epoll.h";
140$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
147$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", (-e "/usr/include/sys/epoll.h") ? "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}
148 184
149print <<EOF; 185print <<EOF;
150 186
151*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
152 188
155many 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
156safe fallback to other methods when it cannot be used. 192safe fallback to other methods when it cannot be used.
157 193
158Note 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
159won'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
160loop with qkueue backend. 196loop with kqueue backend if you ask specifically for it.
161 197
162Here is what we know: 198Here is what we know:
163 199
164NetBSD: partially working in at least 3.1. Yeah! :) 200NetBSD: partially working in at least 3.1 and later. Yeah! :)
165FreeBSD: broken on at least 6.2-STABLE, 201FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
166 sockets *likely* work, ptys definitely don't. 202 sockets *likely* work, ptys definitely don't.
167OpenBSD: reports indicate that it likely doesn't work 203OpenBSD: reports indicate that it likely doesn't work
168 (similar problems as on FreeBSD). 204 (similar problems as on FreeBSD).
169OS X: completely, utterly broken on at least < 10.5. 205OS X: completely, utterly broken on at least <= 10.6.
170 206
171EOF 207EOF
172 208
173my $can_kqueue = -e "/usr/include/sys/event.h"; 209# minix has all the header files, but no implementation. won-der-ful.
174 210my $can_kqueue = have_inc "sys/event.h" && $^O ne "minix";
211$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
175$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/)); 212$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
176 213
177print <<EOF; 214print <<EOF;
178 215
179*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 216*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
183solaris 10 event port interface. Support for event ports will be detected 220solaris 10 event port interface. Support for event ports will be detected
184at runtime, with a safe fallback to other methods when it cannot be used. 221at runtime, with a safe fallback to other methods when it cannot be used.
185 222
186EOF 223EOF
187 224
188$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (-e "/usr/include/sys/port.h") ? "y" : "n") =~ /[yY]/)); 225$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
189 226
190print <<EOF; 227print <<EOF;
191 228
192*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 229*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
193 230
195EV needs the functions pthread_atfork and clock_gettime. On most systems 232EV needs the functions pthread_atfork and clock_gettime. On most systems
196you need some special libraries for this (such as -lrt and -lpthread). You 233you need some special libraries for this (such as -lrt and -lpthread). You
197can specify additional libraries to provide these calls (and any other 234can specify additional libraries to provide these calls (and any other
198required by EV) now, or accept the default. 235required by EV) now, or accept the default.
199 236
200EOF 237On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
238to avoid the dependency on libpthread, and directly uses the clock_gettime
239syscall to avoid a dependency on librt.
201 240
241EOF
242
202$SOLARIS_LIBS = $^O =~ /solaris/ ? " -lsocket -lnsl" : ""; 243my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
203 244my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
245my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
204$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "-lpthread -lrt$SOLARIS_LIBS"; 246$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
205 247
206 248
207print <<EOF; 249print <<EOF;
208 250
209*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 251*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
210 252
211 253
212A backend of a different kind is the Linux inotify(7) interface, which can 254A backend of a different kind is the Linux inotify(7) interface, which can
213be used to speed up (and reduce resource consumption) of stat watchers. If 255be used to speed up (and reduce resource consumption) of stat watchers. If
214you have it, it is usually a good idea to enable it. 256you have the include file and libc support for it, it is usually a good
257idea to enable it, as kernel availability is detected at runtime.
215 258
216EOF 259EOF
217 260
218my $can_inotify = -e "/usr/include/sys/inotify.h"; 261my $can_inotify = have_inc "sys/inotify.h";
219 262$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
220$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/)); 263$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
221 264
222print <<EOF; 265print <<EOF;
223 266
224*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 267*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
225 268
226 269
227EOF 270Another useful bit of functionality is the Linux eventfd, which is useful
271for faster signal handling (don't care) and intra-thread communications
272(more relevant). Kernel support for this will be probed at runtime, but
273your libc must contain the necessary wrapper. Glibc 2.7 and later should
274have this wrapper.
228 275
276EOF
277
278my $can_eventfd = have_inc "sys/eventfd.h";
279$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
280$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
281
282print <<EOF;
283
284*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
285
286
287Another sometimes useful bit of functionality is the Linux signalfd, which
288is useful for faster signal handling (don't care). Kernel support for
289this will be probed at runtime, but your libc must contain the necessary
290wrapper. Glibc 2.7 and later should have this wrapper.
291
292EOF
293
294my $can_signalfd = have_inc "sys/signalfd.h";
295$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
296$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/));
297
298print <<EOF;
299
300*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
301
302
303Libev contains numerous internal assert() invocations to check for
304consistency and user errors. These are normally enabled, but most
305perl builds disable this error reporting mechanism by default. You
306can re-enable these asserts here. Enabling them might help you catch
307programming bugs earlier, but might cause a small slowdown. Also, failures
308will be reported by aboritng your program, instead of throwing a perl
309exception.
310
311If unsure, enable this if you only use this perl installation for
312development, and leave it off for use in production environments.
313
314EOF
315
316my $enable_assertions = 0;
317$enable_assertions = 0 + (prompt ("Make sure assertions are enabled? (y/n)?", $enable_assertions ? "y" : "n") =~ /[yY]/);
318$DEFINE .= " -DEV_ENABLE_ASERTIONS=1" if $enable_assertions;
319
320print <<EOF;
321
322*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
323
324
325Very rarely, people want to tweak EV even more, e.g. to exclude
326or include certain watcher types or backends. This can be done by adding
327extra -D options here, or via the EV_EXTRA_DEFS environment variable.
328
329For example, if you run into compile problems because of missing memory
330fences (or you just want extra performance), you can tell EV to not support
331smp and threads via -DEV_NO_THREADS.
332
333Normal persons just press enter.
334
335EOF
336
337$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
338
339print <<EOF;
340
341*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
342
343
344EOF
345
229my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 2.6 } ? (AnyEvent => 2.6) : (); 346my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
230 347
231WriteMakefile( 348WriteMakefile(
232 dist => { 349 dist => {
233 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', 350 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
234 COMPRESS => 'gzip -9v', 351 COMPRESS => 'gzip -9v',
235 SUFFIX => '.gz', 352 SUFFIX => '.gz',
236 }, 353 },
237 depend => { 354 depend => {
238 "EV.c" => "EV/EVAPI.h " 355 "EV.c" => "EV/EVAPI.h "
239 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 356 . "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 "
240 . "libev/ev_vars.h libev/ev_wrap.h", 357 . "libev/ev_vars.h libev/ev_wrap.h",
241 }, 358 },
242 INC => "-Ilibev", 359 INC => "-Ilibev",
243 DEFINE => "$DEFINE", 360 DEFINE => "$DEFINE",
244 NAME => "EV", 361 NAME => "EV",
245 LIBS => [$LIBS], 362 LIBS => [$LIBS],
246 PREREQ_PM => { 363 PREREQ_PM => {
247 @anyevent, 364 @anyevent,
365 "common::sense" => 0,
248 }, 366 },
367 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
249 VERSION_FROM => "EV.pm", 368 VERSION_FROM => "EV.pm",
250 PM => { 369 PM => {
251 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 370 'EV.pm' => '$(INST_LIB)/EV.pm',
252 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 371 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
253 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 372 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
254 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 373 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
255 'libev/ev.pod' => '$(INST_LIBDIR)/EV/c_doc.pod', 374 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
256 }, 375 },
257 MAN3PODS => { 376 MAN3PODS => {
258 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)', 377 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
259 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)', 378 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
260 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::c_doc.$(MAN3EXT)', 379 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
261 }, 380 },
262); 381);
263 382
264

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines