Emit XATTR

Author: redstar

llvm/lib/MC/MCSectionGOFF.cpp

@@ -66,6 +66,37 @@ void emitCATTR(raw_ostream &OS, StringRef Name, GOFF::ESDRmode Rmode,
     OS << ",PART(" << PartName << ")";
   OS << '\n';
 }
+
+void emitXATTR(raw_ostream &OS, StringRef Name, GOFF::ESDLinkageType Linkage,
+               GOFF::ESDExecutable Executable,
+               GOFF::ESDBindingScope BindingScope) {
+  OS << Name << " XATTR ";
+  OS << "LINKAGE(" << (Linkage == GOFF::ESD_LT_OS ? "OS" : "XPLINK") << "),";
+  if (Executable != GOFF::ESD_EXE_Unspecified)
+    OS << "REFERENCE(" << (Executable == GOFF::ESD_EXE_CODE ? "CODE" : "DATA")
+       << "),";
+  if (BindingScope != GOFF::ESD_BSC_Unspecified) {
+    OS << "SCOPE(";
+    switch (BindingScope) {
+    case GOFF::ESD_BSC_Section:
+      OS << "SECTION";
+      break;
+    case GOFF::ESD_BSC_Module:
+      OS << "MODULE";
+      break;
+    case GOFF::ESD_BSC_Library:
+      OS << "LIBRARY";
+      break;
+    case GOFF::ESD_BSC_ImportExport:
+      OS << "EXPORT";
+      break;
+    default:
+      break;
+    }
+    OS << ')';
+  }
+  OS << '\n';
+}
 } // namespace
 
 void MCSectionGOFF::printSwitchToSection(const MCAsmInfo &MAI, const Triple &T,
@@ -96,6 +127,8 @@ void MCSectionGOFF::printSwitchToSection(const MCAsmInfo &MAI, const Triple &T,
                 PRAttributes.Alignment, ED->EDAttributes.LoadBehavior,
                 PRAttributes.Executable, PRAttributes.IsReadOnly,
                 PRAttributes.SortKey, Name);
+      emitXATTR(OS, Name, PRAttributes.Linkage, PRAttributes.Executable,
+                PRAttributes.BindingScope);
       ED->Emitted = true;
       Emitted = true;
     } else

llvm/test/CodeGen/SystemZ/zos-ada-relocations.ll

@@ -57,6 +57,7 @@ declare signext i32 @callout(i32 signext)
 
 ; CHECK: stdin#C CSECT
 ; CHECK: C_WSA64 CATTR ALIGN(4),DEFLOAD,NOTEXECUTABLE,RMODE(64),PART(stdin#S)
+; CHECK: stdin#S XATTR LINKAGE(XPLINK),REFERENCE(DATA),SCOPE(SECTION)
 ; CHECK:  .set L#DoFunc@indirect0, DoFunc
 ; CHECK:      .indirect_symbol   L#DoFunc@indirect0
 ; CHECK:  .quad V(L#DoFunc@indirect0)          * Offset 0 pointer to function descriptor DoFunc

llvm/test/CodeGen/SystemZ/zos-intrinsics.ll

@@ -32,6 +32,7 @@ declare fp128 @llvm.exp2.f128(fp128)
 ; Check the calls in the ADA.
 ; CHECK: stdin#C CSECT
 ; CHECK: C_WSA64 CATTR ALIGN(4),DEFLOAD,NOTEXECUTABLE,RMODE(64),PART(stdin#S)
+; CHECK: stdin#S XATTR LINKAGE(XPLINK),REFERENCE(DATA),SCOPE(SECTION)
 
 ; Check that there is no call to sqrt.
 ; CHECK-NOT:  .quad   R(@@WSQT@B)

llvm/test/CodeGen/SystemZ/zos-landingpad.ll

@@ -39,4 +39,5 @@ lpad:
 ; Check that the exception table is emitted into .lsda section.
 ; CHECK:  stdin#C CSECT
 ; CHECK:  C_WSA64 CATTR ALIGN(2),RMODE(64),PART(.gcc_exception_table.test1)
+; CHECK:  .gcc_exception_table.test1 XATTR LINKAGE(XPLINK),SCOPE(SECTION)
 ; CHECK: GCC_except_table0:

llvm/test/CodeGen/SystemZ/zos-simple-test.ll

@@ -10,6 +10,7 @@ define signext i32 @main() {
 ; CHECK: main:
 ; CHECK: stdin#C CSECT
 ; CHECK: C_WSA64 CATTR ALIGN(4),DEFLOAD,NOTEXECUTABLE,RMODE(64),PART(a)
+; CHECK: a XATTR LINKAGE(XPLINK),REFERENCE(DATA),SCOPE(EXPORT)
 ; CHECK: a:
 entry:
   ret i32 0