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

Comparing EV/Makefile.PL (file contents):
Revision 1.5 by root, Mon Oct 29 08:48:07 2007 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 ExtUtils::MakeMaker; 4use ExtUtils::MakeMaker;
4 5
6sub have_inc($) {
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8}
9
10my $DEFINE;
11
12unless (-e "libev/ev_linuxaio.c") {
5print <<EOF; 13 print <<EOF;
6 14
7*** 15***
8*** You need to install libevent (http://monkey.org/~provos/libevent/) separately 16*** ERROR: libev is missing or damaged. If you used a CVS check-out of EV,
9*** first in a way so that the Makefile.PL can find both -levent and the event.h 17*** you also have to check-out the "libev" module from the same CVS
10*** and evdns.h include files. 18*** repository into the EV dir (i.e. EV/libev from outside).
11*** 19***
12*** Version 1.3e or higher is recommended, but older 1.3 versions likely work too.
13***
14 20
15EOF 21EOF
22 exit 1;
23}
24
25print <<EOF;
26
27*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
28
29
30Welcome to EV configuration. If you are in a hurry, just press return here
31and hope for the best. The defaults should usually do.
32
33EOF
34
35if (prompt ("Skip further questions and use defaults (y/n)?", "y") =~ /[yY]/) {
36 $ENV{PERL_MM_USE_DEFAULT} = 1;
37}
38
39print <<EOF;
40
41*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
42
43
44POSIX optionally offers support for a monotonic clock source. EV
45can take advantage of this clock source to detect time jumps more
46reliably. Unfortunately, some systems are bound to be broken, so you can
47disable this here: you can completely disable the detection and use of
48the monotonic clock by answering 'n' here. Support for this clock type
49will otherwise be autodetected at both compile- and runtime. (this setting
50currently affects the use of nanosleep over select as well).
51
52EOF
53
54unless (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) {
55 $DEFINE .= " -DEV_USE_MONOTONIC=0";
56}
57
58print <<EOF;
59
60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
61
62
63POSIX optionally offers support for a (potentially) high-resolution
64realtime clock interface. In a good implementation, using it is faster
65than the normal method of using gettimeofday. Unfortunately, this option
66is also bound to be broken on some systems, and current EV versions do not
67actually call gettimeofday very often, so it defaults to no.
68
69EOF
70
71$DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "n") =~ /[yY]/));
72
73print <<EOF;
74
75*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
76
77
78EV can use various backends with various portability issues. The select
79backend is the most portable and makes for a good fallback, but it can be
80limited to a low number of file descriptors and/or might not compile. If
81you have problems with compiling ev_select.c, you might try to play around
82with disabling it here, or forcing it to use the fd_set provided by your
83OS, via the next question. I highly recommend keeping it in.
84
85EOF
86
87if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {
88 $DEFINE .= " -DEV_USE_SELECT=1";
89
90 print <<EOF;
91
92*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
93
94
95The select backend can operate in two modes. One uses the system-provided
96fd_set and is usually limited to 1024 file descriptors (64 on windows),
97the other requires your header files to define NFDBITS and declare a
98suitable fd_mask type. If you run into problems compiling ev_select.c, you
99can try forcing the use of the system fd_set here.
100
101EOF
102
103 if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) {
104 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
105 }
106} else {
107 $DEFINE .= " -DEV_USE_SELECT=0";
108}
109
110print <<EOF;
111
112*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
113
114
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
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.
119
120EOF
121
122$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (have_inc "poll.h") ? "y" : "n") =~ /[yY]/));
123
124print <<EOF;
125
126*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
127
128
129Select and poll make it hard to write efficient servers, especially if the
130number of active connections is much lower than the watched ones. GNU/Linux
131systems have a more scalable method called "epoll", which EV can use. For
132this to work, both your kernel and glibc have to support epoll, but if you
133can compile it, the detection will be done at runtime, and EV will safely
134fall back to using select when epoll isn't available. If unsure, accept
135the default.
136
137EOF
138
139my $can_epoll = have_inc "sys/epoll.h";
140$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
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}
184
185print <<EOF;
186
187*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
188
189
190Similarly to the epoll backend above, EV can take advantage of kqueue on
191many BSD systems. Support for kqueue will be detected at runtime, with a
192safe fallback to other methods when it cannot be used.
193
194Note that kqueue is broken on most operating systems, so by default it
195won't be used on many platforms, but you can still create your own event
196loop with kqueue backend if you ask specifically for it.
197
198Here is what we know:
199
200NetBSD: partially working in at least 3.1 and later. Yeah! :)
201FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
202 sockets *likely* work, ptys definitely don't.
203OpenBSD: reports indicate that it likely doesn't work
204 (similar problems as on FreeBSD).
205OS X: completely, utterly broken on at least <= 10.6.
206
207EOF
208
209# minix has all the header files, but no implementation. won-der-ful.
210my $can_kqueue = have_inc "sys/event.h" && $^O ne "minix";
211$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
212$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
213
214print <<EOF;
215
216*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
217
218
219Similarly to the kqueue backend above, EV can take advantage of the
220solaris 10 event port interface. Support for event ports will be detected
221at runtime, with a safe fallback to other methods when it cannot be used.
222
223EOF
224
225$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
226
227print <<EOF;
228
229*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
230
231
232EV needs the functions pthread_atfork and clock_gettime. On most systems
233you need some special libraries for this (such as -lrt and -lpthread). You
234can specify additional libraries to provide these calls (and any other
235required by EV) now, or accept the default.
236
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.
240
241EOF
242
243my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
244my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
245my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
246$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
247
248
249print <<EOF;
250
251*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
252
253
254A backend of a different kind is the Linux inotify(7) interface, which can
255be used to speed up (and reduce resource consumption) of stat watchers. If
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.
258
259EOF
260
261my $can_inotify = have_inc "sys/inotify.h";
262$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
263$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
264
265print <<EOF;
266
267*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
268
269
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.
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
346my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
16 347
17WriteMakefile( 348WriteMakefile(
18 dist => { 349 dist => {
19 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 . ;',
20 COMPRESS => 'gzip -9v', 351 COMPRESS => 'gzip -9v',
21 SUFFIX => '.gz', 352 SUFFIX => '.gz',
22 }, 353 },
23 LIBS => ["-levent"], 354 depend => {
355 "EV.c" => "EV/EVAPI.h "
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 "
357 . "libev/ev_vars.h libev/ev_wrap.h",
358 },
359 INC => "-Ilibev",
360 DEFINE => "$DEFINE",
24 NAME => "EV", 361 NAME => "EV",
362 LIBS => [$LIBS],
363 PREREQ_PM => {
364 @anyevent,
365 "common::sense" => 0,
366 },
367 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
25 VERSION_FROM => "EV.pm", 368 VERSION_FROM => "EV.pm",
26 PM => { 369 PM => {
27 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 370 'EV.pm' => '$(INST_LIB)/EV.pm',
28 'EV/AnyEvent.pm' => '$(INST_LIBDIR)/EV/AnyEvent.pm',
29 'EV/DNS.pm' => '$(INST_LIBDIR)/EV/DNS.pm',
30 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 371 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
31 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 372 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
373 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
374 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
32 }, 375 },
376 MAN3PODS => {
377 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
378 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
379 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
380 },
33); 381);
34 382

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines