X-Git-Url: https://ruderich.org/simon/gitweb/?p=blhc%2Fblhc.git;a=blobdiff_plain;f=bin%2Fblhc;h=d662283e4b9a2e2e0f768fee4e8bd158954f934b;hp=73548dc2a36ffc53a9adf3f69967f428f0285601;hb=95124b124684fece31ecba687478878aa609756b;hpb=0df26c1c2b30a44adc06f9c93650a6f2e31475c0 diff --git a/bin/blhc b/bin/blhc index 73548dc..d662283 100755 --- a/bin/blhc +++ b/bin/blhc @@ -224,7 +224,7 @@ while (my $line = <>) { } else { # Ignore lines with no compiler commands. - next if $line !~ /\b(cc\b|gcc\b|g\+\+|c\+\+)/; + next if $line !~ /\b(cc|gcc|g\+\+|c\+\+)(\s|\\)/; # Ignore false positives. # @@ -265,14 +265,25 @@ if ($bindnow) { } foreach my $line (@input) { + # Ignore false positives. + # + # ./configure summary. + next if $line =~ /^Compiler:\s+(cc|gcc|g\+\+|c\+\+)$/; + # Is this a compiler or linker command? my $compiler = 1; my $linker = 0; # Linker commands. - if ($line =~ /\s-l[A-Za-z0-9.-]+(\s|\\|$)/ + if ($line =~ m{\s-o # -o + [\s\\]*\s+ # possible line continuation + ([A-Za-z0-9_/.-]+/)? # path to file + [A-Za-z0-9_-]+ # binary name (no dots!) + (\.so[0-9.]*[a-z]?|\.la)? # library (including version) + (\s|\\|\$) # end of file name + }x or $line =~ /^libtool: link: / - or $line =~ m{\s*/bin/bash (\.\./)+libtool\s+--tag=CC\s+--mode=link}) { + or $line =~ m{\s*/bin/bash .+?libtool\s+(.+?\s+)?--mode=(re)?link}) { $compiler = 0; $linker = 1; }