wok-next view perl-net-pcap/stuff/patches/fix-build.patch @ rev 21068
Rebuild Perl modules
| author | Aleksej Bobylev <al.bobylev@gmail.com> |
|---|---|
| date | Tue Dec 11 23:38:35 2018 +0200 (2018-12-11) |
| parents | |
| children |
line source
1 diff -up ./Makefile.PL.tv ./Makefile.PL
2 --- ./Makefile.PL.tv 2018-09-21 10:32:09.165570705 +0200
3 +++ ./Makefile.PL 2018-09-21 10:45:39.096591301 +0200
4 @@ -106,7 +106,7 @@ REASON
5 # We also store the list of available functions in a file for skipping the
6 # corresponding tests.
7 my @funcs = have_functions(find_functions());
8 -$options{DEFINE} .= cpp_defines(@funcs);
9 +$options{DEFINE} .= cpp_defines(@funcs). "-DHAVE_PCAP_SETSAMPLING";
10 open(FUNCS, '>funcs.txt') or warn "warning: can't write 'funcs.txt': $!\n";
11 print FUNCS join("\n", @funcs), "\n";
12 close(FUNCS);
13 diff -up ./Pcap.xs.tv ./Pcap.xs
14 diff -up ./stubs.inc.tv ./stubs.inc
15 --- ./stubs.inc.tv 2018-09-21 10:30:08.653034412 +0200
16 +++ ./stubs.inc 2018-09-21 10:46:41.339897943 +0200
17 @@ -354,11 +354,6 @@ int pcap_parsesrcstr(const char *source,
18 #ifdef _MSC_VER
19 #pragma message( "Warning: the function pcap_open() is not available" )
20 #endif
21 -struct pcap_rmtauth {
22 - int type;
23 - char *username;
24 - char *password;
25 -};
27 pcap_t * pcap_open(const char *source, int snaplen, int flags, int read_timeout, struct pcap_rmtauth *auth, char *err);
28 pcap_t * pcap_open(const char *source, int snaplen, int flags, int read_timeout, struct pcap_rmtauth *auth, char *err) {
29 @@ -511,6 +511,7 @@ HANDLE pcap_getevent(pcap_t *p) {
30 #ifdef _MSC_VER
31 #pragma message( "Warning: the function pcap_setsampling() is not available" )
32 #endif
33 +#if 0
34 struct pcap_samp {
35 int method;
36 int value;
37 @@ -522,6 +523,7 @@ struct pcap_samp *pcap_setsampling(pcap_
38 return NULL;
39 }
40 #endif
41 +#endif
44 /*