Chris Lattner | bb4688a | 2009-06-18 23:05:21 +0000 | [diff] [blame] | 1 | //===-- llvm-mc.cpp - Machine Code Hacking Driver -------------------------===// |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 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 | // |
Chris Lattner | bb4688a | 2009-06-18 23:05:21 +0000 | [diff] [blame] | 10 | // This utility is a simple driver that allows command line hacking on machine |
| 11 | // code. |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 12 | // |
| 13 | //===----------------------------------------------------------------------===// |
| 14 | |
Chris Lattner | cbc23f7 | 2009-06-24 00:52:40 +0000 | [diff] [blame] | 15 | #include "llvm/MC/MCContext.h" |
| 16 | #include "llvm/MC/MCStreamer.h" |
| 17 | #include "llvm/ADT/OwningPtr.h" |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 18 | #include "llvm/Support/CommandLine.h" |
| 19 | #include "llvm/Support/ManagedStatic.h" |
| 20 | #include "llvm/Support/MemoryBuffer.h" |
| 21 | #include "llvm/Support/PrettyStackTrace.h" |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 22 | #include "llvm/Support/SourceMgr.h" |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 23 | #include "llvm/Support/raw_ostream.h" |
| 24 | #include "llvm/System/Signals.h" |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 25 | #include "llvm/Target/TargetAsmParser.h" |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 26 | #include "llvm/Target/TargetRegistry.h" |
| 27 | #include "llvm/Target/TargetSelect.h" |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 28 | #include "AsmParser.h" |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 29 | using namespace llvm; |
| 30 | |
| 31 | static cl::opt<std::string> |
| 32 | InputFilename(cl::Positional, cl::desc("<input file>"), cl::init("-")); |
| 33 | |
| 34 | static cl::opt<std::string> |
| 35 | OutputFilename("o", cl::desc("Output filename"), |
| 36 | cl::value_desc("filename")); |
| 37 | |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 38 | static cl::list<std::string> |
| 39 | IncludeDirs("I", cl::desc("Directory of include files"), |
| 40 | cl::value_desc("directory"), cl::Prefix); |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 41 | |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 42 | static cl::opt<std::string> |
Daniel Dunbar | 8977d08 | 2009-07-26 05:03:33 +0000 | [diff] [blame] | 43 | TripleName("triple", cl::desc("Target triple to assemble for," |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 44 | "see -version for available targets"), |
Daniel Dunbar | 867aadf | 2009-07-17 22:51:20 +0000 | [diff] [blame] | 45 | cl::init(LLVM_HOSTTRIPLE)); |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 46 | |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 47 | enum ActionType { |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 48 | AC_AsLex, |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 49 | AC_Assemble |
| 50 | }; |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 51 | |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 52 | static cl::opt<ActionType> |
| 53 | Action(cl::desc("Action to perform:"), |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 54 | cl::init(AC_Assemble), |
| 55 | cl::values(clEnumValN(AC_AsLex, "as-lex", |
| 56 | "Lex tokens from a .s file"), |
| 57 | clEnumValN(AC_Assemble, "assemble", |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 58 | "Assemble a .s file (default)"), |
| 59 | clEnumValEnd)); |
| 60 | |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 61 | static int AsLexInput(const char *ProgName) { |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 62 | std::string ErrorMessage; |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 63 | MemoryBuffer *Buffer = MemoryBuffer::getFileOrSTDIN(InputFilename, |
| 64 | &ErrorMessage); |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 65 | if (Buffer == 0) { |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 66 | errs() << ProgName << ": "; |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 67 | if (ErrorMessage.size()) |
| 68 | errs() << ErrorMessage << "\n"; |
| 69 | else |
| 70 | errs() << "input file didn't read correctly.\n"; |
| 71 | return 1; |
| 72 | } |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 73 | |
| 74 | SourceMgr SrcMgr; |
| 75 | |
| 76 | // Tell SrcMgr about this buffer, which is what TGParser will pick up. |
| 77 | SrcMgr.AddNewSourceBuffer(Buffer, SMLoc()); |
| 78 | |
| 79 | // Record the location of the include directories so that the lexer can find |
| 80 | // it later. |
| 81 | SrcMgr.setIncludeDirs(IncludeDirs); |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 82 | |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 83 | AsmLexer Lexer(SrcMgr); |
| 84 | |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 85 | bool Error = false; |
| 86 | |
Daniel Dunbar | a3c924f | 2009-07-28 16:56:42 +0000 | [diff] [blame] | 87 | while (Lexer.Lex().isNot(AsmToken::Eof)) { |
| 88 | switch (Lexer.getKind()) { |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 89 | default: |
Daniel Dunbar | 3fb7683 | 2009-06-30 00:49:23 +0000 | [diff] [blame] | 90 | Lexer.PrintMessage(Lexer.getLoc(), "unknown token", "warning"); |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 91 | Error = true; |
| 92 | break; |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 93 | case AsmToken::Error: |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 94 | Error = true; // error already printed. |
Chris Lattner | 4651bca | 2009-06-21 19:21:25 +0000 | [diff] [blame] | 95 | break; |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 96 | case AsmToken::Identifier: |
Daniel Dunbar | 419aded | 2009-07-28 16:38:40 +0000 | [diff] [blame] | 97 | outs() << "identifier: " << Lexer.getTok().getString() << '\n'; |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 98 | break; |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 99 | case AsmToken::Register: |
Daniel Dunbar | 419aded | 2009-07-28 16:38:40 +0000 | [diff] [blame] | 100 | outs() << "register: " << Lexer.getTok().getString() << '\n'; |
Chris Lattner | 4651bca | 2009-06-21 19:21:25 +0000 | [diff] [blame] | 101 | break; |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 102 | case AsmToken::String: |
Daniel Dunbar | 419aded | 2009-07-28 16:38:40 +0000 | [diff] [blame] | 103 | outs() << "string: " << Lexer.getTok().getString() << '\n'; |
Chris Lattner | 10a907d | 2009-06-21 19:56:35 +0000 | [diff] [blame] | 104 | break; |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 105 | case AsmToken::Integer: |
Daniel Dunbar | 419aded | 2009-07-28 16:38:40 +0000 | [diff] [blame] | 106 | outs() << "int: " << Lexer.getTok().getString() << '\n'; |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 107 | break; |
Daniel Dunbar | 165e834 | 2009-07-01 06:56:54 +0000 | [diff] [blame] | 108 | |
Daniel Dunbar | 3f87233 | 2009-07-28 16:08:33 +0000 | [diff] [blame] | 109 | case AsmToken::Amp: outs() << "Amp\n"; break; |
| 110 | case AsmToken::AmpAmp: outs() << "AmpAmp\n"; break; |
| 111 | case AsmToken::Caret: outs() << "Caret\n"; break; |
| 112 | case AsmToken::Colon: outs() << "Colon\n"; break; |
| 113 | case AsmToken::Comma: outs() << "Comma\n"; break; |
| 114 | case AsmToken::Dollar: outs() << "Dollar\n"; break; |
| 115 | case AsmToken::EndOfStatement: outs() << "EndOfStatement\n"; break; |
| 116 | case AsmToken::Eof: outs() << "Eof\n"; break; |
| 117 | case AsmToken::Equal: outs() << "Equal\n"; break; |
| 118 | case AsmToken::EqualEqual: outs() << "EqualEqual\n"; break; |
| 119 | case AsmToken::Exclaim: outs() << "Exclaim\n"; break; |
| 120 | case AsmToken::ExclaimEqual: outs() << "ExclaimEqual\n"; break; |
| 121 | case AsmToken::Greater: outs() << "Greater\n"; break; |
| 122 | case AsmToken::GreaterEqual: outs() << "GreaterEqual\n"; break; |
| 123 | case AsmToken::GreaterGreater: outs() << "GreaterGreater\n"; break; |
| 124 | case AsmToken::LParen: outs() << "LParen\n"; break; |
| 125 | case AsmToken::Less: outs() << "Less\n"; break; |
| 126 | case AsmToken::LessEqual: outs() << "LessEqual\n"; break; |
| 127 | case AsmToken::LessGreater: outs() << "LessGreater\n"; break; |
| 128 | case AsmToken::LessLess: outs() << "LessLess\n"; break; |
| 129 | case AsmToken::Minus: outs() << "Minus\n"; break; |
| 130 | case AsmToken::Percent: outs() << "Percent\n"; break; |
| 131 | case AsmToken::Pipe: outs() << "Pipe\n"; break; |
| 132 | case AsmToken::PipePipe: outs() << "PipePipe\n"; break; |
| 133 | case AsmToken::Plus: outs() << "Plus\n"; break; |
| 134 | case AsmToken::RParen: outs() << "RParen\n"; break; |
| 135 | case AsmToken::Slash: outs() << "Slash\n"; break; |
| 136 | case AsmToken::Star: outs() << "Star\n"; break; |
| 137 | case AsmToken::Tilde: outs() << "Tilde\n"; break; |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 138 | } |
Chris Lattner | a59e877 | 2009-06-21 07:19:10 +0000 | [diff] [blame] | 139 | } |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 140 | |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 141 | return Error; |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 142 | } |
| 143 | |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 144 | static TargetAsmParser *GetTargetAsmParser(const char *ProgName, |
| 145 | MCAsmParser &Parser) { |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 146 | // Get the target specific parser. |
| 147 | std::string Error; |
| 148 | const Target *TheTarget = |
Daniel Dunbar | 8977d08 | 2009-07-26 05:03:33 +0000 | [diff] [blame] | 149 | TargetRegistry::lookupTarget(TripleName, |
Daniel Dunbar | a5881e3 | 2009-07-26 02:12:58 +0000 | [diff] [blame] | 150 | /*FallbackToHost=*/true, |
| 151 | /*RequireJIT=*/false, |
| 152 | Error); |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 153 | if (TheTarget == 0) { |
Daniel Dunbar | 8977d08 | 2009-07-26 05:03:33 +0000 | [diff] [blame] | 154 | errs() << ProgName << ": error: unable to get target for '" << TripleName |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 155 | << "', see --version and --triple.\n"; |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 156 | return 0; |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 157 | } |
| 158 | |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 159 | if (TargetAsmParser *TAP = TheTarget->createAsmParser(Parser)) |
| 160 | return TAP; |
| 161 | |
| 162 | errs() << ProgName |
| 163 | << ": error: this target does not support assembly parsing.\n"; |
| 164 | return 0; |
| 165 | } |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 166 | |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 167 | static int AssembleInput(const char *ProgName) { |
| 168 | std::string Error; |
| 169 | MemoryBuffer *Buffer = MemoryBuffer::getFileOrSTDIN(InputFilename, &Error); |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 170 | if (Buffer == 0) { |
| 171 | errs() << ProgName << ": "; |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 172 | if (Error.size()) |
| 173 | errs() << Error << "\n"; |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 174 | else |
| 175 | errs() << "input file didn't read correctly.\n"; |
| 176 | return 1; |
| 177 | } |
| 178 | |
| 179 | SourceMgr SrcMgr; |
| 180 | |
| 181 | // Tell SrcMgr about this buffer, which is what TGParser will pick up. |
| 182 | SrcMgr.AddNewSourceBuffer(Buffer, SMLoc()); |
| 183 | |
| 184 | // Record the location of the include directories so that the lexer can find |
| 185 | // it later. |
| 186 | SrcMgr.setIncludeDirs(IncludeDirs); |
| 187 | |
Chris Lattner | cbc23f7 | 2009-06-24 00:52:40 +0000 | [diff] [blame] | 188 | MCContext Ctx; |
| 189 | OwningPtr<MCStreamer> Str(createAsmStreamer(Ctx, outs())); |
Daniel Dunbar | a0d1426 | 2009-06-24 23:30:00 +0000 | [diff] [blame] | 190 | |
| 191 | // FIXME: Target hook & command line option for initial section. |
Daniel Dunbar | a3af370 | 2009-07-20 18:55:04 +0000 | [diff] [blame] | 192 | Str.get()->SwitchSection(Ctx.GetSection("__TEXT,__text," |
| 193 | "regular,pure_instructions")); |
Daniel Dunbar | a0d1426 | 2009-06-24 23:30:00 +0000 | [diff] [blame] | 194 | |
Daniel Dunbar | a2edbab | 2009-07-28 20:47:52 +0000 | [diff] [blame^] | 195 | AsmParser Parser(SrcMgr, Ctx, *Str.get()); |
| 196 | OwningPtr<TargetAsmParser> TAP(GetTargetAsmParser(ProgName, Parser)); |
| 197 | if (!TAP) |
| 198 | return 1; |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 199 | return Parser.Run(); |
| 200 | } |
| 201 | |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 202 | |
| 203 | int main(int argc, char **argv) { |
| 204 | // Print a stack trace if we signal out. |
| 205 | sys::PrintStackTraceOnErrorSignal(); |
| 206 | PrettyStackTraceProgram X(argc, argv); |
| 207 | llvm_shutdown_obj Y; // Call llvm_shutdown() on exit. |
Daniel Dunbar | b4b53e5 | 2009-07-17 22:38:58 +0000 | [diff] [blame] | 208 | |
| 209 | // Initialize targets and assembly parsers. |
| 210 | llvm::InitializeAllTargetInfos(); |
| 211 | llvm::InitializeAllAsmParsers(); |
| 212 | |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 213 | cl::ParseCommandLineOptions(argc, argv, "llvm machine code playground\n"); |
| 214 | |
| 215 | switch (Action) { |
| 216 | default: |
Chris Lattner | 27aa7d2 | 2009-06-21 20:16:42 +0000 | [diff] [blame] | 217 | case AC_AsLex: |
| 218 | return AsLexInput(argv[0]); |
Chris Lattner | b23677e | 2009-06-21 05:22:37 +0000 | [diff] [blame] | 219 | case AC_Assemble: |
| 220 | return AssembleInput(argv[0]); |
| 221 | } |
Chris Lattner | f9f065e | 2009-06-18 23:04:45 +0000 | [diff] [blame] | 222 | |
| 223 | return 0; |
| 224 | } |
| 225 | |