1 //===-- llvm/CodeGen/DwarfCompileUnit.cpp - Dwarf Compile Unit ------------===//
3 // The LLVM Compiler Infrastructure
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file contains support for writing dwarf compile unit.
12 //===----------------------------------------------------------------------===//
14 #define DEBUG_TYPE "dwarfdebug"
16 #include "DwarfAccelTable.h"
17 #include "DwarfCompileUnit.h"
18 #include "DwarfDebug.h"
19 #include "llvm/Constants.h"
20 #include "llvm/GlobalVariable.h"
21 #include "llvm/Instructions.h"
22 #include "llvm/Analysis/DIBuilder.h"
23 #include "llvm/Support/Debug.h"
24 #include "llvm/Target/Mangler.h"
25 #include "llvm/Target/TargetData.h"
26 #include "llvm/Target/TargetFrameLowering.h"
27 #include "llvm/Target/TargetMachine.h"
28 #include "llvm/Target/TargetRegisterInfo.h"
29 #include "llvm/ADT/APFloat.h"
30 #include "llvm/Support/ErrorHandling.h"
34 /// CompileUnit - Compile unit constructor.
35 CompileUnit::CompileUnit(unsigned I, DIE *D, AsmPrinter *A, DwarfDebug *DW)
36 : ID(I), CUDie(D), Asm(A), DD(DW), IndexTyDie(0) {
37 DIEIntegerOne = new (DIEValueAllocator) DIEInteger(1);
40 /// ~CompileUnit - Destructor for compile unit.
41 CompileUnit::~CompileUnit() {
42 for (unsigned j = 0, M = DIEBlocks.size(); j < M; ++j)
43 DIEBlocks[j]->~DIEBlock();
46 /// createDIEEntry - Creates a new DIEEntry to be a proxy for a debug
47 /// information entry.
48 DIEEntry *CompileUnit::createDIEEntry(DIE *Entry) {
49 DIEEntry *Value = new (DIEValueAllocator) DIEEntry(Entry);
53 /// addUInt - Add an unsigned integer attribute data and value.
55 void CompileUnit::addUInt(DIE *Die, unsigned Attribute,
56 unsigned Form, uint64_t Integer) {
57 if (!Form) Form = DIEInteger::BestForm(false, Integer);
58 DIEValue *Value = Integer == 1 ?
59 DIEIntegerOne : new (DIEValueAllocator) DIEInteger(Integer);
60 Die->addValue(Attribute, Form, Value);
63 /// addSInt - Add an signed integer attribute data and value.
65 void CompileUnit::addSInt(DIE *Die, unsigned Attribute,
66 unsigned Form, int64_t Integer) {
67 if (!Form) Form = DIEInteger::BestForm(true, Integer);
68 DIEValue *Value = new (DIEValueAllocator) DIEInteger(Integer);
69 Die->addValue(Attribute, Form, Value);
72 /// addString - Add a string attribute data and value. We always emit a
73 /// reference to the string pool instead of immediate strings so that DIEs have
74 /// more predictable sizes.
75 void CompileUnit::addString(DIE *Die, unsigned Attribute, StringRef String) {
76 MCSymbol *Symb = DD->getStringPoolEntry(String);
78 if (Asm->needsRelocationsForDwarfStringPool())
79 Value = new (DIEValueAllocator) DIELabel(Symb);
81 MCSymbol *StringPool = DD->getStringPool();
82 Value = new (DIEValueAllocator) DIEDelta(Symb, StringPool);
84 Die->addValue(Attribute, dwarf::DW_FORM_strp, Value);
87 /// addLabel - Add a Dwarf label attribute data and value.
89 void CompileUnit::addLabel(DIE *Die, unsigned Attribute, unsigned Form,
90 const MCSymbol *Label) {
91 DIEValue *Value = new (DIEValueAllocator) DIELabel(Label);
92 Die->addValue(Attribute, Form, Value);
95 /// addDelta - Add a label delta attribute data and value.
97 void CompileUnit::addDelta(DIE *Die, unsigned Attribute, unsigned Form,
98 const MCSymbol *Hi, const MCSymbol *Lo) {
99 DIEValue *Value = new (DIEValueAllocator) DIEDelta(Hi, Lo);
100 Die->addValue(Attribute, Form, Value);
103 /// addDIEEntry - Add a DIE attribute data and value.
105 void CompileUnit::addDIEEntry(DIE *Die, unsigned Attribute, unsigned Form,
107 Die->addValue(Attribute, Form, createDIEEntry(Entry));
110 /// addBlock - Add block data.
112 void CompileUnit::addBlock(DIE *Die, unsigned Attribute, unsigned Form,
114 Block->ComputeSize(Asm);
115 DIEBlocks.push_back(Block); // Memoize so we can call the destructor later on.
116 Die->addValue(Attribute, Block->BestForm(), Block);
119 /// addSourceLine - Add location information to specified debug information
121 void CompileUnit::addSourceLine(DIE *Die, DIVariable V) {
126 unsigned Line = V.getLineNumber();
129 unsigned FileID = DD->GetOrCreateSourceID(V.getContext().getFilename(),
130 V.getContext().getDirectory());
131 assert(FileID && "Invalid file id");
132 addUInt(Die, dwarf::DW_AT_decl_file, 0, FileID);
133 addUInt(Die, dwarf::DW_AT_decl_line, 0, Line);
136 /// addSourceLine - Add location information to specified debug information
138 void CompileUnit::addSourceLine(DIE *Die, DIGlobalVariable G) {
139 // Verify global variable.
143 unsigned Line = G.getLineNumber();
146 unsigned FileID = DD->GetOrCreateSourceID(G.getFilename(), G.getDirectory());
147 assert(FileID && "Invalid file id");
148 addUInt(Die, dwarf::DW_AT_decl_file, 0, FileID);
149 addUInt(Die, dwarf::DW_AT_decl_line, 0, Line);
152 /// addSourceLine - Add location information to specified debug information
154 void CompileUnit::addSourceLine(DIE *Die, DISubprogram SP) {
155 // Verify subprogram.
158 // If the line number is 0, don't add it.
159 if (SP.getLineNumber() == 0)
162 unsigned Line = SP.getLineNumber();
163 if (!SP.getContext().Verify())
165 unsigned FileID = DD->GetOrCreateSourceID(SP.getFilename(),
167 assert(FileID && "Invalid file id");
168 addUInt(Die, dwarf::DW_AT_decl_file, 0, FileID);
169 addUInt(Die, dwarf::DW_AT_decl_line, 0, Line);
172 /// addSourceLine - Add location information to specified debug information
174 void CompileUnit::addSourceLine(DIE *Die, DIType Ty) {
179 unsigned Line = Ty.getLineNumber();
180 if (Line == 0 || !Ty.getContext().Verify())
182 unsigned FileID = DD->GetOrCreateSourceID(Ty.getFilename(),
184 assert(FileID && "Invalid file id");
185 addUInt(Die, dwarf::DW_AT_decl_file, 0, FileID);
186 addUInt(Die, dwarf::DW_AT_decl_line, 0, Line);
189 /// addSourceLine - Add location information to specified debug information
191 void CompileUnit::addSourceLine(DIE *Die, DINameSpace NS) {
196 unsigned Line = NS.getLineNumber();
199 StringRef FN = NS.getFilename();
201 unsigned FileID = DD->GetOrCreateSourceID(FN, NS.getDirectory());
202 assert(FileID && "Invalid file id");
203 addUInt(Die, dwarf::DW_AT_decl_file, 0, FileID);
204 addUInt(Die, dwarf::DW_AT_decl_line, 0, Line);
207 /// addVariableAddress - Add DW_AT_location attribute for a
208 /// DbgVariable based on provided MachineLocation.
209 void CompileUnit::addVariableAddress(DbgVariable *&DV, DIE *Die,
210 MachineLocation Location) {
211 if (DV->variableHasComplexAddress())
212 addComplexAddress(DV, Die, dwarf::DW_AT_location, Location);
213 else if (DV->isBlockByrefVariable())
214 addBlockByrefAddress(DV, Die, dwarf::DW_AT_location, Location);
216 addAddress(Die, dwarf::DW_AT_location, Location);
219 /// addRegisterOp - Add register operand.
220 void CompileUnit::addRegisterOp(DIE *TheDie, unsigned Reg) {
221 const TargetRegisterInfo *RI = Asm->TM.getRegisterInfo();
222 unsigned DWReg = RI->getDwarfRegNum(Reg, false);
224 addUInt(TheDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_reg0 + DWReg);
226 addUInt(TheDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_regx);
227 addUInt(TheDie, 0, dwarf::DW_FORM_udata, DWReg);
231 /// addRegisterOffset - Add register offset.
232 void CompileUnit::addRegisterOffset(DIE *TheDie, unsigned Reg,
234 const TargetRegisterInfo *RI = Asm->TM.getRegisterInfo();
235 unsigned DWReg = RI->getDwarfRegNum(Reg, false);
236 const TargetRegisterInfo *TRI = Asm->TM.getRegisterInfo();
237 if (Reg == TRI->getFrameRegister(*Asm->MF))
238 // If variable offset is based in frame register then use fbreg.
239 addUInt(TheDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_fbreg);
241 addUInt(TheDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_breg0 + DWReg);
243 addUInt(TheDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_bregx);
244 addUInt(TheDie, 0, dwarf::DW_FORM_udata, DWReg);
246 addSInt(TheDie, 0, dwarf::DW_FORM_sdata, Offset);
249 /// addAddress - Add an address attribute to a die based on the location
251 void CompileUnit::addAddress(DIE *Die, unsigned Attribute,
252 const MachineLocation &Location) {
253 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
255 if (Location.isReg())
256 addRegisterOp(Block, Location.getReg());
258 addRegisterOffset(Block, Location.getReg(), Location.getOffset());
260 // Now attach the location information to the DIE.
261 addBlock(Die, Attribute, 0, Block);
264 /// addComplexAddress - Start with the address based on the location provided,
265 /// and generate the DWARF information necessary to find the actual variable
266 /// given the extra address information encoded in the DIVariable, starting from
267 /// the starting location. Add the DWARF information to the die.
269 void CompileUnit::addComplexAddress(DbgVariable *&DV, DIE *Die,
271 const MachineLocation &Location) {
272 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
273 unsigned N = DV->getNumAddrElements();
275 if (Location.isReg()) {
276 if (N >= 2 && DV->getAddrElement(0) == DIBuilder::OpPlus) {
277 // If first address element is OpPlus then emit
278 // DW_OP_breg + Offset instead of DW_OP_reg + Offset.
279 addRegisterOffset(Block, Location.getReg(), DV->getAddrElement(1));
282 addRegisterOp(Block, Location.getReg());
285 addRegisterOffset(Block, Location.getReg(), Location.getOffset());
288 uint64_t Element = DV->getAddrElement(i);
289 if (Element == DIBuilder::OpPlus) {
290 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus_uconst);
291 addUInt(Block, 0, dwarf::DW_FORM_udata, DV->getAddrElement(++i));
292 } else if (Element == DIBuilder::OpDeref) {
293 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_deref);
294 } else llvm_unreachable("unknown DIBuilder Opcode");
297 // Now attach the location information to the DIE.
298 addBlock(Die, Attribute, 0, Block);
301 /* Byref variables, in Blocks, are declared by the programmer as "SomeType
302 VarName;", but the compiler creates a __Block_byref_x_VarName struct, and
303 gives the variable VarName either the struct, or a pointer to the struct, as
304 its type. This is necessary for various behind-the-scenes things the
305 compiler needs to do with by-reference variables in Blocks.
307 However, as far as the original *programmer* is concerned, the variable
308 should still have type 'SomeType', as originally declared.
310 The function getBlockByrefType dives into the __Block_byref_x_VarName
311 struct to find the original type of the variable, which is then assigned to
312 the variable's Debug Information Entry as its real type. So far, so good.
313 However now the debugger will expect the variable VarName to have the type
314 SomeType. So we need the location attribute for the variable to be an
315 expression that explains to the debugger how to navigate through the
316 pointers and struct to find the actual variable of type SomeType.
318 The following function does just that. We start by getting
319 the "normal" location for the variable. This will be the location
320 of either the struct __Block_byref_x_VarName or the pointer to the
321 struct __Block_byref_x_VarName.
323 The struct will look something like:
325 struct __Block_byref_x_VarName {
327 struct __Block_byref_x_VarName *forwarding;
328 ... <various other fields>
330 ... <maybe more fields>
333 If we are given the struct directly (as our starting point) we
334 need to tell the debugger to:
336 1). Add the offset of the forwarding field.
338 2). Follow that pointer to get the real __Block_byref_x_VarName
339 struct to use (the real one may have been copied onto the heap).
341 3). Add the offset for the field VarName, to find the actual variable.
343 If we started with a pointer to the struct, then we need to
344 dereference that pointer first, before the other steps.
345 Translating this into DWARF ops, we will need to append the following
346 to the current location description for the variable:
348 DW_OP_deref -- optional, if we start with a pointer
349 DW_OP_plus_uconst <forward_fld_offset>
351 DW_OP_plus_uconst <varName_fld_offset>
353 That is what this function does. */
355 /// addBlockByrefAddress - Start with the address based on the location
356 /// provided, and generate the DWARF information necessary to find the
357 /// actual Block variable (navigating the Block struct) based on the
358 /// starting location. Add the DWARF information to the die. For
359 /// more information, read large comment just above here.
361 void CompileUnit::addBlockByrefAddress(DbgVariable *&DV, DIE *Die,
363 const MachineLocation &Location) {
364 DIType Ty = DV->getType();
366 unsigned Tag = Ty.getTag();
367 bool isPointer = false;
369 StringRef varName = DV->getName();
371 if (Tag == dwarf::DW_TAG_pointer_type) {
372 DIDerivedType DTy = DIDerivedType(Ty);
373 TmpTy = DTy.getTypeDerivedFrom();
377 DICompositeType blockStruct = DICompositeType(TmpTy);
379 // Find the __forwarding field and the variable field in the __Block_byref
381 DIArray Fields = blockStruct.getTypeArray();
382 DIDescriptor varField = DIDescriptor();
383 DIDescriptor forwardingField = DIDescriptor();
385 for (unsigned i = 0, N = Fields.getNumElements(); i < N; ++i) {
386 DIDescriptor Element = Fields.getElement(i);
387 DIDerivedType DT = DIDerivedType(Element);
388 StringRef fieldName = DT.getName();
389 if (fieldName == "__forwarding")
390 forwardingField = Element;
391 else if (fieldName == varName)
395 // Get the offsets for the forwarding field and the variable field.
396 unsigned forwardingFieldOffset =
397 DIDerivedType(forwardingField).getOffsetInBits() >> 3;
398 unsigned varFieldOffset =
399 DIDerivedType(varField).getOffsetInBits() >> 3;
401 // Decode the original location, and use that as the start of the byref
402 // variable's location.
403 const TargetRegisterInfo *RI = Asm->TM.getRegisterInfo();
404 unsigned Reg = RI->getDwarfRegNum(Location.getReg(), false);
405 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
407 if (Location.isReg()) {
409 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_reg0 + Reg);
411 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_regx);
412 addUInt(Block, 0, dwarf::DW_FORM_udata, Reg);
416 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_breg0 + Reg);
418 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_bregx);
419 addUInt(Block, 0, dwarf::DW_FORM_udata, Reg);
422 addUInt(Block, 0, dwarf::DW_FORM_sdata, Location.getOffset());
425 // If we started with a pointer to the __Block_byref... struct, then
426 // the first thing we need to do is dereference the pointer (DW_OP_deref).
428 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_deref);
430 // Next add the offset for the '__forwarding' field:
431 // DW_OP_plus_uconst ForwardingFieldOffset. Note there's no point in
432 // adding the offset if it's 0.
433 if (forwardingFieldOffset > 0) {
434 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus_uconst);
435 addUInt(Block, 0, dwarf::DW_FORM_udata, forwardingFieldOffset);
438 // Now dereference the __forwarding field to get to the real __Block_byref
439 // struct: DW_OP_deref.
440 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_deref);
442 // Now that we've got the real __Block_byref... struct, add the offset
443 // for the variable's field to get to the location of the actual variable:
444 // DW_OP_plus_uconst varFieldOffset. Again, don't add if it's 0.
445 if (varFieldOffset > 0) {
446 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus_uconst);
447 addUInt(Block, 0, dwarf::DW_FORM_udata, varFieldOffset);
450 // Now attach the location information to the DIE.
451 addBlock(Die, Attribute, 0, Block);
454 /// isTypeSigned - Return true if the type is signed.
455 static bool isTypeSigned(DIType Ty, int *SizeInBits) {
456 if (Ty.isDerivedType())
457 return isTypeSigned(DIDerivedType(Ty).getTypeDerivedFrom(), SizeInBits);
458 if (Ty.isBasicType())
459 if (DIBasicType(Ty).getEncoding() == dwarf::DW_ATE_signed
460 || DIBasicType(Ty).getEncoding() == dwarf::DW_ATE_signed_char) {
461 *SizeInBits = Ty.getSizeInBits();
467 /// addConstantValue - Add constant value entry in variable DIE.
468 bool CompileUnit::addConstantValue(DIE *Die, const MachineOperand &MO,
470 assert(MO.isImm() && "Invalid machine operand!");
471 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
473 bool SignedConstant = isTypeSigned(Ty, &SizeInBits);
474 unsigned Form = SignedConstant ? dwarf::DW_FORM_sdata : dwarf::DW_FORM_udata;
475 switch (SizeInBits) {
476 case 8: Form = dwarf::DW_FORM_data1; break;
477 case 16: Form = dwarf::DW_FORM_data2; break;
478 case 32: Form = dwarf::DW_FORM_data4; break;
479 case 64: Form = dwarf::DW_FORM_data8; break;
482 SignedConstant ? addSInt(Block, 0, Form, MO.getImm())
483 : addUInt(Block, 0, Form, MO.getImm());
485 addBlock(Die, dwarf::DW_AT_const_value, 0, Block);
489 /// addConstantFPValue - Add constant value entry in variable DIE.
490 bool CompileUnit::addConstantFPValue(DIE *Die, const MachineOperand &MO) {
491 assert (MO.isFPImm() && "Invalid machine operand!");
492 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
493 APFloat FPImm = MO.getFPImm()->getValueAPF();
495 // Get the raw data form of the floating point.
496 const APInt FltVal = FPImm.bitcastToAPInt();
497 const char *FltPtr = (const char*)FltVal.getRawData();
499 int NumBytes = FltVal.getBitWidth() / 8; // 8 bits per byte.
500 bool LittleEndian = Asm->getTargetData().isLittleEndian();
501 int Incr = (LittleEndian ? 1 : -1);
502 int Start = (LittleEndian ? 0 : NumBytes - 1);
503 int Stop = (LittleEndian ? NumBytes : -1);
505 // Output the constant to DWARF one byte at a time.
506 for (; Start != Stop; Start += Incr)
507 addUInt(Block, 0, dwarf::DW_FORM_data1,
508 (unsigned char)0xFF & FltPtr[Start]);
510 addBlock(Die, dwarf::DW_AT_const_value, 0, Block);
514 /// addConstantValue - Add constant value entry in variable DIE.
515 bool CompileUnit::addConstantValue(DIE *Die, const ConstantInt *CI,
517 unsigned CIBitWidth = CI->getBitWidth();
518 if (CIBitWidth <= 64) {
520 switch (CIBitWidth) {
521 case 8: form = dwarf::DW_FORM_data1; break;
522 case 16: form = dwarf::DW_FORM_data2; break;
523 case 32: form = dwarf::DW_FORM_data4; break;
524 case 64: form = dwarf::DW_FORM_data8; break;
526 form = Unsigned ? dwarf::DW_FORM_udata : dwarf::DW_FORM_sdata;
529 addUInt(Die, dwarf::DW_AT_const_value, form, CI->getZExtValue());
531 addSInt(Die, dwarf::DW_AT_const_value, form, CI->getSExtValue());
535 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
537 // Get the raw data form of the large APInt.
538 const APInt Val = CI->getValue();
539 const uint64_t *Ptr64 = Val.getRawData();
541 int NumBytes = Val.getBitWidth() / 8; // 8 bits per byte.
542 bool LittleEndian = Asm->getTargetData().isLittleEndian();
544 // Output the constant to DWARF one byte at a time.
545 for (int i = 0; i < NumBytes; i++) {
548 c = Ptr64[i / 8] >> (8 * (i & 7));
550 c = Ptr64[(NumBytes - 1 - i) / 8] >> (8 * ((NumBytes - 1 - i) & 7));
551 addUInt(Block, 0, dwarf::DW_FORM_data1, c);
554 addBlock(Die, dwarf::DW_AT_const_value, 0, Block);
558 /// addTemplateParams - Add template parameters in buffer.
559 void CompileUnit::addTemplateParams(DIE &Buffer, DIArray TParams) {
560 // Add template parameters.
561 for (unsigned i = 0, e = TParams.getNumElements(); i != e; ++i) {
562 DIDescriptor Element = TParams.getElement(i);
563 if (Element.isTemplateTypeParameter())
564 Buffer.addChild(getOrCreateTemplateTypeParameterDIE(
565 DITemplateTypeParameter(Element)));
566 else if (Element.isTemplateValueParameter())
567 Buffer.addChild(getOrCreateTemplateValueParameterDIE(
568 DITemplateValueParameter(Element)));
572 /// addToContextOwner - Add Die into the list of its context owner's children.
573 void CompileUnit::addToContextOwner(DIE *Die, DIDescriptor Context) {
574 if (Context.isType()) {
575 DIE *ContextDIE = getOrCreateTypeDIE(DIType(Context));
576 ContextDIE->addChild(Die);
577 } else if (Context.isNameSpace()) {
578 DIE *ContextDIE = getOrCreateNameSpace(DINameSpace(Context));
579 ContextDIE->addChild(Die);
580 } else if (Context.isSubprogram()) {
581 DIE *ContextDIE = getOrCreateSubprogramDIE(DISubprogram(Context));
582 ContextDIE->addChild(Die);
583 } else if (DIE *ContextDIE = getDIE(Context))
584 ContextDIE->addChild(Die);
589 /// getOrCreateTypeDIE - Find existing DIE or create new DIE for the
591 DIE *CompileUnit::getOrCreateTypeDIE(const MDNode *TyNode) {
595 DIE *TyDIE = getDIE(Ty);
600 TyDIE = new DIE(dwarf::DW_TAG_base_type);
601 insertDIE(Ty, TyDIE);
602 if (Ty.isBasicType())
603 constructTypeDIE(*TyDIE, DIBasicType(Ty));
604 else if (Ty.isCompositeType())
605 constructTypeDIE(*TyDIE, DICompositeType(Ty));
607 assert(Ty.isDerivedType() && "Unknown kind of DIType");
608 constructTypeDIE(*TyDIE, DIDerivedType(Ty));
610 // If this is a named finished type then include it in the list of types
611 // for the accelerator tables.
612 if (!Ty.getName().empty() && !Ty.isForwardDecl()) {
613 bool IsImplementation = 0;
614 if (Ty.isCompositeType()) {
615 DICompositeType CT(Ty);
616 // A runtime language of 0 actually means C/C++ and that any
617 // non-negative value is some version of Objective-C/C++.
618 IsImplementation = (CT.getRunTimeLang() == 0) ||
619 CT.isObjcClassComplete();;
621 unsigned Flags = IsImplementation ?
622 DwarfAccelTable::eTypeFlagClassIsImplementation : 0;
623 addAccelType(Ty.getName(), std::make_pair(TyDIE, Flags));
626 addToContextOwner(TyDIE, Ty.getContext());
630 /// addType - Add a new type attribute to the specified entity.
631 void CompileUnit::addType(DIE *Entity, DIType Ty) {
635 // Check for pre-existence.
636 DIEEntry *Entry = getDIEEntry(Ty);
637 // If it exists then use the existing value.
639 Entity->addValue(dwarf::DW_AT_type, dwarf::DW_FORM_ref4, Entry);
644 DIE *Buffer = getOrCreateTypeDIE(Ty);
647 Entry = createDIEEntry(Buffer);
648 insertDIEEntry(Ty, Entry);
649 Entity->addValue(dwarf::DW_AT_type, dwarf::DW_FORM_ref4, Entry);
651 // If this is a complete composite type then include it in the
652 // list of global types.
656 /// addGlobalType - Add a new global type to the compile unit.
658 void CompileUnit::addGlobalType(DIType Ty) {
659 DIDescriptor Context = Ty.getContext();
660 if (Ty.isCompositeType() && !Ty.getName().empty() && !Ty.isForwardDecl()
661 && (!Context || Context.isCompileUnit() || Context.isFile()
662 || Context.isNameSpace()))
663 if (DIEEntry *Entry = getDIEEntry(Ty))
664 GlobalTypes[Ty.getName()] = Entry->getEntry();
667 /// addPubTypes - Add type for pubtypes section.
668 void CompileUnit::addPubTypes(DISubprogram SP) {
669 DICompositeType SPTy = SP.getType();
670 unsigned SPTag = SPTy.getTag();
671 if (SPTag != dwarf::DW_TAG_subroutine_type)
674 DIArray Args = SPTy.getTypeArray();
675 for (unsigned i = 0, e = Args.getNumElements(); i != e; ++i) {
676 DIType ATy(Args.getElement(i));
683 /// constructTypeDIE - Construct basic type die from DIBasicType.
684 void CompileUnit::constructTypeDIE(DIE &Buffer, DIBasicType BTy) {
685 // Get core information.
686 StringRef Name = BTy.getName();
687 // Add name if not anonymous or intermediate type.
689 addString(&Buffer, dwarf::DW_AT_name, Name);
691 if (BTy.getTag() == dwarf::DW_TAG_unspecified_type) {
692 Buffer.setTag(dwarf::DW_TAG_unspecified_type);
693 // Unspecified types has only name, nothing else.
697 Buffer.setTag(dwarf::DW_TAG_base_type);
698 addUInt(&Buffer, dwarf::DW_AT_encoding, dwarf::DW_FORM_data1,
701 uint64_t Size = BTy.getSizeInBits() >> 3;
702 addUInt(&Buffer, dwarf::DW_AT_byte_size, 0, Size);
705 /// constructTypeDIE - Construct derived type die from DIDerivedType.
706 void CompileUnit::constructTypeDIE(DIE &Buffer, DIDerivedType DTy) {
707 // Get core information.
708 StringRef Name = DTy.getName();
709 uint64_t Size = DTy.getSizeInBits() >> 3;
710 unsigned Tag = DTy.getTag();
712 // FIXME - Workaround for templates.
713 if (Tag == dwarf::DW_TAG_inheritance) Tag = dwarf::DW_TAG_reference_type;
717 // Map to main type, void will not have a type.
718 DIType FromTy = DTy.getTypeDerivedFrom();
719 addType(&Buffer, FromTy);
721 // Add name if not anonymous or intermediate type.
723 addString(&Buffer, dwarf::DW_AT_name, Name);
725 // Add size if non-zero (derived types might be zero-sized.)
727 addUInt(&Buffer, dwarf::DW_AT_byte_size, 0, Size);
729 // Add source line info if available and TyDesc is not a forward declaration.
730 if (!DTy.isForwardDecl())
731 addSourceLine(&Buffer, DTy);
734 /// constructTypeDIE - Construct type DIE from DICompositeType.
735 void CompileUnit::constructTypeDIE(DIE &Buffer, DICompositeType CTy) {
736 // Get core information.
737 StringRef Name = CTy.getName();
739 uint64_t Size = CTy.getSizeInBits() >> 3;
740 unsigned Tag = CTy.getTag();
744 case dwarf::DW_TAG_vector_type:
745 case dwarf::DW_TAG_array_type:
746 constructArrayTypeDIE(Buffer, &CTy);
748 case dwarf::DW_TAG_enumeration_type: {
749 DIArray Elements = CTy.getTypeArray();
751 // Add enumerators to enumeration type.
752 for (unsigned i = 0, N = Elements.getNumElements(); i < N; ++i) {
754 DIDescriptor Enum(Elements.getElement(i));
755 if (Enum.isEnumerator()) {
756 ElemDie = constructEnumTypeDIE(DIEnumerator(Enum));
757 Buffer.addChild(ElemDie);
762 case dwarf::DW_TAG_subroutine_type: {
764 DIArray Elements = CTy.getTypeArray();
765 DIDescriptor RTy = Elements.getElement(0);
766 addType(&Buffer, DIType(RTy));
768 bool isPrototyped = true;
770 for (unsigned i = 1, N = Elements.getNumElements(); i < N; ++i) {
771 DIDescriptor Ty = Elements.getElement(i);
772 if (Ty.isUnspecifiedParameter()) {
773 DIE *Arg = new DIE(dwarf::DW_TAG_unspecified_parameters);
774 Buffer.addChild(Arg);
775 isPrototyped = false;
777 DIE *Arg = new DIE(dwarf::DW_TAG_formal_parameter);
778 addType(Arg, DIType(Ty));
779 Buffer.addChild(Arg);
782 // Add prototype flag.
784 addUInt(&Buffer, dwarf::DW_AT_prototyped, dwarf::DW_FORM_flag, 1);
787 case dwarf::DW_TAG_structure_type:
788 case dwarf::DW_TAG_union_type:
789 case dwarf::DW_TAG_class_type: {
790 // Add elements to structure type.
791 DIArray Elements = CTy.getTypeArray();
793 // A forward struct declared type may not have elements available.
794 unsigned N = Elements.getNumElements();
798 // Add elements to structure type.
799 for (unsigned i = 0; i < N; ++i) {
800 DIDescriptor Element = Elements.getElement(i);
802 if (Element.isSubprogram()) {
803 DISubprogram SP(Element);
804 ElemDie = getOrCreateSubprogramDIE(DISubprogram(Element));
805 if (SP.isProtected())
806 addUInt(ElemDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
807 dwarf::DW_ACCESS_protected);
808 else if (SP.isPrivate())
809 addUInt(ElemDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
810 dwarf::DW_ACCESS_private);
812 addUInt(ElemDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
813 dwarf::DW_ACCESS_public);
815 addUInt(ElemDie, dwarf::DW_AT_explicit, dwarf::DW_FORM_flag, 1);
817 else if (Element.isVariable()) {
818 DIVariable DV(Element);
819 ElemDie = new DIE(dwarf::DW_TAG_variable);
820 addString(ElemDie, dwarf::DW_AT_name, DV.getName());
821 addType(ElemDie, DV.getType());
822 addUInt(ElemDie, dwarf::DW_AT_declaration, dwarf::DW_FORM_flag, 1);
823 addUInt(ElemDie, dwarf::DW_AT_external, dwarf::DW_FORM_flag, 1);
824 addSourceLine(ElemDie, DV);
825 } else if (Element.isDerivedType())
826 ElemDie = createMemberDIE(DIDerivedType(Element));
827 else if (Element.isObjCProperty()) {
828 DIObjCProperty Property(Element);
829 ElemDie = new DIE(Property.getTag());
830 StringRef PropertyName = Property.getObjCPropertyName();
831 addString(ElemDie, dwarf::DW_AT_APPLE_property_name, PropertyName);
832 StringRef GetterName = Property.getObjCPropertyGetterName();
833 if (!GetterName.empty())
834 addString(ElemDie, dwarf::DW_AT_APPLE_property_getter, GetterName);
835 StringRef SetterName = Property.getObjCPropertySetterName();
836 if (!SetterName.empty())
837 addString(ElemDie, dwarf::DW_AT_APPLE_property_setter, SetterName);
838 unsigned PropertyAttributes = 0;
839 if (Property.isReadOnlyObjCProperty())
840 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_readonly;
841 if (Property.isReadWriteObjCProperty())
842 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_readwrite;
843 if (Property.isAssignObjCProperty())
844 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_assign;
845 if (Property.isRetainObjCProperty())
846 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_retain;
847 if (Property.isCopyObjCProperty())
848 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_copy;
849 if (Property.isNonAtomicObjCProperty())
850 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_nonatomic;
851 if (PropertyAttributes)
852 addUInt(ElemDie, dwarf::DW_AT_APPLE_property_attribute, 0,
856 Buffer.addChild(ElemDie);
859 if (CTy.isAppleBlockExtension())
860 addUInt(&Buffer, dwarf::DW_AT_APPLE_block, dwarf::DW_FORM_flag, 1);
862 unsigned RLang = CTy.getRunTimeLang();
864 addUInt(&Buffer, dwarf::DW_AT_APPLE_runtime_class,
865 dwarf::DW_FORM_data1, RLang);
867 DICompositeType ContainingType = CTy.getContainingType();
868 if (DIDescriptor(ContainingType).isCompositeType())
869 addDIEEntry(&Buffer, dwarf::DW_AT_containing_type, dwarf::DW_FORM_ref4,
870 getOrCreateTypeDIE(DIType(ContainingType)));
872 DIDescriptor Context = CTy.getContext();
873 addToContextOwner(&Buffer, Context);
876 if (CTy.isObjcClassComplete())
877 addUInt(&Buffer, dwarf::DW_AT_APPLE_objc_complete_type,
878 dwarf::DW_FORM_flag, 1);
880 // Add template parameters to a class, structure or union types.
881 // FIXME: The support isn't in the metadata for this yet.
882 if (Tag == dwarf::DW_TAG_class_type ||
883 Tag == dwarf::DW_TAG_structure_type ||
884 Tag == dwarf::DW_TAG_union_type)
885 addTemplateParams(Buffer, CTy.getTemplateParams());
893 // Add name if not anonymous or intermediate type.
895 addString(&Buffer, dwarf::DW_AT_name, Name);
897 if (Tag == dwarf::DW_TAG_enumeration_type || Tag == dwarf::DW_TAG_class_type
898 || Tag == dwarf::DW_TAG_structure_type || Tag == dwarf::DW_TAG_union_type)
900 // Add size if non-zero (derived types might be zero-sized.)
902 addUInt(&Buffer, dwarf::DW_AT_byte_size, 0, Size);
904 // Add zero size if it is not a forward declaration.
905 if (CTy.isForwardDecl())
906 addUInt(&Buffer, dwarf::DW_AT_declaration, dwarf::DW_FORM_flag, 1);
908 addUInt(&Buffer, dwarf::DW_AT_byte_size, 0, 0);
911 // Add source line info if available.
912 if (!CTy.isForwardDecl())
913 addSourceLine(&Buffer, CTy);
917 /// getOrCreateTemplateTypeParameterDIE - Find existing DIE or create new DIE
918 /// for the given DITemplateTypeParameter.
920 CompileUnit::getOrCreateTemplateTypeParameterDIE(DITemplateTypeParameter TP) {
921 DIE *ParamDIE = getDIE(TP);
925 ParamDIE = new DIE(dwarf::DW_TAG_template_type_parameter);
926 addType(ParamDIE, TP.getType());
927 addString(ParamDIE, dwarf::DW_AT_name, TP.getName());
931 /// getOrCreateTemplateValueParameterDIE - Find existing DIE or create new DIE
932 /// for the given DITemplateValueParameter.
934 CompileUnit::getOrCreateTemplateValueParameterDIE(DITemplateValueParameter TPV) {
935 DIE *ParamDIE = getDIE(TPV);
939 ParamDIE = new DIE(dwarf::DW_TAG_template_value_parameter);
940 addType(ParamDIE, TPV.getType());
941 if (!TPV.getName().empty())
942 addString(ParamDIE, dwarf::DW_AT_name, TPV.getName());
943 addUInt(ParamDIE, dwarf::DW_AT_const_value, dwarf::DW_FORM_udata,
948 /// getOrCreateNameSpace - Create a DIE for DINameSpace.
949 DIE *CompileUnit::getOrCreateNameSpace(DINameSpace NS) {
950 DIE *NDie = getDIE(NS);
953 NDie = new DIE(dwarf::DW_TAG_namespace);
955 if (!NS.getName().empty()) {
956 addString(NDie, dwarf::DW_AT_name, NS.getName());
957 addAccelNamespace(NS.getName(), NDie);
959 addAccelNamespace("(anonymous namespace)", NDie);
960 addSourceLine(NDie, NS);
961 addToContextOwner(NDie, NS.getContext());
965 /// getRealLinkageName - If special LLVM prefix that is used to inform the asm
966 /// printer to not emit usual symbol prefix before the symbol name is used then
967 /// return linkage name after skipping this special LLVM prefix.
968 static StringRef getRealLinkageName(StringRef LinkageName) {
970 if (LinkageName.startswith(StringRef(&One, 1)))
971 return LinkageName.substr(1);
975 /// getOrCreateSubprogramDIE - Create new DIE using SP.
976 DIE *CompileUnit::getOrCreateSubprogramDIE(DISubprogram SP) {
977 DIE *SPDie = getDIE(SP);
981 DISubprogram SPDecl = SP.getFunctionDeclaration();
983 if (SPDecl.isSubprogram()) {
984 DeclDie = getOrCreateSubprogramDIE(SPDecl);
987 SPDie = new DIE(dwarf::DW_TAG_subprogram);
989 // DW_TAG_inlined_subroutine may refer to this DIE.
990 insertDIE(SP, SPDie);
992 // Add to context owner.
993 addToContextOwner(SPDie, SP.getContext());
995 // Add function template parameters.
996 addTemplateParams(*SPDie, SP.getTemplateParams());
998 StringRef LinkageName = SP.getLinkageName();
999 if (!LinkageName.empty())
1000 addString(SPDie, dwarf::DW_AT_MIPS_linkage_name,
1001 getRealLinkageName(LinkageName));
1003 // If this DIE is going to refer declaration info using AT_specification
1004 // then there is no need to add other attributes.
1006 // Refer function declaration directly.
1007 addDIEEntry(SPDie, dwarf::DW_AT_specification, dwarf::DW_FORM_ref4,
1013 // Constructors and operators for anonymous aggregates do not have names.
1014 if (!SP.getName().empty())
1015 addString(SPDie, dwarf::DW_AT_name, SP.getName());
1017 addSourceLine(SPDie, SP);
1019 if (SP.isPrototyped())
1020 addUInt(SPDie, dwarf::DW_AT_prototyped, dwarf::DW_FORM_flag, 1);
1023 DICompositeType SPTy = SP.getType();
1024 DIArray Args = SPTy.getTypeArray();
1025 unsigned SPTag = SPTy.getTag();
1027 if (Args.getNumElements() == 0 || SPTag != dwarf::DW_TAG_subroutine_type)
1028 addType(SPDie, SPTy);
1030 addType(SPDie, DIType(Args.getElement(0)));
1032 unsigned VK = SP.getVirtuality();
1034 addUInt(SPDie, dwarf::DW_AT_virtuality, dwarf::DW_FORM_data1, VK);
1035 DIEBlock *Block = getDIEBlock();
1036 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_constu);
1037 addUInt(Block, 0, dwarf::DW_FORM_udata, SP.getVirtualIndex());
1038 addBlock(SPDie, dwarf::DW_AT_vtable_elem_location, 0, Block);
1039 ContainingTypeMap.insert(std::make_pair(SPDie,
1040 SP.getContainingType()));
1043 if (!SP.isDefinition()) {
1044 addUInt(SPDie, dwarf::DW_AT_declaration, dwarf::DW_FORM_flag, 1);
1046 // Add arguments. Do not add arguments for subprogram definition. They will
1047 // be handled while processing variables.
1048 DICompositeType SPTy = SP.getType();
1049 DIArray Args = SPTy.getTypeArray();
1050 unsigned SPTag = SPTy.getTag();
1052 if (SPTag == dwarf::DW_TAG_subroutine_type)
1053 for (unsigned i = 1, N = Args.getNumElements(); i < N; ++i) {
1054 DIE *Arg = new DIE(dwarf::DW_TAG_formal_parameter);
1055 DIType ATy = DIType(DIType(Args.getElement(i)));
1057 if (ATy.isArtificial())
1058 addUInt(Arg, dwarf::DW_AT_artificial, dwarf::DW_FORM_flag, 1);
1059 SPDie->addChild(Arg);
1063 if (SP.isArtificial())
1064 addUInt(SPDie, dwarf::DW_AT_artificial, dwarf::DW_FORM_flag, 1);
1066 if (!SP.isLocalToUnit())
1067 addUInt(SPDie, dwarf::DW_AT_external, dwarf::DW_FORM_flag, 1);
1069 if (SP.isOptimized())
1070 addUInt(SPDie, dwarf::DW_AT_APPLE_optimized, dwarf::DW_FORM_flag, 1);
1072 if (unsigned isa = Asm->getISAEncoding()) {
1073 addUInt(SPDie, dwarf::DW_AT_APPLE_isa, dwarf::DW_FORM_flag, isa);
1079 // Return const expression if value is a GEP to access merged global
1081 // i8* getelementptr ({ i8, i8, i8, i8 }* @_MergedGlobals, i32 0, i32 0)
1082 static const ConstantExpr *getMergedGlobalExpr(const Value *V) {
1083 const ConstantExpr *CE = dyn_cast_or_null<ConstantExpr>(V);
1084 if (!CE || CE->getNumOperands() != 3 ||
1085 CE->getOpcode() != Instruction::GetElementPtr)
1088 // First operand points to a global struct.
1089 Value *Ptr = CE->getOperand(0);
1090 if (!isa<GlobalValue>(Ptr) ||
1091 !isa<StructType>(cast<PointerType>(Ptr->getType())->getElementType()))
1094 // Second operand is zero.
1095 const ConstantInt *CI = dyn_cast_or_null<ConstantInt>(CE->getOperand(1));
1096 if (!CI || !CI->isZero())
1099 // Third operand is offset.
1100 if (!isa<ConstantInt>(CE->getOperand(2)))
1106 /// createGlobalVariableDIE - create global variable DIE.
1107 void CompileUnit::createGlobalVariableDIE(const MDNode *N) {
1108 // Check for pre-existence.
1112 DIGlobalVariable GV(N);
1116 DIE *VariableDIE = new DIE(GV.getTag());
1118 insertDIE(N, VariableDIE);
1121 addString(VariableDIE, dwarf::DW_AT_name, GV.getDisplayName());
1122 StringRef LinkageName = GV.getLinkageName();
1123 bool isGlobalVariable = GV.getGlobal() != NULL;
1124 if (!LinkageName.empty() && isGlobalVariable)
1125 addString(VariableDIE, dwarf::DW_AT_MIPS_linkage_name,
1126 getRealLinkageName(LinkageName));
1128 DIType GTy = GV.getType();
1129 addType(VariableDIE, GTy);
1131 // Add scoping info.
1132 if (!GV.isLocalToUnit())
1133 addUInt(VariableDIE, dwarf::DW_AT_external, dwarf::DW_FORM_flag, 1);
1135 // Add line number info.
1136 addSourceLine(VariableDIE, GV);
1137 // Add to context owner.
1138 DIDescriptor GVContext = GV.getContext();
1139 addToContextOwner(VariableDIE, GVContext);
1141 bool addToAccelTable = false;
1142 DIE *VariableSpecDIE = NULL;
1143 if (isGlobalVariable) {
1144 addToAccelTable = true;
1145 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
1146 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_addr);
1147 addLabel(Block, 0, dwarf::DW_FORM_udata,
1148 Asm->Mang->getSymbol(GV.getGlobal()));
1149 // Do not create specification DIE if context is either compile unit
1151 if (GVContext && GV.isDefinition() && !GVContext.isCompileUnit() &&
1152 !GVContext.isFile() && !isSubprogramContext(GVContext)) {
1153 // Create specification DIE.
1154 VariableSpecDIE = new DIE(dwarf::DW_TAG_variable);
1155 addDIEEntry(VariableSpecDIE, dwarf::DW_AT_specification,
1156 dwarf::DW_FORM_ref4, VariableDIE);
1157 addBlock(VariableSpecDIE, dwarf::DW_AT_location, 0, Block);
1158 addUInt(VariableDIE, dwarf::DW_AT_declaration, dwarf::DW_FORM_flag,
1160 addDie(VariableSpecDIE);
1162 addBlock(VariableDIE, dwarf::DW_AT_location, 0, Block);
1164 } else if (const ConstantInt *CI =
1165 dyn_cast_or_null<ConstantInt>(GV.getConstant()))
1166 addConstantValue(VariableDIE, CI, GTy.isUnsignedDIType());
1167 else if (const ConstantExpr *CE = getMergedGlobalExpr(N->getOperand(11))) {
1168 addToAccelTable = true;
1169 // GV is a merged global.
1170 DIEBlock *Block = new (DIEValueAllocator) DIEBlock();
1171 Value *Ptr = CE->getOperand(0);
1172 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_addr);
1173 addLabel(Block, 0, dwarf::DW_FORM_udata,
1174 Asm->Mang->getSymbol(cast<GlobalValue>(Ptr)));
1175 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_constu);
1176 SmallVector<Value*, 3> Idx(CE->op_begin()+1, CE->op_end());
1177 addUInt(Block, 0, dwarf::DW_FORM_udata,
1178 Asm->getTargetData().getIndexedOffset(Ptr->getType(), Idx));
1179 addUInt(Block, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus);
1180 addBlock(VariableDIE, dwarf::DW_AT_location, 0, Block);
1183 if (addToAccelTable) {
1184 DIE *AddrDIE = VariableSpecDIE ? VariableSpecDIE : VariableDIE;
1185 addAccelName(GV.getName(), AddrDIE);
1187 // If the linkage name is different than the name, go ahead and output
1188 // that as well into the name table.
1189 if (GV.getLinkageName() != "" && GV.getName() != GV.getLinkageName())
1190 addAccelName(GV.getLinkageName(), AddrDIE);
1196 /// constructSubrangeDIE - Construct subrange DIE from DISubrange.
1197 void CompileUnit::constructSubrangeDIE(DIE &Buffer, DISubrange SR, DIE *IndexTy){
1198 DIE *DW_Subrange = new DIE(dwarf::DW_TAG_subrange_type);
1199 addDIEEntry(DW_Subrange, dwarf::DW_AT_type, dwarf::DW_FORM_ref4, IndexTy);
1200 uint64_t L = SR.getLo();
1201 uint64_t H = SR.getHi();
1203 // The L value defines the lower bounds which is typically zero for C/C++. The
1204 // H value is the upper bounds. Values are 64 bit. H - L + 1 is the size
1205 // of the array. If L > H then do not emit DW_AT_lower_bound and
1206 // DW_AT_upper_bound attributes. If L is zero and H is also zero then the
1207 // array has one element and in such case do not emit lower bound.
1210 Buffer.addChild(DW_Subrange);
1214 addUInt(DW_Subrange, dwarf::DW_AT_lower_bound, 0, L);
1215 addUInt(DW_Subrange, dwarf::DW_AT_upper_bound, 0, H);
1216 Buffer.addChild(DW_Subrange);
1219 /// constructArrayTypeDIE - Construct array type DIE from DICompositeType.
1220 void CompileUnit::constructArrayTypeDIE(DIE &Buffer,
1221 DICompositeType *CTy) {
1222 Buffer.setTag(dwarf::DW_TAG_array_type);
1223 if (CTy->getTag() == dwarf::DW_TAG_vector_type)
1224 addUInt(&Buffer, dwarf::DW_AT_GNU_vector, dwarf::DW_FORM_flag, 1);
1226 // Emit derived type.
1227 addType(&Buffer, CTy->getTypeDerivedFrom());
1228 DIArray Elements = CTy->getTypeArray();
1230 // Get an anonymous type for index type.
1231 DIE *IdxTy = getIndexTyDie();
1233 // Construct an anonymous type for index type.
1234 IdxTy = new DIE(dwarf::DW_TAG_base_type);
1235 addUInt(IdxTy, dwarf::DW_AT_byte_size, 0, sizeof(int32_t));
1236 addUInt(IdxTy, dwarf::DW_AT_encoding, dwarf::DW_FORM_data1,
1237 dwarf::DW_ATE_signed);
1239 setIndexTyDie(IdxTy);
1242 // Add subranges to array type.
1243 for (unsigned i = 0, N = Elements.getNumElements(); i < N; ++i) {
1244 DIDescriptor Element = Elements.getElement(i);
1245 if (Element.getTag() == dwarf::DW_TAG_subrange_type)
1246 constructSubrangeDIE(Buffer, DISubrange(Element), IdxTy);
1250 /// constructEnumTypeDIE - Construct enum type DIE from DIEnumerator.
1251 DIE *CompileUnit::constructEnumTypeDIE(DIEnumerator ETy) {
1252 DIE *Enumerator = new DIE(dwarf::DW_TAG_enumerator);
1253 StringRef Name = ETy.getName();
1254 addString(Enumerator, dwarf::DW_AT_name, Name);
1255 int64_t Value = ETy.getEnumValue();
1256 addSInt(Enumerator, dwarf::DW_AT_const_value, dwarf::DW_FORM_sdata, Value);
1260 /// constructContainingTypeDIEs - Construct DIEs for types that contain
1262 void CompileUnit::constructContainingTypeDIEs() {
1263 for (DenseMap<DIE *, const MDNode *>::iterator CI = ContainingTypeMap.begin(),
1264 CE = ContainingTypeMap.end(); CI != CE; ++CI) {
1265 DIE *SPDie = CI->first;
1266 const MDNode *N = CI->second;
1268 DIE *NDie = getDIE(N);
1269 if (!NDie) continue;
1270 addDIEEntry(SPDie, dwarf::DW_AT_containing_type, dwarf::DW_FORM_ref4, NDie);
1274 /// constructVariableDIE - Construct a DIE for the given DbgVariable.
1275 DIE *CompileUnit::constructVariableDIE(DbgVariable *DV, bool isScopeAbstract) {
1276 StringRef Name = DV->getName();
1280 // Translate tag to proper Dwarf tag.
1281 unsigned Tag = DV->getTag();
1283 // Define variable debug information entry.
1284 DIE *VariableDie = new DIE(Tag);
1285 DbgVariable *AbsVar = DV->getAbstractVariable();
1286 DIE *AbsDIE = AbsVar ? AbsVar->getDIE() : NULL;
1288 addDIEEntry(VariableDie, dwarf::DW_AT_abstract_origin,
1289 dwarf::DW_FORM_ref4, AbsDIE);
1291 addString(VariableDie, dwarf::DW_AT_name, Name);
1292 addSourceLine(VariableDie, DV->getVariable());
1293 addType(VariableDie, DV->getType());
1296 if (DV->isArtificial())
1297 addUInt(VariableDie, dwarf::DW_AT_artificial,
1298 dwarf::DW_FORM_flag, 1);
1300 if (isScopeAbstract) {
1301 DV->setDIE(VariableDie);
1305 // Add variable address.
1307 unsigned Offset = DV->getDotDebugLocOffset();
1308 if (Offset != ~0U) {
1309 addLabel(VariableDie, dwarf::DW_AT_location,
1310 dwarf::DW_FORM_data4,
1311 Asm->GetTempSymbol("debug_loc", Offset));
1312 DV->setDIE(VariableDie);
1316 // Check if variable is described by a DBG_VALUE instruction.
1317 if (const MachineInstr *DVInsn = DV->getMInsn()) {
1318 bool updated = false;
1319 if (DVInsn->getNumOperands() == 3) {
1320 if (DVInsn->getOperand(0).isReg()) {
1321 const MachineOperand RegOp = DVInsn->getOperand(0);
1322 const TargetRegisterInfo *TRI = Asm->TM.getRegisterInfo();
1323 if (DVInsn->getOperand(1).isImm() &&
1324 TRI->getFrameRegister(*Asm->MF) == RegOp.getReg()) {
1325 unsigned FrameReg = 0;
1326 const TargetFrameLowering *TFI = Asm->TM.getFrameLowering();
1328 TFI->getFrameIndexReference(*Asm->MF,
1329 DVInsn->getOperand(1).getImm(),
1331 MachineLocation Location(FrameReg, Offset);
1332 addVariableAddress(DV, VariableDie, Location);
1334 } else if (RegOp.getReg())
1335 addVariableAddress(DV, VariableDie,
1336 MachineLocation(RegOp.getReg()));
1339 else if (DVInsn->getOperand(0).isImm())
1341 addConstantValue(VariableDie, DVInsn->getOperand(0),
1343 else if (DVInsn->getOperand(0).isFPImm())
1345 addConstantFPValue(VariableDie, DVInsn->getOperand(0));
1346 else if (DVInsn->getOperand(0).isCImm())
1348 addConstantValue(VariableDie,
1349 DVInsn->getOperand(0).getCImm(),
1350 DV->getType().isUnsignedDIType());
1352 addVariableAddress(DV, VariableDie,
1353 Asm->getDebugValueLocation(DVInsn));
1357 // If variableDie is not updated then DBG_VALUE instruction does not
1358 // have valid variable info.
1362 DV->setDIE(VariableDie);
1365 // .. else use frame index.
1366 int FI = DV->getFrameIndex();
1368 unsigned FrameReg = 0;
1369 const TargetFrameLowering *TFI = Asm->TM.getFrameLowering();
1371 TFI->getFrameIndexReference(*Asm->MF, FI, FrameReg);
1372 MachineLocation Location(FrameReg, Offset);
1373 addVariableAddress(DV, VariableDie, Location);
1377 DV->setDIE(VariableDie);
1381 /// createMemberDIE - Create new member DIE.
1382 DIE *CompileUnit::createMemberDIE(DIDerivedType DT) {
1383 DIE *MemberDie = new DIE(DT.getTag());
1384 StringRef Name = DT.getName();
1386 addString(MemberDie, dwarf::DW_AT_name, Name);
1388 addType(MemberDie, DT.getTypeDerivedFrom());
1390 addSourceLine(MemberDie, DT);
1392 DIEBlock *MemLocationDie = new (DIEValueAllocator) DIEBlock();
1393 addUInt(MemLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus_uconst);
1395 uint64_t Size = DT.getSizeInBits();
1396 uint64_t FieldSize = DT.getOriginalTypeSize();
1398 if (Size != FieldSize) {
1400 addUInt(MemberDie, dwarf::DW_AT_byte_size, 0, DT.getOriginalTypeSize()>>3);
1401 addUInt(MemberDie, dwarf::DW_AT_bit_size, 0, DT.getSizeInBits());
1403 uint64_t Offset = DT.getOffsetInBits();
1404 uint64_t AlignMask = ~(DT.getAlignInBits() - 1);
1405 uint64_t HiMark = (Offset + FieldSize) & AlignMask;
1406 uint64_t FieldOffset = (HiMark - FieldSize);
1407 Offset -= FieldOffset;
1409 // Maybe we need to work from the other end.
1410 if (Asm->getTargetData().isLittleEndian())
1411 Offset = FieldSize - (Offset + Size);
1412 addUInt(MemberDie, dwarf::DW_AT_bit_offset, 0, Offset);
1414 // Here WD_AT_data_member_location points to the anonymous
1415 // field that includes this bit field.
1416 addUInt(MemLocationDie, 0, dwarf::DW_FORM_udata, FieldOffset >> 3);
1419 // This is not a bitfield.
1420 addUInt(MemLocationDie, 0, dwarf::DW_FORM_udata, DT.getOffsetInBits() >> 3);
1422 if (DT.getTag() == dwarf::DW_TAG_inheritance
1423 && DT.isVirtual()) {
1425 // For C++, virtual base classes are not at fixed offset. Use following
1426 // expression to extract appropriate offset from vtable.
1427 // BaseAddr = ObAddr + *((*ObAddr) - Offset)
1429 DIEBlock *VBaseLocationDie = new (DIEValueAllocator) DIEBlock();
1430 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_dup);
1431 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_deref);
1432 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_constu);
1433 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_udata, DT.getOffsetInBits());
1434 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_minus);
1435 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_deref);
1436 addUInt(VBaseLocationDie, 0, dwarf::DW_FORM_data1, dwarf::DW_OP_plus);
1438 addBlock(MemberDie, dwarf::DW_AT_data_member_location, 0,
1441 addBlock(MemberDie, dwarf::DW_AT_data_member_location, 0, MemLocationDie);
1443 if (DT.isProtected())
1444 addUInt(MemberDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
1445 dwarf::DW_ACCESS_protected);
1446 else if (DT.isPrivate())
1447 addUInt(MemberDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
1448 dwarf::DW_ACCESS_private);
1449 // Otherwise C++ member and base classes are considered public.
1451 addUInt(MemberDie, dwarf::DW_AT_accessibility, dwarf::DW_FORM_data1,
1452 dwarf::DW_ACCESS_public);
1454 addUInt(MemberDie, dwarf::DW_AT_virtuality, dwarf::DW_FORM_data1,
1455 dwarf::DW_VIRTUALITY_virtual);
1457 // Objective-C properties.
1458 // This is only for backward compatibility.
1459 StringRef PropertyName = DT.getObjCPropertyName();
1460 if (!PropertyName.empty()) {
1461 addString(MemberDie, dwarf::DW_AT_APPLE_property_name, PropertyName);
1462 StringRef GetterName = DT.getObjCPropertyGetterName();
1463 if (!GetterName.empty())
1464 addString(MemberDie, dwarf::DW_AT_APPLE_property_getter, GetterName);
1465 StringRef SetterName = DT.getObjCPropertySetterName();
1466 if (!SetterName.empty())
1467 addString(MemberDie, dwarf::DW_AT_APPLE_property_setter, SetterName);
1468 unsigned PropertyAttributes = 0;
1469 if (DT.isReadOnlyObjCProperty())
1470 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_readonly;
1471 if (DT.isReadWriteObjCProperty())
1472 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_readwrite;
1473 if (DT.isAssignObjCProperty())
1474 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_assign;
1475 if (DT.isRetainObjCProperty())
1476 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_retain;
1477 if (DT.isCopyObjCProperty())
1478 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_copy;
1479 if (DT.isNonAtomicObjCProperty())
1480 PropertyAttributes |= dwarf::DW_APPLE_PROPERTY_nonatomic;
1481 if (PropertyAttributes)
1482 addUInt(MemberDie, dwarf::DW_AT_APPLE_property_attribute, 0,
1483 PropertyAttributes);