dwarf dump: Emit address range for compile units and functions

This commit is contained in:
Luke Street 2024-01-06 17:45:26 -07:00
parent d9612cc9b7
commit 458d0599f5
2 changed files with 161 additions and 80 deletions

View File

@ -15,8 +15,8 @@ use syntect::{
use crate::util::{
dwarf::{
process_root_tag, read_debug_section, should_skip_tag, tag_type_string, AttributeKind,
TagKind,
process_cu_tag, process_root_tag, read_debug_section, should_skip_tag, tag_type_string,
AttributeKind, TagKind,
},
file::{buf_writer, map_file},
};
@ -163,28 +163,34 @@ where
let mut units = Vec::<String>::new();
if let Some((_, mut tag)) = info.tags.first_key_value() {
loop {
match tag.kind {
TagKind::CompileUnit => {
let unit = tag
.string_attribute(AttributeKind::Name)
.ok_or_else(|| anyhow!("CompileUnit without name {:?}", tag))?;
if units.contains(unit) {
// log::warn!("Duplicate unit '{}'", unit);
let unit = process_root_tag(tag)?;
if units.contains(&unit.name) {
// log::warn!("Duplicate unit '{}'", unit.name);
} else {
units.push(unit.clone());
units.push(unit.name.clone());
}
writeln!(w, "\n// Compile unit: {}", unit)?;
writeln!(w, "\n/*\n Compile unit: {}", unit.name)?;
if let Some(producer) = unit.producer {
writeln!(w, " Producer: {}", producer)?;
}
if let Some(language) = unit.language {
writeln!(w, " Language: {}", language)?;
}
if let (Some(start), Some(end)) = (unit.start_address, unit.end_address) {
writeln!(w, " Code range: {:#010X} -> {:#010X}", start, end)?;
}
writeln!(w, "*/")?;
let children = tag.children(&info.tags);
let mut typedefs = BTreeMap::<u32, Vec<u32>>::new();
for child in children {
let tag_type = match process_root_tag(&info, child) {
let tag_type = match process_cu_tag(&info, child) {
Ok(tag_type) => tag_type,
Err(e) => {
log::error!(
"Failed to process tag {} (unit {}): {}",
child.key,
unit,
unit.name,
e
);
writeln!(
@ -201,12 +207,7 @@ where
match tag_type_string(&info, &typedefs, &tag_type) {
Ok(s) => writeln!(w, "{}", s)?,
Err(e) => {
log::error!(
"Failed to emit tag {} (unit {}): {}",
child.key,
unit,
e
);
log::error!("Failed to emit tag {} (unit {}): {}", child.key, unit.name, e);
writeln!(
w,
"// ERROR: Failed to emit tag {} ({:?})",
@ -218,8 +219,7 @@ where
if let TagKind::Typedef = child.kind {
// TODO fundamental typedefs?
if let Some(ud_type_ref) =
child.reference_attribute(AttributeKind::UserDefType)
if let Some(ud_type_ref) = child.reference_attribute(AttributeKind::UserDefType)
{
match typedefs.entry(ud_type_ref) {
btree_map::Entry::Vacant(e) => {
@ -232,12 +232,7 @@ where
}
}
}
}
_ => {
log::warn!("Expected CompileUnit, got {:?}", tag.kind);
break;
}
}
if let Some(next) = tag.next_sibling(&info.tags) {
tag = next;
} else {

View File

@ -716,6 +716,8 @@ pub struct SubroutineType {
pub labels: Vec<SubroutineLabel>,
pub blocks: Vec<SubroutineBlock>,
pub inlines: Vec<SubroutineInline>,
pub start_address: Option<u32>,
pub end_address: Option<u32>,
}
#[derive(Debug, Clone)]
@ -756,6 +758,47 @@ pub enum TagType {
UserDefined(UserDefinedType),
}
#[derive(Debug, Eq, PartialEq, Copy, Clone, IntoPrimitive, TryFromPrimitive)]
#[repr(u32)]
pub enum Language {
C89 = 0x1,
C = 0x2,
Ada83 = 0x3,
CPlusPlus = 0x4,
Cobol74 = 0x5,
Cobol85 = 0x6,
Fortran77 = 0x7,
Fortran90 = 0x8,
Pascal83 = 0x9,
Modula2 = 0xa,
}
impl Display for Language {
fn fmt(&self, f: &mut Formatter<'_>) -> std::fmt::Result {
match self {
Language::C89 => write!(f, "C89"),
Language::C => write!(f, "C"),
Language::Ada83 => write!(f, "Ada83"),
Language::CPlusPlus => write!(f, "C++"),
Language::Cobol74 => write!(f, "Cobol74"),
Language::Cobol85 => write!(f, "Cobol85"),
Language::Fortran77 => write!(f, "Fortran77"),
Language::Fortran90 => write!(f, "Fortran90"),
Language::Pascal83 => write!(f, "Pascal83"),
Language::Modula2 => write!(f, "Modula2"),
}
}
}
#[derive(Debug, Clone)]
pub struct CompileUnit {
pub name: String,
pub producer: Option<String>,
pub language: Option<Language>,
pub start_address: Option<u32>,
pub end_address: Option<u32>,
}
impl UserDefinedType {
pub fn name(&self) -> Option<String> {
match self {
@ -1171,8 +1214,14 @@ pub fn subroutine_def_string(
typedefs: &TypedefMap,
t: &SubroutineType,
) -> Result<String> {
let mut out = String::new();
if let (Some(start), Some(end)) = (t.start_address, t.end_address) {
writeln!(out, "// Range: {:#X} -> {:#X}", start, end)?;
}
let rt = type_string(info, typedefs, &t.return_type, true)?;
let mut out = if t.local { "static ".to_string() } else { String::new() };
if t.local {
out.push_str("static ");
}
if t.inline {
out.push_str("inline ");
}
@ -1852,6 +1901,8 @@ fn process_subroutine_tag(info: &DwarfInfo, tag: &Tag) -> Result<SubroutineType>
let mut references = Vec::new();
let mut member_of = None;
let mut inline = false;
let mut start_address = None;
let mut end_address = None;
for attr in &tag.attributes {
match (attr.kind, &attr.value) {
(AttributeKind::Sibling, _) => {}
@ -1865,8 +1916,11 @@ fn process_subroutine_tag(info: &DwarfInfo, tag: &Tag) -> Result<SubroutineType>
_,
) => return_type = Some(process_type(attr, info.e)?),
(AttributeKind::Prototyped, _) => prototyped = true,
(AttributeKind::LowPc, _) | (AttributeKind::HighPc, _) => {
// TODO?
(AttributeKind::LowPc, &AttributeValue::Address(addr)) => {
start_address = Some(addr);
}
(AttributeKind::HighPc, &AttributeValue::Address(addr)) => {
end_address = Some(addr);
}
(AttributeKind::MwGlobalRef, &AttributeValue::Reference(key)) => {
references.push(key);
@ -1988,6 +2042,8 @@ fn process_subroutine_tag(info: &DwarfInfo, tag: &Tag) -> Result<SubroutineType>
labels,
blocks,
inlines,
start_address,
end_address,
})
}
@ -2287,7 +2343,38 @@ pub fn process_type(attr: &Attribute, e: Endian) -> Result<Type> {
}
}
pub fn process_root_tag(info: &DwarfInfo, tag: &Tag) -> Result<TagType> {
pub fn process_root_tag(tag: &Tag) -> Result<CompileUnit> {
ensure!(tag.kind == TagKind::CompileUnit, "{:?} is not a CompileUnit tag", tag.kind);
let mut name = None;
let mut producer = None;
let mut language = None;
let mut start_address = None;
let mut end_address = None;
for attr in &tag.attributes {
match (attr.kind, &attr.value) {
(AttributeKind::Sibling, _) => {}
(AttributeKind::Name, AttributeValue::String(s)) => name = Some(s.clone()),
(AttributeKind::Producer, AttributeValue::String(s)) => producer = Some(s.clone()),
(AttributeKind::Language, &AttributeValue::Data4(value)) => {
language = Some(Language::try_from_primitive(value)?)
}
(AttributeKind::LowPc, &AttributeValue::Address(addr)) => start_address = Some(addr),
(AttributeKind::HighPc, &AttributeValue::Address(addr)) => end_address = Some(addr),
(AttributeKind::StmtList, AttributeValue::Data4(_)) => {
// TODO .line support
}
_ => {
bail!("Unhandled CompileUnit attribute {:?}", attr);
}
}
}
let name = name.ok_or_else(|| anyhow!("CompileUnit without Name: {:?}", tag))?;
Ok(CompileUnit { name, producer, language, start_address, end_address })
}
pub fn process_cu_tag(info: &DwarfInfo, tag: &Tag) -> Result<TagType> {
match tag.kind {
TagKind::Typedef => Ok(TagType::Typedef(process_typedef_tag(info, tag)?)),
TagKind::GlobalVariable | TagKind::LocalVariable => {
@ -2352,14 +2439,13 @@ fn variable_string(
out.push(' ');
out.push_str(variable.name.as_deref().unwrap_or("[unknown]"));
out.push_str(&ts.suffix);
match &variable.address {
Some(addr) => out.push_str(&format!(" : {:#010X}", addr)),
None => {}
}
out.push(';');
if include_extra {
let size = variable.kind.size(info)?;
out.push_str(&format!(" // size: {:#X}", size));
if let Some(addr) = variable.address {
out.push_str(&format!(", address: {:#X}", addr));
}
}
Ok(out)
}