ca26ddfa99
Drop gdb-6.3-test-pie-20050107.patch. Drop gdb-6.3-test-self-20050110.patch. Drop gdb-6.5-bz218379-ppc-solib-trampoline-test.patch. Drop gdb-6.6-buildid-locate-core-as-arg.patch. Drop gdb-6.8-quit-never-aborts.patch. Drop gdb-archer-pie-addons-keep-disabled.patch. Drop gdb-archer-pie-addons.patch. Drop gdb-archer-vla-tests.patch. Drop gdb-archer.patch. Drop gdb-attach-fail-reasons-5of5.patch. Drop gdb-btrobust.patch. Drop gdb-bz1219747-attach-kills.patch. Drop gdb-bz533176-fortran-omp-step.patch. Drop gdb-dts-rhel6-python-compat.patch. Drop gdb-gnat-dwarf-crash-3of3.patch. Drop gdb-jit-reader-multilib.patch. Drop gdb-moribund-utrace-workaround.patch. Drop gdb-rhbz1930528-fix-gnulib-build-error.patch. Drop gdb-rhbz1932645-aarch64-ptrace-header-order.patch. Drop gdb-vla-intel-fix-print-char-array.patch. Drop gdb-vla-intel-fortran-strides.patch. Drop gdb-vla-intel-stringbt-fix.patch. Drop gdb-vla-intel-tests.patch. Drop process_psymtab_comp_unit-type-unit.patch. Drop gdb-testsuite-readline63-sigint-revert.patch. Drop gdb-config.patch. Add following upstream patches for Fortran stride / slice support: gdb-rhbz1964167-convert-enum-range_type.patch gdb-rhbz1964167-fortran-array-slices-at-prompt.patch gdb-rhbz1964167-fortran-array-strides-in-expressions.patch gdb-rhbz1964167-fortran-clean-up-array-expression-evaluation.patch gdb-rhbz1964167-fortran-range_type-to-range_flag.patch gdb-rhbz1964167-fortran-whitespace_array.patch gdb-rhbz1964167-move-fortran-expr-handling.patch
129 lines
3.1 KiB
Diff
129 lines
3.1 KiB
Diff
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001
|
|
From: Fedora GDB patches <invalid@email.com>
|
|
Date: Fri, 27 Oct 2017 21:07:50 +0200
|
|
Subject: gdb-6.6-buildid-locate-rpm-scl.patch
|
|
|
|
;; [SCL] Skip deprecated .gdb_index warning for Red Hat built files (BZ 953585).
|
|
;;=push+jan
|
|
|
|
warning: Skipping deprecated .gdb_index section
|
|
https://bugzilla.redhat.com/show_bug.cgi?id=953585
|
|
|
|
diff --git a/gdb/build-id.c b/gdb/build-id.c
|
|
--- a/gdb/build-id.c
|
|
+++ b/gdb/build-id.c
|
|
@@ -742,7 +742,11 @@ static int missing_rpm_list_entries;
|
|
/* Returns the count of newly added rpms. */
|
|
|
|
static int
|
|
+#ifndef GDB_INDEX_VERIFY_VENDOR
|
|
missing_rpm_enlist (const char *filename)
|
|
+#else
|
|
+missing_rpm_enlist_1 (const char *filename, int verify_vendor)
|
|
+#endif
|
|
{
|
|
static int rpm_init_done = 0;
|
|
rpmts ts;
|
|
@@ -849,7 +853,11 @@ missing_rpm_enlist (const char *filename)
|
|
mi = rpmtsInitIterator_p (ts, RPMTAG_BASENAMES, filename, 0);
|
|
if (mi != NULL)
|
|
{
|
|
+#ifndef GDB_INDEX_VERIFY_VENDOR
|
|
for (;;)
|
|
+#else
|
|
+ if (!verify_vendor) for (;;)
|
|
+#endif
|
|
{
|
|
Header h;
|
|
char *debuginfo, **slot, *s, *s2;
|
|
@@ -967,6 +975,37 @@ missing_rpm_enlist (const char *filename)
|
|
xfree (debuginfo);
|
|
count++;
|
|
}
|
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
+ else /* verify_vendor */
|
|
+ {
|
|
+ int vendor_pass = 0, vendor_fail = 0;
|
|
+
|
|
+ for (;;)
|
|
+ {
|
|
+ Header h;
|
|
+ errmsg_t err;
|
|
+ char *vendor;
|
|
+
|
|
+ h = rpmdbNextIterator_p (mi);
|
|
+ if (h == NULL)
|
|
+ break;
|
|
+
|
|
+ vendor = headerFormat_p (h, "%{vendor}", &err);
|
|
+ if (!vendor)
|
|
+ {
|
|
+ warning (_("Error querying the rpm file `%s': %s"), filename,
|
|
+ err);
|
|
+ continue;
|
|
+ }
|
|
+ if (strcmp (vendor, "Red Hat, Inc.") == 0)
|
|
+ vendor_pass = 1;
|
|
+ else
|
|
+ vendor_fail = 1;
|
|
+ xfree (vendor);
|
|
+ }
|
|
+ count = vendor_pass != 0 && vendor_fail == 0;
|
|
+ }
|
|
+#endif
|
|
|
|
rpmdbFreeIterator_p (mi);
|
|
}
|
|
@@ -976,6 +1015,20 @@ missing_rpm_enlist (const char *filename)
|
|
return count;
|
|
}
|
|
|
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
+missing_rpm_enlist (const char *filename)
|
|
+{
|
|
+ return missing_rpm_enlist_1 (filename, 0);
|
|
+}
|
|
+
|
|
+extern int rpm_verify_vendor (const char *filename);
|
|
+int
|
|
+rpm_verify_vendor (const char *filename)
|
|
+{
|
|
+ return missing_rpm_enlist_1 (filename, 1);
|
|
+}
|
|
+#endif
|
|
+
|
|
static bool
|
|
missing_rpm_list_compar (const char *ap, const char *bp)
|
|
{
|
|
diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c
|
|
--- a/gdb/dwarf2/read.c
|
|
+++ b/gdb/dwarf2/read.c
|
|
@@ -3034,6 +3034,16 @@ read_gdb_index_from_buffer (const char *filename,
|
|
"set use-deprecated-index-sections on". */
|
|
if (version < 6 && !deprecated_ok)
|
|
{
|
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
+ extern int rpm_verify_vendor (const char *filename);
|
|
+
|
|
+ /* Red Hat Developer Toolset exception. */
|
|
+ if (rpm_verify_vendor (filename))
|
|
+ {}
|
|
+ else
|
|
+ {
|
|
+
|
|
+#endif
|
|
static int warning_printed = 0;
|
|
if (!warning_printed)
|
|
{
|
|
@@ -3045,6 +3055,10 @@ to use the section anyway."),
|
|
warning_printed = 1;
|
|
}
|
|
return 0;
|
|
+#ifdef GDB_INDEX_VERIFY_VENDOR
|
|
+
|
|
+ }
|
|
+#endif
|
|
}
|
|
/* Version 7 indices generated by gold refer to the CU for a symbol instead
|
|
of the TU (for symbols coming from TUs),
|