Index: third_party/libc++abi/src/Unwind/DwarfParser.hpp |
=================================================================== |
--- third_party/libc++abi/src/Unwind/DwarfParser.hpp (revision 0) |
+++ third_party/libc++abi/src/Unwind/DwarfParser.hpp (revision 0) |
@@ -0,0 +1,713 @@ |
+//===--------------------------- DwarfParser.hpp --------------------------===// |
+// |
+// The LLVM Compiler Infrastructure |
+// |
+// This file is dual licensed under the MIT and the University of Illinois Open |
+// Source Licenses. See LICENSE.TXT for details. |
+// |
+// |
+// Parses DWARF CFIs (FDEs and CIEs). |
+// |
+//===----------------------------------------------------------------------===// |
+ |
+#ifndef __DWARF_PARSER_HPP__ |
+#define __DWARF_PARSER_HPP__ |
+ |
+#include <stdint.h> |
+#include <stdio.h> |
+#include <stdlib.h> |
+ |
+#include <vector> |
+ |
+#include "libunwind.h" |
+#include "dwarf2.h" |
+ |
+#include "AddressSpace.hpp" |
+ |
+namespace libunwind { |
+ |
+/// CFI_Parser does basic parsing of a CFI (Call Frame Information) records. |
+/// See Dwarf Spec for details: |
+/// http://refspecs.linuxbase.org/LSB_3.1.0/LSB-Core-generic/LSB-Core-generic/ehframechpt.html |
+/// |
+template <typename A> |
+class CFI_Parser { |
+public: |
+ typedef typename A::pint_t pint_t; |
+ |
+ /// Information encoded in a CIE (Common Information Entry) |
+ struct CIE_Info { |
+ pint_t cieStart; |
+ pint_t cieLength; |
+ pint_t cieInstructions; |
+ uint8_t pointerEncoding; |
+ uint8_t lsdaEncoding; |
+ uint8_t personalityEncoding; |
+ uint8_t personalityOffsetInCIE; |
+ pint_t personality; |
+ uint32_t codeAlignFactor; |
+ int dataAlignFactor; |
+ bool isSignalFrame; |
+ bool fdesHaveAugmentationData; |
+ }; |
+ |
+ /// Information about an FDE (Frame Description Entry) |
+ struct FDE_Info { |
+ pint_t fdeStart; |
+ pint_t fdeLength; |
+ pint_t fdeInstructions; |
+ pint_t pcStart; |
+ pint_t pcEnd; |
+ pint_t lsda; |
+ }; |
+ |
+ enum { |
+ kMaxRegisterNumber = 120 |
+ }; |
+ enum RegisterSavedWhere { |
+ kRegisterUnused, |
+ kRegisterInCFA, |
+ kRegisterOffsetFromCFA, |
+ kRegisterInRegister, |
+ kRegisterAtExpression, |
+ kRegisterIsExpression |
+ }; |
+ struct RegisterLocation { |
+ RegisterSavedWhere location; |
+ int64_t value; |
+ }; |
+ /// Information about a frame layout and registers saved determined |
+ /// by "running" the dwarf FDE "instructions" |
+ struct PrologInfo { |
+ uint32_t cfaRegister; |
+ int32_t cfaRegisterOffset; // CFA = (cfaRegister)+cfaRegisterOffset |
+ int64_t cfaExpression; // CFA = expression |
+ uint32_t spExtraArgSize; |
+ uint32_t codeOffsetAtStackDecrement; |
+ bool registersInOtherRegisters; |
+ bool sameValueUsed; |
+ RegisterLocation savedRegisters[kMaxRegisterNumber]; |
+ }; |
+ |
+ struct PrologInfoStackEntry { |
+ PrologInfoStackEntry(PrologInfoStackEntry *n, const PrologInfo &i) |
+ : next(n), info(i) {} |
+ PrologInfoStackEntry *next; |
+ PrologInfo info; |
+ }; |
+ |
+ static bool findFDE(A &addressSpace, pint_t pc, pint_t ehSectionStart, |
+ uint32_t sectionLength, pint_t fdeHint, FDE_Info *fdeInfo, |
+ CIE_Info *cieInfo); |
+ static const char *decodeFDE(A &addressSpace, pint_t fdeStart, |
+ FDE_Info *fdeInfo, CIE_Info *cieInfo); |
+ static bool parseFDEInstructions(A &addressSpace, const FDE_Info &fdeInfo, |
+ const CIE_Info &cieInfo, pint_t upToPC, |
+ PrologInfo *results); |
+ |
+ static const char *parseCIE(A &addressSpace, pint_t cie, CIE_Info *cieInfo); |
+ |
+private: |
+ static bool parseInstructions(A &addressSpace, pint_t instructions, |
+ pint_t instructionsEnd, const CIE_Info &cieInfo, |
+ pint_t pcoffset, |
+ PrologInfoStackEntry *&rememberStack, |
+ PrologInfo *results); |
+}; |
+ |
+/// Parse a FDE into a CIE_Info and an FDE_Info |
+template <typename A> |
+const char *CFI_Parser<A>::decodeFDE(A &addressSpace, pint_t fdeStart, |
+ FDE_Info *fdeInfo, CIE_Info *cieInfo) { |
+ pint_t p = fdeStart; |
+ pint_t cfiLength = (pint_t)addressSpace.get32(p); |
+ p += 4; |
+ if (cfiLength == 0xffffffff) { |
+ // 0xffffffff means length is really next 8 bytes |
+ cfiLength = (pint_t)addressSpace.get64(p); |
+ p += 8; |
+ } |
+ if (cfiLength == 0) |
+ return "FDE has zero length"; // end marker |
+ uint32_t ciePointer = addressSpace.get32(p); |
+ if (ciePointer == 0) |
+ return "FDE is really a CIE"; // this is a CIE not an FDE |
+ pint_t nextCFI = p + cfiLength; |
+ pint_t cieStart = p - ciePointer; |
+ const char *err = parseCIE(addressSpace, cieStart, cieInfo); |
+ if (err != NULL) |
+ return err; |
+ p += 4; |
+ // parse pc begin and range |
+ pint_t pcStart = |
+ addressSpace.getEncodedP(p, nextCFI, cieInfo->pointerEncoding); |
+ pint_t pcRange = |
+ addressSpace.getEncodedP(p, nextCFI, cieInfo->pointerEncoding & 0x0F); |
+ // parse rest of info |
+ fdeInfo->lsda = 0; |
+ // check for augmentation length |
+ if (cieInfo->fdesHaveAugmentationData) { |
+ pint_t augLen = (pint_t)addressSpace.getULEB128(p, nextCFI); |
+ pint_t endOfAug = p + augLen; |
+ if (cieInfo->lsdaEncoding != 0) { |
+ // peek at value (without indirection). Zero means no lsda |
+ pint_t lsdaStart = p; |
+ if (addressSpace.getEncodedP(p, nextCFI, cieInfo->lsdaEncoding & 0x0F) != |
+ 0) { |
+ // reset pointer and re-parse lsda address |
+ p = lsdaStart; |
+ fdeInfo->lsda = |
+ addressSpace.getEncodedP(p, nextCFI, cieInfo->lsdaEncoding); |
+ } |
+ } |
+ p = endOfAug; |
+ } |
+ fdeInfo->fdeStart = fdeStart; |
+ fdeInfo->fdeLength = nextCFI - fdeStart; |
+ fdeInfo->fdeInstructions = p; |
+ fdeInfo->pcStart = pcStart; |
+ fdeInfo->pcEnd = pcStart + pcRange; |
+ return NULL; // success |
+} |
+ |
+/// Scan an eh_frame section to find an FDE for a pc |
+template <typename A> |
+bool CFI_Parser<A>::findFDE(A &addressSpace, pint_t pc, pint_t ehSectionStart, |
+ uint32_t sectionLength, pint_t fdeHint, |
+ FDE_Info *fdeInfo, CIE_Info *cieInfo) { |
+ //fprintf(stderr, "findFDE(0x%llX)\n", (long long)pc); |
+ pint_t p = (fdeHint != 0) ? fdeHint : ehSectionStart; |
+ const pint_t ehSectionEnd = p + sectionLength; |
+ while (p < ehSectionEnd) { |
+ pint_t currentCFI = p; |
+ //fprintf(stderr, "findFDE() CFI at 0x%llX\n", (long long)p); |
+ pint_t cfiLength = addressSpace.get32(p); |
+ p += 4; |
+ if (cfiLength == 0xffffffff) { |
+ // 0xffffffff means length is really next 8 bytes |
+ cfiLength = (pint_t)addressSpace.get64(p); |
+ p += 8; |
+ } |
+ if (cfiLength == 0) |
+ return false; // end marker |
+ uint32_t id = addressSpace.get32(p); |
+ if (id == 0) { |
+ // skip over CIEs |
+ p += cfiLength; |
+ } else { |
+ // process FDE to see if it covers pc |
+ pint_t nextCFI = p + cfiLength; |
+ uint32_t ciePointer = addressSpace.get32(p); |
+ pint_t cieStart = p - ciePointer; |
+ // validate pointer to CIE is within section |
+ if ((ehSectionStart <= cieStart) && (cieStart < ehSectionEnd)) { |
+ if (parseCIE(addressSpace, cieStart, cieInfo) == NULL) { |
+ p += 4; |
+ // parse pc begin and range |
+ pint_t pcStart = |
+ addressSpace.getEncodedP(p, nextCFI, cieInfo->pointerEncoding); |
+ pint_t pcRange = addressSpace.getEncodedP( |
+ p, nextCFI, cieInfo->pointerEncoding & 0x0F); |
+ // test if pc is within the function this FDE covers |
+ if ((pcStart < pc) && (pc <= pcStart + pcRange)) { |
+ // parse rest of info |
+ fdeInfo->lsda = 0; |
+ // check for augmentation length |
+ if (cieInfo->fdesHaveAugmentationData) { |
+ pint_t augLen = (pint_t)addressSpace.getULEB128(p, nextCFI); |
+ pint_t endOfAug = p + augLen; |
+ if (cieInfo->lsdaEncoding != 0) { |
+ // peek at value (without indirection). Zero means no lsda |
+ pint_t lsdaStart = p; |
+ if (addressSpace.getEncodedP( |
+ p, nextCFI, cieInfo->lsdaEncoding & 0x0F) != 0) { |
+ // reset pointer and re-parse lsda address |
+ p = lsdaStart; |
+ fdeInfo->lsda = addressSpace |
+ .getEncodedP(p, nextCFI, cieInfo->lsdaEncoding); |
+ } |
+ } |
+ p = endOfAug; |
+ } |
+ fdeInfo->fdeStart = currentCFI; |
+ fdeInfo->fdeLength = nextCFI - currentCFI; |
+ fdeInfo->fdeInstructions = p; |
+ fdeInfo->pcStart = pcStart; |
+ fdeInfo->pcEnd = pcStart + pcRange; |
+ return true; |
+ } else { |
+ // pc is not in begin/range, skip this FDE |
+ } |
+ } else { |
+ // malformed CIE, now augmentation describing pc range encoding |
+ } |
+ } else { |
+ // malformed FDE. CIE is bad |
+ } |
+ p = nextCFI; |
+ } |
+ } |
+ return false; |
+} |
+ |
+/// Extract info from a CIE |
+template <typename A> |
+const char *CFI_Parser<A>::parseCIE(A &addressSpace, pint_t cie, |
+ CIE_Info *cieInfo) { |
+ cieInfo->pointerEncoding = 0; |
+ cieInfo->lsdaEncoding = 0; |
+ cieInfo->personalityEncoding = 0; |
+ cieInfo->personalityOffsetInCIE = 0; |
+ cieInfo->personality = 0; |
+ cieInfo->codeAlignFactor = 0; |
+ cieInfo->dataAlignFactor = 0; |
+ cieInfo->isSignalFrame = false; |
+ cieInfo->fdesHaveAugmentationData = false; |
+ cieInfo->cieStart = cie; |
+ pint_t p = cie; |
+ pint_t cieLength = (pint_t)addressSpace.get32(p); |
+ p += 4; |
+ pint_t cieContentEnd = p + cieLength; |
+ if (cieLength == 0xffffffff) { |
+ // 0xffffffff means length is really next 8 bytes |
+ cieLength = (pint_t)addressSpace.get64(p); |
+ p += 8; |
+ cieContentEnd = p + cieLength; |
+ } |
+ if (cieLength == 0) |
+ return NULL; |
+ // CIE ID is always 0 |
+ if (addressSpace.get32(p) != 0) |
+ return "CIE ID is not zero"; |
+ p += 4; |
+ // Version is always 1 or 3 |
+ uint8_t version = addressSpace.get8(p); |
+ if ((version != 1) && (version != 3)) |
+ return "CIE version is not 1 or 3"; |
+ ++p; |
+ // save start of augmentation string and find end |
+ pint_t strStart = p; |
+ while (addressSpace.get8(p) != 0) |
+ ++p; |
+ ++p; |
+ // parse code aligment factor |
+ cieInfo->codeAlignFactor = (uint32_t)addressSpace.getULEB128(p, cieContentEnd); |
+ // parse data alignment factor |
+ cieInfo->dataAlignFactor = (int)addressSpace.getSLEB128(p, cieContentEnd); |
+ // parse return address register |
+ addressSpace.getULEB128(p, cieContentEnd); |
+ // parse augmentation data based on augmentation string |
+ const char *result = NULL; |
+ if (addressSpace.get8(strStart) == 'z') { |
+ // parse augmentation data length |
+ addressSpace.getULEB128(p, cieContentEnd); |
+ for (pint_t s = strStart; addressSpace.get8(s) != '\0'; ++s) { |
+ switch (addressSpace.get8(s)) { |
+ case 'z': |
+ cieInfo->fdesHaveAugmentationData = true; |
+ break; |
+ case 'P': |
+ cieInfo->personalityEncoding = addressSpace.get8(p); |
+ ++p; |
+ cieInfo->personalityOffsetInCIE = (uint8_t)(p - cie); |
+ cieInfo->personality = addressSpace |
+ .getEncodedP(p, cieContentEnd, cieInfo->personalityEncoding); |
+ break; |
+ case 'L': |
+ cieInfo->lsdaEncoding = addressSpace.get8(p); |
+ ++p; |
+ break; |
+ case 'R': |
+ cieInfo->pointerEncoding = addressSpace.get8(p); |
+ ++p; |
+ break; |
+ case 'S': |
+ cieInfo->isSignalFrame = true; |
+ break; |
+ default: |
+ // ignore unknown letters |
+ break; |
+ } |
+ } |
+ } |
+ cieInfo->cieLength = cieContentEnd - cieInfo->cieStart; |
+ cieInfo->cieInstructions = p; |
+ return result; |
+} |
+ |
+ |
+/// "run" the dwarf instructions and create the abstact PrologInfo for an FDE |
+template <typename A> |
+bool CFI_Parser<A>::parseFDEInstructions(A &addressSpace, |
+ const FDE_Info &fdeInfo, |
+ const CIE_Info &cieInfo, pint_t upToPC, |
+ PrologInfo *results) { |
+ // clear results |
+ bzero(results, sizeof(PrologInfo)); |
+ PrologInfoStackEntry *rememberStack = NULL; |
+ |
+ // parse CIE then FDE instructions |
+ return parseInstructions(addressSpace, cieInfo.cieInstructions, |
+ cieInfo.cieStart + cieInfo.cieLength, cieInfo, |
+ (pint_t)(-1), rememberStack, results) && |
+ parseInstructions(addressSpace, fdeInfo.fdeInstructions, |
+ fdeInfo.fdeStart + fdeInfo.fdeLength, cieInfo, |
+ upToPC - fdeInfo.pcStart, rememberStack, results); |
+} |
+ |
+/// "run" the dwarf instructions |
+template <typename A> |
+bool CFI_Parser<A>::parseInstructions(A &addressSpace, pint_t instructions, |
+ pint_t instructionsEnd, |
+ const CIE_Info &cieInfo, pint_t pcoffset, |
+ PrologInfoStackEntry *&rememberStack, |
+ PrologInfo *results) { |
+ const bool logDwarf = false; |
+ pint_t p = instructions; |
+ pint_t codeOffset = 0; |
+ PrologInfo initialState = *results; |
+ if (logDwarf) |
+ fprintf(stderr, "parseInstructions(instructions=0x%0llX)\n", |
+ (uint64_t) instructionsEnd); |
+ |
+ // see Dwarf Spec, section 6.4.2 for details on unwind opcodes |
+ while ((p < instructionsEnd) && (codeOffset < pcoffset)) { |
+ uint64_t reg; |
+ uint64_t reg2; |
+ int64_t offset; |
+ uint64_t length; |
+ uint8_t opcode = addressSpace.get8(p); |
+ uint8_t operand; |
+ PrologInfoStackEntry *entry; |
+ ++p; |
+ switch (opcode) { |
+ case DW_CFA_nop: |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_nop\n"); |
+ break; |
+ case DW_CFA_set_loc: |
+ codeOffset = |
+ addressSpace.getEncodedP(p, instructionsEnd, cieInfo.pointerEncoding); |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_set_loc\n"); |
+ break; |
+ case DW_CFA_advance_loc1: |
+ codeOffset += (addressSpace.get8(p) * cieInfo.codeAlignFactor); |
+ p += 1; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_advance_loc1: new offset=%llu\n", |
+ (uint64_t)codeOffset); |
+ break; |
+ case DW_CFA_advance_loc2: |
+ codeOffset += (addressSpace.get16(p) * cieInfo.codeAlignFactor); |
+ p += 2; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_advance_loc2: new offset=%llu\n", |
+ (uint64_t)codeOffset); |
+ break; |
+ case DW_CFA_advance_loc4: |
+ codeOffset += (addressSpace.get32(p) * cieInfo.codeAlignFactor); |
+ p += 4; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_advance_loc4: new offset=%llu\n", |
+ (uint64_t)codeOffset); |
+ break; |
+ case DW_CFA_offset_extended: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ offset = (int64_t)addressSpace.getULEB128(p, instructionsEnd) |
+ * cieInfo.dataAlignFactor; |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_offset_extended dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg].location = kRegisterInCFA; |
+ results->savedRegisters[reg].value = offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_offset_extended(reg=%lld, offset=%lld)\n", reg, |
+ offset); |
+ break; |
+ case DW_CFA_restore_extended: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ ; |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf( |
+ stderr, |
+ "malformed DW_CFA_restore_extended dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg] = initialState.savedRegisters[reg]; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_restore_extended(reg=%lld)\n", reg); |
+ break; |
+ case DW_CFA_undefined: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_undefined dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg].location = kRegisterUnused; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_undefined(reg=%lld)\n", reg); |
+ break; |
+ case DW_CFA_same_value: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_same_value dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ // <rdar://problem/8456377> DW_CFA_same_value unsupported |
+ // "same value" means register was stored in frame, but its current |
+ // value has not changed, so no need to restore from frame. |
+ // We model this as if the register was never saved. |
+ results->savedRegisters[reg].location = kRegisterUnused; |
+ // set flag to disable conversion to compact unwind |
+ results->sameValueUsed = true; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_same_value(reg=%lld)\n", reg); |
+ break; |
+ case DW_CFA_register: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ reg2 = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_register dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ if (reg2 > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_register dwarf unwind, reg2 too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg].location = kRegisterInRegister; |
+ results->savedRegisters[reg].value = (int64_t)reg2; |
+ // set flag to disable conversion to compact unwind |
+ results->registersInOtherRegisters = true; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_register(reg=%lld, reg2=%lld)\n", reg, reg2); |
+ break; |
+ case DW_CFA_remember_state: |
+ // avoid operator new, because that would be an upward dependency |
+ entry = (PrologInfoStackEntry *)malloc(sizeof(PrologInfoStackEntry)); |
+ if (entry != NULL) { |
+ entry->next = rememberStack; |
+ entry->info = *results; |
+ rememberStack = entry; |
+ } else { |
+ return false; |
+ } |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_remember_state\n"); |
+ break; |
+ case DW_CFA_restore_state: |
+ if (rememberStack != NULL) { |
+ PrologInfoStackEntry *top = rememberStack; |
+ *results = top->info; |
+ rememberStack = top->next; |
+ free((char *)top); |
+ } else { |
+ return false; |
+ } |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_restore_state\n"); |
+ break; |
+ case DW_CFA_def_cfa: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ offset = (int64_t)addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, "malformed DW_CFA_def_cfa dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->cfaRegister = (uint32_t)reg; |
+ results->cfaRegisterOffset = (int32_t)offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_def_cfa(reg=%lld, offset=%lld)\n", reg, offset); |
+ break; |
+ case DW_CFA_def_cfa_register: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf( |
+ stderr, |
+ "malformed DW_CFA_def_cfa_register dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->cfaRegister = (uint32_t)reg; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_def_cfa_register(%lld)\n", reg); |
+ break; |
+ case DW_CFA_def_cfa_offset: |
+ results->cfaRegisterOffset = (int32_t) |
+ addressSpace.getULEB128(p, instructionsEnd); |
+ results->codeOffsetAtStackDecrement = (uint32_t)codeOffset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_def_cfa_offset(%d)\n", |
+ results->cfaRegisterOffset); |
+ break; |
+ case DW_CFA_def_cfa_expression: |
+ results->cfaRegister = 0; |
+ results->cfaExpression = (int64_t)p; |
+ length = addressSpace.getULEB128(p, instructionsEnd); |
+ p += length; |
+ if (logDwarf) |
+ fprintf(stderr, |
+ "DW_CFA_def_cfa_expression(expression=0x%llX, length=%llu)\n", |
+ results->cfaExpression, length); |
+ break; |
+ case DW_CFA_expression: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_expression dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg].location = kRegisterAtExpression; |
+ results->savedRegisters[reg].value = (int64_t)p; |
+ length = addressSpace.getULEB128(p, instructionsEnd); |
+ p += length; |
+ if (logDwarf) |
+ fprintf(stderr, |
+ "DW_CFA_expression(reg=%lld, expression=0x%llX, length=%llu)\n", |
+ reg, results->savedRegisters[reg].value, length); |
+ break; |
+ case DW_CFA_offset_extended_sf: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf( |
+ stderr, |
+ "malformed DW_CFA_offset_extended_sf dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ offset = |
+ addressSpace.getSLEB128(p, instructionsEnd) * cieInfo.dataAlignFactor; |
+ results->savedRegisters[reg].location = kRegisterInCFA; |
+ results->savedRegisters[reg].value = offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_offset_extended_sf(reg=%lld, offset=%lld)\n", |
+ reg, offset); |
+ break; |
+ case DW_CFA_def_cfa_sf: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ offset = |
+ addressSpace.getSLEB128(p, instructionsEnd) * cieInfo.dataAlignFactor; |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_def_cfa_sf dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->cfaRegister = (uint32_t)reg; |
+ results->cfaRegisterOffset = (int32_t)offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_def_cfa_sf(reg=%lld, offset=%lld)\n", reg, |
+ offset); |
+ break; |
+ case DW_CFA_def_cfa_offset_sf: |
+ results->cfaRegisterOffset = (int32_t) |
+ (addressSpace.getSLEB128(p, instructionsEnd) * cieInfo.dataAlignFactor); |
+ results->codeOffsetAtStackDecrement = (uint32_t)codeOffset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_def_cfa_offset_sf(%d)\n", |
+ results->cfaRegisterOffset); |
+ break; |
+ case DW_CFA_val_offset: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ offset = (int64_t)addressSpace.getULEB128(p, instructionsEnd) |
+ * cieInfo.dataAlignFactor; |
+ results->savedRegisters[reg].location = kRegisterOffsetFromCFA; |
+ results->savedRegisters[reg].value = offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_val_offset(reg=%lld, offset=%lld\n", reg, |
+ offset); |
+ break; |
+ case DW_CFA_val_offset_sf: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_val_offset_sf dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ offset = |
+ addressSpace.getSLEB128(p, instructionsEnd) * cieInfo.dataAlignFactor; |
+ results->savedRegisters[reg].location = kRegisterOffsetFromCFA; |
+ results->savedRegisters[reg].value = offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_val_offset_sf(reg=%lld, offset=%lld\n", reg, |
+ offset); |
+ break; |
+ case DW_CFA_val_expression: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, |
+ "malformed DW_CFA_val_expression dwarf unwind, reg too big\n"); |
+ return false; |
+ } |
+ results->savedRegisters[reg].location = kRegisterIsExpression; |
+ results->savedRegisters[reg].value = (int64_t)p; |
+ length = addressSpace.getULEB128(p, instructionsEnd); |
+ p += length; |
+ if (logDwarf) |
+ fprintf( |
+ stderr, |
+ "DW_CFA_val_expression(reg=%lld, expression=0x%llX, length=%lld)\n", |
+ reg, results->savedRegisters[reg].value, length); |
+ break; |
+ case DW_CFA_GNU_args_size: |
+ length = addressSpace.getULEB128(p, instructionsEnd); |
+ results->spExtraArgSize = (uint32_t)length; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_GNU_args_size(%lld)\n", length); |
+ break; |
+ case DW_CFA_GNU_negative_offset_extended: |
+ reg = addressSpace.getULEB128(p, instructionsEnd); |
+ if (reg > kMaxRegisterNumber) { |
+ fprintf(stderr, "malformed DW_CFA_GNU_negative_offset_extended dwarf " |
+ "unwind, reg too big\n"); |
+ return false; |
+ } |
+ offset = (int64_t)addressSpace.getULEB128(p, instructionsEnd) |
+ * cieInfo.dataAlignFactor; |
+ results->savedRegisters[reg].location = kRegisterInCFA; |
+ results->savedRegisters[reg].value = -offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_GNU_negative_offset_extended(%lld)\n", offset); |
+ break; |
+ default: |
+ operand = opcode & 0x3F; |
+ switch (opcode & 0xC0) { |
+ case DW_CFA_offset: |
+ reg = operand; |
+ offset = (int64_t)addressSpace.getULEB128(p, instructionsEnd) |
+ * cieInfo.dataAlignFactor; |
+ results->savedRegisters[reg].location = kRegisterInCFA; |
+ results->savedRegisters[reg].value = offset; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_offset(reg=%d, offset=%lld)\n", operand, |
+ offset); |
+ break; |
+ case DW_CFA_advance_loc: |
+ codeOffset += operand * cieInfo.codeAlignFactor; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_advance_loc: new offset=%llu\n", |
+ (uint64_t)codeOffset); |
+ break; |
+ case DW_CFA_restore: |
+ reg = operand; |
+ results->savedRegisters[reg] = initialState.savedRegisters[reg]; |
+ if (logDwarf) |
+ fprintf(stderr, "DW_CFA_restore(reg=%lld)\n", reg); |
+ break; |
+ default: |
+ if (logDwarf) |
+ fprintf(stderr, "unknown CFA opcode 0x%02X\n", opcode); |
+ return false; |
+ } |
+ } |
+ } |
+ |
+ return true; |
+} |
+ |
+} // namespace libunwind |
+ |
+#endif // __DWARF_PARSER_HPP__ |