mirror of git://gcc.gnu.org/git/gcc.git
				
				
				
			
		
			
				
	
	
		
			97 lines
		
	
	
		
			2.8 KiB
		
	
	
	
		
			Bash
		
	
	
		
			Executable File
		
	
	
			
		
		
	
	
			97 lines
		
	
	
		
			2.8 KiB
		
	
	
	
		
			Bash
		
	
	
		
			Executable File
		
	
	
| #!/bin/bash -eu
 | |
| #
 | |
| # Script to reproduce a test failure from a dejagnu .log file.
 | |
| #
 | |
| # Contributed by Diego Novillo <dnovillo@google.com>
 | |
| #
 | |
| # Copyright (C) 2011, 2012, 2013 Free Software Foundation, Inc.
 | |
| #
 | |
| # This file is part of GCC.
 | |
| #
 | |
| # GCC 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, or (at your option)
 | |
| # any later version.
 | |
| #
 | |
| # GCC 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 GCC; see the file COPYING.  If not, write to
 | |
| # the Free Software Foundation, 51 Franklin Street, Fifth Floor,
 | |
| # Boston, MA 02110-1301, USA.
 | |
| 
 | |
| # This script will search a line starting with 'spawn' that includes the
 | |
| # pattern you are looking for (typically a source file name).
 | |
| #
 | |
| # Once it finds that pattern, it re-executes the whole command
 | |
| # in the spawn line.  If the pattern matches more than one spawn
 | |
| # command, it asks which one you want.
 | |
| 
 | |
| if [ $# -lt 2 ] ; then
 | |
|     echo "usage: $0 [--debug|--debug-tui] pattern file.log [additional-args]"
 | |
|     echo
 | |
|     echo "Finds the 'spawn' line matching PATTERN in FILE.LOG and executes"
 | |
|     echo "the command with any arguments in ADDITIONAL-ARGS."
 | |
|     echo
 | |
|     echo "If --debug is used, the compiler is invoked with -wrapper gdb,--args"
 | |
|     echo "If --debug-tui is used, the compiler is invoked with -wrapper "\
 | |
|          "gdb,--tui,--args"
 | |
|     exit 1
 | |
| fi
 | |
| 
 | |
| if [ "$1" == "--debug" ] ; then
 | |
|     debug_args="-wrapper gdb,--args"
 | |
|     shift
 | |
| elif [ "$1" == "--debug-tui" ] ; then
 | |
|     debug_args="-wrapper gdb,--tui,--args"
 | |
|     shift
 | |
| else
 | |
|     debug_args=""
 | |
| fi
 | |
| pattern="$1"
 | |
| logf="$2"
 | |
| shift 2
 | |
| 
 | |
| # Find the commands in LOGF that reference PATTERN.
 | |
| lines=$(grep -E "^spawn .*$pattern" $logf \
 | |
|         | sed -e 's/^spawn -ignore SIGHUP //' \
 | |
|         | sed -e 's/^spawn //')
 | |
| if [ -z "$lines" ] ; then
 | |
|     echo "Could not find a spawn command for pattern $pattern"
 | |
|     exit 1
 | |
| fi
 | |
| 
 | |
| # Collect all the command lines into the COMMANDS array.
 | |
| old_IFS="$IFS"
 | |
| IFS="
 | |
| "
 | |
| num_lines=0
 | |
| for line in $lines ; do
 | |
|     num_lines=$[$num_lines + 1]
 | |
|     echo "[$num_lines] $line"
 | |
|     commands[$num_lines]=$line
 | |
| done
 | |
| 
 | |
| # If we found more than one line for PATTERN, ask which one we should run.
 | |
| cmds_to_run='0'
 | |
| if [ $num_lines -gt 1 ] ; then
 | |
|     echo
 | |
|     echo
 | |
|     echo -n "Enter the list of commands to run or '0' to run them all: "
 | |
|     read cmds_to_run
 | |
| fi
 | |
| if [ "$cmds_to_run" = "0" ] ; then
 | |
|     cmds_to_run=$(seq 1 $num_lines)
 | |
| fi
 | |
| IFS="$old_IFS"
 | |
| 
 | |
| # Finally, execute all the commands we were told to execute.
 | |
| for cmd_num in $cmds_to_run ; do
 | |
|     cmd=${commands[$cmd_num]}
 | |
|     set -x +e
 | |
|     $cmd $debug_args "$@"
 | |
|     set +x -e
 | |
| done
 |