Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:MaxxedSUSE:Compiler-Tools-leap
gdb
gdb-symtab-add-producer_is_gas.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File gdb-symtab-add-producer_is_gas.patch of Package gdb
From aa8ba17b9a3fdfeeb65df4c3e0731a0e9e96cbf7 Mon Sep 17 00:00:00 2001 From: Tom de Vries <tdevries@suse.de> Date: Wed, 1 Nov 2023 00:33:12 +0100 Subject: [PATCH 1/2] [gdb/symtab] Add producer_is_gas Add producer_is_gas, a generic way to get the gas version from the producer string. Tested on x86_64-linux. --- gdb/dwarf2/read.c | 4 ++-- gdb/producer.c | 56 +++++++++++++++++++++++++++++++++++++++++++++++ gdb/producer.h | 5 +++++ 3 files changed, 63 insertions(+), 2 deletions(-) diff --git a/gdb/dwarf2/read.c b/gdb/dwarf2/read.c index 970dd54c7a5..472684a5817 100644 --- a/gdb/dwarf2/read.c +++ b/gdb/dwarf2/read.c @@ -13376,8 +13376,8 @@ check_producer (struct dwarf2_cu *cu) cu->producer_is_codewarrior = true; else if (producer_is_clang (cu->producer, &major, &minor)) cu->producer_is_clang = true; - else if (startswith (cu->producer, "GNU AS 2.39.0")) - cu->producer_is_gas_2_39 = true; + else if (producer_is_gas (cu->producer, &major, &minor)) + cu->producer_is_gas_2_39 = major == 2 && minor == 39; else { /* For other non-GCC compilers, expect their behavior is DWARF version diff --git a/gdb/producer.c b/gdb/producer.c index 9fcf749e3d4..cd83dfce128 100644 --- a/gdb/producer.c +++ b/gdb/producer.c @@ -81,6 +81,45 @@ producer_is_gcc (const char *producer, int *major, int *minor) /* See producer.h. */ +bool +producer_is_gas (const char *producer, int *major, int *minor) +{ + if (producer == nullptr) + { + /* No producer, don't know. */ + return false; + } + + /* Detect prefix. */ + const char prefix[] = "GNU AS "; + if (!startswith (producer, prefix)) + { + /* Producer is not gas. */ + return false; + } + + /* Skip prefix. */ + const char *cs = &producer[strlen (prefix)]; + + /* Ensure that major/minor are not nullptrs. */ + int maj, min; + if (major == nullptr) + major = &maj; + if (minor == nullptr) + minor = &min; + + int scanned = sscanf (cs, "%d.%d", major, minor); + if (scanned != 2) + { + /* Unable to scan major/minor version. */ + return false; + } + + return true; +} + + /* See producer.h. */ + bool producer_is_icc_ge_19 (const char *producer) { @@ -251,6 +290,23 @@ Version 18.0 Beta"; SELF_CHECK (!producer_is_gcc (flang_llvm_exp, &major, &minor)); SELF_CHECK (producer_is_llvm (flang_llvm_exp)); } + + { + static const char gas_exp[] = "GNU AS 2.39.0"; + int major = 0, minor = 0; + SELF_CHECK (!producer_is_gcc (gas_exp, &major, &minor)); + SELF_CHECK (producer_is_gas (gas_exp, &major, &minor)); + SELF_CHECK (major == 2 && minor == 39); + + static const char gas_incomplete_exp[] = "GNU AS "; + SELF_CHECK (!producer_is_gas (gas_incomplete_exp, &major, &minor)); + SELF_CHECK (!producer_is_gcc (gas_incomplete_exp, &major, &minor)); + + static const char gas_incomplete_exp_2[] = "GNU AS 2"; + SELF_CHECK (!producer_is_gas (gas_incomplete_exp_2, &major, &minor)); + SELF_CHECK (!producer_is_gcc (gas_incomplete_exp_2, &major, &minor)); + } + } } } diff --git a/gdb/producer.h b/gdb/producer.h index c915979b122..00718511775 100644 --- a/gdb/producer.h +++ b/gdb/producer.h @@ -30,6 +30,11 @@ extern int producer_is_gcc_ge_4 (const char *producer); is NULL or it isn't GCC. */ extern int producer_is_gcc (const char *producer, int *major, int *minor); +/* Returns nonzero if the given PRODUCER string is GAS and sets the MAJOR + and MINOR versions when not NULL. Returns zero if the given PRODUCER + is NULL or it isn't GAS. */ +bool producer_is_gas (const char *producer, int *major, int *minor); + /* Check for Intel compilers >= 19.0. */ extern bool producer_is_icc_ge_19 (const char *producer); base-commit: 39553c1e285c426946188ec2a890c1c1cb933060 -- 2.35.3
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor