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

Comparing EV/Makefile.PL (file contents):
Revision 1.20 by root, Wed Nov 14 22:30:50 2007 UTC vs.
Revision 1.58 by root, Sat Jun 22 15:50:36 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
6sub have_inc($) {
7 scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
8}
9
10my $DEFINE;
5 11
6unless (-e "libev/ev_epoll.c") { 12unless (-e "libev/ev_epoll.c") {
7 print <<EOF; 13 print <<EOF;
8 14
9*** 15***
16 exit 1; 22 exit 1;
17} 23}
18 24
19print <<EOF; 25print <<EOF;
20 26
21
22*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 27*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
28
23 29
24Welcome 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
25and hope for the best. The defaults should usually do. 31and hope for the best. The defaults should usually do.
26 32
27EOF 33EOF
30 $ENV{PERL_MM_USE_DEFAULT} = 1; 36 $ENV{PERL_MM_USE_DEFAULT} = 1;
31} 37}
32 38
33print <<EOF; 39print <<EOF;
34 40
35
36*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 41*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
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. 49will otherwise be autodetected at both compile- and runtime. (this setting
50currently affects the use of nanosleep over select as well).
44 51
45EOF 52EOF
46 53
47if (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) { 54unless (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) {
48 $DEFINE .= " -DEV_USE_MONOTONIC"; 55 $DEFINE .= " -DEV_USE_MONOTONIC=0";
49} 56}
50 57
51print <<EOF; 58print <<EOF;
52 59
53
54*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 60*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
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, so you can disable use and 66is also bound to be broken on some systems, and current EV versions do not
60probing of this feature altogether here. Otherwise support for this clock 67actually call gettimeofday very often, so it defaults to no.
61type will be autodetected at compiletime.
62 68
63EOF 69EOF
64 70
65if (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]/));
66 $DEFINE .= " -DEV_USE_REALTIME=0";
67}
68 72
69print <<EOF; 73print <<EOF;
70 74
71
72*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 75*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
73 76
77
74EV can use various backends with various portability issue. The select 78EV can use various backends with various portability issues. The select
75backend 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
76limited 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
77you 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
78with 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
79OS, via the next question. I highly recommend keeping it in. 83OS, via the next question. I highly recommend keeping it in.
80 84
81EOF 85EOF
82 86
83if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) { 87if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {
84 $DEFINE .= " -DEV_USE_SELECT"; 88 $DEFINE .= " -DEV_USE_SELECT=1";
85 89
86 print <<EOF; 90 print <<EOF;
87 91
88
89*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 92*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
93
90 94
91The 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
92fd_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),
93the other requires your header files to define NFDBITS and declare a 97the other requires your header files to define NFDBITS and declare a
94suitable 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
96 100
97EOF 101EOF
98 102
99 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]/) {
100 $DEFINE .= " -DEV_SELECT_USE_FD_SET"; 104 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
101 } 105 }
102} 106} else {
107 $DEFINE .= " -DEV_USE_SELECT=0";
108}
103 109
104print <<EOF; 110print <<EOF;
105 111
106
107*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 112*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
113
108 114
109The 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
110and 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
111doesn'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
112the 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.
113 119
114EOF 120EOF
115 121
116if (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]/));
117 $DEFINE .= " -DEV_USE_POLL";
118}
119 123
120print <<EOF; 124print <<EOF;
121 125
122
123*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 126*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
124 127
125EV by default uses select, which makes it hard to write efficient servers, 128
126especially 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
127ones. GNU/Linux systems have a more scalable method called "epoll", which 131systems have a more scalable method called "epoll", which EV can use. For
128EV 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
129epoll, 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
130and 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
131If unsure, accept the default. 135the default.
132 136
133EOF 137EOF
134 138
135if (prompt ("Enable epoll backend (y/n)?", (-e "/usr/include/sys/epoll.h") ? "y" : "n") =~ /[yY]/) { 139my $can_epoll = have_inc "sys/epoll.h";
136 $DEFINE .= " -DEV_USE_EPOLL"; 140$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
137} 141$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/));
138 142
139print <<EOF; 143print <<EOF;
140 144
141
142*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 145*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
143 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 or die;
162$can_linuxaio = $ENV{EV_LINUXAIO} if exists $ENV{EV_LINUXAIO};
163$DEFINE .= " -DEV_USE_LINUXAIO=" . (0 + (prompt ("Enable linux aio backend (y/n)?", $can_linuxaio ? "y" : "n") =~ /[yY]/));
164
165print <<EOF;
166
167*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
168
169
144Similarly to the epoll backend above, EV can take advantage of kqueue 170Similarly to the epoll backend above, EV can take advantage of kqueue on
145on many BSD systems (it seems to be broken on Mac OS X though, but what 171many BSD systems. Support for kqueue will be detected at runtime, with a
146isn't broken on that shoddy platform... ah yes, the cash gushing by apple, 172safe fallback to other methods when it cannot be used.
147selling defective software works perfectly there). Support for kqueue will 173
174Note that kqueue is broken on most operating systems, so by default it
175won't be used on many platforms, but you can still create your own event
176loop with kqueue backend if you ask specifically for it.
177
178Here is what we know:
179
180NetBSD: partially working in at least 3.1 and later. Yeah! :)
181FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
182 sockets *likely* work, ptys definitely don't.
183OpenBSD: reports indicate that it likely doesn't work
184 (similar problems as on FreeBSD).
185OS X: completely, utterly broken on at least <= 10.6.
186
187EOF
188
189my $can_kqueue = have_inc "sys/event.h";
190$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
191$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
192
193print <<EOF;
194
195*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
196
197
198Similarly to the kqueue backend above, EV can take advantage of the
199solaris 10 event port interface. Support for event ports will be detected
148be detected at runtime, with a safe fallback to other methods when it 200at runtime, with a safe fallback to other methods when it cannot be used.
149cannot be used.
150 201
151EOF 202EOF
152 203
153if (prompt ("Enable kqueue backend (y/n)?", (-e "/usr/include/sys/event.h") ? "y" : "n") =~ /[yY]/) { 204$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
154 $DEFINE .= " -DEV_USE_KQUEUE";
155}
156 205
157print <<EOF; 206print <<EOF;
158 207
159
160*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 208*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
209
161 210
162EV needs the functions pthread_atfork and clock_gettime. On most systems 211EV needs the functions pthread_atfork and clock_gettime. On most systems
163you need some special libraries for this (such as -lrt and -lpthread). You 212you need some special libraries for this (such as -lrt and -lpthread). You
164can specify additional libraries to provide these calls now, or accept the 213can specify additional libraries to provide these calls (and any other
165default. 214required by EV) now, or accept the default.
166 215
167EOF 216On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
217to avoid the dependency on libpthread, and directly uses the clock_gettime
218syscall to avoid a dependency on librt.
168 219
220EOF
221
222my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
223my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
224my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
169$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "-lpthread -lrt"; 225$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
170 226
171 227
172print <<EOF; 228print <<EOF;
173 229
174
175*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 230*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
176 231
177EOF
178 232
233A backend of a different kind is the Linux inotify(7) interface, which can
234be used to speed up (and reduce resource consumption) of stat watchers. If
235you have the include file and libc support for it, it is usually a good
236idea to enable it, as kernel availability is detected at runtime.
237
238EOF
239
240my $can_inotify = have_inc "sys/inotify.h";
241$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
242$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
243
244print <<EOF;
245
246*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
247
248
249Another useful bit of functionality is the Linux eventfd, which is useful
250for faster signal handling (don't care) and intra-thread communications
251(more relevant). Kernel support for this will be probed at runtime, but
252your libc must contain the necessary wrapper. Glibc 2.7 and later should
253have this wrapper.
254
255EOF
256
257my $can_eventfd = have_inc "sys/eventfd.h";
258$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
259$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
260
261print <<EOF;
262
263*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
264
265
266Another sometimes useful bit of functionality is the Linux signalfd, which
267is useful for faster signal handling (don't care). Kernel support for
268this will be probed at runtime, but your libc must contain the necessary
269wrapper. Glibc 2.7 and later should have this wrapper.
270
271EOF
272
273my $can_signalfd = have_inc "sys/signalfd.h";
274$can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
275$DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/));
276
277print <<EOF;
278
279*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
280
281
282Very rarely, people want to tweak EV even more, e.g. to exclude
283or include certain watcher types or backends. This can be done by adding
284extra -D options here, or via the EV_EXTRA_DEFS environment variable.
285
286For example, if you run into compile problems because of missing memory
287fences (or you just want extra performance), you can tell EV to not support
288smp and threads via -DEV_NO_THREADS.
289
290Normal persons just press enter.
291
292EOF
293
294$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
295
296print <<EOF;
297
298*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
299
300
301EOF
302
179my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 2.6 } ? (AnyEvent => 2.6) : (); 303my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
180 304
181WriteMakefile( 305WriteMakefile(
182 dist => { 306 dist => {
183 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', 307 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
184 COMPRESS => 'gzip -9v', 308 COMPRESS => 'gzip -9v',
185 SUFFIX => '.gz', 309 SUFFIX => '.gz',
186 }, 310 },
187 depend => { 311 depend => {
188 "EV.c" => "EV/EVAPI.h " 312 "EV.c" => "EV/EVAPI.h "
189 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c " 313 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c "
190 . "libev/event.h libev/event.c evdns.h evdns.c libev/ev_vars.h libev/ev_wrap.h", 314 . "libev/ev_vars.h libev/ev_wrap.h",
191 }, 315 },
192 INC => "-Ilibev", 316 INC => "-Ilibev",
193 DEFINE => "$DEFINE", 317 DEFINE => "$DEFINE",
194 NAME => "EV", 318 NAME => "EV",
195 LIBS => [$LIBS], 319 LIBS => [$LIBS],
196 PREREQ_PM => { 320 PREREQ_PM => {
197 @anyevent, 321 @anyevent,
322 "common::sense" => 0,
198 }, 323 },
324 CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
199 VERSION_FROM => "EV.pm", 325 VERSION_FROM => "EV.pm",
200 PM => { 326 PM => {
201 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 327 'EV.pm' => '$(INST_LIB)/EV.pm',
202 'EV/DNS.pm' => '$(INST_LIBDIR)/EV/DNS.pm',
203 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 328 'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
204 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 329 'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
205 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 330 'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
331 'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
206 }, 332 },
333 MAN3PODS => {
334 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
335 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
336 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
337 },
207); 338);
208 339
209 340

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines