1#!/bin/bash -eu
2#
3# Script to reproduce a test failure from a dejagnu .log file.
4#
5# Contributed by Diego Novillo <dnovillo@google.com>
6#
7# Copyright (C) 2011, 2012, 2013 Free Software Foundation, Inc.
8#
9# This file is part of GCC.
10#
11# GCC is free software; you can redistribute it and/or modify
12# it under the terms of the GNU General Public License as published by
13# the Free Software Foundation; either version 3, or (at your option)
14# any later version.
15#
16# GCC is distributed in the hope that it will be useful,
17# but WITHOUT ANY WARRANTY; without even the implied warranty of
18# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19# GNU General Public License for more details.
20#
21# You should have received a copy of the GNU General Public License
22# along with GCC; see the file COPYING.  If not, write to
23# the Free Software Foundation, 51 Franklin Street, Fifth Floor,
24# Boston, MA 02110-1301, USA.
25
26# This script will search a line starting with 'spawn' that includes the
27# pattern you are looking for (typically a source file name).
28#
29# Once it finds that pattern, it re-executes the whole command
30# in the spawn line.  If the pattern matches more than one spawn
31# command, it asks which one you want.
32
33if [ $# -lt 2 ] ; then
34    echo "usage: $0 [--debug|--debug-tui] pattern file.log [additional-args]"
35    echo
36    echo "Finds the 'spawn' line matching PATTERN in FILE.LOG and executes"
37    echo "the command with any arguments in ADDITIONAL-ARGS."
38    echo
39    echo "If --debug is used, the compiler is invoked with -wrapper gdb,--args"
40    echo "If --debug-tui is used, the compiler is invoked with -wrapper "\
41         "gdb,--tui,--args"
42    exit 1
43fi
44
45if [ "$1" == "--debug" ] ; then
46    debug_args="-wrapper gdb,--args"
47    shift
48elif [ "$1" == "--debug-tui" ] ; then
49    debug_args="-wrapper gdb,--tui,--args"
50    shift
51else
52    debug_args=""
53fi
54pattern="$1"
55logf="$2"
56shift 2
57
58# Find the commands in LOGF that reference PATTERN.
59lines=$(grep -E "^spawn .*$pattern" $logf \
60        | sed -e 's/^spawn -ignore SIGHUP //' \
61        | sed -e 's/^spawn //')
62if [ -z "$lines" ] ; then
63    echo "Could not find a spawn command for pattern $pattern"
64    exit 1
65fi
66
67# Collect all the command lines into the COMMANDS array.
68old_IFS="$IFS"
69IFS="
70"
71num_lines=0
72for line in $lines ; do
73    num_lines=$[$num_lines + 1]
74    echo "[$num_lines] $line"
75    commands[$num_lines]=$line
76done
77
78# If we found more than one line for PATTERN, ask which one we should run.
79cmds_to_run='0'
80if [ $num_lines -gt 1 ] ; then
81    echo
82    echo
83    echo -n "Enter the list of commands to run or '0' to run them all: "
84    read cmds_to_run
85fi
86if [ "$cmds_to_run" = "0" ] ; then
87    cmds_to_run=$(seq 1 $num_lines)
88fi
89IFS="$old_IFS"
90
91# Finally, execute all the commands we were told to execute.
92for cmd_num in $cmds_to_run ; do
93    cmd=${commands[$cmd_num]}
94    set -x +e
95    $cmd $debug_args "$@"
96    set +x -e
97done
98