lib/ProfileData/InstrProf.cpp

   1 //=-- InstrProf.cpp - Instrumented profiling format support -----------------=//
   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 file contains support for clang's instrumentation based PGO and
  11 // coverage.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "llvm/IR/Constants.h"
  16 #include "llvm/IR/Function.h"
  17 #include "llvm/IR/Module.h"
  18 #include "llvm/IR/GlobalVariable.h"
  19 #include "llvm/ProfileData/InstrProf.h"
  20 #include "llvm/Support/ErrorHandling.h"
  21 #include "llvm/Support/ManagedStatic.h"
  22
  23 using namespace llvm;
  24
  25 namespace {
  26 class InstrProfErrorCategoryType : public std::error_category {
  27   const char *name() const LLVM_NOEXCEPT override { return "llvm.instrprof"; }
  28   std::string message(int IE) const override {
  29     instrprof_error E = static_cast<instrprof_error>(IE);
  30     switch (E) {
  31     case instrprof_error::success:
  32       return "Success";
  33     case instrprof_error::eof:
  34       return "End of File";
  35     case instrprof_error::unrecognized_format:
  36       return "Unrecognized instrumentation profile encoding format";
  37     case instrprof_error::bad_magic:
  38       return "Invalid instrumentation profile data (bad magic)";
  39     case instrprof_error::bad_header:
  40       return "Invalid instrumentation profile data (file header is corrupt)";
  41     case instrprof_error::unsupported_version:
  42       return "Unsupported instrumentation profile format version";
  43     case instrprof_error::unsupported_hash_type:
  44       return "Unsupported instrumentation profile hash type";
  45     case instrprof_error::too_large:
  46       return "Too much profile data";
  47     case instrprof_error::truncated:
  48       return "Truncated profile data";
  49     case instrprof_error::malformed:
  50       return "Malformed instrumentation profile data";
  51     case instrprof_error::unknown_function:
  52       return "No profile data available for function";
  53     case instrprof_error::hash_mismatch:
  54       return "Function control flow change detected (hash mismatch)";
  55     case instrprof_error::count_mismatch:
  56       return "Function basic block count change detected (counter mismatch)";
  57     case instrprof_error::counter_overflow:
  58       return "Counter overflow";
  59     case instrprof_error::value_site_count_mismatch:
  60       return "Function value site count change detected (counter mismatch)";
  61     }
  62     llvm_unreachable("A value of instrprof_error has no message.");
  63   }
  64 };
  65 }
  66
  67 static ManagedStatic<InstrProfErrorCategoryType> ErrorCategory;
  68
  69 const std::error_category &llvm::instrprof_category() {
  70   return *ErrorCategory;
  71 }
  72
  73 namespace llvm {
  74
  75 std::string getPGOFuncName(StringRef RawFuncName,
  76                            GlobalValue::LinkageTypes Linkage,
  77                            StringRef FileName) {
  78
  79   // Function names may be prefixed with a binary '1' to indicate
  80   // that the backend should not modify the symbols due to any platform
  81   // naming convention. Do not include that '1' in the PGO profile name.
  82   if (RawFuncName[0] == '\1')
  83     RawFuncName = RawFuncName.substr(1);
  84
  85   std::string FuncName = RawFuncName;
  86   if (llvm::GlobalValue::isLocalLinkage(Linkage)) {
  87     // For local symbols, prepend the main file name to distinguish them.
  88     // Do not include the full path in the file name since there's no guarantee
  89     // that it will stay the same, e.g., if the files are checked out from
  90     // version control in different locations.
  91     if (FileName.empty())
  92       FuncName = FuncName.insert(0, "<unknown>:");
  93     else
  94       FuncName = FuncName.insert(0, FileName.str() + ":");
  95   }
  96   return FuncName;
  97 }
  98
  99 std::string getPGOFuncName(const Function &F) {
 100   return getPGOFuncName(F.getName(), F.getLinkage(), F.getParent()->getName());
 101 }
 102
 103 GlobalVariable *createPGOFuncNameVar(Module &M,
 104                                      GlobalValue::LinkageTypes Linkage,
 105                                      StringRef FuncName) {
 106
 107   // We generally want to match the function's linkage, but available_externally
 108   // and extern_weak both have the wrong semantics, and anything that doesn't
 109   // need to link across compilation units doesn't need to be visible at all.
 110   if (Linkage == GlobalValue::ExternalWeakLinkage)
 111     Linkage = GlobalValue::LinkOnceAnyLinkage;
 112   else if (Linkage == GlobalValue::AvailableExternallyLinkage)
 113     Linkage = GlobalValue::LinkOnceODRLinkage;
 114   else if (Linkage == GlobalValue::InternalLinkage ||
 115            Linkage == GlobalValue::ExternalLinkage)
 116     Linkage = GlobalValue::PrivateLinkage;
 117
 118   auto *Value = ConstantDataArray::getString(M.getContext(), FuncName, false);
 119   auto FuncNameVar =
 120       new GlobalVariable(M, Value->getType(), true, Linkage, Value,
 121                          Twine(getInstrProfNameVarPrefix()) + FuncName);
 122
 123   // Hide the symbol so that we correctly get a copy for each executable.
 124   if (!GlobalValue::isLocalLinkage(FuncNameVar->getLinkage()))
 125     FuncNameVar->setVisibility(GlobalValue::HiddenVisibility);
 126
 127   return FuncNameVar;
 128 }
 129
 130 GlobalVariable *createPGOFuncNameVar(Function &F, StringRef FuncName) {
 131   return createPGOFuncNameVar(*F.getParent(), F.getLinkage(), FuncName);
 132 }
 133
 134 uint32_t ValueProfRecord::getHeaderSize(uint32_t NumValueSites) {
 135   uint32_t Size = offsetof(ValueProfRecord, SiteCountArray) +
 136                   sizeof(uint8_t) * NumValueSites;
 137   // Round the size to multiple of 8 bytes.
 138   Size = (Size + 7) & ~7;
 139   return Size;
 140 }
 141
 142 uint32_t ValueProfRecord::getSize(uint32_t NumValueSites,
 143                                   uint32_t NumValueData) {
 144   return getHeaderSize(NumValueSites) +
 145          sizeof(InstrProfValueData) * NumValueData;
 146 }
 147
 148 void ValueProfRecord::deserializeTo(InstrProfRecord &Record,
 149                                     InstrProfRecord::ValueMapType *VMap) {
 150   Record.reserveSites(Kind, NumValueSites);
 151
 152   InstrProfValueData *ValueData = this->getValueData();
 153   for (uint64_t VSite = 0; VSite < NumValueSites; ++VSite) {
 154     uint8_t ValueDataCount = this->SiteCountArray[VSite];
 155     Record.addValueData(Kind, VSite, ValueData, ValueDataCount, VMap);
 156     ValueData += ValueDataCount;
 157   }
 158 }
 159
 160 void ValueProfRecord::serializeFrom(const InstrProfRecord &Record,
 161                                     uint32_t ValueKind,
 162                                     uint32_t NumValueSites) {
 163   Kind = ValueKind;
 164   this->NumValueSites = NumValueSites;
 165   InstrProfValueData *DstVD = getValueData();
 166   for (uint32_t S = 0; S < NumValueSites; S++) {
 167     uint32_t ND = Record.getNumValueDataForSite(ValueKind, S);
 168     SiteCountArray[S] = ND;
 169     Record.getValueForSite(DstVD, ValueKind, S);
 170     for (uint32_t I = 0; I < ND; I++) {
 171       switch (ValueKind) {
 172       case IPVK_IndirectCallTarget:
 173         DstVD[I].Value = IndexedInstrProf::ComputeHash(
 174             IndexedInstrProf::HashType, (const char *)DstVD[I].Value);
 175         break;
 176       default:
 177         llvm_unreachable("value kind not handled !");
 178       }
 179     }
 180     DstVD += ND;
 181   }
 182 }
 183
 184 template <class T>
 185 static T swapToHostOrder(const unsigned char *&D, support::endianness Orig) {
 186   using namespace support;
 187   if (Orig == little)
 188     return endian::readNext<T, little, unaligned>(D);
 189   else
 190     return endian::readNext<T, big, unaligned>(D);
 191 }
 192
 193 // For writing/serializing,  Old is the host endianness, and  New is
 194 // byte order intended on disk. For Reading/deserialization, Old
 195 // is the on-disk source endianness, and New is the host endianness.
 196 void ValueProfRecord::swapBytes(support::endianness Old,
 197                                 support::endianness New) {
 198   using namespace support;
 199   if (Old == New)
 200     return;
 201
 202   if (getHostEndianness() != Old) {
 203     sys::swapByteOrder<uint32_t>(NumValueSites);
 204     sys::swapByteOrder<uint32_t>(Kind);
 205   }
 206   uint32_t ND = getNumValueData();
 207   InstrProfValueData *VD = getValueData();
 208
 209   // No need to swap byte array: SiteCountArrray.
 210   for (uint32_t I = 0; I < ND; I++) {
 211     sys::swapByteOrder<uint64_t>(VD[I].Value);
 212     sys::swapByteOrder<uint64_t>(VD[I].Count);
 213   }
 214   if (getHostEndianness() == Old) {
 215     sys::swapByteOrder<uint32_t>(NumValueSites);
 216     sys::swapByteOrder<uint32_t>(Kind);
 217   }
 218 }
 219
 220 uint32_t ValueProfData::getSize(const InstrProfRecord &Record) {
 221   uint32_t TotalSize = sizeof(ValueProfData);
 222   uint32_t NumValueKinds = Record.getNumValueKinds();
 223   if (NumValueKinds == 0)
 224     return TotalSize;
 225
 226   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; Kind++) {
 227     uint32_t NumValueSites = Record.getNumValueSites(Kind);
 228     if (!NumValueSites)
 229       continue;
 230     TotalSize +=
 231         ValueProfRecord::getSize(NumValueSites, Record.getNumValueData(Kind));
 232   }
 233   return TotalSize;
 234 }
 235
 236 void ValueProfData::deserializeTo(InstrProfRecord &Record,
 237                                   InstrProfRecord::ValueMapType *VMap) {
 238   if (NumValueKinds == 0)
 239     return;
 240
 241   ValueProfRecord *VR = getFirstValueProfRecord();
 242   for (uint32_t K = 0; K < NumValueKinds; K++) {
 243     VR->deserializeTo(Record, VMap);
 244     VR = VR->getNext();
 245   }
 246 }
 247
 248 static std::unique_ptr<ValueProfData> AllocValueProfData(uint32_t TotalSize) {
 249   return std::unique_ptr<ValueProfData>(new (::operator new(TotalSize))
 250                                             ValueProfData());
 251 }
 252
 253 std::unique_ptr<ValueProfData>
 254 ValueProfData::serializeFrom(const InstrProfRecord &Record) {
 255   uint32_t TotalSize = getSize(Record);
 256
 257   std::unique_ptr<ValueProfData> VPD = AllocValueProfData(TotalSize);
 258
 259   VPD->TotalSize = TotalSize;
 260   VPD->NumValueKinds = Record.getNumValueKinds();
 261   ValueProfRecord *VR = VPD->getFirstValueProfRecord();
 262   for (uint32_t Kind = IPVK_First; Kind <= IPVK_Last; Kind++) {
 263     uint32_t NumValueSites = Record.getNumValueSites(Kind);
 264     if (!NumValueSites)
 265       continue;
 266     VR->serializeFrom(Record, Kind, NumValueSites);
 267     VR = VR->getNext();
 268   }
 269   return VPD;
 270 }
 271
 272 ErrorOr<std::unique_ptr<ValueProfData>>
 273 ValueProfData::getValueProfData(const unsigned char *D,
 274                                 const unsigned char *const BufferEnd,
 275                                 support::endianness Endianness) {
 276   using namespace support;
 277   if (D + sizeof(ValueProfData) > BufferEnd)
 278     return instrprof_error::truncated;
 279
 280   const unsigned char *Header = D;
 281   uint32_t TotalSize = swapToHostOrder<uint32_t>(Header, Endianness);
 282   uint32_t NumValueKinds = swapToHostOrder<uint32_t>(Header, Endianness);
 283
 284   if (D + TotalSize > BufferEnd)
 285     return instrprof_error::too_large;
 286   if (NumValueKinds > IPVK_Last + 1)
 287     return instrprof_error::malformed;
 288   // Total size needs to be mulltiple of quadword size.
 289   if (TotalSize % sizeof(uint64_t))
 290     return instrprof_error::malformed;
 291
 292   std::unique_ptr<ValueProfData> VPD = AllocValueProfData(TotalSize);
 293
 294   memcpy(VPD.get(), D, TotalSize);
 295   // Byte swap.
 296   VPD->swapBytesToHost(Endianness);
 297
 298   // Data integrety check:
 299   ValueProfRecord *VR = VPD->getFirstValueProfRecord();
 300   for (uint32_t K = 0; K < VPD->NumValueKinds; K++) {
 301     if (VR->Kind > IPVK_Last)
 302       return instrprof_error::malformed;
 303     VR = VR->getNext();
 304     if ((char *)VR - (char *)VPD.get() > (ptrdiff_t)TotalSize)
 305       return instrprof_error::malformed;
 306   }
 307
 308   return std::move(VPD);
 309 }
 310
 311 void ValueProfData::swapBytesToHost(support::endianness Endianness) {
 312   using namespace support;
 313   if (Endianness == getHostEndianness())
 314     return;
 315
 316   sys::swapByteOrder<uint32_t>(TotalSize);
 317   sys::swapByteOrder<uint32_t>(NumValueKinds);
 318
 319   ValueProfRecord *VR = getFirstValueProfRecord();
 320   for (uint32_t K = 0; K < NumValueKinds; K++) {
 321     VR->swapBytes(Endianness, getHostEndianness());
 322     VR = VR->getNext();
 323   }
 324 }
 325
 326 void ValueProfData::swapBytesFromHost(support::endianness Endianness) {
 327   using namespace support;
 328   if (Endianness == getHostEndianness())
 329     return;
 330
 331   ValueProfRecord *VR = getFirstValueProfRecord();
 332   for (uint32_t K = 0; K < NumValueKinds; K++) {
 333     ValueProfRecord *NVR = VR->getNext();
 334     VR->swapBytes(getHostEndianness(), Endianness);
 335     VR = NVR;
 336   }
 337   sys::swapByteOrder<uint32_t>(TotalSize);
 338   sys::swapByteOrder<uint32_t>(NumValueKinds);
 339 }
 340
 341 ValueProfRecord *ValueProfData::getFirstValueProfRecord() {
 342   return reinterpret_cast<ValueProfRecord *>((char *)this +
 343                                              sizeof(ValueProfData));
 344 }
 345
 346 uint32_t ValueProfRecord::getNumValueData() const {
 347   uint32_t NumValueData = 0;
 348   for (uint32_t I = 0; I < NumValueSites; I++)
 349     NumValueData += SiteCountArray[I];
 350   return NumValueData;
 351 }
 352
 353 ValueProfRecord *ValueProfRecord::getNext() {
 354   return reinterpret_cast<ValueProfRecord *>((char *)this + getSize());
 355 }
 356
 357 InstrProfValueData *ValueProfRecord::getValueData() {
 358   return reinterpret_cast<InstrProfValueData *>((char *)this +
 359                                                 getHeaderSize(NumValueSites));
 360 }
 361 }