Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 1 | //===-- Support.cpp - Support routines for interpreter --------------------===// |
| 2 | // |
| 3 | // This file contains support routines for the interpreter core. |
| 4 | // |
| 5 | //===----------------------------------------------------------------------===// |
| 6 | |
| 7 | #include "Interpreter.h" |
| 8 | #include "llvm/SymbolTable.h" |
| 9 | #include "llvm/Assembly/Writer.h" |
Chris Lattner | fe11a97 | 2002-12-23 23:59:41 +0000 | [diff] [blame] | 10 | #include "llvm/Module.h" |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 11 | |
| 12 | //===----------------------------------------------------------------------===// |
| 13 | // |
| 14 | // LookupMatchingNames helper - Search a symbol table for values matching Name. |
| 15 | // |
Chris Lattner | 2312b1c | 2002-04-28 04:55:14 +0000 | [diff] [blame] | 16 | static inline void LookupMatchingNames(const std::string &Name, |
Chris Lattner | 6e6026b | 2002-11-20 18:36:02 +0000 | [diff] [blame] | 17 | SymbolTable &SymTab, |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 18 | std::vector<Value*> &Results) { |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 19 | // Loop over all of the type planes in the symbol table... |
Chris Lattner | 6e6026b | 2002-11-20 18:36:02 +0000 | [diff] [blame] | 20 | for (SymbolTable::iterator I = SymTab.begin(), E = SymTab.end(); I != E; ++I){ |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 21 | SymbolTable::VarMap &Plane = I->second; |
| 22 | |
| 23 | // Search the symbol table plane for this name... |
| 24 | SymbolTable::VarMap::iterator Val = Plane.find(Name); |
| 25 | if (Val != Plane.end()) |
| 26 | Results.push_back(Val->second); // Found a name match! |
| 27 | } |
| 28 | } |
| 29 | |
Chris Lattner | 2fbfdcf | 2002-04-07 20:49:59 +0000 | [diff] [blame] | 30 | // LookupMatchingNames - Search the current function namespace, then the global |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 31 | // namespace looking for values that match the specified name. Return ALL |
| 32 | // matches to that name. This is obviously slow, and should only be used for |
| 33 | // user interaction. |
| 34 | // |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 35 | std::vector<Value*> Interpreter::LookupMatchingNames(const std::string &Name) { |
| 36 | std::vector<Value*> Results; |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 37 | Function *CurFunc = getCurrentFunction(); |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 38 | |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 39 | if (CurFunc) ::LookupMatchingNames(Name, CurFunc->getSymbolTable(), Results); |
Chris Lattner | fe11a97 | 2002-12-23 23:59:41 +0000 | [diff] [blame] | 40 | ::LookupMatchingNames(Name, getModule().getSymbolTable(), Results); |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 41 | return Results; |
| 42 | } |
| 43 | |
| 44 | // ChooseOneOption - Prompt the user to choose among the specified options to |
| 45 | // pick one value. If no options are provided, emit an error. If a single |
| 46 | // option is provided, just return that option. |
| 47 | // |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 48 | Value *Interpreter::ChooseOneOption(const std::string &Name, |
| 49 | const std::vector<Value*> &Opts) { |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 50 | switch (Opts.size()) { |
| 51 | case 1: return Opts[0]; |
| 52 | case 0: |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 53 | std::cout << "Error: no entities named '" << Name << "' found!\n"; |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 54 | return 0; |
| 55 | default: break; // Must prompt user... |
| 56 | } |
| 57 | |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 58 | std::cout << "Multiple entities named '" << Name |
| 59 | << "' found! Please choose:\n"; |
| 60 | std::cout << " 0. Cancel operation\n"; |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 61 | for (unsigned i = 0; i < Opts.size(); ++i) { |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 62 | std::cout << " " << (i+1) << "."; |
| 63 | WriteAsOperand(std::cout, Opts[i]) << "\n"; |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 64 | } |
| 65 | |
| 66 | unsigned Option; |
| 67 | do { |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 68 | std::cout << "lli> " << std::flush; |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 69 | std::cin >> Option; |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 70 | if (Option > Opts.size()) |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame^] | 71 | std::cout << "Invalid selection: Please choose from 0 to " << Opts.size() |
| 72 | << "\n"; |
Chris Lattner | 92101ac | 2001-08-23 17:05:04 +0000 | [diff] [blame] | 73 | } while (Option > Opts.size()); |
| 74 | |
| 75 | if (Option == 0) return 0; |
| 76 | return Opts[Option-1]; |
| 77 | } |