fb950d0607e17f18c2da9ab53ea2c3625edcdb8c
[oota-llvm.git] / utils / TableGen / RegisterInfoEmitter.cpp
1 //===- RegisterInfoEmitter.cpp - Generate a Register File Desc. -*- C++ -*-===//
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 tablegen backend is responsible for emitting a description of a target
11 // register file for a code generator.  It uses instances of the Register,
12 // RegisterAliases, and RegisterClass classes to gather this information.
13 //
14 //===----------------------------------------------------------------------===//
15
16 #include "RegisterInfoEmitter.h"
17 #include "CodeGenTarget.h"
18 #include "CodeGenRegisters.h"
19 #include "llvm/TableGen/Record.h"
20 #include "llvm/ADT/BitVector.h"
21 #include "llvm/ADT/StringExtras.h"
22 #include "llvm/ADT/STLExtras.h"
23 #include "llvm/Support/Format.h"
24 #include <algorithm>
25 #include <set>
26 using namespace llvm;
27
28 // runEnums - Print out enum values for all of the registers.
29 void
30 RegisterInfoEmitter::runEnums(raw_ostream &OS,
31                               CodeGenTarget &Target, CodeGenRegBank &Bank) {
32   const std::vector<CodeGenRegister*> &Registers = Bank.getRegisters();
33
34   std::string Namespace = Registers[0]->TheDef->getValueAsString("Namespace");
35
36   EmitSourceFileHeader("Target Register Enum Values", OS);
37
38   OS << "\n#ifdef GET_REGINFO_ENUM\n";
39   OS << "#undef GET_REGINFO_ENUM\n";
40
41   OS << "namespace llvm {\n\n";
42
43   OS << "class MCRegisterClass;\n"
44      << "extern const MCRegisterClass " << Namespace
45      << "MCRegisterClasses[];\n\n";
46
47   if (!Namespace.empty())
48     OS << "namespace " << Namespace << " {\n";
49   OS << "enum {\n  NoRegister,\n";
50
51   for (unsigned i = 0, e = Registers.size(); i != e; ++i)
52     OS << "  " << Registers[i]->getName() << " = " <<
53       Registers[i]->EnumValue << ",\n";
54   assert(Registers.size() == Registers[Registers.size()-1]->EnumValue &&
55          "Register enum value mismatch!");
56   OS << "  NUM_TARGET_REGS \t// " << Registers.size()+1 << "\n";
57   OS << "};\n";
58   if (!Namespace.empty())
59     OS << "}\n";
60
61   ArrayRef<CodeGenRegisterClass*> RegisterClasses = Bank.getRegClasses();
62   if (!RegisterClasses.empty()) {
63     OS << "\n// Register classes\n";
64     if (!Namespace.empty())
65       OS << "namespace " << Namespace << " {\n";
66     OS << "enum {\n";
67     for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
68       if (i) OS << ",\n";
69       OS << "  " << RegisterClasses[i]->getName() << "RegClassID";
70       OS << " = " << i;
71     }
72     OS << "\n  };\n";
73     if (!Namespace.empty())
74       OS << "}\n";
75   }
76
77   const std::vector<Record*> RegAltNameIndices = Target.getRegAltNameIndices();
78   // If the only definition is the default NoRegAltName, we don't need to
79   // emit anything.
80   if (RegAltNameIndices.size() > 1) {
81     OS << "\n// Register alternate name indices\n";
82     if (!Namespace.empty())
83       OS << "namespace " << Namespace << " {\n";
84     OS << "enum {\n";
85     for (unsigned i = 0, e = RegAltNameIndices.size(); i != e; ++i)
86       OS << "  " << RegAltNameIndices[i]->getName() << ",\t// " << i << "\n";
87     OS << "  NUM_TARGET_REG_ALT_NAMES = " << RegAltNameIndices.size() << "\n";
88     OS << "};\n";
89     if (!Namespace.empty())
90       OS << "}\n";
91   }
92
93
94   OS << "} // End llvm namespace \n";
95   OS << "#endif // GET_REGINFO_ENUM\n\n";
96 }
97
98 void
99 RegisterInfoEmitter::EmitRegMapping(raw_ostream &OS,
100                                     const std::vector<CodeGenRegister*> &Regs,
101                                     bool isCtor) {
102
103   // Collect all information about dwarf register numbers
104   typedef std::map<Record*, std::vector<int64_t>, LessRecord> DwarfRegNumsMapTy;
105   DwarfRegNumsMapTy DwarfRegNums;
106
107   // First, just pull all provided information to the map
108   unsigned maxLength = 0;
109   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
110     Record *Reg = Regs[i]->TheDef;
111     std::vector<int64_t> RegNums = Reg->getValueAsListOfInts("DwarfNumbers");
112     maxLength = std::max((size_t)maxLength, RegNums.size());
113     if (DwarfRegNums.count(Reg))
114       errs() << "Warning: DWARF numbers for register " << getQualifiedName(Reg)
115              << "specified multiple times\n";
116     DwarfRegNums[Reg] = RegNums;
117   }
118
119   if (!maxLength)
120     return;
121
122   // Now we know maximal length of number list. Append -1's, where needed
123   for (DwarfRegNumsMapTy::iterator
124        I = DwarfRegNums.begin(), E = DwarfRegNums.end(); I != E; ++I)
125     for (unsigned i = I->second.size(), e = maxLength; i != e; ++i)
126       I->second.push_back(-1);
127
128   // Emit reverse information about the dwarf register numbers.
129   for (unsigned j = 0; j < 2; ++j) {
130     OS << "  switch (";
131     if (j == 0)
132       OS << "DwarfFlavour";
133     else
134       OS << "EHFlavour";
135     OS << ") {\n"
136      << "  default:\n"
137      << "    assert(0 && \"Unknown DWARF flavour\");\n"
138      << "    break;\n";
139
140     for (unsigned i = 0, e = maxLength; i != e; ++i) {
141       OS << "  case " << i << ":\n";
142       for (DwarfRegNumsMapTy::iterator
143              I = DwarfRegNums.begin(), E = DwarfRegNums.end(); I != E; ++I) {
144         int DwarfRegNo = I->second[i];
145         if (DwarfRegNo < 0)
146           continue;
147         OS << "    ";
148         if (!isCtor)
149           OS << "RI->";
150         OS << "mapDwarfRegToLLVMReg(" << DwarfRegNo << ", "
151            << getQualifiedName(I->first) << ", ";
152         if (j == 0)
153           OS << "false";
154         else
155           OS << "true";
156         OS << " );\n";
157       }
158       OS << "    break;\n";
159     }
160     OS << "  }\n";
161   }
162
163   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
164     Record *Reg = Regs[i]->TheDef;
165     const RecordVal *V = Reg->getValue("DwarfAlias");
166     if (!V || !V->getValue())
167       continue;
168
169     DefInit *DI = dynamic_cast<DefInit*>(V->getValue());
170     Record *Alias = DI->getDef();
171     DwarfRegNums[Reg] = DwarfRegNums[Alias];
172   }
173
174   // Emit information about the dwarf register numbers.
175   for (unsigned j = 0; j < 2; ++j) {
176     OS << "  switch (";
177     if (j == 0)
178       OS << "DwarfFlavour";
179     else
180       OS << "EHFlavour";
181     OS << ") {\n"
182        << "  default:\n"
183        << "    assert(0 && \"Unknown DWARF flavour\");\n"
184        << "    break;\n";
185
186     for (unsigned i = 0, e = maxLength; i != e; ++i) {
187       OS << "  case " << i << ":\n";
188       // Sort by name to get a stable order.
189       for (DwarfRegNumsMapTy::iterator
190              I = DwarfRegNums.begin(), E = DwarfRegNums.end(); I != E; ++I) {
191         int RegNo = I->second[i];
192         OS << "    ";
193         if (!isCtor)
194           OS << "RI->";
195         OS << "mapLLVMRegToDwarfReg(" << getQualifiedName(I->first) << ", "
196            <<  RegNo << ", ";
197         if (j == 0)
198           OS << "false";
199         else
200           OS << "true";
201         OS << " );\n";
202       }
203       OS << "    break;\n";
204     }
205     OS << "  }\n";
206   }
207 }
208
209 // Print a BitVector as a sequence of hex numbers using a little-endian mapping.
210 // Width is the number of bits per hex number.
211 static void printBitVectorAsHex(raw_ostream &OS,
212                                 const BitVector &Bits,
213                                 unsigned Width) {
214   assert(Width <= 32 && "Width too large");
215   unsigned Digits = (Width + 3) / 4;
216   for (unsigned i = 0, e = Bits.size(); i < e; i += Width) {
217     unsigned Value = 0;
218     for (unsigned j = 0; j != Width && i + j != e; ++j)
219       Value |= Bits.test(i + j) << j;
220     OS << format("0x%0*x, ", Digits, Value);
221   }
222 }
223
224 // Helper to emit a set of bits into a constant byte array.
225 class BitVectorEmitter {
226   BitVector Values;
227 public:
228   void add(unsigned v) {
229     if (v >= Values.size())
230       Values.resize(((v/8)+1)*8); // Round up to the next byte.
231     Values[v] = true;
232   }
233
234   void print(raw_ostream &OS) {
235     printBitVectorAsHex(OS, Values, 8);
236   }
237 };
238
239 //
240 // runMCDesc - Print out MC register descriptions.
241 //
242 void
243 RegisterInfoEmitter::runMCDesc(raw_ostream &OS, CodeGenTarget &Target,
244                                CodeGenRegBank &RegBank) {
245   EmitSourceFileHeader("MC Register Information", OS);
246
247   OS << "\n#ifdef GET_REGINFO_MC_DESC\n";
248   OS << "#undef GET_REGINFO_MC_DESC\n";
249
250   std::map<const CodeGenRegister*, CodeGenRegister::Set> Overlaps;
251   RegBank.computeOverlaps(Overlaps);
252
253   OS << "namespace llvm {\n\n";
254
255   const std::string &TargetName = Target.getName();
256
257   OS << "\nnamespace {\n";
258
259   const std::vector<CodeGenRegister*> &Regs = RegBank.getRegisters();
260
261   // Emit an overlap list for all registers.
262   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
263     const CodeGenRegister *Reg = Regs[i];
264     const CodeGenRegister::Set &O = Overlaps[Reg];
265     // Move Reg to the front so TRI::getAliasSet can share the list.
266     OS << "  const unsigned " << Reg->getName() << "_Overlaps[] = { "
267        << getQualifiedName(Reg->TheDef) << ", ";
268     for (CodeGenRegister::Set::const_iterator I = O.begin(), E = O.end();
269          I != E; ++I)
270       if (*I != Reg)
271         OS << getQualifiedName((*I)->TheDef) << ", ";
272     OS << "0 };\n";
273   }
274
275   // Emit the empty sub-registers list
276   OS << "  const unsigned Empty_SubRegsSet[] = { 0 };\n";
277   // Loop over all of the registers which have sub-registers, emitting the
278   // sub-registers list to memory.
279   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
280     const CodeGenRegister &Reg = *Regs[i];
281     if (Reg.getSubRegs().empty())
282      continue;
283     // getSubRegs() orders by SubRegIndex. We want a topological order.
284     SetVector<CodeGenRegister*> SR;
285     Reg.addSubRegsPreOrder(SR, RegBank);
286     OS << "  const unsigned " << Reg.getName() << "_SubRegsSet[] = { ";
287     for (unsigned j = 0, je = SR.size(); j != je; ++j)
288       OS << getQualifiedName(SR[j]->TheDef) << ", ";
289     OS << "0 };\n";
290   }
291
292   // Emit the empty super-registers list
293   OS << "  const unsigned Empty_SuperRegsSet[] = { 0 };\n";
294   // Loop over all of the registers which have super-registers, emitting the
295   // super-registers list to memory.
296   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
297     const CodeGenRegister &Reg = *Regs[i];
298     const CodeGenRegister::SuperRegList &SR = Reg.getSuperRegs();
299     if (SR.empty())
300       continue;
301     OS << "  const unsigned " << Reg.getName() << "_SuperRegsSet[] = { ";
302     for (unsigned j = 0, je = SR.size(); j != je; ++j)
303       OS << getQualifiedName(SR[j]->TheDef) << ", ";
304     OS << "0 };\n";
305   }
306   OS << "}\n";       // End of anonymous namespace...
307
308   OS << "\nextern const MCRegisterDesc " << TargetName
309      << "RegDesc[] = { // Descriptors\n";
310   OS << "  { \"NOREG\",\t0,\t0,\t0 },\n";
311
312   // Now that register alias and sub-registers sets have been emitted, emit the
313   // register descriptors now.
314   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
315     const CodeGenRegister &Reg = *Regs[i];
316     OS << "  { \"";
317     OS << Reg.getName() << "\",\t" << Reg.getName() << "_Overlaps,\t";
318     if (!Reg.getSubRegs().empty())
319       OS << Reg.getName() << "_SubRegsSet,\t";
320     else
321       OS << "Empty_SubRegsSet,\t";
322     if (!Reg.getSuperRegs().empty())
323       OS << Reg.getName() << "_SuperRegsSet";
324     else
325       OS << "Empty_SuperRegsSet";
326     OS << " },\n";
327   }
328   OS << "};\n\n";      // End of register descriptors...
329
330   ArrayRef<CodeGenRegisterClass*> RegisterClasses = RegBank.getRegClasses();
331
332   // Loop over all of the register classes... emitting each one.
333   OS << "namespace {     // Register classes...\n";
334
335   // Emit the register enum value arrays for each RegisterClass
336   for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
337     const CodeGenRegisterClass &RC = *RegisterClasses[rc];
338     ArrayRef<Record*> Order = RC.getOrder();
339
340     // Give the register class a legal C name if it's anonymous.
341     std::string Name = RC.getName();
342
343     // Emit the register list now.
344     OS << "  // " << Name << " Register Class...\n"
345        << "  static const unsigned " << Name
346        << "[] = {\n    ";
347     for (unsigned i = 0, e = Order.size(); i != e; ++i) {
348       Record *Reg = Order[i];
349       OS << getQualifiedName(Reg) << ", ";
350     }
351     OS << "\n  };\n\n";
352
353     OS << "  // " << Name << " Bit set.\n"
354        << "  static const unsigned char " << Name
355        << "Bits[] = {\n    ";
356     BitVectorEmitter BVE;
357     for (unsigned i = 0, e = Order.size(); i != e; ++i) {
358       Record *Reg = Order[i];
359       BVE.add(Target.getRegBank().getReg(Reg)->EnumValue);
360     }
361     BVE.print(OS);
362     OS << "\n  };\n\n";
363
364   }
365   OS << "}\n\n";
366
367   OS << "extern const MCRegisterClass " << TargetName
368      << "MCRegisterClasses[] = {\n";
369
370   for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
371     const CodeGenRegisterClass &RC = *RegisterClasses[rc];
372     OS << "  MCRegisterClass(" << RC.getQualifiedName() + "RegClassID" << ", "
373        << '\"' << RC.getName() << "\", "
374        << RC.SpillSize/8 << ", "
375        << RC.SpillAlignment/8 << ", "
376        << RC.CopyCost << ", "
377        << RC.Allocatable << ", "
378        << RC.getName() << ", " << RC.getName() << " + "
379        << RC.getOrder().size() << ", "
380        << RC.getName() << "Bits, sizeof(" << RC.getName() << "Bits)"
381        << "),\n";
382   }
383
384   OS << "};\n\n";
385
386   // MCRegisterInfo initialization routine.
387   OS << "static inline void Init" << TargetName
388      << "MCRegisterInfo(MCRegisterInfo *RI, unsigned RA, "
389      << "unsigned DwarfFlavour = 0, unsigned EHFlavour = 0) {\n";
390   OS << "  RI->InitMCRegisterInfo(" << TargetName << "RegDesc, "
391      << Regs.size()+1 << ", RA, " << TargetName << "MCRegisterClasses, "
392      << RegisterClasses.size() << ");\n\n";
393
394   EmitRegMapping(OS, Regs, false);
395
396   OS << "}\n\n";
397
398
399   OS << "} // End llvm namespace \n";
400   OS << "#endif // GET_REGINFO_MC_DESC\n\n";
401 }
402
403 void
404 RegisterInfoEmitter::runTargetHeader(raw_ostream &OS, CodeGenTarget &Target,
405                                      CodeGenRegBank &RegBank) {
406   EmitSourceFileHeader("Register Information Header Fragment", OS);
407
408   OS << "\n#ifdef GET_REGINFO_HEADER\n";
409   OS << "#undef GET_REGINFO_HEADER\n";
410
411   const std::string &TargetName = Target.getName();
412   std::string ClassName = TargetName + "GenRegisterInfo";
413
414   OS << "#include \"llvm/Target/TargetRegisterInfo.h\"\n";
415   OS << "#include <string>\n\n";
416
417   OS << "namespace llvm {\n\n";
418
419   OS << "struct " << ClassName << " : public TargetRegisterInfo {\n"
420      << "  explicit " << ClassName
421      << "(unsigned RA, unsigned D = 0, unsigned E = 0);\n"
422      << "  virtual bool needsStackRealignment(const MachineFunction &) const\n"
423      << "     { return false; }\n"
424      << "  unsigned getSubReg(unsigned RegNo, unsigned Index) const;\n"
425      << "  unsigned getSubRegIndex(unsigned RegNo, unsigned SubRegNo) const;\n"
426      << "  unsigned composeSubRegIndices(unsigned, unsigned) const;\n"
427      << "  const TargetRegisterClass *"
428         "getSubClassWithSubReg(const TargetRegisterClass*, unsigned) const;\n"
429      << "  const TargetRegisterClass *getMatchingSuperRegClass("
430         "const TargetRegisterClass*, const TargetRegisterClass*, "
431         "unsigned) const;\n"
432      << "};\n\n";
433
434   ArrayRef<CodeGenSubRegIndex*> SubRegIndices = RegBank.getSubRegIndices();
435   if (!SubRegIndices.empty()) {
436     OS << "\n// Subregister indices\n";
437     std::string Namespace =
438       SubRegIndices[0]->getNamespace();
439     if (!Namespace.empty())
440       OS << "namespace " << Namespace << " {\n";
441     OS << "enum {\n  NoSubRegister,\n";
442     for (unsigned i = 0, e = RegBank.getNumNamedIndices(); i != e; ++i)
443       OS << "  " << SubRegIndices[i]->getName() << ",\t// " << i+1 << "\n";
444     OS << "  NUM_TARGET_NAMED_SUBREGS = " << SubRegIndices.size()+1 << "\n";
445     OS << "};\n";
446     if (!Namespace.empty())
447       OS << "}\n";
448   }
449
450   ArrayRef<CodeGenRegisterClass*> RegisterClasses = RegBank.getRegClasses();
451
452   if (!RegisterClasses.empty()) {
453     OS << "namespace " << RegisterClasses[0]->Namespace
454        << " { // Register classes\n";
455
456     for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
457       const CodeGenRegisterClass &RC = *RegisterClasses[i];
458       const std::string &Name = RC.getName();
459
460       // Output the register class definition.
461       OS << "  struct " << Name << "Class : public TargetRegisterClass {\n"
462          << "    " << Name << "Class();\n";
463       if (!RC.AltOrderSelect.empty())
464         OS << "    ArrayRef<unsigned> "
465               "getRawAllocationOrder(const MachineFunction&) const;\n";
466       OS << "  };\n";
467
468       // Output the extern for the instance.
469       OS << "  extern " << Name << "Class\t" << Name << "RegClass;\n";
470       // Output the extern for the pointer to the instance (should remove).
471       OS << "  static TargetRegisterClass * const "<< Name <<"RegisterClass = &"
472          << Name << "RegClass;\n";
473     }
474     OS << "} // end of namespace " << TargetName << "\n\n";
475   }
476   OS << "} // End llvm namespace \n";
477   OS << "#endif // GET_REGINFO_HEADER\n\n";
478 }
479
480 //
481 // runTargetDesc - Output the target register and register file descriptions.
482 //
483 void
484 RegisterInfoEmitter::runTargetDesc(raw_ostream &OS, CodeGenTarget &Target,
485                                    CodeGenRegBank &RegBank){
486   EmitSourceFileHeader("Target Register and Register Classes Information", OS);
487
488   OS << "\n#ifdef GET_REGINFO_TARGET_DESC\n";
489   OS << "#undef GET_REGINFO_TARGET_DESC\n";
490
491   OS << "namespace llvm {\n\n";
492
493   // Get access to MCRegisterClass data.
494   OS << "extern const MCRegisterClass " << Target.getName()
495      << "MCRegisterClasses[];\n";
496
497   // Start out by emitting each of the register classes.
498   ArrayRef<CodeGenRegisterClass*> RegisterClasses = RegBank.getRegClasses();
499
500   // Collect all registers belonging to any allocatable class.
501   std::set<Record*> AllocatableRegs;
502
503   // Collect allocatable registers.
504   for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
505     const CodeGenRegisterClass &RC = *RegisterClasses[rc];
506     ArrayRef<Record*> Order = RC.getOrder();
507
508     if (RC.Allocatable)
509       AllocatableRegs.insert(Order.begin(), Order.end());
510   }
511
512   OS << "namespace {     // Register classes...\n";
513
514   // Emit the ValueType arrays for each RegisterClass
515   for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
516     const CodeGenRegisterClass &RC = *RegisterClasses[rc];
517
518     // Give the register class a legal C name if it's anonymous.
519     std::string Name = RC.getName() + "VTs";
520
521     // Emit the register list now.
522     OS << "  // " << Name
523        << " Register Class Value Types...\n"
524        << "  static const EVT " << Name
525        << "[] = {\n    ";
526     for (unsigned i = 0, e = RC.VTs.size(); i != e; ++i)
527       OS << getEnumName(RC.VTs[i]) << ", ";
528     OS << "MVT::Other\n  };\n\n";
529   }
530   OS << "}  // end anonymous namespace\n\n";
531
532   // Now that all of the structs have been emitted, emit the instances.
533   if (!RegisterClasses.empty()) {
534     OS << "namespace " << RegisterClasses[0]->Namespace
535        << " {   // Register class instances\n";
536     for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i)
537       OS << "  " << RegisterClasses[i]->getName()  << "Class\t"
538          << RegisterClasses[i]->getName() << "RegClass;\n";
539
540     std::map<unsigned, std::set<unsigned> > SuperRegClassMap;
541
542     OS << "\n  static const TargetRegisterClass* const "
543       << "NullRegClasses[] = { NULL };\n\n";
544
545     unsigned NumSubRegIndices = RegBank.getSubRegIndices().size();
546
547     if (NumSubRegIndices) {
548       // Compute the super-register classes for each RegisterClass
549       for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
550         const CodeGenRegisterClass &RC = *RegisterClasses[rc];
551         for (DenseMap<Record*,Record*>::const_iterator
552              i = RC.SubRegClasses.begin(),
553              e = RC.SubRegClasses.end(); i != e; ++i) {
554           // Find the register class number of i->second for SuperRegClassMap.
555           const CodeGenRegisterClass *RC2 = RegBank.getRegClass(i->second);
556           assert(RC2 && "Invalid register class in SubRegClasses");
557           SuperRegClassMap[RC2->EnumValue].insert(rc);
558         }
559       }
560
561       // Emit the super-register classes for each RegisterClass
562       for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
563         const CodeGenRegisterClass &RC = *RegisterClasses[rc];
564
565         // Give the register class a legal C name if it's anonymous.
566         std::string Name = RC.getName();
567
568         OS << "  // " << Name
569            << " Super-register Classes...\n"
570            << "  static const TargetRegisterClass* const "
571            << Name << "SuperRegClasses[] = {\n    ";
572
573         bool Empty = true;
574         std::map<unsigned, std::set<unsigned> >::iterator I =
575           SuperRegClassMap.find(rc);
576         if (I != SuperRegClassMap.end()) {
577           for (std::set<unsigned>::iterator II = I->second.begin(),
578                  EE = I->second.end(); II != EE; ++II) {
579             const CodeGenRegisterClass &RC2 = *RegisterClasses[*II];
580             if (!Empty)
581               OS << ", ";
582             OS << "&" << RC2.getQualifiedName() << "RegClass";
583             Empty = false;
584           }
585         }
586
587         OS << (!Empty ? ", " : "") << "NULL";
588         OS << "\n  };\n\n";
589       }
590     }
591
592     // Emit the sub-classes array for each RegisterClass
593     for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
594       const CodeGenRegisterClass &RC = *RegisterClasses[rc];
595
596       // Give the register class a legal C name if it's anonymous.
597       std::string Name = RC.getName();
598
599       OS << "  static const unsigned " << Name << "SubclassMask[] = { ";
600       printBitVectorAsHex(OS, RC.getSubClasses(), 32);
601       OS << "};\n\n";
602     }
603
604     // Emit NULL terminated super-class lists.
605     for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
606       const CodeGenRegisterClass &RC = *RegisterClasses[rc];
607       ArrayRef<CodeGenRegisterClass*> Supers = RC.getSuperClasses();
608
609       // Skip classes without supers.  We can reuse NullRegClasses.
610       if (Supers.empty())
611         continue;
612
613       OS << "  static const TargetRegisterClass* const "
614          << RC.getName() << "Superclasses[] = {\n";
615       for (unsigned i = 0; i != Supers.size(); ++i)
616         OS << "    &" << Supers[i]->getQualifiedName() << "RegClass,\n";
617       OS << "    NULL\n  };\n\n";
618     }
619
620     // Emit methods.
621     for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
622       const CodeGenRegisterClass &RC = *RegisterClasses[i];
623       OS << RC.getName() << "Class::" << RC.getName()
624          << "Class()  : TargetRegisterClass(&"
625          << Target.getName() << "MCRegisterClasses["
626          << RC.getName() + "RegClassID" << "], "
627          << RC.getName() + "VTs" << ", "
628          << RC.getName() + "SubclassMask" << ", ";
629       if (RC.getSuperClasses().empty())
630         OS << "NullRegClasses, ";
631       else
632         OS << RC.getName() + "Superclasses, ";
633       OS << (NumSubRegIndices ? RC.getName() + "Super" : std::string("Null"))
634          << "RegClasses"
635          << ") {}\n";
636       if (!RC.AltOrderSelect.empty()) {
637         OS << "\nstatic inline unsigned " << RC.getName()
638            << "AltOrderSelect(const MachineFunction &MF) {"
639            << RC.AltOrderSelect << "}\n\nArrayRef<unsigned> "
640            << RC.getName() << "Class::"
641            << "getRawAllocationOrder(const MachineFunction &MF) const {\n";
642         for (unsigned oi = 1 , oe = RC.getNumOrders(); oi != oe; ++oi) {
643           ArrayRef<Record*> Elems = RC.getOrder(oi);
644           OS << "  static const unsigned AltOrder" << oi << "[] = {";
645           for (unsigned elem = 0; elem != Elems.size(); ++elem)
646             OS << (elem ? ", " : " ") << getQualifiedName(Elems[elem]);
647           OS << " };\n";
648         }
649         OS << "  const MCRegisterClass &MCR = " << Target.getName()
650            << "MCRegisterClasses[" << RC.getQualifiedName() + "RegClassID];"
651            << "  static const ArrayRef<unsigned> Order[] = {\n"
652            << "    makeArrayRef(MCR.begin(), MCR.getNumRegs()";
653         for (unsigned oi = 1, oe = RC.getNumOrders(); oi != oe; ++oi)
654           OS << "),\n    makeArrayRef(AltOrder" << oi;
655         OS << ")\n  };\n  const unsigned Select = " << RC.getName()
656            << "AltOrderSelect(MF);\n  assert(Select < " << RC.getNumOrders()
657            << ");\n  return Order[Select];\n}\n";
658         }
659     }
660
661     OS << "}\n";
662   }
663
664   OS << "\nnamespace {\n";
665   OS << "  const TargetRegisterClass* const RegisterClasses[] = {\n";
666   for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i)
667     OS << "    &" << RegisterClasses[i]->getQualifiedName()
668        << "RegClass,\n";
669   OS << "  };\n";
670   OS << "}\n";       // End of anonymous namespace...
671
672   // Emit extra information about registers.
673   const std::string &TargetName = Target.getName();
674   OS << "\n  static const TargetRegisterInfoDesc "
675      << TargetName << "RegInfoDesc[] = "
676      << "{ // Extra Descriptors\n";
677   OS << "    { 0, 0 },\n";
678
679   const std::vector<CodeGenRegister*> &Regs = RegBank.getRegisters();
680   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
681     const CodeGenRegister &Reg = *Regs[i];
682     OS << "    { ";
683     OS << Reg.CostPerUse << ", "
684        << int(AllocatableRegs.count(Reg.TheDef)) << " },\n";
685   }
686   OS << "  };\n";      // End of register descriptors...
687
688
689   // Calculate the mapping of subregister+index pairs to physical registers.
690   // This will also create further anonymous indexes.
691   unsigned NamedIndices = RegBank.getNumNamedIndices();
692
693   // Emit SubRegIndex names, skipping 0
694   ArrayRef<CodeGenSubRegIndex*> SubRegIndices = RegBank.getSubRegIndices();
695   OS << "\n  static const char *const " << TargetName
696      << "SubRegIndexTable[] = { \"";
697   for (unsigned i = 0, e = SubRegIndices.size(); i != e; ++i) {
698     OS << SubRegIndices[i]->getName();
699     if (i+1 != e)
700       OS << "\", \"";
701   }
702   OS << "\" };\n\n";
703
704   // Emit names of the anonymus subreg indexes.
705   if (SubRegIndices.size() > NamedIndices) {
706     OS << "  enum {";
707     for (unsigned i = NamedIndices, e = SubRegIndices.size(); i != e; ++i) {
708       OS << "\n    " << SubRegIndices[i]->getName() << " = " << i+1;
709       if (i+1 != e)
710         OS << ',';
711     }
712     OS << "\n  };\n\n";
713   }
714   OS << "\n";
715
716   std::string ClassName = Target.getName() + "GenRegisterInfo";
717
718   // Emit the subregister + index mapping function based on the information
719   // calculated above.
720   OS << "unsigned " << ClassName
721      << "::getSubReg(unsigned RegNo, unsigned Index) const {\n"
722      << "  switch (RegNo) {\n"
723      << "  default:\n    return 0;\n";
724   for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
725     const CodeGenRegister::SubRegMap &SRM = Regs[i]->getSubRegs();
726     if (SRM.empty())
727       continue;
728     OS << "  case " << getQualifiedName(Regs[i]->TheDef) << ":\n";
729     OS << "    switch (Index) {\n";
730     OS << "    default: return 0;\n";
731     for (CodeGenRegister::SubRegMap::const_iterator ii = SRM.begin(),
732          ie = SRM.end(); ii != ie; ++ii)
733       OS << "    case " << ii->first->getQualifiedName()
734          << ": return " << getQualifiedName(ii->second->TheDef) << ";\n";
735     OS << "    };\n" << "    break;\n";
736   }
737   OS << "  };\n";
738   OS << "  return 0;\n";
739   OS << "}\n\n";
740
741   OS << "unsigned " << ClassName
742      << "::getSubRegIndex(unsigned RegNo, unsigned SubRegNo) const {\n"
743      << "  switch (RegNo) {\n"
744      << "  default:\n    return 0;\n";
745    for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
746      const CodeGenRegister::SubRegMap &SRM = Regs[i]->getSubRegs();
747      if (SRM.empty())
748        continue;
749     OS << "  case " << getQualifiedName(Regs[i]->TheDef) << ":\n";
750     for (CodeGenRegister::SubRegMap::const_iterator ii = SRM.begin(),
751          ie = SRM.end(); ii != ie; ++ii)
752       OS << "    if (SubRegNo == " << getQualifiedName(ii->second->TheDef)
753          << ")  return " << ii->first->getQualifiedName() << ";\n";
754     OS << "    return 0;\n";
755   }
756   OS << "  };\n";
757   OS << "  return 0;\n";
758   OS << "}\n\n";
759
760   // Emit composeSubRegIndices
761   OS << "unsigned " << ClassName
762      << "::composeSubRegIndices(unsigned IdxA, unsigned IdxB) const {\n"
763      << "  switch (IdxA) {\n"
764      << "  default:\n    return IdxB;\n";
765   for (unsigned i = 0, e = SubRegIndices.size(); i != e; ++i) {
766     bool Open = false;
767     for (unsigned j = 0; j != e; ++j) {
768       if (CodeGenSubRegIndex *Comp =
769             SubRegIndices[i]->compose(SubRegIndices[j])) {
770         if (!Open) {
771           OS << "  case " << SubRegIndices[i]->getQualifiedName()
772              << ": switch(IdxB) {\n    default: return IdxB;\n";
773           Open = true;
774         }
775         OS << "    case " << SubRegIndices[j]->getQualifiedName()
776            << ": return " << Comp->getQualifiedName() << ";\n";
777       }
778     }
779     if (Open)
780       OS << "    }\n";
781   }
782   OS << "  }\n}\n\n";
783
784   // Emit getSubClassWithSubReg.
785   OS << "const TargetRegisterClass *" << ClassName
786      << "::getSubClassWithSubReg(const TargetRegisterClass *RC, unsigned Idx)"
787         " const {\n";
788   if (SubRegIndices.empty()) {
789     OS << "  assert(Idx == 0 && \"Target has no sub-registers\");\n"
790        << "  return RC;\n";
791   } else {
792     // Use the smallest type that can hold a regclass ID with room for a
793     // sentinel.
794     if (RegisterClasses.size() < UINT8_MAX)
795       OS << "  static const uint8_t Table[";
796     else if (RegisterClasses.size() < UINT16_MAX)
797       OS << "  static const uint16_t Table[";
798     else
799       throw "Too many register classes.";
800     OS << RegisterClasses.size() << "][" << SubRegIndices.size() << "] = {\n";
801     for (unsigned rci = 0, rce = RegisterClasses.size(); rci != rce; ++rci) {
802       const CodeGenRegisterClass &RC = *RegisterClasses[rci];
803       OS << "    {\t// " << RC.getName() << "\n";
804       for (unsigned sri = 0, sre = SubRegIndices.size(); sri != sre; ++sri) {
805         CodeGenSubRegIndex *Idx = SubRegIndices[sri];
806         if (CodeGenRegisterClass *SRC = RC.getSubClassWithSubReg(Idx))
807           OS << "      " << SRC->EnumValue + 1 << ",\t// " << Idx->getName()
808              << " -> " << SRC->getName() << "\n";
809         else
810           OS << "      0,\t// " << Idx->getName() << "\n";
811       }
812       OS << "    },\n";
813     }
814     OS << "  };\n  assert(RC && \"Missing regclass\");\n"
815        << "  if (!Idx) return RC;\n  --Idx;\n"
816        << "  assert(Idx < " << SubRegIndices.size() << " && \"Bad subreg\");\n"
817        << "  unsigned TV = Table[RC->getID()][Idx];\n"
818        << "  return TV ? getRegClass(TV - 1) : 0;\n";
819   }
820   OS << "}\n\n";
821
822   // Emit getMatchingSuperRegClass.
823   OS << "const TargetRegisterClass *" << ClassName
824      << "::getMatchingSuperRegClass(const TargetRegisterClass *A,"
825         " const TargetRegisterClass *B, unsigned Idx) const {\n";
826   if (SubRegIndices.empty()) {
827     OS << "  llvm_unreachable(\"Target has no sub-registers\");\n";
828   } else {
829     // We need to find the largest sub-class of A such that every register has
830     // an Idx sub-register in B.  Map (B, Idx) to a bit-vector of
831     // super-register classes that map into B. Then compute the largest common
832     // sub-class with A by taking advantage of the register class ordering,
833     // like getCommonSubClass().
834
835     // Bitvector table is NumRCs x NumSubIndexes x BVWords, where BVWords is
836     // the number of 32-bit words required to represent all register classes.
837     const unsigned BVWords = (RegisterClasses.size()+31)/32;
838     BitVector BV(RegisterClasses.size());
839
840     OS << "  static const unsigned Table[" << RegisterClasses.size()
841        << "][" << SubRegIndices.size() << "][" << BVWords << "] = {\n";
842     for (unsigned rci = 0, rce = RegisterClasses.size(); rci != rce; ++rci) {
843       const CodeGenRegisterClass &RC = *RegisterClasses[rci];
844       OS << "    {\t// " << RC.getName() << "\n";
845       for (unsigned sri = 0, sre = SubRegIndices.size(); sri != sre; ++sri) {
846         CodeGenSubRegIndex *Idx = SubRegIndices[sri];
847         BV.reset();
848         RC.getSuperRegClasses(Idx, BV);
849         OS << "      { ";
850         printBitVectorAsHex(OS, BV, 32);
851         OS << "},\t// " << Idx->getName() << '\n';
852       }
853       OS << "    },\n";
854     }
855     OS << "  };\n  assert(A && B && \"Missing regclass\");\n"
856        << "  --Idx;\n"
857        << "  assert(Idx < " << SubRegIndices.size() << " && \"Bad subreg\");\n"
858        << "  const unsigned *TV = Table[B->getID()][Idx];\n"
859        << "  const unsigned *SC = A->getSubClassMask();\n"
860        << "  for (unsigned i = 0; i != " << BVWords << "; ++i)\n"
861        << "    if (unsigned Common = TV[i] & SC[i])\n"
862        << "      return getRegClass(32*i + CountTrailingZeros_32(Common));\n"
863        << "  return 0;\n";
864   }
865   OS << "}\n\n";
866
867   // Emit the constructor of the class...
868   OS << "extern const MCRegisterDesc " << TargetName << "RegDesc[];\n";
869
870   OS << ClassName << "::" << ClassName
871      << "(unsigned RA, unsigned DwarfFlavour, unsigned EHFlavour)\n"
872      << "  : TargetRegisterInfo(" << TargetName << "RegInfoDesc"
873      << ", RegisterClasses, RegisterClasses+" << RegisterClasses.size() <<",\n"
874      << "                 " << TargetName << "SubRegIndexTable) {\n"
875      << "  InitMCRegisterInfo(" << TargetName << "RegDesc, "
876      << Regs.size()+1 << ", RA, " << TargetName << "MCRegisterClasses, "
877      << RegisterClasses.size() << ");\n\n";
878
879   EmitRegMapping(OS, Regs, true);
880
881   OS << "}\n\n";
882
883
884   // Emit CalleeSavedRegs information.
885   std::vector<Record*> CSRSets =
886     Records.getAllDerivedDefinitions("CalleeSavedRegs");
887   for (unsigned i = 0, e = CSRSets.size(); i != e; ++i) {
888     Record *CSRSet = CSRSets[i];
889     const SetTheory::RecVec *Regs = RegBank.getSets().expand(CSRSet);
890     assert(Regs && "Cannot expand CalleeSavedRegs instance");
891
892     // Emit the *_SaveList list of callee-saved registers.
893     OS << "static const unsigned " << CSRSet->getName()
894        << "_SaveList[] = { ";
895     for (unsigned r = 0, re = Regs->size(); r != re; ++r)
896       OS << getQualifiedName((*Regs)[r]) << ", ";
897     OS << "0 };\n";
898
899     // Emit the *_RegMask bit mask of call-preserved registers.
900     OS << "static const uint32_t " << CSRSet->getName()
901        << "_RegMask[] = { ";
902     printBitVectorAsHex(OS, RegBank.computeCoveredRegisters(*Regs), 32);
903     OS << "};\n";
904   }
905   OS << "\n\n";
906
907   OS << "} // End llvm namespace \n";
908   OS << "#endif // GET_REGINFO_TARGET_DESC\n\n";
909 }
910
911 void RegisterInfoEmitter::run(raw_ostream &OS) {
912   CodeGenTarget Target(Records);
913   CodeGenRegBank &RegBank = Target.getRegBank();
914   RegBank.computeDerivedInfo();
915
916   runEnums(OS, Target, RegBank);
917   runMCDesc(OS, Target, RegBank);
918   runTargetHeader(OS, Target, RegBank);
919   runTargetDesc(OS, Target, RegBank);
920 }