blob: 786bc7bc03562ef347f145c215171e90c8a69af8 [file] [log] [blame]
Chris Lattnereb40a0f2010-05-07 17:17:41 +00001//===- lib/MC/MCSectionCOFF.cpp - COFF Code Section Representation --------===//
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#include "llvm/MC/MCSectionCOFF.h"
11#include "llvm/MC/MCAsmInfo.h"
12#include "llvm/MC/MCContext.h"
13#include "llvm/MC/MCSymbol.h"
14#include "llvm/Support/raw_ostream.h"
15using namespace llvm;
16
17MCSectionCOFF::~MCSectionCOFF() {} // anchor.
18
19// ShouldOmitSectionDirective - Decides whether a '.section' directive
20// should be printed before the section name
21bool MCSectionCOFF::ShouldOmitSectionDirective(StringRef Name,
22 const MCAsmInfo &MAI) const {
23
24 // FIXME: Does .section .bss/.data/.text work everywhere??
25 if (Name == ".text" || Name == ".data" || Name == ".bss")
26 return true;
27
28 return false;
29}
30
31void MCSectionCOFF::PrintSwitchToSection(const MCAsmInfo &MAI,
32 raw_ostream &OS) const {
33
Nathan Jeffords72e57f92010-05-09 05:49:00 +000034 // standard sections don't require the '.section'
Chris Lattnereb40a0f2010-05-07 17:17:41 +000035 if (ShouldOmitSectionDirective(SectionName, MAI)) {
36 OS << '\t' << getSectionName() << '\n';
37 return;
38 }
39
40 OS << "\t.section\t" << getSectionName() << ",\"";
41 if (getKind().isText())
42 OS << 'x';
43 if (getKind().isWriteable())
44 OS << 'w';
45 else
46 OS << 'r';
Chris Lattner6e5ce282010-05-07 21:49:09 +000047 if (getCharacteristics() & MCSectionCOFF::IMAGE_SCN_MEM_DISCARDABLE)
Chris Lattnereb40a0f2010-05-07 17:17:41 +000048 OS << 'n';
49 OS << "\"\n";
Nathan Jeffords871bb942010-05-12 04:26:09 +000050
51 if (getCharacteristics() & MCSectionCOFF::IMAGE_SCN_LNK_COMDAT) {
52 switch (Selection) {
53 default:
54 assert (0 && "unsupported COFF selection type");
55 break;
56 case IMAGE_COMDAT_SELECT_NODUPLICATES:
57 OS << "\t.linkonce one_only\n";
58 break;
59 case IMAGE_COMDAT_SELECT_ANY:
60 OS << "\t.linkonce discard\n";
61 break;
62 case IMAGE_COMDAT_SELECT_SAME_SIZE:
63 OS << "\t.linkonce same_size\n";
64 break;
65 case IMAGE_COMDAT_SELECT_EXACT_MATCH:
66 OS << "\t.linkonce same_contents\n";
67 break;
68 // ".linkonce largest" is not documented as being an option.
69 // It seems odd that a link attribute designed essentially for PE/COFF
70 // wouldn't support all the options (at least as of binutils 2.20)
71 //case IMAGE_COMDAT_SELECT_LARGEST:
72 // OS << "\t.linkonce largest\n";
73 // break;
74 }
75 }
Chris Lattnereb40a0f2010-05-07 17:17:41 +000076}