ccc-analyzer revision 07c3767be59472e19183c7b51fae76481465cb51
1fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek#!/usr/bin/env perl 2b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# 3b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# The LLVM Compiler Infrastructure 4b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# 5b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# This file is distributed under the University of Illinois Open Source 6b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# License. See LICENSE.TXT for details. 7b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# 8b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek##===----------------------------------------------------------------------===## 9b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# 10fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# A script designed to interpose between the build system and gcc. It invokes 11fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# both gcc and the static analyzer. 12b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek# 13b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek##===----------------------------------------------------------------------===## 14b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek 15fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenekuse strict; 16fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenekuse warnings; 1751365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenekuse Cwd qw/ getcwd abs_path /; 18b315a3940f804cf9fc67f4e3314aac6a44d623eeTed Kremenekuse File::Temp qw/ tempfile /; 19991c54b9b7409656e5593364e065878b5210d556Ted Kremenekuse File::Path qw / mkpath /; 20991c54b9b7409656e5593364e065878b5210d556Ted Kremenek 21ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenekmy $CC = $ENV{'CCC_CC'}; 221df35e310d3402879857dd78f6fa9aaeb94b35c4Ted Kremenekif (!defined $CC) { $CC = "gcc"; } 232ec5cd553542ec54652fb2ae2395e46795b1af84Ted Kremenek 2451365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek##----------------------------------------------------------------------------## 2551365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek# Process Clang Crashes. 2651365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek##----------------------------------------------------------------------------## 2751365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 2851365b5f74977c13c4902991c076dff8fddc96b7Ted Kremeneksub GetPPExt { 2951365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek my $Lang = shift; 3051365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek if ($Lang =~ /objective-c/) { return ".mi"; } 3151365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek return ".i"; 3251365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek} 3351365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 3451365b5f74977c13c4902991c076dff8fddc96b7Ted Kremeneksub ProcessClangFailure { 3551365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek my ($Clang, $Lang, $file, $Args, $HtmlDir, $ErrorType, $ofile) = @_; 3651365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek my $Dir = "$HtmlDir/crashes"; 3751365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek mkpath $Dir; 3851365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 3951365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek # Generate the preprocessed file with cc (i.e., gcc). 4051365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek my ($PPH, $PPFile) = tempfile("clang_crash_XXXXXX", 4151365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek SUFFIX => GetPPExt($Lang), 4251365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek DIR => $Dir); 4351365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 4451365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek system $CC, @$Args, "-E", "-o", $PPFile; 4551365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek close ($PPH); 4651365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 4751365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek # Generate the preprocessed file with clang. 4851365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek my $PPFile_Clang = $PPFile; 49e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek $PPFile_Clang =~ s/[.](.+)$/.clang.$1/; 50e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek system $Clang, @$Args, "-E", "-o", "$PPFile_Clang"; 51e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 52e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Create the info file. 53ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek open (OUT, ">", "$PPFile.info.txt") or die "Cannot open $PPFile.info.txt\n"; 54ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek print OUT abs_path($file), "\n"; 55ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek print OUT "$ErrorType\n"; 56ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek print OUT "@$Args\n"; 57ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek close OUT; 58ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek `uname -a >> $PPFile.info.txt 2>&1`; 59ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek `$CC -v >> $PPFile.info.txt 2>&1`; 60ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek system 'mv',$ofile,"$PPFile.stderr.txt"; 61ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek} 62ddf32dabe71f00aa0943449f67201f587f0a04d6Ted Kremenek 63991c54b9b7409656e5593364e065878b5210d556Ted Kremenek##----------------------------------------------------------------------------## 64991c54b9b7409656e5593364e065878b5210d556Ted Kremenek# Running the analyzer. 65991c54b9b7409656e5593364e065878b5210d556Ted Kremenek##----------------------------------------------------------------------------## 66991c54b9b7409656e5593364e065878b5210d556Ted Kremenek 67991c54b9b7409656e5593364e065878b5210d556Ted Kremeneksub Analyze { 68991c54b9b7409656e5593364e065878b5210d556Ted Kremenek my ($Clang, $Args, $Lang, $Output, $Verbose, $HtmlDir, $file, $Analyses) = @_; 6979433b59915859126a774fcd09fa32d7d5a1a3efTed Kremenek 70991c54b9b7409656e5593364e065878b5210d556Ted Kremenek # Skip anything related to C++. 7151b939fe14b833d920c294e8343845003d7a856cTed Kremenek return if ($Lang =~ /c[+][+]/); 72991c54b9b7409656e5593364e065878b5210d556Ted Kremenek 73991c54b9b7409656e5593364e065878b5210d556Ted Kremenek my $RunAnalyzer = 0; 74991c54b9b7409656e5593364e065878b5210d556Ted Kremenek my $Cmd; 75a4d8cde6584aa6c1aee241faf671eb4bac93defbTed Kremenek my @CmdArgs; 76a4d8cde6584aa6c1aee241faf671eb4bac93defbTed Kremenek my @CmdArgsSansAnalyses; 775daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek 78a4d8cde6584aa6c1aee241faf671eb4bac93defbTed Kremenek if ($Lang =~ /header/) { 79938eef139ad43345248235da31f78a759dd18f13Ted Kremenek exit 0 if (!defined ($Output)); 805daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek $Cmd = 'cp'; 815d31f83bbe990aeb070ce6c8d919d229d4eb5052Ted Kremenek push @CmdArgs,$file; 822a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek # Remove the PCH extension. 83938eef139ad43345248235da31f78a759dd18f13Ted Kremenek $Output =~ s/[.]gch$//; 84991c54b9b7409656e5593364e065878b5210d556Ted Kremenek push @CmdArgs,$Output; 855daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek @CmdArgsSansAnalyses = @CmdArgs; 865daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek } 87938eef139ad43345248235da31f78a759dd18f13Ted Kremenek else { 88938eef139ad43345248235da31f78a759dd18f13Ted Kremenek $Cmd = $Clang; 89938eef139ad43345248235da31f78a759dd18f13Ted Kremenek push @CmdArgs,'-DIBOutlet=__attribute__((iboutlet))'; 90938eef139ad43345248235da31f78a759dd18f13Ted Kremenek push @CmdArgs,@$Args; 91938eef139ad43345248235da31f78a759dd18f13Ted Kremenek @CmdArgsSansAnalyses = @CmdArgs; 92938eef139ad43345248235da31f78a759dd18f13Ted Kremenek push @CmdArgs,(split /\s/,$Analyses); 93c3998fa64e254b13669e8cf3a0cf23eb4f73b88bTed Kremenek $RunAnalyzer = 1; 943386c8a510abc6f55ce25ef5e22c72e5d0c47a70Ted Kremenek } 955daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek 965daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek my @PrintArgs; 975daa3be1bf9db399aa7510bbcf2bfc8c7701b6daTed Kremenek my $dir; 982a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek 99991c54b9b7409656e5593364e065878b5210d556Ted Kremenek if ($Verbose) { 100c3998fa64e254b13669e8cf3a0cf23eb4f73b88bTed Kremenek $dir = getcwd(); 101c3998fa64e254b13669e8cf3a0cf23eb4f73b88bTed Kremenek print STDERR "\n[LOCATION]: $dir\n"; 10282a1253077cd0832e4d347062b911cd305ab62d1Ted Kremenek push @PrintArgs,"'$Cmd'"; 1035f2825f6fa24a792c11cf96accd76538a2fd951eTed Kremenek foreach my $arg (@CmdArgs) { push @PrintArgs,"\'$arg\'"; } 1045d31f83bbe990aeb070ce6c8d919d229d4eb5052Ted Kremenek } 1052dd7ad13bbbd43cb940040725a30cb7789bd2774Ted Kremenek 106991c54b9b7409656e5593364e065878b5210d556Ted Kremenek if ($Verbose == 1) { 10782a1253077cd0832e4d347062b911cd305ab62d1Ted Kremenek # We MUST print to stderr. Some clients use the stdout output of 10851365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek # gcc for various purposes. 1099f9b1fded49acff77e61b3ed1afc8bbaaefe6f34Ted Kremenek print STDERR join(' ',@PrintArgs); 110938eef139ad43345248235da31f78a759dd18f13Ted Kremenek print STDERR "\n"; 111991c54b9b7409656e5593364e065878b5210d556Ted Kremenek } 112b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek elsif ($Verbose == 2) { 113fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek print STDERR "#SHELL (cd '$dir' && @PrintArgs)\n"; 114fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 115fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 116b0982880c09a07147b5a9ad275393fedff13aad0Ted Kremenek if ($RunAnalyzer and defined($HtmlDir)) { 117fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek push @CmdArgs,'-o'; 118fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek push @CmdArgs,$HtmlDir; 119fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek } 120fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek 121fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek if (defined $ENV{'CCC_UBI'}) { 122fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek push @CmdArgs,"--analyzer-viz-egraph-ubigraph"; 123fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek } 124fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek 125fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek # Capture the STDERR of clang and send it to a temporary file. 126fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek # Capture the STDOUT of clang and reroute it to ccc-analyzer's STDERR. 127fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek # We save the output file in the 'crashes' directory if clang encounters 128fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek # any problems with the file. 129fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek pipe (FROM_CHILD, TO_PARENT); 130fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek my $pid = fork(); 13132317b214f58001b2fd4aa9ec140b85c80db33a5Ted Kremenek if ($pid == 0) { 132fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek close FROM_CHILD; 133fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek open(STDOUT,">&", \*TO_PARENT); 134fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek open(STDERR,">&", \*TO_PARENT); 135fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek exec $Cmd, @CmdArgs; 136fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek } 137fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek 13832317b214f58001b2fd4aa9ec140b85c80db33a5Ted Kremenek close TO_PARENT; 1391df35e310d3402879857dd78f6fa9aaeb94b35c4Ted Kremenek my ($ofh, $ofile) = tempfile("clang_output_XXXXXX", DIR => $HtmlDir); 1401df35e310d3402879857dd78f6fa9aaeb94b35c4Ted Kremenek 1411df35e310d3402879857dd78f6fa9aaeb94b35c4Ted Kremenek while (<FROM_CHILD>) { 1422aefcb2e8b8b37529807945b3ecedda76e75c831Ted Kremenek print $ofh $_; 143fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek print STDERR $_; 14432317b214f58001b2fd4aa9ec140b85c80db33a5Ted Kremenek } 145fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek 146fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek waitpid($pid,0); 147fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek my $Result = $?; 148fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 1492a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek # Did the command die because of a signal? 1509a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenek if ($Result & 127 and $Cmd eq $Clang and defined $HtmlDir) { 151efaf1915d5734efa957f47f025fe81f76d9dbb82Ted Kremenek ProcessClangFailure($Clang, $Lang, $file, \@CmdArgsSansAnalyses, $HtmlDir, 152fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek "Crash", $ofile); 153d389465f426069115a35e857ef11f1fcc5a2f69cSeo Sanghyeon } 154fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek elsif ($Result) { 155fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ProcessClangFailure($Clang, $Lang, $file, \@CmdArgsSansAnalyses, $HtmlDir, 156fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek "Parser Rejects", $ofile); 157991c54b9b7409656e5593364e065878b5210d556Ted Kremenek } 158fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 159fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek `rm -f $ofile`; 160fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek} 161fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 162fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek##----------------------------------------------------------------------------## 163fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# Lookup tables. 164fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek##----------------------------------------------------------------------------## 165fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 166991c54b9b7409656e5593364e065878b5210d556Ted Kremenekmy %CompileOptionMap = ( 167fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-nostdinc' => 0, 168fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-fobjc-gc-only' => 0, 1692a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek '-fobjc-gc' => 0, 1702a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek '-include' => 1, 171fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-idirafter' => 1, 1722a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek '-iprefix' => 1, 173991c54b9b7409656e5593364e065878b5210d556Ted Kremenek '-iquote' => 1, 174938eef139ad43345248235da31f78a759dd18f13Ted Kremenek '-isystem' => 1, 175938eef139ad43345248235da31f78a759dd18f13Ted Kremenek '-iwithprefix' => 1, 176a2bdaf53223eed00c4b33e2a8ef42ef64c4479aaTed Kremenek '-iwithprefixbefore' => 1 177b40d06dec23b53bbc1157a9adae7f887be31aa3bTed Kremenek); 178991c54b9b7409656e5593364e065878b5210d556Ted Kremenek 1798382cf57b722f130f1a6b45380639871c07271c1Ted Kremenekmy %LinkerOptionMap = ( 1808382cf57b722f130f1a6b45380639871c07271c1Ted Kremenek '-framework' => 1 1818382cf57b722f130f1a6b45380639871c07271c1Ted Kremenek); 1822a1814a643810e24775d54a9888b54b92e7147eaTed Kremenek 1838382cf57b722f130f1a6b45380639871c07271c1Ted Kremenekmy %CompilerLinkerOptionMap = ( 1848382cf57b722f130f1a6b45380639871c07271c1Ted Kremenek '-isysroot' => 1, 185fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-arch' => 1, 186fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-v' => 0, 187fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-fpascal-strings' => 0, 1889a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenek '-mmacosx-version-min' => 0 # This is really a 1 argument, but always has '=' 1899a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenek); 1909a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenek 1919a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenekmy %IgnoredOptionMap = ( 1929a9e0d41e228c72f719757bc1c988f3e2b65a52eTed Kremenek '-MT' => 1, # Ignore these preprocessor options. 193fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-MF' => 1, 194fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 19563fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-fsyntax-only' => 0, 19663fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-save-temps' => 0, 19763fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-install_name' => 1, 19863fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-exported_symbols_list' => 1, 19963fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-current_version' => 1, 20063fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-compatibility_version' => 1, 20163fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-init' => 1, 20263fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-e' => 1, 20363fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-seg1addr' => 1, 20463fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-bundle_loader' => 1, 20563fe5ecfd158d77b04498a6ef1956877ebf0e455Ted Kremenek '-multiply_defined' => 1, 20661cd988a7eaadd4b81c63a18a4733bf31399b66cTed Kremenek '-sectorder' => 3, 207fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '--param' => 1, 208fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-u' => 1 209fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek); 210fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 211fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenekmy %LangMap = ( 212fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 'c' => 'c', 213fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 'cpp' => 'c++', 214fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 'cc' => 'c++', 21561cd988a7eaadd4b81c63a18a4733bf31399b66cTed Kremenek 'i' => 'c-cpp-output', 21661cd988a7eaadd4b81c63a18a4733bf31399b66cTed Kremenek 'm' => 'objective-c', 217fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 'mi' => 'objective-c-cpp-output' 218fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek); 219fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 220fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenekmy %UniqueOptions = ( 221fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek '-isysroot' => 0 222fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek); 22361cd988a7eaadd4b81c63a18a4733bf31399b66cTed Kremenek 224948e06babdf81033517b54910fedda8079f29ff9Ted Kremenek##----------------------------------------------------------------------------## 225948e06babdf81033517b54910fedda8079f29ff9Ted Kremenek# Main Logic. 226948e06babdf81033517b54910fedda8079f29ff9Ted Kremenek##----------------------------------------------------------------------------## 227fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenek 2289a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy $Action = 'link'; 2299a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy @CompileOpts; 2309a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy @LinkOpts; 2319a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy @Files; 2321346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekmy $Lang; 2339a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy $Output; 2349a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy %Uniqued; 2351346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek 2361346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek# Forward arguments to gcc. 2371346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekmy $Status = system($CC,@ARGV); 2389a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekif ($Status) { exit($Status >> 8); } 2399a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenek 2401346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek# Get the analysis options. 2411346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekmy $Analyses = $ENV{'CCC_ANALYZER_ANALYSIS'}; 2421346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekif (!defined($Analyses)) { $Analyses = '-checker-cfref'; } 2431346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek 2441346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek# Get the store model. 2451346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekmy $StoreModel = $ENV{'CCC_ANALYZER_STORE_MODEL'}; 2461346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek 2471346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenek# Determine the level of verbosity. 2481346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekmy $Verbose = 0; 2491346268d7f44551ab63e25dbbf5e3ae9402708c5Ted Kremenekif (defined $ENV{CCC_ANALYZER_VERBOSE}) { $Verbose = 1; } 250fd9df0eddd7d2b190f740f33a3d08f611c0be3f0Ted Kremenekif (defined $ENV{CCC_ANALYZER_LOG}) { $Verbose = 2; } 2519a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenek 2529a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenek# Determine what clang executable to use. 2539a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenekmy $Clang = $ENV{'CLANG'}; 254e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenekif (!defined $Clang) { $Clang = 'clang'; } 2552a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek 2562a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek# Get the HTML output directory. 257e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenekmy $HtmlDir = $ENV{'CCC_ANALYZER_HTML'}; 2585de4092946373af0c8caca64a281e8080c9d8a34Ted Kremenek 259e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenekmy %ArchsSeen; 260e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 2612a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek# Process the arguments. 262e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenekforeach (my $i = 0; $i < scalar(@ARGV); ++$i) { 263e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek my $Arg = $ARGV[$i]; 264e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek my ($ArgKey) = split /=/,$Arg,2; 265e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 266e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Modes ccc-analyzer supports 267e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if ($Arg eq '-E') { $Action = 'preprocess'; } 268e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek elsif ($Arg eq '-c') { $Action = 'compile'; } 26932e9464afc366badacad1101310f415a140b14f9Ted Kremenek elsif ($Arg =~ /^-print-prog-name/) { exit 0; } 270e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 271e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Specially handle duplicate cases of -arch 272e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if ($Arg eq "-arch") { 27332e9464afc366badacad1101310f415a140b14f9Ted Kremenek my $arch = $ARGV[$i+1]; 274e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek $ArchsSeen{$arch} = 1; 275e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek ++$i; 276e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek next; 277938eef139ad43345248235da31f78a759dd18f13Ted Kremenek } 278e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 279e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Options with possible arguments that should pass through to compiler. 280e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if (defined $CompileOptionMap{$ArgKey}) { 281938eef139ad43345248235da31f78a759dd18f13Ted Kremenek my $Cnt = $CompileOptionMap{$ArgKey}; 282e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek push @CompileOpts,$Arg; 283e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek while ($Cnt > 0) { ++$i; --$Cnt; push @CompileOpts, $ARGV[$i]; } 284e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek next; 2857e5bd6f061c549dca0c1aeedfdd4009b853264eaTed Kremenek } 286e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 287e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Options with possible arguments that should pass through to linker. 288e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if (defined $LinkerOptionMap{$ArgKey}) { 2897e5bd6f061c549dca0c1aeedfdd4009b853264eaTed Kremenek my $Cnt = $LinkerOptionMap{$ArgKey}; 290e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek push @LinkOpts,$Arg; 291e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek while ($Cnt > 0) { ++$i; --$Cnt; push @LinkOpts, $ARGV[$i]; } 292e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek next; 2932a3a8b9f47b0a8f3fdd57bc4fbd08684feb4fa85Ted Kremenek } 294e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 295e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Options with possible arguments that should pass through to both compiler 296e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # and the linker. 297938eef139ad43345248235da31f78a759dd18f13Ted Kremenek if (defined $CompilerLinkerOptionMap{$ArgKey}) { 298e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek my $Cnt = $CompilerLinkerOptionMap{$ArgKey}; 299e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek 300e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # Check if this is an option that should have a unique value, and if so 301e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek # determine if the value was checked before. 302e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if ($UniqueOptions{$Arg}) { 303e600bedcfea91622a0003fdb5f66c500b2f9f17dTed Kremenek if (defined $Uniqued{$Arg}) { 304938eef139ad43345248235da31f78a759dd18f13Ted Kremenek $i += $Cnt; 305938eef139ad43345248235da31f78a759dd18f13Ted Kremenek next; 306938eef139ad43345248235da31f78a759dd18f13Ted Kremenek } 3079a3c7dae00402a60a9dbe918e310214c92c5baebTed Kremenek $Uniqued{$Arg} = 1; 308e3bf8a8ab4eecc2746e2f8a35d7bc365c88ff674Ted Kremenek } 309fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 310fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @CompileOpts,$Arg; 311fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @LinkOpts,$Arg; 312fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 313fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek while ($Cnt > 0) { 314fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; --$Cnt; 315fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @CompileOpts, $ARGV[$i]; 316fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @LinkOpts, $ARGV[$i]; 31706c58b191f969e2ae5308cc9b6540bad9511f4efAnders Carlsson } 318fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek next; 3196c4312d17015755213a8e1c1003517f94786dfa4Ted Kremenek } 3206c4312d17015755213a8e1c1003517f94786dfa4Ted Kremenek 321fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # Ignored options. 322fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if (defined $IgnoredOptionMap{$ArgKey}) { 323fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek my $Cnt = $IgnoredOptionMap{$ArgKey}; 324fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek while ($Cnt > 0) { 325fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; --$Cnt; 326fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 327fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek next; 328fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 329fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 330fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # Compile mode flags. 331fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg =~ /^-[D,I,U](.*)$/) { 332fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek my $Tmp = $Arg; 333fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($1 eq '') { 334fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # FIXME: Check if we are going off the end. 335fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; 336fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek $Tmp = $Arg . $ARGV[$i]; 337a1359ba1a50d833d55a680ccdc8128d16b399052Charles Davis } 338a1359ba1a50d833d55a680ccdc8128d16b399052Charles Davis push @CompileOpts,$Tmp; 339e4f6952831d2b42b99f4a28825e87012d93eb8c0Ted Kremenek next; 340b10362acd971b84d4525334b275fcbfb4e42cb85Ted Kremenek } 3418d33cd77dc1086f70f1699ea012702d0df7eba1aDaniel Dunbar 3428d33cd77dc1086f70f1699ea012702d0df7eba1aDaniel Dunbar # Language. 343fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg eq '-x') { 344fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek $Lang = $ARGV[$i+1]; 345fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; next; 346940260996dfae2b6acd0466c1519b8e5083bed83Ted Kremenek } 347940260996dfae2b6acd0466c1519b8e5083bed83Ted Kremenek 348940260996dfae2b6acd0466c1519b8e5083bed83Ted Kremenek # Output file. 349fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg eq '-o') { 350fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; 351fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek $Output = $ARGV[$i]; 352fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek next; 353fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 354fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 355fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # Get the link mode. 356fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg =~ /^-[l,L,O]/) { 357fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg eq '-O') { push @LinkOpts,'-O1'; } 358fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek elsif ($Arg eq '-Os') { push @LinkOpts,'-O2'; } 359fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek else { push @LinkOpts,$Arg; } 360fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek next; 361fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 362fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 363fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($Arg =~ /^-std=/) { 364fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @CompileOpts,$Arg; 365fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek next; 366fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 367fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 368fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# if ($Arg =~ /^-f/) { 369fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# # FIXME: Not sure if the remaining -fxxxx options have no arguments. 370fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# push @CompileOpts,$Arg; 371fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# push @LinkOpts,$Arg; # FIXME: Not sure if these are link opts. 372fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek# } 373fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 374a30730e5cd1aac279bf901050f8f0b6f22516010Ted Kremenek # Get the compiler/link mode. 375a30730e5cd1aac279bf901050f8f0b6f22516010Ted Kremenek if ($Arg =~ /^-F(.+)$/) { 376a30730e5cd1aac279bf901050f8f0b6f22516010Ted Kremenek my $Tmp = $Arg; 377a30730e5cd1aac279bf901050f8f0b6f22516010Ted Kremenek if ($1 eq '') { 378f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek # FIXME: Check if we are going off the end. 379f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek ++$i; 380f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek $Tmp = $Arg . $ARGV[$i]; 381f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek } 382efaf1915d5734efa957f47f025fe81f76d9dbb82Ted Kremenek push @CompileOpts,$Tmp; 383efaf1915d5734efa957f47f025fe81f76d9dbb82Ted Kremenek push @LinkOpts,$Tmp; 384f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek next; 385efaf1915d5734efa957f47f025fe81f76d9dbb82Ted Kremenek } 386efaf1915d5734efa957f47f025fe81f76d9dbb82Ted Kremenek 387f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek # Input files. 388f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek if ($Arg eq '-filelist') { 389f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek # FIXME: Make sure we aren't walking off the end. 390f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek open(IN, $ARGV[$i+1]); 391f6f8d5a47c314ee9ffeca744250f3430540bdf36Ted Kremenek while (<IN>) { s/\015?\012//; push @Files,$_; } 392fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek close(IN); 393fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek ++$i; next; 394fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 395fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 396fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if (!($Arg =~ /^-/)) { 397fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @Files,$Arg; next; 398fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 399fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek} 400fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 401fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenekif ($Action eq 'compile' or $Action eq 'link') { 402a30730e5cd1aac279bf901050f8f0b6f22516010Ted Kremenek foreach my $file (@Files) { 403fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # Determine the language for the file. 404fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek my $FileLang = $Lang; 40551365b5f74977c13c4902991c076dff8fddc96b7Ted Kremenek 406cb344d0f9b9f4b9114ab2b35a34017e89d8b0c17Ted Kremenek if (!defined($FileLang)) { 407fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek # Infer the language from the extension. 408fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if ($file =~ /[.]([^.]+)$/) { 409fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek $FileLang = $LangMap{$1}; 410565e465c6d0093f1bf8414b2cabdc842022385a9Ted Kremenek } 411fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 41207c3767be59472e19183c7b51fae76481465cb51Zhongxing Xu 41307c3767be59472e19183c7b51fae76481465cb51Zhongxing Xu next if (!defined $FileLang); 414b8bb3e797c5687715c6d9d960ee573e4d0e62230Ted Kremenek 415be1fe1eb12a1cb91c8e3a9fcc2db4dfe989def6cTed Kremenek my @AnalyzeArgs; 416be1fe1eb12a1cb91c8e3a9fcc2db4dfe989def6cTed Kremenek 417be1fe1eb12a1cb91c8e3a9fcc2db4dfe989def6cTed Kremenek if ($FileLang ne 'unknown') { 4189f4ecb34d502f6aad7d635dd3aec24a373ef5c9bTed Kremenek push @AnalyzeArgs,'-x'; 41907c3767be59472e19183c7b51fae76481465cb51Zhongxing Xu push @AnalyzeArgs,$FileLang; 420db4f5f26182c522e659af655e2582cc5ea35a971Ted Kremenek } 421db4f5f26182c522e659af655e2582cc5ea35a971Ted Kremenek 4223891a157cc1504b1e8558077ed852fa4a9fb6ebcTed Kremenek if (defined $StoreModel) { 423db4f5f26182c522e659af655e2582cc5ea35a971Ted Kremenek push @AnalyzeArgs, $StoreModel; 424fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 425fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 426fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @AnalyzeArgs,@CompileOpts; 427fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @AnalyzeArgs,$file; 428fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek 429fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek my @Archs = keys %ArchsSeen; 430fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek if (scalar @Archs) { 431fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek foreach my $arch (@Archs) { 4328459132b0302cde7eb2a21eb2c6ffca9e66e3aeaTed Kremenek my @NewArgs; 43327783eb8a030afd153280a15afdede29819d90d2Ted Kremenek push @NewArgs, '-arch'; 4348459132b0302cde7eb2a21eb2c6ffca9e66e3aeaTed Kremenek push @NewArgs, $arch; 435fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek push @NewArgs, @AnalyzeArgs; 436fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek Analyze($Clang, \@NewArgs, $FileLang, $Output, 437fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek $Verbose, $HtmlDir, $file, $Analyses); 43889c4fcfd056e65a47d713798bcd22d0273162c8aTed Kremenek } 43989c4fcfd056e65a47d713798bcd22d0273162c8aTed Kremenek } 44089c4fcfd056e65a47d713798bcd22d0273162c8aTed Kremenek else { 441fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek Analyze($Clang, \@AnalyzeArgs, $FileLang, $Output, 442d732a7b771f8ab758411881126a83b7ca4db34a9Ted Kremenek $Verbose, $HtmlDir, $file, $Analyses); 443fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 444fbeeca84dd1993d2656e9a259f5d7ee54fe3b162Ted Kremenek } 44527783eb8a030afd153280a15afdede29819d90d2Ted Kremenek} 44627783eb8a030afd153280a15afdede29819d90d2Ted Kremenek 44727783eb8a030afd153280a15afdede29819d90d2Ted Kremenekexit($Status >> 8); 44827783eb8a030afd153280a15afdede29819d90d2Ted Kremenek 4498459132b0302cde7eb2a21eb2c6ffca9e66e3aeaTed Kremenek