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

Comparing EV/Makefile.PL (file contents):
Revision 1.19 by root, Mon Nov 12 01:01:13 2007 UTC vs.
Revision 1.61 by root, Tue Jun 25 23:57:23 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}
6 9
10my $DEFINE;
11
7unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_linuxaio.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
17 exit 1; 22 exit 1;
18} 23}
19 24
20print <<EOF; 25print <<EOF;
21 26
22
23*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 27*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
28
24 29
25Welcome to EV configuration. If you are in a hurry, just press return here 30Welcome to EV configuration. If you are in a hurry, just press return here
26and hope for the best. The defaults should usually do. 31and hope for the best. The defaults should usually do.
27 32
28EOF 33EOF
31 $ENV{PERL_MM_USE_DEFAULT} = 1; 36 $ENV{PERL_MM_USE_DEFAULT} = 1;
32} 37}
33 38
34print <<EOF; 39print <<EOF;
35 40
36
37*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 41*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
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. 49will otherwise be autodetected at both compile- and runtime. (this setting
50currently affects the use of nanosleep over select as well).
45 51
46EOF 52EOF
47 53
48if (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) { 54unless (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) {
49 $DEFINE .= " -DEV_USE_MONOTONIC"; 55 $DEFINE .= " -DEV_USE_MONOTONIC=0";
50} 56}
51 57
52print <<EOF; 58print <<EOF;
53 59
54
55*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
61
56 62
57POSIX optionally offers support for a (potentially) high-resolution 63POSIX optionally offers support for a (potentially) high-resolution
58realtime clock interface. In a good implementation, using it is faster 64realtime clock interface. In a good implementation, using it is faster
59than the normal method of using gettimeofday. Unfortunately, this option 65than the normal method of using gettimeofday. Unfortunately, this option
60is 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
61probing of this feature altogether here. Otherwise support for this clock 67actually call gettimeofday very often, so it defaults to no.
62type will be autodetected at compiletime.
63 68
64EOF 69EOF
65 70
66if (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]/));
67 $DEFINE .= " -DEV_USE_REALTIME=0";
68}
69 72
70print <<EOF; 73print <<EOF;
71 74
72
73*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 75*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
74 76
77
75EV can use various backends with various portability issue. The select 78EV can use various backends with various portability issues. The select
76backend 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
77limited 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
78you have problems with compiling ev_select., you might try to play around 81you have problems with compiling ev_select.c, you might try to play around
79with 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
80OS, via the next question. I highly recommend keeping it in. 83OS, via the next question. I highly recommend keeping it in.
81 84
82EOF 85EOF
83 86
84if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) { 87if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {
85 $DEFINE .= " -DEV_USE_SELECT"; 88 $DEFINE .= " -DEV_USE_SELECT=1";
86 89
87 print <<EOF; 90 print <<EOF;
88 91
89
90*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 92*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
93
91 94
92The select backend can operate in two modes. One uses the system-provided 95The select backend can operate in two modes. One uses the system-provided
93fd_set and is usually limited to 1024 file descriptors (64 on windows), 96fd_set and is usually limited to 1024 file descriptors (64 on windows),
94the other requires your header files to define NFDBITS and declare a 97the other requires your header files to define NFDBITS and declare a
95suitable fd_mask type. If you run into problems compiling ev_select.c, you 98suitable fd_mask type. If you run into problems compiling ev_select.c, you
97 100
98EOF 101EOF
99 102
100 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]/) {
101 $DEFINE .= " -DEV_SELECT_USE_FD_SET"; 104 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
102 } 105 }
103} 106} else {
107 $DEFINE .= " -DEV_USE_SELECT=0";
108}
104 109
105print <<EOF; 110print <<EOF;
106 111
107
108*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 112*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
113
109 114
110The 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
111and 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
112doesn'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
113the 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.
114 119
115EOF 120EOF
116 121
117if (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]/));
118 $DEFINE .= " -DEV_USE_POLL";
119}
120 123
121print <<EOF; 124print <<EOF;
122 125
123
124*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 126*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
125 127
126EV by default uses select, which makes it hard to write efficient servers, 128
127especially if the number of active conencitons is much lower than the open 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
128ones. GNU/Linux systems have a more scalable method called "epoll", which 131systems have a more scalable method called "epoll", which EV can use. For
129EV can use. For this to work, both your kernel and glibc have to support 132this to work, both your kernel and glibc have to support epoll, but if you
130epoll, but if you can compile it, the detection will be done at runtime, 133can compile it, the detection will be done at runtime, and EV will safely
131and EV will safely fall back to using select when epoll isn't available. 134fall back to using select when epoll isn't available. If unsure, accept
132If unsure, accept the default. 135the default.
133 136
134EOF 137EOF
135 138
136if (prompt ("Enable epoll backend (y/n)?", (-e "/usr/include/sys/epoll.h") ? "y" : "n") =~ /[yY]/) { 139my $can_epoll = have_inc "sys/epoll.h";
137 $DEFINE .= " -DEV_USE_EPOLL"; 140$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
138} 141$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/));
139 142
140print <<EOF; 143print <<EOF;
141 144
142
143*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
144 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
145Similarly to the epoll backend above, EV can take advantage of kqueue 190Similarly to the epoll backend above, EV can take advantage of kqueue on
146on many BSD systems (it seems to be broken on Mac OS X though, but what 191many BSD systems. Support for kqueue will be detected at runtime, with a
147isn't broken on that shoddy platform... ah yes, the cash gushing by apple, 192safe fallback to other methods when it cannot be used.
148selling defective software works perfectly there). Support for kqueue will 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
209my $can_kqueue = have_inc "sys/event.h";
210$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]/));
212
213print <<EOF;
214
215*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
216
217
218Similarly to the kqueue backend above, EV can take advantage of the
219solaris 10 event port interface. Support for event ports will be detected
149be detected at runtime, with a safe fallback to other methods when it 220at runtime, with a safe fallback to other methods when it cannot be used.
150cannot be used.
151 221
152EOF 222EOF
153 223
154if (prompt ("Enable kqueue backend (y/n)?", (-e "/usr/include/sys/event.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]/));
155 $DEFINE .= " -DEV_USE_KQUEUE";
156}
157 225
158print <<EOF; 226print <<EOF;
159 227
160
161*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 228*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
229
162 230
163EV needs the functions pthread_atfork and clock_gettime. On most systems 231EV needs the functions pthread_atfork and clock_gettime. On most systems
164you 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
165can specify additional libraries to provide these calls now, or accept the 233can specify additional libraries to provide these calls (and any other
166default. 234required by EV) now, or accept the default.
167 235
168EOF 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.
169 239
240EOF
241
242my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
243my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
244my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
170$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "-lpthread -lrt"; 245$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
171 246
172 247
173print <<EOF; 248print <<EOF;
174 249
175
176*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 250*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
177 251
252
253A backend of a different kind is the Linux inotify(7) interface, which can
254be used to speed up (and reduce resource consumption) of stat watchers. If
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.
257
178EOF 258EOF
259
260my $can_inotify = have_inc "sys/inotify.h";
261$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
262$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
263
264print <<EOF;
265
266*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
267
268
269Another useful bit of functionality is the Linux eventfd, which is useful
270for faster signal handling (don't care) and intra-thread communications
271(more relevant). Kernel support for this will be probed at runtime, but
272your libc must contain the necessary wrapper. Glibc 2.7 and later should
273have this wrapper.
274
275EOF
276
277my $can_eventfd = have_inc "sys/eventfd.h";
278$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
279$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
280
281print <<EOF;
282
283*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
284
285
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.
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
302Libev contains numerous internal assert() invocations to check for
303consistency and user errors. These are normally enabled, but most
304perl builds disable this error reporting mechanism by default. You
305can re-enable these asserts here. Enabling them might help you catch
306programming bugs earlier, but might cause a small slowdown. Also, failures
307will be reported by aboritng your program, instead of throwing a perl
308exception.
309
310If unsure, enable this if you only use this perl installation for
311development, and leave it off for use in production environments.
312
313EOF
314
315my $enable_assertions = 0;
316$enable_assertions = 0 + (prompt ("Make sure assertions are enabled? (y/n)?", $enable_assertions ? "y" : "n") =~ /[yY]/);
317$DEFINE .= " -DEV_ENABLE_ASERTIONS=1" if $enable_assertions;
318
319print <<EOF;
320
321*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
322
323
324Very rarely, people want to tweak EV even more, e.g. to exclude
325or include certain watcher types or backends. This can be done by adding
326extra -D options here, or via the EV_EXTRA_DEFS environment variable.
327
328For example, if you run into compile problems because of missing memory
329fences (or you just want extra performance), you can tell EV to not support
330smp and threads via -DEV_NO_THREADS.
331
332Normal persons just press enter.
333
334EOF
335
336$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
337
338print <<EOF;
339
340*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
341
342
343EOF
344
345my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
179 346
180WriteMakefile( 347WriteMakefile(
181 dist => { 348 dist => {
182 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', 349 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
183 COMPRESS => 'gzip -9v', 350 COMPRESS => 'gzip -9v',
184 SUFFIX => '.gz', 351 SUFFIX => '.gz',
185 }, 352 },
186 depend => { 353 depend => {
187 "EV.c" => "EV/EVAPI.h " 354 "EV.c" => "EV/EVAPI.h "
188 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 355 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c "
189 . "libev/event.h libev/event.c evdns.h evdns.c libev/ev_vars.h libev/ev_wrap.h", 356 . "libev/ev_vars.h libev/ev_wrap.h",
190 }, 357 },
191 INC => "-Ilibev", 358 INC => "-Ilibev",
192 DEFINE => "$DEFINE", 359 DEFINE => "$DEFINE",
193 NAME => "EV", 360 NAME => "EV",
194 LIBS => [$LIBS], 361 LIBS => [$LIBS],
362 PREREQ_PM => {
363 @anyevent,
364 "common::sense" => 0,
365 },
366 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
195 VERSION_FROM => "EV.pm", 367 VERSION_FROM => "EV.pm",
196 PM => { 368 PM => {
197 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 369 'EV.pm' => '$(INST_LIB)/EV.pm',
198 'EV/DNS.pm' => '$(INST_LIBDIR)/EV/DNS.pm',
199 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 370 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
200 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 371 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
201 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 372 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
373 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
202 }, 374 },
375 MAN3PODS => {
376 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
377 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
378 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
379 },
203); 380);
204 381
205 382

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines