Handle assembler identifiers specially in CBE. This fixes PR2418.
[oota-llvm.git] / lib / Target / PowerPC / PPCTargetAsmInfo.cpp
1 //===-- PPCTargetAsmInfo.cpp - PPC asm properties ---------------*- C++ -*-===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file contains the declarations of the DarwinTargetAsmInfo properties.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "PPCTargetAsmInfo.h"
15 #include "PPCTargetMachine.h"
16 #include "llvm/Function.h"
17 #include "llvm/Support/Dwarf.h"
18
19 using namespace llvm;
20 using namespace llvm::dwarf;
21
22 PPCTargetAsmInfo::PPCTargetAsmInfo(const PPCTargetMachine &TM) {
23   bool isPPC64 = TM.getSubtargetImpl()->isPPC64();
24   
25   ZeroDirective = "\t.space\t";
26   SetDirective = "\t.set";
27   Data64bitsDirective = isPPC64 ? "\t.quad\t" : 0;  
28   AlignmentIsInBytes = false;
29   LCOMMDirective = "\t.lcomm\t";
30   InlineAsmStart = "# InlineAsm Start";
31   InlineAsmEnd = "# InlineAsm End";
32   AssemblerDialect = TM.getSubtargetImpl()->getAsmFlavor();
33 }
34
35 DarwinTargetAsmInfo::DarwinTargetAsmInfo(const PPCTargetMachine &TM)
36 : PPCTargetAsmInfo(TM)
37 {
38   PCSymbol = ".";
39   CommentString = ";";
40   GlobalPrefix = "_";
41   PrivateGlobalPrefix = "L";
42   StringConstantPrefix = "\1LC";
43   ConstantPoolSection = "\t.const\t";
44   JumpTableDataSection = ".const";
45   CStringSection = "\t.cstring";
46   FourByteConstantSection = "\t.literal4\n";
47   EightByteConstantSection = "\t.literal8\n";
48   ReadOnlySection = "\t.const\n";
49   if (TM.getRelocationModel() == Reloc::Static) {
50     StaticCtorsSection = ".constructor";
51     StaticDtorsSection = ".destructor";
52   } else {
53     StaticCtorsSection = ".mod_init_func";
54     StaticDtorsSection = ".mod_term_func";
55   }
56   SwitchToSectionDirective = "\t.section ";
57   UsedDirective = "\t.no_dead_strip\t";
58   WeakDefDirective = "\t.weak_definition ";
59   WeakRefDirective = "\t.weak_reference ";
60   HiddenDirective = "\t.private_extern ";
61   SupportsExceptionHandling = true;
62   NeedsIndirectEncoding = true;
63   NeedsSet = true;
64   BSSSection = 0;
65   
66   DwarfEHFrameSection =
67   ".section __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support";
68   DwarfExceptionSection = ".section __DATA,__gcc_except_tab";
69   GlobalEHDirective = "\t.globl\t";
70   SupportsWeakOmittedEHFrame = false;
71
72   DwarfAbbrevSection = ".section __DWARF,__debug_abbrev,regular,debug";
73   DwarfInfoSection = ".section __DWARF,__debug_info,regular,debug";
74   DwarfLineSection = ".section __DWARF,__debug_line,regular,debug";
75   DwarfFrameSection = ".section __DWARF,__debug_frame,regular,debug";
76   DwarfPubNamesSection = ".section __DWARF,__debug_pubnames,regular,debug";
77   DwarfPubTypesSection = ".section __DWARF,__debug_pubtypes,regular,debug";
78   DwarfStrSection = ".section __DWARF,__debug_str,regular,debug";
79   DwarfLocSection = ".section __DWARF,__debug_loc,regular,debug";
80   DwarfARangesSection = ".section __DWARF,__debug_aranges,regular,debug";
81   DwarfRangesSection = ".section __DWARF,__debug_ranges,regular,debug";
82   DwarfMacInfoSection = ".section __DWARF,__debug_macinfo,regular,debug";
83   
84   // In non-PIC modes, emit a special label before jump tables so that the
85   // linker can perform more accurate dead code stripping.
86   if (TM.getRelocationModel() != Reloc::PIC_) {
87     // Emit a local label that is preserved until the linker runs.
88     JumpTableSpecialLabelPrefix = "l";
89   }
90 }
91
92 /// PreferredEHDataFormat - This hook allows the target to select data
93 /// format used for encoding pointers in exception handling data. Reason is
94 /// 0 for data, 1 for code labels, 2 for function pointers. Global is true
95 /// if the symbol can be relocated.
96 unsigned DarwinTargetAsmInfo::PreferredEHDataFormat(DwarfEncoding::Target Reason,
97                                                     bool Global) const {
98   if (Reason == DwarfEncoding::Functions && Global)
99     return (DW_EH_PE_pcrel | DW_EH_PE_indirect | DW_EH_PE_sdata4);
100   else if (Reason == DwarfEncoding::CodeLabels || !Global)
101     return DW_EH_PE_pcrel;
102   else
103     return DW_EH_PE_absptr;
104 }
105
106
107 LinuxTargetAsmInfo::LinuxTargetAsmInfo(const PPCTargetMachine &TM)
108 : PPCTargetAsmInfo(TM)
109 {
110   CommentString = "#";
111   GlobalPrefix = "";
112   PrivateGlobalPrefix = "";
113   ConstantPoolSection = "\t.section .rodata.cst4\t";
114   JumpTableDataSection = ".section .rodata.cst4";
115   CStringSection = "\t.section\t.rodata";
116   StaticCtorsSection = ".section\t.ctors,\"aw\",@progbits";
117   StaticDtorsSection = ".section\t.dtors,\"aw\",@progbits";
118   UsedDirective = "\t# .no_dead_strip\t";
119   WeakRefDirective = "\t.weak\t";
120   BSSSection = "\t.section\t\".sbss\",\"aw\",@nobits";
121
122   // Debug Information
123   AbsoluteDebugSectionOffsets = true;
124   SupportsDebugInformation = true;
125   DwarfAbbrevSection =  "\t.section\t.debug_abbrev,\"\",@progbits";
126   DwarfInfoSection =    "\t.section\t.debug_info,\"\",@progbits";
127   DwarfLineSection =    "\t.section\t.debug_line,\"\",@progbits";
128   DwarfFrameSection =   "\t.section\t.debug_frame,\"\",@progbits";
129   DwarfPubNamesSection ="\t.section\t.debug_pubnames,\"\",@progbits";
130   DwarfPubTypesSection ="\t.section\t.debug_pubtypes,\"\",@progbits";
131   DwarfStrSection =     "\t.section\t.debug_str,\"\",@progbits";
132   DwarfLocSection =     "\t.section\t.debug_loc,\"\",@progbits";
133   DwarfARangesSection = "\t.section\t.debug_aranges,\"\",@progbits";
134   DwarfRangesSection =  "\t.section\t.debug_ranges,\"\",@progbits";
135   DwarfMacInfoSection = "\t.section\t.debug_macinfo,\"\",@progbits";
136
137   ReadOnlySection = "\t.section\t.rodata";
138   FourByteConstantSection = "\t.section\t.rodata.cst4,\"aM\",@progbits,4";
139   EightByteConstantSection = "\t.section\t.rodata.cst8,\"aM\",@progbits,8";
140   SixteenByteConstantSection = "\t.section\t.rodata.cst16,\"aM\",@progbits,16";
141   PCSymbol = ".";
142
143   // Set up DWARF directives
144   HasLEB128 = true;  // Target asm supports leb128 directives (little-endian)
145
146   // Exceptions handling
147   if (!TM.getSubtargetImpl()->isPPC64())
148     SupportsExceptionHandling = true;
149   AbsoluteEHSectionOffsets = false;
150   DwarfEHFrameSection = "\t.section\t.eh_frame,\"aw\",@progbits";
151   DwarfExceptionSection = "\t.section\t.gcc_except_table,\"a\",@progbits";
152 }
153
154 /// PreferredEHDataFormat - This hook allows the target to select data
155 /// format used for encoding pointers in exception handling data. Reason is
156 /// 0 for data, 1 for code labels, 2 for function pointers. Global is true
157 /// if the symbol can be relocated.
158 unsigned LinuxTargetAsmInfo::PreferredEHDataFormat(DwarfEncoding::Target Reason,
159                                                    bool Global) const {
160   // We really need to write something here.
161   return TargetAsmInfo::PreferredEHDataFormat(Reason, Global);
162 }