recipes/perl/libnet-pcap-perl/kill-runtime-pcap-check-fake-functions-check.patch

   1 Index: Net-Pcap-0.16/Makefile.PL
   2 ===================================================================
   3 --- Net-Pcap-0.16.orig/Makefile.PL      2010-02-02 16:50:32.000000000 +0300
   4 +++ Net-Pcap-0.16/Makefile.PL   2010-02-02 18:14:50.000000000 +0300
   5 @@ -444,7 +444,7 @@
   6      close($cfile);
   7      my $quote = $is_Win32 ? '"' : "'";
   8      xsystem("$^X Makefile.PL " . join(' ', map { "${quote}$_=$options{$_}${quote}" } keys %options));
   9 -    xsystem("$Config{make} test ${quote}OTHERLDFLAGS=${opt}${quote}");
  10 +#    xsystem("$Config{make} test ${quote}OTHERLDFLAGS=${opt}${quote}");
  11  } # end try_link0
  12
  13  sub try_link {
  14 @@ -530,14 +530,11 @@
  15      my @funcs = ();
  16      print "detecting available functions... ";
  17
  18 -    my @paths = DynaLoader::dl_findfile(qw(-lpcap));
  19 -    my $libref = DynaLoader::dl_load_file($paths[0]);
  20 -
  21 -    for my $func (@_) {
  22 -        my $symref = DynaLoader::dl_find_symbol($libref, $func);
  23 -        push @funcs, $func if defined $symref
  24 -    }
  25 +    my $objdump = $ENV{'OBJDUMP'};
  26 +    my $st_libdir = $ENV{'STAGING_LIBDIR'};
  27 +    @funcs=`$objdump -t $st_libdir/libpcap.so | grep F | grep ".text" | awk '{print \$6}' | grep "^pcap_"`;
  28
  29 +    chomp(@funcs);
  30      print "ok\n";
  31      return @funcs
  32  }