ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/EV/Makefile.PL
Revision: 1.55
Committed: Sat Sep 6 18:42:18 2014 UTC (9 years, 8 months ago) by root
Content type: text/plain
Branch: MAIN
CVS Tags: EV-rel-4_18
Changes since 1.54: +13 -9 lines
Log Message:
4.18

File Contents

# User Rev Content
1 root 1.43 use 5.008002;
2 root 1.4
3 root 1.37 use strict qw(vars subs);
4 root 1.7 use Config;
5 root 1.1 use ExtUtils::MakeMaker;
6    
7 root 1.55 sub have_inc($) {
8     scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
9     }
10    
11 root 1.10 unless (-e "libev/ev_epoll.c") {
12     print <<EOF;
13    
14     ***
15     *** ERROR: libev is missing or damaged. If you used a CVS check-out of EV,
16     *** you also have to check-out the "libev" module from the same CVS
17     *** repository into the EV dir (i.e. EV/libev from outside).
18     ***
19    
20     EOF
21     exit 1;
22     }
23    
24 root 1.11 print <<EOF;
25    
26 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
27 root 1.11
28    
29     Welcome to EV configuration. If you are in a hurry, just press return here
30     and hope for the best. The defaults should usually do.
31    
32     EOF
33    
34     if (prompt ("Skip further questions and use defaults (y/n)?", "y") =~ /[yY]/) {
35     $ENV{PERL_MM_USE_DEFAULT} = 1;
36     }
37    
38     print <<EOF;
39    
40 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
41 root 1.11
42    
43 root 1.14 POSIX optionally offers support for a monotonic clock source. EV
44 root 1.45 can take advantage of this clock source to detect time jumps more
45 root 1.14 reliably. Unfortunately, some systems are bound to be broken, so you can
46     disable this here: you can completely disable the detection and use of
47     the monotonic clock by answering 'n' here. Support for this clock type
48 root 1.29 will otherwise be autodetected at both compile- and runtime. (this setting
49     currently affects the use of nanosleep over select as well).
50 root 1.11
51     EOF
52    
53 root 1.37 my $DEFINE .= " -DEV_USE_MONOTONIC=" . (0 + (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/));
54 root 1.11
55     print <<EOF;
56    
57 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
58 root 1.11
59    
60     POSIX optionally offers support for a (potentially) high-resolution
61     realtime clock interface. In a good implementation, using it is faster
62     than the normal method of using gettimeofday. Unfortunately, this option
63 root 1.39 is also bound to be broken on some systems, and current EV versions do not
64 root 1.45 actually call gettimeofday very often, so it defaults to no.
65 root 1.11
66     EOF
67    
68 root 1.39 $DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "n") =~ /[yY]/));
69 root 1.11
70     print <<EOF;
71    
72 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
73 root 1.11
74    
75 root 1.46 EV can use various backends with various portability issues. The select
76 root 1.19 backend is the most portable and makes for a good fallback, but it can be
77 root 1.22 limited to a low number of file descriptors and/or might not compile. If
78     you have problems with compiling ev_select.c, you might try to play around
79 root 1.19 with disabling it here, or forcing it to use the fd_set provided by your
80     OS, via the next question. I highly recommend keeping it in.
81    
82     EOF
83    
84     if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {
85 root 1.22 $DEFINE .= " -DEV_USE_SELECT=1";
86 root 1.19
87     print <<EOF;
88    
89 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
90 root 1.19
91    
92     The select backend can operate in two modes. One uses the system-provided
93     fd_set and is usually limited to 1024 file descriptors (64 on windows),
94     the other requires your header files to define NFDBITS and declare a
95     suitable fd_mask type. If you run into problems compiling ev_select.c, you
96     can try forcing the use of the system fd_set here.
97    
98     EOF
99    
100     if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) {
101     $DEFINE .= " -DEV_SELECT_USE_FD_SET";
102 root 1.55 }
103 root 1.22 } else {
104     $DEFINE .= " -DEV_USE_SELECT=0";
105 root 1.55 }
106 root 1.19
107     print <<EOF;
108    
109 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
110 root 1.19
111    
112     The second very portable backend is poll(2). It does not exist on windows
113     and various versions of Mac OS X (and on the other versions it simply
114     doesn't work), but works basically everywhere else. It is recommended to use
115     the default here unless you run into compile problems in ev_poll.c.
116    
117     EOF
118    
119 root 1.55 $DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (have_inc "poll.h") ? "y" : "n") =~ /[yY]/));
120 root 1.19
121     print <<EOF;
122    
123 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
124 root 1.19
125    
126 root 1.24 Select and poll make it hard to write efficient servers, especially if the
127     number of active connections is much lower than the watched ones. GNU/Linux
128     systems have a more scalable method called "epoll", which EV can use. For
129     this to work, both your kernel and glibc have to support epoll, but if you
130     can compile it, the detection will be done at runtime, and EV will safely
131     fall back to using select when epoll isn't available. If unsure, accept
132     the default.
133 root 1.11
134     EOF
135    
136 root 1.55 my $can_epoll = have_inc "sys/epoll.h";
137 root 1.37 $can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
138     $DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/));
139 root 1.15
140     print <<EOF;
141    
142 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
143 root 1.15
144    
145 root 1.23 Similarly to the epoll backend above, EV can take advantage of kqueue on
146     many BSD systems. Support for kqueue will be detected at runtime, with a
147     safe fallback to other methods when it cannot be used.
148    
149 root 1.31 Note that kqueue is broken on most operating systems, so by default it
150     won't be used on many platforms, but you can still create your own event
151 root 1.40 loop with kqueue backend if you ask specifically for it.
152 root 1.31
153     Here is what we know:
154 root 1.23
155 root 1.45 NetBSD: partially working in at least 3.1 and later. Yeah! :)
156     FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
157 root 1.28 sockets *likely* work, ptys definitely don't.
158 root 1.23 OpenBSD: reports indicate that it likely doesn't work
159     (similar problems as on FreeBSD).
160 root 1.45 OS X: completely, utterly broken on at least <= 10.6.
161 root 1.11
162 root 1.15 EOF
163    
164 root 1.55 my $can_kqueue = have_inc "sys/event.h";
165 root 1.37 $can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
166 root 1.23 $DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
167 root 1.11
168     print <<EOF;
169    
170 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
171 root 1.11
172    
173 root 1.21 Similarly to the kqueue backend above, EV can take advantage of the
174 root 1.26 solaris 10 event port interface. Support for event ports will be detected
175     at runtime, with a safe fallback to other methods when it cannot be used.
176 root 1.21
177     EOF
178    
179 root 1.55 $DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (have_inc "sys/port.h") ? "y" : "n") =~ /[yY]/));
180 root 1.21
181     print <<EOF;
182    
183 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
184 root 1.21
185    
186 root 1.11 EV needs the functions pthread_atfork and clock_gettime. On most systems
187 root 1.15 you need some special libraries for this (such as -lrt and -lpthread). You
188 root 1.23 can specify additional libraries to provide these calls (and any other
189     required by EV) now, or accept the default.
190 root 1.11
191 root 1.53 On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
192     to avoid the dependency on libpthread, and directly uses the clock_gettime
193     syscall to avoid a dependency on librt.
194    
195 root 1.11 EOF
196    
197 root 1.38 my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
198 root 1.53 my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
199     my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
200     $LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
201 root 1.15
202 root 1.11
203     print <<EOF;
204    
205 root 1.22 *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
206 root 1.11
207    
208 root 1.25 A backend of a different kind is the Linux inotify(7) interface, which can
209     be used to speed up (and reduce resource consumption) of stat watchers. If
210 root 1.40 you have the include file and libc support for it, it is usually a good
211     idea to enable it, as kernel availability is detected at runtime.
212 root 1.25
213     EOF
214    
215 root 1.55 my $can_inotify = have_inc "sys/inotify.h";
216 root 1.37 $can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
217 root 1.25 $DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
218    
219     print <<EOF;
220    
221     *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
222    
223    
224 root 1.36 Another useful bit of functionality is the Linux eventfd, which is useful
225     for faster signal handling (don't care) and intra-thread communications
226     (more relevant). Kernel support for this will be probed at runtime, but
227     your libc must contain the necessary wrapper. Glibc 2.7 and later should
228     have this wrapper.
229    
230     EOF
231    
232 root 1.55 my $can_eventfd = have_inc "sys/eventfd.h";
233 root 1.37 $can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
234     $DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
235 root 1.36
236     print <<EOF;
237    
238     *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
239    
240    
241 root 1.42 Another sometimes useful bit of functionality is the Linux signalfd, which
242     is useful for faster signal handling (don't care). Kernel support for
243     this will be probed at runtime, but your libc must contain the necessary
244 root 1.44 wrapper. Glibc 2.7 and later should have this wrapper.
245 root 1.42
246     EOF
247    
248 root 1.55 my $can_signalfd = have_inc "sys/signalfd.h";
249 root 1.42 $can_signalfd = $ENV{EV_SIGNALFD} if exists $ENV{EV_SIGNALFD};
250     $DEFINE .= " -DEV_USE_SIGNALFD=" . (0 + (prompt ("Enable linux signalfd support (y/n)?", $can_signalfd ? "y" : "n") =~ /[yY]/));
251    
252     print <<EOF;
253    
254     *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
255    
256    
257 root 1.48 Very rarely, people want to tweak EV even more, e.g. to exclude
258 root 1.52 or include certain watcher types or backends. This can be done by adding
259 root 1.48 extra -D options here, or via the EV_EXTRA_DEFS environment variable.
260 root 1.52
261     For example, if you run into compile problems because of missing memory
262     fences (or you just want extra performance), you can tell EV to not support
263     smp and threads via -DEV_NO_THREADS.
264    
265 root 1.48 Normal persons just press enter.
266    
267     EOF
268    
269 root 1.49 $DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
270 root 1.48
271     print <<EOF;
272    
273     *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
274    
275    
276 root 1.11 EOF
277    
278 root 1.47 my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
279 root 1.20
280 root 1.1 WriteMakefile(
281     dist => {
282 root 1.2 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
283 root 1.1 COMPRESS => 'gzip -9v',
284     SUFFIX => '.gz',
285     },
286 root 1.10 depend => {
287 root 1.13 "EV.c" => "EV/EVAPI.h "
288 root 1.17 . "libev/ev.c libev/ev.h libev/ev_epoll.c libev/ev_select.c libev/ev_kqueue.c libev/ev_poll.c "
289 root 1.30 . "libev/ev_vars.h libev/ev_wrap.h",
290 root 1.10 },
291 root 1.8 INC => "-Ilibev",
292 root 1.11 DEFINE => "$DEFINE",
293 root 1.2 NAME => "EV",
294 root 1.11 LIBS => [$LIBS],
295 root 1.20 PREREQ_PM => {
296     @anyevent,
297 root 1.41 "common::sense" => 0,
298 root 1.20 },
299 root 1.2 VERSION_FROM => "EV.pm",
300 root 1.5 PM => {
301 root 1.54 'EV.pm' => '$(INST_LIB)/EV.pm',
302     'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
303     'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
304     'libev/ev.h' => '$(INST_LIB)/EV/ev.h',
305     'libev/ev.pod' => '$(INST_LIB)/EV/libev.pod',
306 root 1.5 },
307 root 1.34 MAN3PODS => {
308     'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
309     'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
310 root 1.35 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
311 root 1.34 },
312 root 1.1 );
313    
314 root 1.6