1 //===--- ModuleBuilder.cpp - Emit LLVM Code from ASTs ---------------------===// 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 builds an AST and converts it to LLVM Code. 11 // 12 //===----------------------------------------------------------------------===// 13 14 #include "clang/CodeGen/ModuleBuilder.h" 15 #include "CodeGenModule.h" 16 #include "clang/AST/ASTConsumer.h" 17 #include "clang/AST/ASTContext.h" 18 #include "clang/AST/Decl.h" 19 using namespace clang; 20 21 //===----------------------------------------------------------------------===// 22 // LLVM Emitter 23 24 #include "clang/Basic/Diagnostic.h" 25 #include "clang/Basic/TargetInfo.h" 26 #include "clang/CodeGen/ModuleBuilder.h" 27 #include "llvm/Module.h" 28 #include "llvm/Target/TargetData.h" 29 #include "llvm/Target/TargetMachine.h" 30 31 namespace { 32 class CodeGenerator : public ASTConsumer { 33 Diagnostic &Diags; 34 const llvm::TargetData *TD; 35 ASTContext *Ctx; 36 const LangOptions &Features; 37 bool GenerateDebugInfo; 38 protected: 39 llvm::Module *&M; 40 CodeGen::CodeGenModule *Builder; 41 public: 42 CodeGenerator(Diagnostic &diags, const LangOptions &LO, 43 llvm::Module *&DestModule, bool DebugInfoFlag) 44 : Diags(diags), Features(LO), GenerateDebugInfo(DebugInfoFlag), 45 M(DestModule) {} 46 47 ~CodeGenerator() { 48 delete Builder; 49 delete TD; 50 } 51 52 virtual void Initialize(ASTContext &Context) { 53 Ctx = &Context; 54 55 M->setTargetTriple(Ctx->Target.getTargetTriple()); 56 M->setDataLayout(Ctx->Target.getTargetDescription()); 57 TD = new llvm::TargetData(Ctx->Target.getTargetDescription()); 58 Builder = new CodeGen::CodeGenModule(Context, Features, *M, *TD, Diags, 59 GenerateDebugInfo); 60 } 61 62 virtual void HandleTopLevelDecl(Decl *D) { 63 // If an error occurred, stop code generation, but continue parsing and 64 // semantic analysis (to ensure all warnings and errors are emitted). 65 if (Diags.hasErrorOccurred()) 66 return; 67 68 if (FunctionDecl *FD = dyn_cast<FunctionDecl>(D)) { 69 Builder->EmitGlobal(FD); 70 } else if (VarDecl *VD = dyn_cast<VarDecl>(D)) { 71 Builder->EmitGlobal(VD); 72 } else if (isa<ObjCClassDecl>(D)){ 73 //Forward declaration. Only used for type checking. 74 } else if (ObjCProtocolDecl *PD = dyn_cast<ObjCProtocolDecl>(D)){ 75 // Generate Protocol object. 76 Builder->EmitObjCProtocolImplementation(PD); 77 } else if (isa<ObjCCategoryDecl>(D)){ 78 //Only used for typechecking. 79 } else if (ObjCCategoryImplDecl *OCD = dyn_cast<ObjCCategoryImplDecl>(D)){ 80 // Generate methods, attach to category structure 81 Builder->EmitObjCCategoryImpl(OCD); 82 } else if (ObjCImplementationDecl * OID = 83 dyn_cast<ObjCImplementationDecl>(D)){ 84 // Generate methods, attach to class structure 85 Builder->EmitObjCClassImplementation(OID); 86 } else if (isa<ObjCInterfaceDecl>(D)){ 87 // Ignore - generated when the implementation decl is CodeGen'd 88 } else if (ObjCMethodDecl *OMD = dyn_cast<ObjCMethodDecl>(D)){ 89 Builder->EmitObjCMethod(OMD); 90 } else if (isa<ObjCClassDecl>(D) || isa<ObjCCategoryDecl>(D)) { 91 // Forward declaration. Only used for type checking. 92 } else if (ObjCMethodDecl *OMD = dyn_cast<ObjCMethodDecl>(D)){ 93 Builder->EmitObjCMethod(OMD); 94 } else if (LinkageSpecDecl *LSD = dyn_cast<LinkageSpecDecl>(D)) { 95 if (LSD->getLanguage() == LinkageSpecDecl::lang_cxx) 96 Builder->WarnUnsupported(LSD, "linkage spec"); 97 // FIXME: implement C++ linkage, C linkage works mostly by C 98 // language reuse already. 99 } else if (FileScopeAsmDecl *AD = dyn_cast<FileScopeAsmDecl>(D)) { 100 std::string AsmString(AD->getAsmString()->getStrData(), 101 AD->getAsmString()->getByteLength()); 102 103 const std::string &S = Builder->getModule().getModuleInlineAsm(); 104 if (S.empty()) 105 Builder->getModule().setModuleInlineAsm(AsmString); 106 else 107 Builder->getModule().setModuleInlineAsm(S + '\n' + AsmString); 108 } else { 109 assert(isa<TypeDecl>(D) && "Unknown top level decl"); 110 // TODO: handle debug info? 111 } 112 113 if (ScopedDecl *SD = dyn_cast<ScopedDecl>(D)) { 114 SD = SD->getNextDeclarator(); 115 if (SD) 116 HandleTopLevelDecl(SD); 117 } 118 } 119 120 /// HandleTagDeclDefinition - This callback is invoked each time a TagDecl 121 /// (e.g. struct, union, enum, class) is completed. This allows the client to 122 /// hack on the type, which can occur at any point in the file (because these 123 /// can be defined in declspecs). 124 virtual void HandleTagDeclDefinition(TagDecl *D) { 125 Builder->UpdateCompletedType(D); 126 } 127 128 }; 129 } 130 131 ASTConsumer *clang::CreateLLVMCodeGen(Diagnostic &Diags, 132 const LangOptions &Features, 133 llvm::Module *&DestModule, 134 bool GenerateDebugInfo) { 135 return new CodeGenerator(Diags, Features, DestModule, GenerateDebugInfo); 136 } 137 138