lib/Bitcode/Reader/BitstreamReader.cpp

   1 //===- BitstreamReader.cpp - BitstreamReader implementation ---------------===//
   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 #include "llvm/Bitcode/BitstreamReader.h"
  11
  12 using namespace llvm;
  13
  14 //===----------------------------------------------------------------------===//
  15 //  BitstreamCursor implementation
  16 //===----------------------------------------------------------------------===//
  17
  18 void BitstreamCursor::freeState() {
  19   // Free all the Abbrevs.
  20   CurAbbrevs.clear();
  21
  22   // Free all the Abbrevs in the block scope.
  23   BlockScope.clear();
  24 }
  25
  26 /// EnterSubBlock - Having read the ENTER_SUBBLOCK abbrevid, enter
  27 /// the block, and return true if the block has an error.
  28 bool BitstreamCursor::EnterSubBlock(unsigned BlockID, unsigned *NumWordsP) {
  29   // Save the current block's state on BlockScope.
  30   BlockScope.push_back(Block(CurCodeSize));
  31   BlockScope.back().PrevAbbrevs.swap(CurAbbrevs);
  32
  33   // Add the abbrevs specific to this block to the CurAbbrevs list.
  34   if (const BitstreamReader::BlockInfo *Info =
  35       BitStream->getBlockInfo(BlockID)) {
  36     CurAbbrevs.insert(CurAbbrevs.end(), Info->Abbrevs.begin(),
  37                       Info->Abbrevs.end());
  38   }
  39
  40   // Get the codesize of this block.
  41   CurCodeSize = ReadVBR(bitc::CodeLenWidth);
  42   // We can't read more than MaxChunkSize at a time
  43   if (CurCodeSize > MaxChunkSize)
  44     return true;
  45
  46   SkipToFourByteBoundary();
  47   unsigned NumWords = Read(bitc::BlockSizeWidth);
  48   if (NumWordsP) *NumWordsP = NumWords;
  49
  50   // Validate that this block is sane.
  51   return CurCodeSize == 0 || AtEndOfStream();
  52 }
  53
  54 static uint64_t readAbbreviatedField(BitstreamCursor &Cursor,
  55                                      const BitCodeAbbrevOp &Op) {
  56   assert(!Op.isLiteral() && "Not to be used with literals!");
  57
  58   // Decode the value as we are commanded.
  59   switch (Op.getEncoding()) {
  60   case BitCodeAbbrevOp::Array:
  61   case BitCodeAbbrevOp::Blob:
  62     llvm_unreachable("Should not reach here");
  63   case BitCodeAbbrevOp::Fixed:
  64     assert((unsigned)Op.getEncodingData() <= Cursor.MaxChunkSize);
  65     return Cursor.Read((unsigned)Op.getEncodingData());
  66   case BitCodeAbbrevOp::VBR:
  67     assert((unsigned)Op.getEncodingData() <= Cursor.MaxChunkSize);
  68     return Cursor.ReadVBR64((unsigned)Op.getEncodingData());
  69   case BitCodeAbbrevOp::Char6:
  70     return BitCodeAbbrevOp::DecodeChar6(Cursor.Read(6));
  71   }
  72   llvm_unreachable("invalid abbreviation encoding");
  73 }
  74
  75 static void skipAbbreviatedField(BitstreamCursor &Cursor,
  76                                  const BitCodeAbbrevOp &Op) {
  77   assert(!Op.isLiteral() && "Not to be used with literals!");
  78
  79   // Decode the value as we are commanded.
  80   switch (Op.getEncoding()) {
  81   case BitCodeAbbrevOp::Array:
  82   case BitCodeAbbrevOp::Blob:
  83     llvm_unreachable("Should not reach here");
  84   case BitCodeAbbrevOp::Fixed:
  85     assert((unsigned)Op.getEncodingData() <= Cursor.MaxChunkSize);
  86     Cursor.Read((unsigned)Op.getEncodingData());
  87     break;
  88   case BitCodeAbbrevOp::VBR:
  89     assert((unsigned)Op.getEncodingData() <= Cursor.MaxChunkSize);
  90     Cursor.ReadVBR64((unsigned)Op.getEncodingData());
  91     break;
  92   case BitCodeAbbrevOp::Char6:
  93     Cursor.Read(6);
  94     break;
  95   }
  96 }
  97
  98
  99
 100 /// skipRecord - Read the current record and discard it.
 101 void BitstreamCursor::skipRecord(unsigned AbbrevID) {
 102   // Skip unabbreviated records by reading past their entries.
 103   if (AbbrevID == bitc::UNABBREV_RECORD) {
 104     unsigned Code = ReadVBR(6);
 105     (void)Code;
 106     unsigned NumElts = ReadVBR(6);
 107     for (unsigned i = 0; i != NumElts; ++i)
 108       (void)ReadVBR64(6);
 109     return;
 110   }
 111
 112   const BitCodeAbbrev *Abbv = getAbbrev(AbbrevID);
 113
 114   for (unsigned i = 0, e = Abbv->getNumOperandInfos(); i != e; ++i) {
 115     const BitCodeAbbrevOp &Op = Abbv->getOperandInfo(i);
 116     if (Op.isLiteral())
 117       continue;
 118
 119     if (Op.getEncoding() != BitCodeAbbrevOp::Array &&
 120         Op.getEncoding() != BitCodeAbbrevOp::Blob) {
 121       skipAbbreviatedField(*this, Op);
 122       continue;
 123     }
 124
 125     if (Op.getEncoding() == BitCodeAbbrevOp::Array) {
 126       // Array case.  Read the number of elements as a vbr6.
 127       unsigned NumElts = ReadVBR(6);
 128
 129       // Get the element encoding.
 130       assert(i+2 == e && "array op not second to last?");
 131       const BitCodeAbbrevOp &EltEnc = Abbv->getOperandInfo(++i);
 132
 133       // Read all the elements.
 134       for (; NumElts; --NumElts)
 135         skipAbbreviatedField(*this, EltEnc);
 136       continue;
 137     }
 138
 139     assert(Op.getEncoding() == BitCodeAbbrevOp::Blob);
 140     // Blob case.  Read the number of bytes as a vbr6.
 141     unsigned NumElts = ReadVBR(6);
 142     SkipToFourByteBoundary();  // 32-bit alignment
 143
 144     // Figure out where the end of this blob will be including tail padding.
 145     size_t NewEnd = GetCurrentBitNo()+((NumElts+3)&~3)*8;
 146
 147     // If this would read off the end of the bitcode file, just set the
 148     // record to empty and return.
 149     if (!canSkipToPos(NewEnd/8)) {
 150       NextChar = BitStream->getBitcodeBytes().getExtent();
 151       break;
 152     }
 153
 154     // Skip over the blob.
 155     JumpToBit(NewEnd);
 156   }
 157 }
 158
 159 unsigned BitstreamCursor::readRecord(unsigned AbbrevID,
 160                                      SmallVectorImpl<uint64_t> &Vals,
 161                                      StringRef *Blob) {
 162   if (AbbrevID == bitc::UNABBREV_RECORD) {
 163     unsigned Code = ReadVBR(6);
 164     unsigned NumElts = ReadVBR(6);
 165     for (unsigned i = 0; i != NumElts; ++i)
 166       Vals.push_back(ReadVBR64(6));
 167     return Code;
 168   }
 169
 170   const BitCodeAbbrev *Abbv = getAbbrev(AbbrevID);
 171
 172   // Read the record code first.
 173   assert(Abbv->getNumOperandInfos() != 0 && "no record code in abbreviation?");
 174   const BitCodeAbbrevOp &CodeOp = Abbv->getOperandInfo(0);
 175   unsigned Code;
 176   if (CodeOp.isLiteral())
 177     Code = CodeOp.getLiteralValue();
 178   else {
 179     if (CodeOp.getEncoding() == BitCodeAbbrevOp::Array ||
 180         CodeOp.getEncoding() == BitCodeAbbrevOp::Blob)
 181       report_fatal_error("Abbreviation starts with an Array or a Blob");
 182     Code = readAbbreviatedField(*this, CodeOp);
 183   }
 184
 185   for (unsigned i = 1, e = Abbv->getNumOperandInfos(); i != e; ++i) {
 186     const BitCodeAbbrevOp &Op = Abbv->getOperandInfo(i);
 187     if (Op.isLiteral()) {
 188       Vals.push_back(Op.getLiteralValue());
 189       continue;
 190     }
 191
 192     if (Op.getEncoding() != BitCodeAbbrevOp::Array &&
 193         Op.getEncoding() != BitCodeAbbrevOp::Blob) {
 194       Vals.push_back(readAbbreviatedField(*this, Op));
 195       continue;
 196     }
 197
 198     if (Op.getEncoding() == BitCodeAbbrevOp::Array) {
 199       // Array case.  Read the number of elements as a vbr6.
 200       unsigned NumElts = ReadVBR(6);
 201
 202       // Get the element encoding.
 203       if (i + 2 != e)
 204         report_fatal_error("Array op not second to last");
 205       const BitCodeAbbrevOp &EltEnc = Abbv->getOperandInfo(++i);
 206       if (EltEnc.getEncoding() == BitCodeAbbrevOp::Array ||
 207           EltEnc.getEncoding() == BitCodeAbbrevOp::Blob)
 208         report_fatal_error("Array element type can't be an Array or a Blob");
 209
 210       // Read all the elements.
 211       for (; NumElts; --NumElts)
 212         Vals.push_back(readAbbreviatedField(*this, EltEnc));
 213       continue;
 214     }
 215
 216     assert(Op.getEncoding() == BitCodeAbbrevOp::Blob);
 217     // Blob case.  Read the number of bytes as a vbr6.
 218     unsigned NumElts = ReadVBR(6);
 219     SkipToFourByteBoundary();  // 32-bit alignment
 220
 221     // Figure out where the end of this blob will be including tail padding.
 222     size_t CurBitPos = GetCurrentBitNo();
 223     size_t NewEnd = CurBitPos+((NumElts+3)&~3)*8;
 224
 225     // If this would read off the end of the bitcode file, just set the
 226     // record to empty and return.
 227     if (!canSkipToPos(NewEnd/8)) {
 228       Vals.append(NumElts, 0);
 229       NextChar = BitStream->getBitcodeBytes().getExtent();
 230       break;
 231     }
 232
 233     // Otherwise, inform the streamer that we need these bytes in memory.
 234     const char *Ptr = (const char*)
 235       BitStream->getBitcodeBytes().getPointer(CurBitPos/8, NumElts);
 236
 237     // If we can return a reference to the data, do so to avoid copying it.
 238     if (Blob) {
 239       *Blob = StringRef(Ptr, NumElts);
 240     } else {
 241       // Otherwise, unpack into Vals with zero extension.
 242       for (; NumElts; --NumElts)
 243         Vals.push_back((unsigned char)*Ptr++);
 244     }
 245     // Skip over tail padding.
 246     JumpToBit(NewEnd);
 247   }
 248
 249   return Code;
 250 }
 251
 252
 253 void BitstreamCursor::ReadAbbrevRecord() {
 254   BitCodeAbbrev *Abbv = new BitCodeAbbrev();
 255   unsigned NumOpInfo = ReadVBR(5);
 256   for (unsigned i = 0; i != NumOpInfo; ++i) {
 257     bool IsLiteral = Read(1);
 258     if (IsLiteral) {
 259       Abbv->Add(BitCodeAbbrevOp(ReadVBR64(8)));
 260       continue;
 261     }
 262
 263     BitCodeAbbrevOp::Encoding E = (BitCodeAbbrevOp::Encoding)Read(3);
 264     if (BitCodeAbbrevOp::hasEncodingData(E)) {
 265       uint64_t Data = ReadVBR64(5);
 266
 267       // As a special case, handle fixed(0) (i.e., a fixed field with zero bits)
 268       // and vbr(0) as a literal zero.  This is decoded the same way, and avoids
 269       // a slow path in Read() to have to handle reading zero bits.
 270       if ((E == BitCodeAbbrevOp::Fixed || E == BitCodeAbbrevOp::VBR) &&
 271           Data == 0) {
 272         Abbv->Add(BitCodeAbbrevOp(0));
 273         continue;
 274       }
 275
 276       if ((E == BitCodeAbbrevOp::Fixed || E == BitCodeAbbrevOp::VBR) &&
 277           Data > MaxChunkSize)
 278         report_fatal_error(
 279             "Fixed or VBR abbrev record with size > MaxChunkData");
 280
 281       Abbv->Add(BitCodeAbbrevOp(E, Data));
 282     } else
 283       Abbv->Add(BitCodeAbbrevOp(E));
 284   }
 285
 286   if (Abbv->getNumOperandInfos() == 0)
 287     report_fatal_error("Abbrev record with no operands");
 288   CurAbbrevs.push_back(Abbv);
 289 }
 290
 291 bool BitstreamCursor::ReadBlockInfoBlock() {
 292   // If this is the second stream to get to the block info block, skip it.
 293   if (BitStream->hasBlockInfoRecords())
 294     return SkipBlock();
 295
 296   if (EnterSubBlock(bitc::BLOCKINFO_BLOCK_ID)) return true;
 297
 298   SmallVector<uint64_t, 64> Record;
 299   BitstreamReader::BlockInfo *CurBlockInfo = nullptr;
 300
 301   // Read all the records for this module.
 302   while (1) {
 303     BitstreamEntry Entry = advanceSkippingSubblocks(AF_DontAutoprocessAbbrevs);
 304
 305     switch (Entry.Kind) {
 306     case llvm::BitstreamEntry::SubBlock: // Handled for us already.
 307     case llvm::BitstreamEntry::Error:
 308       return true;
 309     case llvm::BitstreamEntry::EndBlock:
 310       return false;
 311     case llvm::BitstreamEntry::Record:
 312       // The interesting case.
 313       break;
 314     }
 315
 316     // Read abbrev records, associate them with CurBID.
 317     if (Entry.ID == bitc::DEFINE_ABBREV) {
 318       if (!CurBlockInfo) return true;
 319       ReadAbbrevRecord();
 320
 321       // ReadAbbrevRecord installs the abbrev in CurAbbrevs.  Move it to the
 322       // appropriate BlockInfo.
 323       CurBlockInfo->Abbrevs.push_back(std::move(CurAbbrevs.back()));
 324       CurAbbrevs.pop_back();
 325       continue;
 326     }
 327
 328     // Read a record.
 329     Record.clear();
 330     switch (readRecord(Entry.ID, Record)) {
 331       default: break;  // Default behavior, ignore unknown content.
 332       case bitc::BLOCKINFO_CODE_SETBID:
 333         if (Record.size() < 1) return true;
 334         CurBlockInfo = &BitStream->getOrCreateBlockInfo((unsigned)Record[0]);
 335         break;
 336       case bitc::BLOCKINFO_CODE_BLOCKNAME: {
 337         if (!CurBlockInfo) return true;
 338         if (BitStream->isIgnoringBlockInfoNames()) break;  // Ignore name.
 339         std::string Name;
 340         for (unsigned i = 0, e = Record.size(); i != e; ++i)
 341           Name += (char)Record[i];
 342         CurBlockInfo->Name = Name;
 343         break;
 344       }
 345       case bitc::BLOCKINFO_CODE_SETRECORDNAME: {
 346         if (!CurBlockInfo) return true;
 347         if (BitStream->isIgnoringBlockInfoNames()) break;  // Ignore name.
 348         std::string Name;
 349         for (unsigned i = 1, e = Record.size(); i != e; ++i)
 350           Name += (char)Record[i];
 351         CurBlockInfo->RecordNames.push_back(std::make_pair((unsigned)Record[0],
 352                                                            Name));
 353         break;
 354       }
 355     }
 356   }
 357 }
 358