109 lines
3.3 KiB
Diff
109 lines
3.3 KiB
Diff
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
From: Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
Subject: gdb-6.7-ppc-clobbered-registers-O2-test.patch
|
|
|
|
;; Test PPC hiding of call-volatile parameter register.
|
|
;;=fedoratest
|
|
|
|
2007-11-04 Jan Kratochvil <jan.kratochvil@redhat.com>
|
|
|
|
* gdb.arch/ppc-clobbered-registers-O2.exp: `powerpc64' changed to
|
|
`powerpc*'.
|
|
|
|
Testcase for:
|
|
|
|
http://sourceware.org/ml/gdb-patches/2007-09/msg00228.html
|
|
|
|
2007-10-21 Luis Machado <luisgpm@br.ibm.com>
|
|
|
|
* rs6000-tdep.c (ppc_dwarf2_frame_init_reg): New function.
|
|
* (rs6000_gdbarch_init): Install ppc_dwarf2_frame_init_reg as
|
|
default dwarf2_frame_set_init_reg function.
|
|
|
|
diff --git a/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c
|
|
new file mode 100644
|
|
--- /dev/null
|
|
+++ b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.c
|
|
@@ -0,0 +1,21 @@
|
|
+
|
|
+unsigned * __attribute__((noinline))
|
|
+start_sequence (unsigned * x, unsigned * y)
|
|
+{
|
|
+ return (unsigned *)0xdeadbeef;
|
|
+};
|
|
+
|
|
+unsigned __attribute__((noinline))
|
|
+gen_movsd (unsigned * operand0, unsigned * operand1)
|
|
+{
|
|
+ return *start_sequence(operand0, operand1);
|
|
+}
|
|
+
|
|
+int main(void)
|
|
+{
|
|
+ unsigned x, y;
|
|
+
|
|
+ x = 13;
|
|
+ y = 14;
|
|
+ return (int)gen_movsd (&x, &y);
|
|
+}
|
|
diff --git a/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp
|
|
new file mode 100644
|
|
--- /dev/null
|
|
+++ b/gdb/testsuite/gdb.arch/ppc-clobbered-registers-O2.exp
|
|
@@ -0,0 +1,54 @@
|
|
+# Copyright 2006 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 2 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, write to the Free Software
|
|
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
+#
|
|
+# This file is part of the gdb testsuite.
|
|
+
|
|
+# Test displaying call clobbered registers in optimized binaries for ppc.
|
|
+# GDB should not show incorrect values.
|
|
+
|
|
+if ![istarget "powerpc*-*"] then {
|
|
+ verbose "Skipping powerpc* call clobbered registers testing."
|
|
+ return
|
|
+}
|
|
+
|
|
+set testfile "ppc-clobbered-registers-O2"
|
|
+set srcfile ${testfile}.c
|
|
+set binfile [standard_output_file ${testfile}]
|
|
+set compile_flags "debug additional_flags=-O2"
|
|
+
|
|
+if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable ${compile_flags}] != "" } {
|
|
+ unsupported "Testcase compile failed."
|
|
+ return -1
|
|
+}
|
|
+
|
|
+gdb_exit
|
|
+gdb_start
|
|
+gdb_reinitialize_dir $srcdir/$subdir
|
|
+gdb_load ${binfile}
|
|
+
|
|
+if ![runto_main] then {
|
|
+ perror "Couldn't run to breakpoint"
|
|
+ continue
|
|
+}
|
|
+
|
|
+gdb_test "b start_sequence" ".*Breakpoint 2 at.*line 6.*" \
|
|
+ "Insert breakpoint at problematic function"
|
|
+
|
|
+gdb_test continue ".*Breakpoint 2.*in start_sequence.*" \
|
|
+ "Run until problematic function"
|
|
+
|
|
+gdb_test backtrace ".*operand0=<value optimized out>.*operand1=<value optimized out>.*" \
|
|
+ "Check value of call clobbered registers"
|