Add parallel build support for perf tests.
authorDoug Evans <dje@google.com>
Fri, 24 Jul 2015 22:28:46 +0000 (15:28 -0700)
committerDoug Evans <dje@google.com>
Fri, 24 Jul 2015 22:28:46 +0000 (15:28 -0700)
gdb/testsuite/ChangeLog:

* Makefile.in (check/%.exp): Pass directory for GDB_PARALLEL.
(workers/%.worker, build-perf): New rule.
(GDB_PERFTEST_MODE): New variable.
(check-perf): Use it.
(clean): Clean up gdb.perf parallel build subdirs.
* lib/build-piece.exp: New file.
* lib/cache.exp (gdb_do_cache): Include $GDB_PARALLEL in path name.
* lib/gdb.exp (standard_output_file): Include $GDB_PARALLEL in path
name.
(standard_temp_file): Ditto.
(GDB_PARALLEL handling): Make outputs,temp,cache directories as subdirs
of $GDB_PARALLEL.

gdb/testsuite/ChangeLog
gdb/testsuite/Makefile.in
gdb/testsuite/lib/build-piece.exp [new file with mode: 0644]
gdb/testsuite/lib/cache.exp
gdb/testsuite/lib/gdb.exp

index 591ce4af6e2eb5d09faa48180b0833a526931a71..7f4386e97376fb2b87061f4c941cc2c086c6df71 100644 (file)
@@ -1,3 +1,18 @@
+2015-07-24  Doug Evans  <dje@google.com>
+
+       * Makefile.in (check/%.exp): Pass directory for GDB_PARALLEL.
+       (workers/%.worker, build-perf): New rule.
+       (GDB_PERFTEST_MODE): New variable.
+       (check-perf): Use it.
+       (clean): Clean up gdb.perf parallel build subdirs.
+       * lib/build-piece.exp: New file.
+       * lib/cache.exp (gdb_do_cache): Include $GDB_PARALLEL in path name.
+       * lib/gdb.exp (standard_output_file): Include $GDB_PARALLEL in path
+       name.
+       (standard_temp_file): Ditto.
+       (GDB_PARALLEL handling): Make outputs,temp,cache directories as subdirs
+       of $GDB_PARALLEL.
+
 2015-07-24  Doug Evans  <dje@google.com>
 
        * lib/future.exp (gdb_default_target_compile): New option
index c064f06fc742b7552ae75b93cd31e26346f8e20d..ffda7b990c429e1583da20089b8121a151e6a761 100644 (file)
@@ -227,16 +227,48 @@ do-check-parallel: $(TEST_TARGETS)
 
 @GMAKE_TRUE@check/%.exp:
 @GMAKE_TRUE@   -mkdir -p outputs/$*
-@GMAKE_TRUE@   @$(DO_RUNTEST) GDB_PARALLEL=yes --outdir=outputs/$* $*.exp $(RUNTESTFLAGS)
+@GMAKE_TRUE@   @$(DO_RUNTEST) GDB_PARALLEL=. --outdir=outputs/$* $*.exp $(RUNTESTFLAGS)
 
 check/no-matching-tests-found:
        @echo ""
        @echo "No matching tests found."
        @echo ""
 
+# Utility rule invoked by step 2 of the build-perf rule.
+@GMAKE_TRUE@workers/%.worker:
+@GMAKE_TRUE@   mkdir -p gdb.perf/outputs/$*
+@GMAKE_TRUE@   $(DO_RUNTEST) --status --outdir=gdb.perf/outputs/$* lib/build-piece.exp WORKER=$* GDB_PARALLEL=gdb.perf $(RUNTESTFLAGS) GDB_PERFTEST_MODE=compile GDB_PERFTEST_SUBMODE=build-pieces
+
+# Utility rule to build tests that support it in parallel.
+# The build is broken into 3 steps distinguished by GDB_PERFTEST_SUBMODE:
+# gen-workers, build-pieces, final.
+#
+# GDB_PERFTEST_MODE appears *after* RUNTESTFLAGS here because we don't want
+# anything in RUNTESTFLAGS to override it.
+#
+# We don't delete the outputs directory here as these programs can take
+# awhile to build, and perftest.exp has support for deciding whether to
+# recompile them.  If you want to remove these directories, make clean.
+#
+# The point of step 1 is to construct the set of worker tasks for step 2.
+# All of the information needed by build-piece.exp is contained in the name
+# of the generated .worker file.
+@GMAKE_TRUE@build-perf: $(abs_builddir)/site.exp
+@GMAKE_TRUE@   rm -rf gdb.perf/workers
+@GMAKE_TRUE@   mkdir -p gdb.perf/workers
+@GMAKE_TRUE@   @: Step 1: Generate the build .worker files.
+@GMAKE_TRUE@   $(DO_RUNTEST) --status --directory=gdb.perf --outdir gdb.perf/workers GDB_PARALLEL=gdb.perf $(RUNTESTFLAGS) GDB_PERFTEST_MODE=compile GDB_PERFTEST_SUBMODE=gen-workers
+@GMAKE_TRUE@   @: Step 2: Compile the pieces.  Here is the build parallelism.
+@GMAKE_TRUE@   $(MAKE) $$(cd gdb.perf && echo workers/*/*.worker)
+@GMAKE_TRUE@   @: Step 3: Do the final link.
+@GMAKE_TRUE@   $(DO_RUNTEST) --status --directory=gdb.perf --outdir gdb.perf GDB_PARALLEL=gdb.perf $(RUNTESTFLAGS) GDB_PERFTEST_MODE=compile GDB_PERFTEST_SUBMODE=final
+
+# The default is to both compile and run the tests.
+GDB_PERFTEST_MODE = both
+
 check-perf: all $(abs_builddir)/site.exp
        @if test ! -d gdb.perf; then mkdir gdb.perf; fi
-       $(DO_RUNTEST) --directory=gdb.perf --outdir gdb.perf GDB_PERFTEST_MODE=both $(RUNTESTFLAGS)
+       $(DO_RUNTEST) --directory=gdb.perf --outdir gdb.perf GDB_PERFTEST_MODE=$(GDB_PERFTEST_MODE) $(RUNTESTFLAGS)
 
 force:;
 
@@ -245,6 +277,7 @@ clean mostlyclean:
        -rm -f core.* *.tf *.cl tracecommandsscript copy1.txt zzz-gdbscript
        -rm -f *.dwo *.dwp
        -rm -rf outputs temp cache
+       -rm -rf gdb.perf/workers gdb.perf/outputs gdb.perf/temp gdb.perf/cache
        -rm -f read1.so expect-read1
        if [ x"${ALL_SUBDIRS}" != x ] ; then \
            for dir in ${ALL_SUBDIRS}; \
diff --git a/gdb/testsuite/lib/build-piece.exp b/gdb/testsuite/lib/build-piece.exp
new file mode 100644 (file)
index 0000000..a81530c
--- /dev/null
@@ -0,0 +1,39 @@
+# Copyright (C) 2014 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# Utility to bootstrap building a piece of a performance test in a
+# parallel build.
+# See testsuite/Makefile.in:workers/%.worker.
+# WORKER is set by the makefile and is
+# "{program_name}/{program_name}-{worker_nr}".
+
+regexp "^\(.+\)/\(.+\)-\(\[0-9\]+\)$" $WORKER entire_match PROGRAM_NAME pname2 WORKER_NR
+
+if { ![info exists entire_match] || $entire_match != $WORKER } {
+    error "Bad value for WORKER: $WORKER"
+}
+if { $PROGRAM_NAME != $pname2 } {
+    error "Bad value for WORKER: $WORKER"
+}
+
+# $subdir is set to "lib", because that is where this file lives,
+# which is not what tests expect.
+set subdir "gdb.perf"
+
+# $gdb_test_file_name is set to this file, build-piece, which is not what
+# tests expect.
+set gdb_test_file_name $PROGRAM_NAME
+
+source $srcdir/$subdir/${gdb_test_file_name}.exp
index 8df04b9a58014f9b862eab99d49b798c729a1af9..9565b394ebb99ecf6444fc2ff5cd832e57a74ee1 100644 (file)
@@ -35,7 +35,7 @@ proc gdb_do_cache {name} {
     }
 
     if {[info exists GDB_PARALLEL]} {
-       set cache_filename [file join $objdir cache $cache_name]
+       set cache_filename [file join $objdir $GDB_PARALLEL cache $cache_name]
        if {[file exists $cache_filename]} {
            set fd [open $cache_filename]
            set gdb_data_cache($cache_name) [read -nonewline $fd]
index ffc63a594422207721b75649d2dc069d6027a383..fa0ab096217df75109f12a71e0954e1323252b45 100644 (file)
@@ -3961,7 +3961,7 @@ proc standard_output_file {basename} {
     global objdir subdir gdb_test_file_name GDB_PARALLEL
 
     if {[info exists GDB_PARALLEL]} {
-       set dir [file join $objdir outputs $subdir $gdb_test_file_name]
+       set dir [file join $objdir $GDB_PARALLEL outputs $subdir $gdb_test_file_name]
        file mkdir $dir
        return [file join $dir $basename]
     } else {
@@ -3975,7 +3975,7 @@ proc standard_temp_file {basename} {
     global objdir GDB_PARALLEL
 
     if {[info exists GDB_PARALLEL]} {
-       return [file join $objdir temp $basename]
+       return [file join $objdir $GDB_PARALLEL temp $basename]
     } else {
        return $basename
     }
@@ -5091,7 +5091,10 @@ if {[info exists GDB_PARALLEL]} {
     if {[is_remote host]} {
        unset GDB_PARALLEL
     } else {
-       file mkdir outputs temp cache
+       file mkdir \
+           [file join $GDB_PARALLEL outputs] \
+           [file join $GDB_PARALLEL temp] \
+           [file join $GDB_PARALLEL cache]
     }
 }