X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;f=bin%2Fblhc;h=b2188eeb32d36d651da1860500444249c120cd62;hb=631bce18651ddfffb2702d7bb56556bb1b0359d2;hp=30bc35ae13278aad807e55ca360f1862e226fa34;hpb=7ed04bee58679b3e9e267b486ce796928b961639;p=blhc%2Fblhc.git diff --git a/bin/blhc b/bin/blhc index 30bc35a..b2188ee 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,26 @@ 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!) + ([0-9.]*\.so[0-9.]*[a-z]? # library (including version) + |\.la)? + (\s|\\|\$) # end of file name + }x or $line =~ /^libtool: link: / - or $line =~ m{\s*/bin/bash .+?libtool\s+.+?\s+--mode=(re)?link}) { + or $line =~ m{\s*/bin/bash .+?libtool\s+(.+?\s+)?--mode=(re)?link}) { $compiler = 0; $linker = 1; }