[ViewVC] Diff of: cvs/EV/Makefile.PL

Comparing EV/Makefile.PL (file contents):
Revision 1.21 by root, Fri Nov 16 01:46:26 2007 UTC vs.
Revision 1.58 by root, Sat Jun 22 15:50:36 2019 UTC

…		…
1	use 5.006;	1	use strict qw(vars subs);
2		2	use Canary::Stability EV => 1, 5.008002;
3	use Config;	3	use Config;
4	use ExtUtils::MakeMaker;	4	use ExtUtils::MakeMaker;
		5
		6	sub have_inc($) {
		7	scalar grep -r "$_/$_[0]", $Config{usrinc}, split / /, $Config{incpth}
		8	}
		9
		10	my $DEFINE;
5		11
6	unless (-e "libev/ev_epoll.c") {	12	unless (-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
19	print <<EOF;	25	print <<EOF;
20		26
21
22	* * * * * * * * * * * * * * * * * *	27	* * * * * * * * * * * * * * * * * *
		28
23		29
24	Welcome to EV configuration. If you are in a hurry, just press return here	30	Welcome to EV configuration. If you are in a hurry, just press return here
25	and hope for the best. The defaults should usually do.	31	and hope for the best. The defaults should usually do.
26		32
27	EOF	33	EOF
…		…
30	$ENV{PERL_MM_USE_DEFAULT} = 1;	36	$ENV{PERL_MM_USE_DEFAULT} = 1;
31	}	37	}
32		38
33	print <<EOF;	39	print <<EOF;
34		40
35
36	* * * * * * * * * * * * * * * * * *	41	* * * * * * * * * * * * * * * * * *
		42
37		43
38	POSIX optionally offers support for a monotonic clock source. EV	44	POSIX optionally offers support for a monotonic clock source. EV
39	can take advantage of this clock source to detect time jumps	45	can take advantage of this clock source to detect time jumps more
40	reliably. Unfortunately, some systems are bound to be broken, so you can	46	reliably. Unfortunately, some systems are bound to be broken, so you can
41	disable this here: you can completely disable the detection and use of	47	disable this here: you can completely disable the detection and use of
42	the monotonic clock by answering 'n' here. Support for this clock type	48	the monotonic clock by answering 'n' here. Support for this clock type
43	will otherwise be autodetected at both compile- and runtime.	49	will otherwise be autodetected at both compile- and runtime. (this setting
		50	currently affects the use of nanosleep over select as well).
44		51
45	EOF	52	EOF
46		53
47	if (prompt ("Enable optional support for CLOCK_MONOTONIC (y/n)?", "y") =~ /[yY]/) {	54	unless (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
51	print <<EOF;	58	print <<EOF;
52		59
53
54	* * * * * * * * * * * * * * * * * *	60	* * * * * * * * * * * * * * * * * *
		61
55		62
56	POSIX optionally offers support for a (potentially) high-resolution	63	POSIX optionally offers support for a (potentially) high-resolution
57	realtime clock interface. In a good implementation, using it is faster	64	realtime clock interface. In a good implementation, using it is faster
58	than the normal method of using gettimeofday. Unfortunately, this option	65	than the normal method of using gettimeofday. Unfortunately, this option
59	is also bound to be broken on some systems, so you can disable use and	66	is also bound to be broken on some systems, and current EV versions do not
60	probing of this feature altogether here. Otherwise support for this clock	67	actually call gettimeofday very often, so it defaults to no.
61	type will be autodetected at compiletime.
62		68
63	EOF	69	EOF
64		70
65	if (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
69	print <<EOF;	73	print <<EOF;
70		74
71
72	* * * * * * * * * * * * * * * * * *	75	* * * * * * * * * * * * * * * * * *
73		76
		77
74	EV can use various backends with various portability issue. The select	78	EV can use various backends with various portability issues. The select
75	backend is the most portable and makes for a good fallback, but it can be	79	backend is the most portable and makes for a good fallback, but it can be
76	limited to a low number of file descriptors and/or might not compile. If	80	limited to a low number of file descriptors and/or might not compile. If
77	you have problems with compiling ev_select., you might try to play around	81	you have problems with compiling ev_select.c, you might try to play around
78	with disabling it here, or forcing it to use the fd_set provided by your	82	with disabling it here, or forcing it to use the fd_set provided by your
79	OS, via the next question. I highly recommend keeping it in.	83	OS, via the next question. I highly recommend keeping it in.
80		84
81	EOF	85	EOF
82		86
83	if (prompt ("Enable select backend (y/n)?", "y") =~ /[yY]/) {	87	if (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
91	The select backend can operate in two modes. One uses the system-provided	95	The select backend can operate in two modes. One uses the system-provided
92	fd_set and is usually limited to 1024 file descriptors (64 on windows),	96	fd_set and is usually limited to 1024 file descriptors (64 on windows),
93	the other requires your header files to define NFDBITS and declare a	97	the other requires your header files to define NFDBITS and declare a
94	suitable fd_mask type. If you run into problems compiling ev_select.c, you	98	suitable fd_mask type. If you run into problems compiling ev_select.c, you
…		…
96		100
97	EOF	101	EOF
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
104	print <<EOF;	110	print <<EOF;
105		111
106
107	* * * * * * * * * * * * * * * * * *	112	* * * * * * * * * * * * * * * * * *
		113
108		114
109	The second very portable backend is poll(2). It does not exist on windows	115	The second very portable backend is poll(2). It does not exist on windows
110	and various versions of Mac OS X (and on the other versions it simply	116	and various versions of Mac OS X (and on the other versions it simply
111	doesn't work), but works basically everywhere else. It is recommended to use	117	doesn't work), but works basically everywhere else. It is recommended to use
112	the default here unless you run into compile problems in ev_poll.c.	118	the default here unless you run into compile problems in ev_poll.c.
113		119
114	EOF	120	EOF
115		121
116	if (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
120	print <<EOF;	124	print <<EOF;
121		125
122
123	* * * * * * * * * * * * * * * * * *	126	* * * * * * * * * * * * * * * * * *
124		127
125	EV by default uses select, which makes it hard to write efficient servers,	128
126	especially if the number of active conencitons is much lower than the open	129	Select and poll make it hard to write efficient servers, especially if the
		130	number of active connections is much lower than the watched ones. GNU/Linux
127	ones. GNU/Linux systems have a more scalable method called "epoll", which	131	systems have a more scalable method called "epoll", which EV can use. For
128	EV can use. For this to work, both your kernel and glibc have to support	132	this to work, both your kernel and glibc have to support epoll, but if you
129	epoll, but if you can compile it, the detection will be done at runtime,	133	can compile it, the detection will be done at runtime, and EV will safely
130	and EV will safely fall back to using select when epoll isn't available.	134	fall back to using select when epoll isn't available. If unsure, accept
131	If unsure, accept the default.	135	the default.
132		136
133	EOF	137	EOF
134		138
135	if (prompt ("Enable epoll backend (y/n)?", (-e "/usr/include/sys/epoll.h") ? "y" : "n") =~ /[yY]/) {	139	my $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
139	print <<EOF;	143	print <<EOF;
140		144
141
142	* * * * * * * * * * * * * * * * * *	145	* * * * * * * * * * * * * * * * * *
143		146
		147
		148	Linux 4.18 introduced another event polling interface, this time using
		149	the Linux AIO API. While this API is far superior to epoll and almost
		150	rivals kqueue, it also suffers from the same issues as kqueue typically
		151	does: only a subset of file types are supported (as of 4.19, I have seen
		152	eventfd, pipes, sockets files and some devices, but no ttys). It also
		153	is subject arbitrary system-wide limits imposed on it. Therefore, this
		154	backend is not used by default, even when it is compiled in, and you have
		155	to request it explicitly, e.g. with LIBEV_FLAGS=64. If unsure, accept the
		156	default.
		157
		158	EOF
		159
		160	my $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
		165	print <<EOF;
		166
		167	* * * * * * * * * * * * * * * * * *
		168
		169
144	Similarly to the epoll backend above, EV can take advantage of kqueue	170	Similarly to the epoll backend above, EV can take advantage of kqueue on
145	on many BSD systems (it seems to be broken on Mac OS X though, but what	171	many BSD systems. Support for kqueue will be detected at runtime, with a
146	isn't broken on that shoddy platform... ah yes, the cash gushing by apple,	172	safe fallback to other methods when it cannot be used.
147	selling defective software works perfectly there). Support for kqueue will
148	be detected at runtime, with a safe fallback to other methods when it
149	cannot be used.
150		173
151	EOF	174	Note that kqueue is broken on most operating systems, so by default it
		175	won't be used on many platforms, but you can still create your own event
		176	loop with kqueue backend if you ask specifically for it.
152		177
153	if (prompt ("Enable kqueue backend (y/n)?", (-e "/usr/include/sys/event.h") ? "y" : "n") =~ /[yY]/) {	178	Here is what we know:
154	$DEFINE .= " -DEV_USE_KQUEUE";
155	}
156		179
157	print <<EOF;	180	NetBSD: partially working in at least 3.1 and later. Yeah! :)
		181	FreeBSD: broken on at least 6.2-STABLE, spotty in later versions,
		182	sockets likely work, ptys definitely don't.
		183	OpenBSD: reports indicate that it likely doesn't work
		184	(similar problems as on FreeBSD).
		185	OS X: completely, utterly broken on at least <= 10.6.
158		186
		187	EOF
159		188
		189	my $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
		193	print <<EOF;
		194
160	* * * * * * * * * * * * * * * * * *	195	* * * * * * * * * * * * * * * * * *
		196
161		197
162	Similarly to the kqueue backend above, EV can take advantage of the	198	Similarly to the kqueue backend above, EV can take advantage of the
163	solaris 10 port interface. Support for port will be detected at runtime,	199	solaris 10 event port interface. Support for event ports will be detected
164	with a safe fallback to other methods when it cannot be used.	200	at runtime, with a safe fallback to other methods when it cannot be used.
165		201
166	EOF	202	EOF
167		203
168	if (prompt ("Enable port backend (y/n)?", (-e "/usr/include/sys/port.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]/));
169	$DEFINE .= " -DEV_USE_PORT";
170	}
171		205
172	print <<EOF;	206	print <<EOF;
173		207
174
175	* * * * * * * * * * * * * * * * * *	208	* * * * * * * * * * * * * * * * * *
		209
176		210
177	EV needs the functions pthread_atfork and clock_gettime. On most systems	211	EV needs the functions pthread_atfork and clock_gettime. On most systems
178	you need some special libraries for this (such as -lrt and -lpthread). You	212	you need some special libraries for this (such as -lrt and -lpthread). You
179	can specify additional libraries to provide these calls now, or accept the	213	can specify additional libraries to provide these calls (and any other
180	default.	214	required by EV) now, or accept the default.
181		215
182	EOF	216	On GNU/Linux systems, EV uses the LSB 3.1 __register_atfork function
		217	to avoid the dependency on libpthread, and directly uses the clock_gettime
		218	syscall to avoid a dependency on librt.
183		219
		220	EOF
		221
		222	my $solaris_libs = $^O =~ /solaris/i ? "-lsocket -lnsl" : "";
		223	my $librt = $^O =~ /linux/i ? "" : "-lpthread -lrt";
		224	my $LIBS = exists $ENV{EV_LIBS} ? $ENV{EV_LIBS} : "$librt $solaris_libs";
184	$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", "-lpthread -lrt";	225	$LIBS = prompt "Extra libraries for pthread_atfork and clock_gettime?", $LIBS;
185		226
186		227
187	print <<EOF;	228	print <<EOF;
188		229
189
190	* * * * * * * * * * * * * * * * * *	230	* * * * * * * * * * * * * * * * * *
191		231
192	EOF
193		232
		233	A backend of a different kind is the Linux inotify(7) interface, which can
		234	be used to speed up (and reduce resource consumption) of stat watchers. If
		235	you have the include file and libc support for it, it is usually a good
		236	idea to enable it, as kernel availability is detected at runtime.
		237
		238	EOF
		239
		240	my $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
		244	print <<EOF;
		245
		246	* * * * * * * * * * * * * * * * * *
		247
		248
		249	Another useful bit of functionality is the Linux eventfd, which is useful
		250	for faster signal handling (don't care) and intra-thread communications
		251	(more relevant). Kernel support for this will be probed at runtime, but
		252	your libc must contain the necessary wrapper. Glibc 2.7 and later should
		253	have this wrapper.
		254
		255	EOF
		256
		257	my $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
		261	print <<EOF;
		262
		263	* * * * * * * * * * * * * * * * * *
		264
		265
		266	Another sometimes useful bit of functionality is the Linux signalfd, which
		267	is useful for faster signal handling (don't care). Kernel support for
		268	this will be probed at runtime, but your libc must contain the necessary
		269	wrapper. Glibc 2.7 and later should have this wrapper.
		270
		271	EOF
		272
		273	my $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
		277	print <<EOF;
		278
		279	* * * * * * * * * * * * * * * * * *
		280
		281
		282	Very rarely, people want to tweak EV even more, e.g. to exclude
		283	or include certain watcher types or backends. This can be done by adding
		284	extra -D options here, or via the EV_EXTRA_DEFS environment variable.
		285
		286	For example, if you run into compile problems because of missing memory
		287	fences (or you just want extra performance), you can tell EV to not support
		288	smp and threads via -DEV_NO_THREADS.
		289
		290	Normal persons just press enter.
		291
		292	EOF
		293
		294	$DEFINE .= " " . prompt "Any extra -D options?", "$ENV{EV_EXTRA_DEFS}";
		295
		296	print <<EOF;
		297
		298	* * * * * * * * * * * * * * * * * *
		299
		300
		301	EOF
		302
194	my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 2.6 } ? (AnyEvent => 2.6) : ();	303	my @anyevent = eval { require AnyEvent; $AnyEvent::VERSION < 5.29 } ? (AnyEvent => 5.29) : ();
195		304
196	WriteMakefile(	305	WriteMakefile(
197	dist => {	306	dist => {
198	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 . ;',
199	COMPRESS => 'gzip -9v',	308	COMPRESS => 'gzip -9v',
200	SUFFIX => '.gz',	309	SUFFIX => '.gz',
201	},	310	},
202	depend => {	311	depend => {
203	"EV.c" => "EV/EVAPI.h "	312	"EV.c" => "EV/EVAPI.h "
204	. "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 "
205	. "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",
206	},	315	},
207	INC => "-Ilibev",	316	INC => "-Ilibev",
208	DEFINE => "$DEFINE",	317	DEFINE => "$DEFINE",
209	NAME => "EV",	318	NAME => "EV",
210	LIBS => [$LIBS],	319	LIBS => [$LIBS],
211	PREREQ_PM => {	320	PREREQ_PM => {
212	@anyevent,	321	@anyevent,
		322	"common::sense" => 0,
213	},	323	},
		324	CONFIGURE_REQUIRES => { "ExtUtils::MakeMaker" => 6.52, "Canary::Stability" => 0 },
214	VERSION_FROM => "EV.pm",	325	VERSION_FROM => "EV.pm",
215	PM => {	326	PM => {
216	'EV.pm' => '$(INST_LIBDIR)/EV.pm',	327	'EV.pm' => '$(INST_LIB)/EV.pm',
217	'EV/DNS.pm' => '$(INST_LIBDIR)/EV/DNS.pm',
218	'EV/EVAPI.h' => '$(INST_LIBDIR)/EV/EVAPI.h',	328	'EV/EVAPI.h' => '$(INST_LIB)/EV/EVAPI.h',
219	'EV/MakeMaker.pm' => '$(INST_LIBDIR)/EV/MakeMaker.pm',	329	'EV/MakeMaker.pm' => '$(INST_LIB)/EV/MakeMaker.pm',
220	'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',
221	},	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	},
222	);	338	);
223		339
224		340

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing EV/Makefile.PL (file contents): Revision 1.21 by root, Fri Nov 16 01:46:26 2007 UTC vs. Revision 1.58 by root, Sat Jun 22 15:50:36 2019 UTC

Diff Legend

Comparing EV/Makefile.PL (file contents):
Revision 1.21 by root, Fri Nov 16 01:46:26 2007 UTC vs.
Revision 1.58 by root, Sat Jun 22 15:50:36 2019 UTC