AsmWriter/Bitcode: MDEnumerator
[oota-llvm.git] / include / llvm / Bitcode / BitstreamReader.h
1 //===- BitstreamReader.h - Low-level bitstream reader interface -*- 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 header defines the BitstreamReader class.  This class can be used to
11 // read an arbitrary bitstream, regardless of its contents.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #ifndef LLVM_BITCODE_BITSTREAMREADER_H
16 #define LLVM_BITCODE_BITSTREAMREADER_H
17
18 #include "llvm/Bitcode/BitCodes.h"
19 #include "llvm/Support/Endian.h"
20 #include "llvm/Support/StreamingMemoryObject.h"
21 #include <climits>
22 #include <string>
23 #include <vector>
24
25 namespace llvm {
26
27 class Deserializer;
28
29 /// This class is used to read from an LLVM bitcode stream, maintaining
30 /// information that is global to decoding the entire file. While a file is
31 /// being read, multiple cursors can be independently advanced or skipped around
32 /// within the file.  These are represented by the BitstreamCursor class.
33 class BitstreamReader {
34 public:
35   /// This contains information emitted to BLOCKINFO_BLOCK blocks. These
36   /// describe abbreviations that all blocks of the specified ID inherit.
37   struct BlockInfo {
38     unsigned BlockID;
39     std::vector<IntrusiveRefCntPtr<BitCodeAbbrev>> Abbrevs;
40     std::string Name;
41
42     std::vector<std::pair<unsigned, std::string> > RecordNames;
43   };
44 private:
45   std::unique_ptr<MemoryObject> BitcodeBytes;
46
47   std::vector<BlockInfo> BlockInfoRecords;
48
49   /// This is set to true if we don't care about the block/record name
50   /// information in the BlockInfo block. Only llvm-bcanalyzer uses this.
51   bool IgnoreBlockInfoNames;
52
53   BitstreamReader(const BitstreamReader&) LLVM_DELETED_FUNCTION;
54   void operator=(const BitstreamReader&) LLVM_DELETED_FUNCTION;
55 public:
56   BitstreamReader() : IgnoreBlockInfoNames(true) {
57   }
58
59   BitstreamReader(const unsigned char *Start, const unsigned char *End)
60       : IgnoreBlockInfoNames(true) {
61     init(Start, End);
62   }
63
64   BitstreamReader(std::unique_ptr<MemoryObject> BitcodeBytes)
65       : BitcodeBytes(std::move(BitcodeBytes)), IgnoreBlockInfoNames(true) {}
66
67   BitstreamReader(BitstreamReader &&Other) {
68     *this = std::move(Other);
69   }
70
71   BitstreamReader &operator=(BitstreamReader &&Other) {
72     BitcodeBytes = std::move(Other.BitcodeBytes);
73     // Explicitly swap block info, so that nothing gets destroyed twice.
74     std::swap(BlockInfoRecords, Other.BlockInfoRecords);
75     IgnoreBlockInfoNames = Other.IgnoreBlockInfoNames;
76     return *this;
77   }
78
79   void init(const unsigned char *Start, const unsigned char *End) {
80     assert(((End-Start) & 3) == 0 &&"Bitcode stream not a multiple of 4 bytes");
81     BitcodeBytes.reset(getNonStreamedMemoryObject(Start, End));
82   }
83
84   MemoryObject &getBitcodeBytes() { return *BitcodeBytes; }
85
86   /// This is called by clients that want block/record name information.
87   void CollectBlockInfoNames() { IgnoreBlockInfoNames = false; }
88   bool isIgnoringBlockInfoNames() { return IgnoreBlockInfoNames; }
89
90   //===--------------------------------------------------------------------===//
91   // Block Manipulation
92   //===--------------------------------------------------------------------===//
93
94   /// Return true if we've already read and processed the block info block for
95   /// this Bitstream. We only process it for the first cursor that walks over
96   /// it.
97   bool hasBlockInfoRecords() const { return !BlockInfoRecords.empty(); }
98
99   /// If there is block info for the specified ID, return it, otherwise return
100   /// null.
101   const BlockInfo *getBlockInfo(unsigned BlockID) const {
102     // Common case, the most recent entry matches BlockID.
103     if (!BlockInfoRecords.empty() && BlockInfoRecords.back().BlockID == BlockID)
104       return &BlockInfoRecords.back();
105
106     for (unsigned i = 0, e = static_cast<unsigned>(BlockInfoRecords.size());
107          i != e; ++i)
108       if (BlockInfoRecords[i].BlockID == BlockID)
109         return &BlockInfoRecords[i];
110     return nullptr;
111   }
112
113   BlockInfo &getOrCreateBlockInfo(unsigned BlockID) {
114     if (const BlockInfo *BI = getBlockInfo(BlockID))
115       return *const_cast<BlockInfo*>(BI);
116
117     // Otherwise, add a new record.
118     BlockInfoRecords.push_back(BlockInfo());
119     BlockInfoRecords.back().BlockID = BlockID;
120     return BlockInfoRecords.back();
121   }
122
123   /// Takes block info from the other bitstream reader.
124   ///
125   /// This is a "take" operation because BlockInfo records are non-trivial, and
126   /// indeed rather expensive.
127   void takeBlockInfo(BitstreamReader &&Other) {
128     assert(!hasBlockInfoRecords());
129     BlockInfoRecords = std::move(Other.BlockInfoRecords);
130   }
131 };
132
133 /// When advancing through a bitstream cursor, each advance can discover a few
134 /// different kinds of entries:
135 struct BitstreamEntry {
136   enum {
137     Error,    // Malformed bitcode was found.
138     EndBlock, // We've reached the end of the current block, (or the end of the
139               // file, which is treated like a series of EndBlock records.
140     SubBlock, // This is the start of a new subblock of a specific ID.
141     Record    // This is a record with a specific AbbrevID.
142   } Kind;
143
144   unsigned ID;
145
146   static BitstreamEntry getError() {
147     BitstreamEntry E; E.Kind = Error; return E;
148   }
149   static BitstreamEntry getEndBlock() {
150     BitstreamEntry E; E.Kind = EndBlock; return E;
151   }
152   static BitstreamEntry getSubBlock(unsigned ID) {
153     BitstreamEntry E; E.Kind = SubBlock; E.ID = ID; return E;
154   }
155   static BitstreamEntry getRecord(unsigned AbbrevID) {
156     BitstreamEntry E; E.Kind = Record; E.ID = AbbrevID; return E;
157   }
158 };
159
160 /// This represents a position within a bitcode file. There may be multiple
161 /// independent cursors reading within one bitstream, each maintaining their own
162 /// local state.
163 ///
164 /// Unlike iterators, BitstreamCursors are heavy-weight objects that should not
165 /// be passed by value.
166 class BitstreamCursor {
167   friend class Deserializer;
168   BitstreamReader *BitStream;
169   size_t NextChar;
170
171   // The size of the bicode. 0 if we don't know it yet.
172   size_t Size;
173
174   /// This is the current data we have pulled from the stream but have not
175   /// returned to the client. This is specifically and intentionally defined to
176   /// follow the word size of the host machine for efficiency. We use word_t in
177   /// places that are aware of this to make it perfectly explicit what is going
178   /// on.
179   typedef size_t word_t;
180   word_t CurWord;
181
182   /// This is the number of bits in CurWord that are valid. This is always from
183   /// [0...bits_of(size_t)-1] inclusive.
184   unsigned BitsInCurWord;
185
186   // This is the declared size of code values used for the current block, in
187   // bits.
188   unsigned CurCodeSize;
189
190   /// Abbrevs installed at in this block.
191   std::vector<IntrusiveRefCntPtr<BitCodeAbbrev>> CurAbbrevs;
192
193   struct Block {
194     unsigned PrevCodeSize;
195     std::vector<IntrusiveRefCntPtr<BitCodeAbbrev>> PrevAbbrevs;
196     explicit Block(unsigned PCS) : PrevCodeSize(PCS) {}
197   };
198
199   /// This tracks the codesize of parent blocks.
200   SmallVector<Block, 8> BlockScope;
201
202
203 public:
204   BitstreamCursor() { init(nullptr); }
205
206   explicit BitstreamCursor(BitstreamReader &R) { init(&R); }
207
208   void init(BitstreamReader *R) {
209     freeState();
210
211     BitStream = R;
212     NextChar = 0;
213     Size = 0;
214     BitsInCurWord = 0;
215     CurCodeSize = 2;
216   }
217
218   void freeState();
219
220   bool canSkipToPos(size_t pos) const {
221     // pos can be skipped to if it is a valid address or one byte past the end.
222     return pos == 0 || BitStream->getBitcodeBytes().isValidAddress(
223         static_cast<uint64_t>(pos - 1));
224   }
225
226   bool AtEndOfStream() {
227     if (BitsInCurWord != 0)
228       return false;
229     if (Size != 0)
230       return Size == NextChar;
231     fillCurWord();
232     return BitsInCurWord == 0;
233   }
234
235   /// Return the number of bits used to encode an abbrev #.
236   unsigned getAbbrevIDWidth() const { return CurCodeSize; }
237
238   /// Return the bit # of the bit we are reading.
239   uint64_t GetCurrentBitNo() const {
240     return NextChar*CHAR_BIT - BitsInCurWord;
241   }
242
243   BitstreamReader *getBitStreamReader() {
244     return BitStream;
245   }
246   const BitstreamReader *getBitStreamReader() const {
247     return BitStream;
248   }
249
250   /// Flags that modify the behavior of advance().
251   enum {
252     /// If this flag is used, the advance() method does not automatically pop
253     /// the block scope when the end of a block is reached.
254     AF_DontPopBlockAtEnd = 1,
255
256     /// If this flag is used, abbrev entries are returned just like normal
257     /// records.
258     AF_DontAutoprocessAbbrevs = 2
259   };
260
261       /// Advance the current bitstream, returning the next entry in the stream.
262       BitstreamEntry advance(unsigned Flags = 0) {
263     while (1) {
264       unsigned Code = ReadCode();
265       if (Code == bitc::END_BLOCK) {
266         // Pop the end of the block unless Flags tells us not to.
267         if (!(Flags & AF_DontPopBlockAtEnd) && ReadBlockEnd())
268           return BitstreamEntry::getError();
269         return BitstreamEntry::getEndBlock();
270       }
271
272       if (Code == bitc::ENTER_SUBBLOCK)
273         return BitstreamEntry::getSubBlock(ReadSubBlockID());
274
275       if (Code == bitc::DEFINE_ABBREV &&
276           !(Flags & AF_DontAutoprocessAbbrevs)) {
277         // We read and accumulate abbrev's, the client can't do anything with
278         // them anyway.
279         ReadAbbrevRecord();
280         continue;
281       }
282
283       return BitstreamEntry::getRecord(Code);
284     }
285   }
286
287   /// This is a convenience function for clients that don't expect any
288   /// subblocks. This just skips over them automatically.
289   BitstreamEntry advanceSkippingSubblocks(unsigned Flags = 0) {
290     while (1) {
291       // If we found a normal entry, return it.
292       BitstreamEntry Entry = advance(Flags);
293       if (Entry.Kind != BitstreamEntry::SubBlock)
294         return Entry;
295
296       // If we found a sub-block, just skip over it and check the next entry.
297       if (SkipBlock())
298         return BitstreamEntry::getError();
299     }
300   }
301
302   /// Reset the stream to the specified bit number.
303   void JumpToBit(uint64_t BitNo) {
304     uintptr_t ByteNo = uintptr_t(BitNo/8) & ~(sizeof(word_t)-1);
305     unsigned WordBitNo = unsigned(BitNo & (sizeof(word_t)*8-1));
306     assert(canSkipToPos(ByteNo) && "Invalid location");
307
308     // Move the cursor to the right word.
309     NextChar = ByteNo;
310     BitsInCurWord = 0;
311
312     // Skip over any bits that are already consumed.
313     if (WordBitNo)
314       Read(WordBitNo);
315   }
316
317   void fillCurWord() {
318     if (Size != 0 && NextChar >= (unsigned)Size)
319       report_fatal_error("Unexpected end of file");
320
321     // Read the next word from the stream.
322     uint8_t Array[sizeof(word_t)] = {0};
323
324     uint64_t BytesRead =
325         BitStream->getBitcodeBytes().readBytes(Array, sizeof(Array), NextChar);
326
327     // If we run out of data, stop at the end of the stream.
328     if (BytesRead == 0) {
329       Size = NextChar;
330       return;
331     }
332
333     CurWord =
334         support::endian::read<word_t, support::little, support::unaligned>(
335             Array);
336     NextChar += BytesRead;
337     BitsInCurWord = BytesRead * 8;
338   }
339
340   word_t Read(unsigned NumBits) {
341     static const unsigned BitsInWord = sizeof(word_t) * 8;
342
343     assert(NumBits && NumBits <= BitsInWord &&
344            "Cannot return zero or more than BitsInWord bits!");
345
346     static const unsigned Mask = sizeof(word_t) > 4 ? 0x3f : 0x1f;
347
348     // If the field is fully contained by CurWord, return it quickly.
349     if (BitsInCurWord >= NumBits) {
350       word_t R = CurWord & (~word_t(0) >> (BitsInWord - NumBits));
351
352       // Use a mask to avoid undefined behavior.
353       CurWord >>= (NumBits & Mask);
354
355       BitsInCurWord -= NumBits;
356       return R;
357     }
358
359     word_t R = BitsInCurWord ? CurWord : 0;
360     unsigned BitsLeft = NumBits - BitsInCurWord;
361
362     fillCurWord();
363
364     // If we run out of data, stop at the end of the stream.
365     if (BitsLeft > BitsInCurWord)
366       return 0;
367
368     word_t R2 = CurWord & (~word_t(0) >> (BitsInWord - BitsLeft));
369
370     // Use a mask to avoid undefined behavior.
371     CurWord >>= (BitsLeft & Mask);
372
373     BitsInCurWord -= BitsLeft;
374
375     R |= R2 << (NumBits - BitsLeft);
376
377     return R;
378   }
379
380   uint32_t ReadVBR(unsigned NumBits) {
381     uint32_t Piece = Read(NumBits);
382     if ((Piece & (1U << (NumBits-1))) == 0)
383       return Piece;
384
385     uint32_t Result = 0;
386     unsigned NextBit = 0;
387     while (1) {
388       Result |= (Piece & ((1U << (NumBits-1))-1)) << NextBit;
389
390       if ((Piece & (1U << (NumBits-1))) == 0)
391         return Result;
392
393       NextBit += NumBits-1;
394       Piece = Read(NumBits);
395     }
396   }
397
398   // Read a VBR that may have a value up to 64-bits in size. The chunk size of
399   // the VBR must still be <= 32 bits though.
400   uint64_t ReadVBR64(unsigned NumBits) {
401     uint32_t Piece = Read(NumBits);
402     if ((Piece & (1U << (NumBits-1))) == 0)
403       return uint64_t(Piece);
404
405     uint64_t Result = 0;
406     unsigned NextBit = 0;
407     while (1) {
408       Result |= uint64_t(Piece & ((1U << (NumBits-1))-1)) << NextBit;
409
410       if ((Piece & (1U << (NumBits-1))) == 0)
411         return Result;
412
413       NextBit += NumBits-1;
414       Piece = Read(NumBits);
415     }
416   }
417
418 private:
419   void SkipToFourByteBoundary() {
420     // If word_t is 64-bits and if we've read less than 32 bits, just dump
421     // the bits we have up to the next 32-bit boundary.
422     if (sizeof(word_t) > 4 &&
423         BitsInCurWord >= 32) {
424       CurWord >>= BitsInCurWord-32;
425       BitsInCurWord = 32;
426       return;
427     }
428
429     BitsInCurWord = 0;
430   }
431 public:
432
433   unsigned ReadCode() {
434     return Read(CurCodeSize);
435   }
436
437
438   // Block header:
439   //    [ENTER_SUBBLOCK, blockid, newcodelen, <align4bytes>, blocklen]
440
441   /// Having read the ENTER_SUBBLOCK code, read the BlockID for the block.
442   unsigned ReadSubBlockID() {
443     return ReadVBR(bitc::BlockIDWidth);
444   }
445
446   /// Having read the ENTER_SUBBLOCK abbrevid and a BlockID, skip over the body
447   /// of this block. If the block record is malformed, return true.
448   bool SkipBlock() {
449     // Read and ignore the codelen value.  Since we are skipping this block, we
450     // don't care what code widths are used inside of it.
451     ReadVBR(bitc::CodeLenWidth);
452     SkipToFourByteBoundary();
453     unsigned NumFourBytes = Read(bitc::BlockSizeWidth);
454
455     // Check that the block wasn't partially defined, and that the offset isn't
456     // bogus.
457     size_t SkipTo = GetCurrentBitNo() + NumFourBytes*4*8;
458     if (AtEndOfStream() || !canSkipToPos(SkipTo/8))
459       return true;
460
461     JumpToBit(SkipTo);
462     return false;
463   }
464
465   /// Having read the ENTER_SUBBLOCK abbrevid, enter the block, and return true
466   /// if the block has an error.
467   bool EnterSubBlock(unsigned BlockID, unsigned *NumWordsP = nullptr);
468
469   bool ReadBlockEnd() {
470     if (BlockScope.empty()) return true;
471
472     // Block tail:
473     //    [END_BLOCK, <align4bytes>]
474     SkipToFourByteBoundary();
475
476     popBlockScope();
477     return false;
478   }
479
480 private:
481
482   void popBlockScope() {
483     CurCodeSize = BlockScope.back().PrevCodeSize;
484
485     CurAbbrevs = std::move(BlockScope.back().PrevAbbrevs);
486     BlockScope.pop_back();
487   }
488
489   //===--------------------------------------------------------------------===//
490   // Record Processing
491   //===--------------------------------------------------------------------===//
492
493 public:
494   /// Return the abbreviation for the specified AbbrevId.
495   const BitCodeAbbrev *getAbbrev(unsigned AbbrevID) {
496     unsigned AbbrevNo = AbbrevID - bitc::FIRST_APPLICATION_ABBREV;
497     if (AbbrevNo >= CurAbbrevs.size())
498       report_fatal_error("Invalid abbrev number");
499     return CurAbbrevs[AbbrevNo].get();
500   }
501
502   /// Read the current record and discard it.
503   void skipRecord(unsigned AbbrevID);
504
505   unsigned readRecord(unsigned AbbrevID, SmallVectorImpl<uint64_t> &Vals,
506                       StringRef *Blob = nullptr);
507
508   //===--------------------------------------------------------------------===//
509   // Abbrev Processing
510   //===--------------------------------------------------------------------===//
511   void ReadAbbrevRecord();
512
513   bool ReadBlockInfoBlock();
514 };
515
516 } // End llvm namespace
517
518 #endif