WebSVN – DevTools – Diff – /core_devl/trunk/CFG/TOOLSET/GCC.PL

 #............................................................................#
 use strict;
 use warnings;
+# Global variables
 our $ScmPlatform;
 our $ScmNoToolsTest;
+our $ScmToolsetProcessTests;
+#   Misc variables
+my $UseGcov = 0;
+my $UseCppcheck = 0;
 ##############################################################################
 #   Configuration information
 #   Cross reference from CrossCompiler Alias to actual paths
 #   Structure:
 ToolsetInit();
 sub ToolsetInit
+{
     my( $GCCTarget, $GCCToolchain, $GCCRoot, $GCCBin, $GCCAr, $GCCObjCopy );
-    my( $GCCFlags,  $GCCFlagsP, $GCCFlagsD );
+    my( $GCCFlags,  $GCCFlagsP, $GCCFlagsD, $LDFlags );
     my( $PkgArch);
     my( $arg_alias, $tools_found, $compiler_tool );
 #.. Toolset configuration
+#
     $::ScmToolsetVersion = "1.0.0";             # our version
     $::ScmToolsetGenerate = 0;                  # GEN generate optional
     $::ScmToolsetCompilerPath = 1;              # Exports Compiler path to makefile via SCM_COMPILERPATH
     $::ScmToolsetProgDependancies = 0;          # handle Prog dependancies myself
     $::ScmToolsetSoName = 1;                    # Shared library supports SoName
+    $ScmToolsetProcessTests = 0;                # Unit Tests require Pre/Post processing - set later
 #.. Standard.rul requirements
+#
     $::s = "asm";
     $::o = "o";
             $GCCTarget = "$1";
         } elsif (/^--CrossAlias=(.*)/) {        # CrossCompiler target-alias
             $arg_alias = $1;
+        } elsif (/^--UseGcov/) {                # Compile for code coverage
+            $UseGcov = 1;
+        } elsif (/^--UseCppcheck/) {            # Use cppcheck as the lint tool
+            $UseCppcheck = 1;
         } elsif (/^--CompilerTool=(.*)/) {      # CrossCompiler located in package
             $compiler_tool = $1;
         } else {
             Message( "gcc toolset: unknown option $_ -- ignored\n" );
         $GCCRoot = '/usr';
         $GCCBin = 'gcc';
         $GCCAr = 'ar';
         $GCCObjCopy =  'objcopy';
+    }
+    #
+    #   When running under gcov we need to instruct GCC to perform code coverage
+    #   generation in both C flags and LD flags
+    #
+    if ( $UseGcov )
+    {
+        $GCCFlags .= ' -coverage';
+        $LDFlags  .= ' -coverage';
+    }
+    #
+    #   When running with cppcheck we need to include it in our environment
+    #
+    if ( $UseCppcheck )
+    {
+        ToolsetRequire( "cppcheck" );
+        PlatformDefine( "CPPCHECK_PLATFORM := unix32" );
+    }
 #.. Define GCC environment
+#
     PlatformDefine( "
 #################################################
     PlatformDefine( "GCC_AR             := $GCCAr" );
     PlatformDefine( "GCC_OBJCOPY        := $GCCObjCopy" );
     PlatformDefine( "GCC_CFLAGS         := $GCCFlags" ) if defined $GCCFlags;
     PlatformDefine( "GCC_CFLAGSP        := $GCCFlagsP" ) if defined $GCCFlagsP;
     PlatformDefine( "GCC_CFLAGSD        := $GCCFlagsD" ) if defined $GCCFlagsD;
+    PlatformDefine( "GCC_LDFLAGS        := $LDFlags" ) if defined $LDFlags;
+    #
     #   Required since this toolset advertises: ScmToolsetCompilerPath
+    #
     PlatformDefine( "SCM_COMPILERPATH   := \$\{GCC_CC\}" );
         MakePrint( "\tCFLAGS +=$cflags\n" );
+    }
     $file = StripExt( $obj );                   # Metric working file
     ToolsetGenerate( "\$(OBJDIR)/$file.met" );
+    if ( $UseGcov )
+    {
+        $ScmToolsetProcessTests = 1;
+        ToolsetGenerate( '$(OBJDIR)/' . $file . '.gcno' );
+        ToolsetGenerate( '$(OBJDIR)/' . $file . '.gcda' );
+    }
+}
 ###############################################################################
 #   ToolsetCCDepend( $depend, \@sources )
         MakePrint( "\tCXXFLAGS +=$cflags\n" );
+    }
     $file = StripExt( $obj );                   # Metric working file
     ToolsetGenerate( "\$(OBJDIR)/$file.met" );
+    if ( $UseGcov )
+    {
+        $ScmToolsetProcessTests = 1;
+        ToolsetGenerate( '$(OBJDIR)/' . $file . '.gcno' );
+        ToolsetGenerate( '$(OBJDIR)/' . $file . '.gcda' );
+    }
+}
 ###############################################################################
 #   ToolsetCXXDepend( $depend, \@sources )
     PackageProgAddFiles ( $name, $dbg );
+}
+###############################################################################
+# Function        : ToolsetPreprocessTests
+#
+# Description     :
+#
+# Inputs          : None
+#
+# Returns         : Nothing
+#
+# Output:         : Rules and recipes to run before unit tests
+#
+sub ToolsetPreprocessTests
+{
+    my ($io) = ToolsetPrinter::New();
+    if ( $UseGcov && scalar(keys %::OBJSOURCE) > 0 )
+    {
+        #   Force The Pre/Post/Collate rules to be processed
+        $ScmToolsetProcessTests = 1;
+        my $finaldir='$(LOCALDIR)/lcov/$(GBE_PLATFORM)$(GBE_TYPE)';
+        my $final=$finaldir . '/lcov-final.info';
+        ToolsetGenerate( '$(OBJDIR)/lcov-baseline.info' );
+        $io->PrtLn('.PHONY: preprocess_tests' );
+        $io->PrtLn('preprocess_tests:' );
+        my $key;
+        my $value;
+        while(($key, $value) = each(%::OBJSOURCE))
+        {
+            $io->PrtLn("\t" . '$(XX_PRE)rm -f $(OBJDIR)/' . $key . ".gcda");
+        }
+        $io->PrtLn("\t" . '${XX_PRE}$(rm) -f ' . $final);
+        $io->PrtLn("\t" . '${XX_PRE}lcov'
+                      . ' --rc lcov_branch_coverage=1'
+                      . ' --capture'
+                      . ' --initial'
+                      . ' --base-directory ' . $::Cwd
+                      . ' --directory $(OBJDIR)'
+                      . ' --output-file $(OBJDIR)/lcov-baseline.info' );
+    }
+}
+###############################################################################
+# Function        : ToolsetPostprocessTests
+#
+# Description     :
+#
+# Inputs          : None
+#
+# Returns         : Nothing
+#
+# Output:         : Rules and recipes to run after the unit tests
+#
+sub ToolsetPostprocessTests
+{
+    my ($io) = ToolsetPrinter::New();
+    if ( $UseGcov && scalar(keys %::OBJSOURCE) > 0 )
+    {
+        my $finaldir='$(LOCALDIR)/lcov/$(GBE_PLATFORM)$(GBE_TYPE)';
+        my $final=$finaldir . '/lcov-final.info';
+        ToolsetGenerate( '$(OBJDIR)/lcov-capture.info' );
+        ToolsetGenerate( $final );
+        $io->PrtLn('.PHONY: postprocess_tests' );
+        $io->PrtLn('postprocess_tests:' );
+        $io->PrtLn("\t" . '$(eval GCDA_COUNT := $(shell find $(OBJDIR) -name "*.gcda"))');
+        $io->PrtLn  ("\t" . '$(XX_PRE)$(mkdir) -p ' . $finaldir);
+        $io->PrtPart("\t" . '$(XX_PRE)if [ "$(GCDA_COUNT)" = "" ]; then');
+        $io->PrtPart("\t\t" . 'if [ ! -e ' . $final . " ]; then");
+        $io->PrtPart("\t\t\t" . '$(cp) $(OBJDIR)/lcov-baseline.info ' . $final . ';');
+        $io->PrtPart("\t\t" . 'else');
+        $io->PrtPart("\t\t\t" . 'lcov'
+                          . ' --rc lcov_branch_coverage=1'
+                          . ' --add-tracefile $(OBJDIR)/lcov-baseline.info'
+                          . ' --add-tracefile ' . $final
+                          . ' --output-file $(OBJDIR)/lcov-merge.info'
+                          . ';');
+        $io->PrtPart("\t\t\t" . '$(rm) -f ' . $final . ';');
+        $io->PrtPart("\t\t\t" . '$(mv) $(OBJDIR)/lcov-merge.info ' . $final . ';');
+        $io->PrtPart("\t\t" . 'fi' . ';');
+        $io->PrtPart("\t" . 'else');
+        $io->PrtPart("\t\t" . 'lcov'
+                        . ' --rc lcov_branch_coverage=1'
+                        . ' --capture'
+                        . ' --base-directory ' . $::Cwd
+                        . ' --directory $(OBJDIR)'
+                        . ' --output-file $(OBJDIR)/lcov-capture.info'
+                        . ';');
+        $io->PrtPart("\t\t" . 'if [ ! -e ' . $final . " ]; then");
+        $io->PrtPart("\t\t\t" . 'lcov'
+                          . ' --rc lcov_branch_coverage=1'
+                          . ' --add-tracefile $(OBJDIR)/lcov-baseline.info'
+                          . ' --add-tracefile $(OBJDIR)/lcov-capture.info'
+                          . ' --output-file ' .  $final
+                          . ';');
+        $io->PrtPart("\t\t" . 'else');
+        $io->PrtPart("\t\t\t" . 'lcov'
+                          . ' --rc lcov_branch_coverage=1'
+                          . ' --add-tracefile $(OBJDIR)/lcov-baseline.info'
+                          . ' --add-tracefile $(OBJDIR)/lcov-capture.info'
+                          . ' --add-tracefile ' . $final
+                          . ' --output-file $(OBJDIR)/lcov-merge.info'
+                          . ';');
+        $io->PrtPart("\t\t\t" . '$(rm) -f ' . $final . ';');
+        $io->PrtPart("\t\t\t" . '$(mv) $(OBJDIR)/lcov-merge.info ' . $final . ';');
+        $io->PrtPart("\t\t" . 'fi' . ';');
+        $io->PrtLn  ("\t" . 'fi');
+    }
+}
+###############################################################################
+# Function        : ToolsetCollateTestResults
+#
+# Description     :
+#
+# Inputs          : None
+#
+# Returns         : Nothing
+#
+# Output:         : Rules and recipes to run after unit test result
+#                   postprocessing.
+#
+sub ToolsetCollateTestResults
+{
+    my ($io) = ToolsetPrinter::New();
+    if ( $UseGcov && scalar(keys %::OBJSOURCE) > 0 )
+    {
+        my $finaldir='$(LOCALDIR)/lcov/$(GBE_PLATFORM)$(GBE_TYPE)';
+        my $final=$finaldir . '/lcov-final.info';
+        my $reportdir='$(PKGDIR)/lcov/$(GBE_PLATFORM)$(GBE_TYPE)';
+        my $reportindex=$reportdir . '/index.html';
+        $io->PrtLn('.PHONY: collate_test_results' );
+        $io->PrtLn('collate_test_results: ' . $reportindex);
+        $io->Newline();
+        $io->PrtLn($reportindex . ': ' . $final);
+        $io->PrtLn("\t" . 'genhtml'
+                      . ' --frames'
+                      . ' --show-details'
+                      . ' --function-coverage'
+                      . ' --branch-coverage'
+                      . ' --output-directory ' . $reportdir
+                      . ' --legend'
+                      . ' --demangle-cpp'
+                      . ' ' . $final);
+    }
+}
+###############################################################################
+#   ToolsetARLINT( $name, \@args, \@objs )
+#       This subroutine takes the user options and builds the rules
+#       required to lint the static library 'name'.
+#
+#   Arguments:
+#       --xxx                   No arguments currently defined
+#
+#   Output:
+#       [ $(LIBDIR)/name$_lint:   .... ]
+#           $(ARLINT)
+#
+###############################################################################
+sub ToolsetARLINT
+{
+    if ( $UseCppcheck )
+    {
+        CppcheckAR( @_ );
+    }
+}
+###############################################################################
+#   ToolsetSHLDLINT $name, \@args, \@objs, \@libraries )
+#       This subroutine takes the user options and builds the rules
+#       required to lint the shared library 'name'.
+#
+#   Arguments:
+#       (none)
+#
+#   Output:
+#       [ $(LIBDIR)/$name_lint:   .... ]
+#           $(SHLIBLINT)
+#
+###############################################################################
+sub ToolsetSHLDLINT
+{
+    if ( $UseCppcheck )
+    {
+        CppcheckSHLD( @_ );
+    }
+}
+###############################################################################
+#   ToolsetLD( $name, \@args, \@objs, \@libraries, \@csrc, \@cxxsrc )
+#       This subroutine takes the user options and builds the rules
+#       required to lint the program 'name'.
+#
+#   Arguments:
+#       (none)
+#
+#   Output:
+#       [ $(BINDIR)/$name_lint:   .... ]
+#           $(LDLINT)
+#
+###############################################################################
+sub ToolsetLDLINT
+{
+    if ( $UseCppcheck )
+    {
+        CppcheckLD( @_ );
+    }
+}
 ########################################################################
+#
 #   Push standard "system" libraries. This is a helper function
 #   used within this toolset.
+#

Subversion Repositories DevTools

(root)/core_devl/trunk/CFG/TOOLSET/GCC.PL – Rev 4109 → 4728