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.38 by root, Thu Nov 20 00:35:16 2008 UTC

1use 5.006; 1use 5.006;
2 2
3use strict qw(vars subs);
3use Config; 4use Config;
4use ExtUtils::MakeMaker; 5use ExtUtils::MakeMaker;
5
6 6
7unless (-e "libev/ev_epoll.c") { 7unless (-e "libev/ev_epoll.c") {
8 print <<EOF; 8 print <<EOF;
9 9
10*** 10***
17 exit 1; 17 exit 1;
18} 18}
19 19
20print <<EOF; 20print <<EOF;
21 21
22
23*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 22*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
23
24 24
25Welcome to EV configuration. If you are in a hurry, just press return here 25Welcome to EV configuration. If you are in a hurry, just press return here
26and hope for the best. The defaults should usually do. 26and hope for the best. The defaults should usually do.
27 27
28EOF 28EOF
31 $ENV{PERL_MM_USE_DEFAULT} = 1; 31 $ENV{PERL_MM_USE_DEFAULT} = 1;
32} 32}
33 33
34print <<EOF; 34print <<EOF;
35 35
36
37*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 36*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
37
38 38
39POSIX optionally offers support for a monotonic clock source. EV 39POSIX optionally offers support for a monotonic clock source. EV
40can take advantage of this clock source to detect time jumps 40can take advantage of this clock source to detect time jumps
41reliably. Unfortunately, some systems are bound to be broken, so you can 41reliably. Unfortunately, some systems are bound to be broken, so you can
42disable this here: you can completely disable the detection and use of 42disable this here: you can completely disable the detection and use of
43the monotonic clock by answering 'n' here. Support for this clock type 43the monotonic clock by answering 'n' here. Support for this clock type
44will otherwise be autodetected at both compile- and runtime. 44will otherwise be autodetected at both compile- and runtime. (this setting
45currently affects the use of nanosleep over select as well).
45 46
46EOF 47EOF
47 48
48if (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) { 49my $DEFINE .= " -DEV_USE_MONOTONIC=" . (0 + (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/));
49 $DEFINE .= " -DEV_USE_MONOTONIC";
50}
51 50
52print <<EOF; 51print <<EOF;
53 52
54
55*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 53*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
54
56 55
57POSIX optionally offers support for a (potentially) high-resolution 56POSIX optionally offers support for a (potentially) high-resolution
58realtime clock interface. In a good implementation, using it is faster 57realtime clock interface. In a good implementation, using it is faster
59than the normal method of using gettimeofday. Unfortunately, this option 58than the normal method of using gettimeofday. Unfortunately, this option
60is also bound to be broken on some systems, so you can disable use and 59is also bound to be broken on some systems, so you can disable use and
61probing of this feature altogether here. Otherwise support for this clock 60probing of this feature altogether here. Otherwise support for this clock
62type will be autodetected at compiletime. 61type will be autodetected at compiletime.
63 62
64EOF 63EOF
65 64
66if (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "y") !~ /[yY]/) { 65$DEFINE .= " -DEV_USE_REALTIME=" . (0 + (prompt ("Prefer clock_gettime (CLOCK_REALTIME) over gettimeofday (y/n)?", "y") =~ /[yY]/));
67 $DEFINE .= " -DEV_USE_REALTIME=0";
68}
69 66
70print <<EOF; 67print <<EOF;
71 68
72
73*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 69*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
70
74 71
75EV can use various backends with various portability issue. The select 72EV can use various backends with various portability issue. The select
76backend is the most portable and makes for a good fallback, but it can be 73backend 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 74limited 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 75you 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 76with 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. 77OS, via the next question. I highly recommend keeping it in.
81 78
82EOF 79EOF
83 80
84if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) { 81if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {
85 $DEFINE .= " -DEV_USE_SELECT"; 82 $DEFINE .= " -DEV_USE_SELECT=1";
86 83
87 print <<EOF; 84 print <<EOF;
88 85
89
90*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 86*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
87
91 88
92The select backend can operate in two modes. One uses the system-provided 89The 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), 90fd_set and is usually limited to 1024 file descriptors (64 on windows),
94the other requires your header files to define NFDBITS and declare a 91the 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 92suitable fd_mask type. If you run into problems compiling ev_select.c, you
98EOF 95EOF
99 96
100 if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) { 97 if (prompt ("Force use of system fd_set for select backend (y/n)?", "n") =~ /[yY]/) {
101 $DEFINE .= " -DEV_SELECT_USE_FD_SET"; 98 $DEFINE .= " -DEV_SELECT_USE_FD_SET";
102 } 99 }
100} else {
101 $DEFINE .= " -DEV_USE_SELECT=0";
103} 102}
104 103
105print <<EOF; 104print <<EOF;
106 105
107
108*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 106*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
107
109 108
110The second very portable backend is poll(2). It does not exist on windows 109The 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 110and 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 111doesn'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. 112the default here unless you run into compile problems in ev_poll.c.
114 113
115EOF 114EOF
116 115
117if (prompt ("Enable poll backend (y/n)?", (-e "/usr/include/poll.h") ? "y" : "n") =~ /[yY]/) { 116$DEFINE .= " -DEV_USE_POLL=" . (0 + (prompt ("Enable poll backend (y/n)?", (-e "/usr/include/poll.h") ? "y" : "n") =~ /[yY]/));
118 $DEFINE .= " -DEV_USE_POLL";
119}
120 117
121print <<EOF; 118print <<EOF;
122 119
123
124*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 120*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
125 121
126EV by default uses select, which makes it hard to write efficient servers, 122
127especially if the number of active conencitons is much lower than the open 123Select and poll make it hard to write efficient servers, especially if the
124number of active connections is much lower than the watched ones. GNU/Linux
128ones. GNU/Linux systems have a more scalable method called "epoll", which 125systems 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 126this 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, 127can 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. 128fall back to using select when epoll isn't available. If unsure, accept
132If unsure, accept the default. 129the default.
133 130
134EOF 131EOF
135 132
136if (prompt ("Enable epoll backend (y/n)?", (-e "/usr/include/sys/epoll.h") ? "y" : "n") =~ /[yY]/) { 133my $can_epoll = -e "/usr/include/sys/epoll.h";
137 $DEFINE .= " -DEV_USE_EPOLL"; 134$can_epoll = $ENV{EV_EPOLL} if exists $ENV{EV_EPOLL};
138} 135$DEFINE .= " -DEV_USE_EPOLL=" . (0 + (prompt ("Enable epoll backend (y/n)?", $can_epoll ? "y" : "n") =~ /[yY]/));
139 136
140print <<EOF; 137print <<EOF;
141 138
142
143*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 139*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
144 140
141
145Similarly to the epoll backend above, EV can take advantage of kqueue 142Similarly 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 143many 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, 144safe fallback to other methods when it cannot be used.
148selling defective software works perfectly there). Support for kqueue will 145
146Note that kqueue is broken on most operating systems, so by default it
147won't be used on many platforms, but you can still create your own event
148loop with kqueue backend.
149
150Here is what we know:
151
152NetBSD: partially working in at least 3.1. Yeah! :)
153FreeBSD: broken on at least 6.2-STABLE,
154 sockets *likely* work, ptys definitely don't.
155OpenBSD: reports indicate that it likely doesn't work
156 (similar problems as on FreeBSD).
157OS X: completely, utterly broken on at least < 10.5.
158
159EOF
160
161my $can_kqueue = -e "/usr/include/sys/event.h";
162$can_kqueue = $ENV{EV_KQUEUE} if exists $ENV{EV_KQUEUE};
163$DEFINE .= " -DEV_USE_KQUEUE=" . (0 + (prompt ("Enable kqueue backend (y/n)?", $can_kqueue ? "y" : "n") =~ /[yY]/));
164
165print <<EOF;
166
167*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
168
169
170Similarly to the kqueue backend above, EV can take advantage of the
171solaris 10 event port interface. Support for event ports will be detected
149be detected at runtime, with a safe fallback to other methods when it 172at runtime, with a safe fallback to other methods when it cannot be used.
150cannot be used.
151 173
152EOF 174EOF
153 175
154if (prompt ("Enable kqueue backend (y/n)?", (-e "/usr/include/sys/event.h") ? "y" : "n") =~ /[yY]/) { 176$DEFINE .= " -DEV_USE_PORT=" . (0 + (prompt ("Enable event port backend (y/n)?", (-e "/usr/include/sys/port.h") ? "y" : "n") =~ /[yY]/));
155 $DEFINE .= " -DEV_USE_KQUEUE";
156}
157 177
158print <<EOF; 178print <<EOF;
159 179
160
161*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 180*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
181
162 182
163EV needs the functions pthread_atfork and clock_gettime. On most systems 183EV needs the functions pthread_atfork and clock_gettime. On most systems
164you need some special libraries for this (such as -lrt and -lpthread). You 184you need some special libraries for this (such as -lrt and -lpthread). You
165can specify additional libraries to provide these calls now, or accept the 185can specify additional libraries to provide these calls (and any other
166default. 186required by EV) now, or accept the default.
167 187
168EOF 188EOF
169 189
190my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
191my $librt = $^O =~ /linux/i ? "-lpthread" : "-lpthread -lrt";
170$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "-lpthread -lrt"; 192my $LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "$librt $solaris_libs";
171 193
172 194
173print <<EOF; 195print <<EOF;
174 196
175
176*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** 197*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
177 198
199
200A backend of a different kind is the Linux inotify(7) interface, which can
201be used to speed up (and reduce resource consumption) of stat watchers. If
202you have it, it is usually a good idea to enable it.
203
178EOF 204EOF
205
206my $can_inotify = -e "/usr/include/sys/inotify.h";
207$can_inotify = $ENV{EV_INOTIFY} if exists $ENV{EV_INOTIFY};
208$DEFINE .= " -DEV_USE_INOTIFY=" . (0 + (prompt ("Enable inotify support (y/n)?", $can_inotify ? "y" : "n") =~ /[yY]/));
209
210print <<EOF;
211
212*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
213
214
215Another useful bit of functionality is the Linux eventfd, which is useful
216for faster signal handling (don't care) and intra-thread communications
217(more relevant). Kernel support for this will be probed at runtime, but
218your libc must contain the necessary wrapper. Glibc 2.7 and later should
219have this wrapper.
220
221EOF
222
223my $can_eventfd = -e "/usr/include/sys/eventfd.h";
224$can_eventfd = $ENV{EV_EVENTFD} if exists $ENV{EV_EVENTFD};
225$DEFINE .= " -DEV_USE_EVENTFD=" . (0 + (prompt ("Enable linux eventfd support (y/n)?", $can_eventfd ? "y" : "n") =~ /[yY]/));
226
227print <<EOF;
228
229*** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** *** ***
230
231
232EOF
233
234my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 2.6 } ? (AnyEvent => 2.6) : ();
179 235
180WriteMakefile( 236WriteMakefile(
181 dist => { 237 dist => {
182 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;', 238 PREOP => 'pod2text EV.pm | tee README >$(DISTVNAME)/README; chmod -R u=rwX,go=rX . ;',
183 COMPRESS => 'gzip -9v', 239 COMPRESS => 'gzip -9v',
184 SUFFIX => '.gz', 240 SUFFIX => '.gz',
185 }, 241 },
186 depend => { 242 depend => {
187 "EV.c" => "EV/EVAPI.h " 243 "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 " 244 . "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", 245 . "libev/ev_vars.h libev/ev_wrap.h",
190 }, 246 },
191 INC => "-Ilibev", 247 INC => "-Ilibev",
192 DEFINE => "$DEFINE", 248 DEFINE => "$DEFINE",
193 NAME => "EV", 249 NAME => "EV",
194 LIBS => [$LIBS], 250 LIBS => [$LIBS],
251 PREREQ_PM => {
252 @anyevent,
253 },
195 VERSION_FROM => "EV.pm", 254 VERSION_FROM => "EV.pm",
196 PM => { 255 PM => {
197 'EV.pm' => '$(INST_LIBDIR)/EV.pm', 256 'EV.pm' => '$(INST_LIBDIR)/EV.pm',
198 'EV/DNS.pm' => '$(INST_LIBDIR)/EV/DNS.pm',
199 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h', 257 'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h',
200 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm', 258 'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm',
201 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h', 259 'libev/ev.h' => '$(INST_LIBDIR)/EV/ev.h',
260 'libev/ev.pod' => '$(INST_LIBDIR)/EV/libev.pod',
202 }, 261 },
262 MAN3PODS => {
263 'EV.pm' => '$(INST_MAN3DIR)/EV.$(MAN3EXT)',
264 'EV/MakeMaker.pm' => '$(INST_MAN3DIR)/EV::MakeMaker.$(MAN3EXT)',
265 'libev/ev.pod' => '$(INST_MAN3DIR)/EV::libev.$(MAN3EXT)',
266 },
203); 267);
204 268
205 269

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines