include/llvm/Support/Allocator.h

   1 //===--- Allocator.h - Simple memory allocation abstraction -----*- 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 /// \file
  10 ///
  11 /// This file defines the MallocAllocator and BumpPtrAllocator interfaces. Both
  12 /// of these conform to an LLVM "Allocator" concept which consists of an
  13 /// Allocate method accepting a size and alignment, and a Deallocate accepting
  14 /// a pointer and size. Further, the LLVM "Allocator" concept has overloads of
  15 /// Allocate and Deallocate for setting size and alignment based on the final
  16 /// type. These overloads are typically provided by a base class template \c
  17 /// AllocatorBase.
  18 ///
  19 //===----------------------------------------------------------------------===//
  20
  21 #ifndef LLVM_SUPPORT_ALLOCATOR_H
  22 #define LLVM_SUPPORT_ALLOCATOR_H
  23
  24 #include "llvm/ADT/SmallVector.h"
  25 #include "llvm/Support/AlignOf.h"
  26 #include "llvm/Support/DataTypes.h"
  27 #include "llvm/Support/MathExtras.h"
  28 #include "llvm/Support/Memory.h"
  29 #include <algorithm>
  30 #include <cassert>
  31 #include <cstddef>
  32 #include <cstdlib>
  33
  34 namespace llvm {
  35
  36 /// \brief CRTP base class providing obvious overloads for the core \c
  37 /// Allocate() methods of LLVM-style allocators.
  38 ///
  39 /// This base class both documents the full public interface exposed by all
  40 /// LLVM-style allocators, and redirects all of the overloads to a single core
  41 /// set of methods which the derived class must define.
  42 template <typename DerivedT> class AllocatorBase {
  43 public:
  44   /// \brief Allocate \a Size bytes of \a Alignment aligned memory. This method
  45   /// must be implemented by \c DerivedT.
  46   void *Allocate(size_t Size, size_t Alignment) {
  47 #ifdef __clang__
  48     static_assert(static_cast<void *(AllocatorBase::*)(size_t, size_t)>(
  49                       &AllocatorBase::Allocate) !=
  50                       static_cast<void *(DerivedT::*)(size_t, size_t)>(
  51                           &DerivedT::Allocate),
  52                   "Class derives from AllocatorBase without implementing the "
  53                   "core Allocate(size_t, size_t) overload!");
  54 #endif
  55     return static_cast<DerivedT *>(this)->Allocate(Size, Alignment);
  56   }
  57
  58   /// \brief Deallocate \a Ptr to \a Size bytes of memory allocated by this
  59   /// allocator.
  60   void Deallocate(const void *Ptr, size_t Size) {
  61 #ifdef __clang__
  62     static_assert(static_cast<void (AllocatorBase::*)(const void *, size_t)>(
  63                       &AllocatorBase::Deallocate) !=
  64                       static_cast<void (DerivedT::*)(const void *, size_t)>(
  65                           &DerivedT::Deallocate),
  66                   "Class derives from AllocatorBase without implementing the "
  67                   "core Deallocate(void *) overload!");
  68 #endif
  69     return static_cast<DerivedT *>(this)->Deallocate(Ptr, Size);
  70   }
  71
  72   // The rest of these methods are helpers that redirect to one of the above
  73   // core methods.
  74
  75   /// \brief Allocate space for a sequence of objects without constructing them.
  76   template <typename T> T *Allocate(size_t Num = 1) {
  77     return static_cast<T *>(Allocate(Num * sizeof(T), AlignOf<T>::Alignment));
  78   }
  79
  80   /// \brief Deallocate space for a sequence of objects without constructing them.
  81   template <typename T>
  82   typename std::enable_if<
  83       !std::is_same<typename std::remove_cv<T>::type, void>::value, void>::type
  84   Deallocate(T *Ptr, size_t Num = 1) {
  85     Deallocate(static_cast<const void *>(Ptr), Num * sizeof(T));
  86   }
  87 };
  88
  89 class MallocAllocator : public AllocatorBase<MallocAllocator> {
  90 public:
  91   void Reset() {}
  92
  93   LLVM_ATTRIBUTE_RETURNS_NONNULL void *Allocate(size_t Size,
  94                                                 size_t /*Alignment*/) {
  95     return malloc(Size);
  96   }
  97
  98   // Pull in base class overloads.
  99   using AllocatorBase<MallocAllocator>::Allocate;
 100
 101   void Deallocate(const void *Ptr, size_t /*Size*/) {
 102     free(const_cast<void *>(Ptr));
 103   }
 104
 105   // Pull in base class overloads.
 106   using AllocatorBase<MallocAllocator>::Deallocate;
 107
 108   void PrintStats() const {}
 109 };
 110
 111 namespace detail {
 112
 113 // We call out to an external function to actually print the message as the
 114 // printing code uses Allocator.h in its implementation.
 115 void printBumpPtrAllocatorStats(unsigned NumSlabs, size_t BytesAllocated,
 116                                 size_t TotalMemory);
 117 } // End namespace detail.
 118
 119 /// \brief Allocate memory in an ever growing pool, as if by bump-pointer.
 120 ///
 121 /// This isn't strictly a bump-pointer allocator as it uses backing slabs of
 122 /// memory rather than relying on a boundless contiguous heap. However, it has
 123 /// bump-pointer semantics in that it is a monotonically growing pool of memory
 124 /// where every allocation is found by merely allocating the next N bytes in
 125 /// the slab, or the next N bytes in the next slab.
 126 ///
 127 /// Note that this also has a threshold for forcing allocations above a certain
 128 /// size into their own slab.
 129 ///
 130 /// The BumpPtrAllocatorImpl template defaults to using a MallocAllocator
 131 /// object, which wraps malloc, to allocate memory, but it can be changed to
 132 /// use a custom allocator.
 133 template <typename AllocatorT = MallocAllocator, size_t SlabSize = 4096,
 134           size_t SizeThreshold = SlabSize>
 135 class BumpPtrAllocatorImpl
 136     : public AllocatorBase<
 137           BumpPtrAllocatorImpl<AllocatorT, SlabSize, SizeThreshold>> {
 138 public:
 139   static_assert(SizeThreshold <= SlabSize,
 140                 "The SizeThreshold must be at most the SlabSize to ensure "
 141                 "that objects larger than a slab go into their own memory "
 142                 "allocation.");
 143
 144   BumpPtrAllocatorImpl()
 145       : CurPtr(nullptr), End(nullptr), BytesAllocated(0), Allocator() {}
 146   template <typename T>
 147   BumpPtrAllocatorImpl(T &&Allocator)
 148       : CurPtr(nullptr), End(nullptr), BytesAllocated(0),
 149         Allocator(std::forward<T &&>(Allocator)) {}
 150
 151   // Manually implement a move constructor as we must clear the old allocator's
 152   // slabs as a matter of correctness.
 153   BumpPtrAllocatorImpl(BumpPtrAllocatorImpl &&Old)
 154       : CurPtr(Old.CurPtr), End(Old.End), Slabs(std::move(Old.Slabs)),
 155         CustomSizedSlabs(std::move(Old.CustomSizedSlabs)),
 156         BytesAllocated(Old.BytesAllocated),
 157         Allocator(std::move(Old.Allocator)) {
 158     Old.CurPtr = Old.End = nullptr;
 159     Old.BytesAllocated = 0;
 160     Old.Slabs.clear();
 161     Old.CustomSizedSlabs.clear();
 162   }
 163
 164   ~BumpPtrAllocatorImpl() {
 165     DeallocateSlabs(Slabs.begin(), Slabs.end());
 166     DeallocateCustomSizedSlabs();
 167   }
 168
 169   BumpPtrAllocatorImpl &operator=(BumpPtrAllocatorImpl &&RHS) {
 170     DeallocateSlabs(Slabs.begin(), Slabs.end());
 171     DeallocateCustomSizedSlabs();
 172
 173     CurPtr = RHS.CurPtr;
 174     End = RHS.End;
 175     BytesAllocated = RHS.BytesAllocated;
 176     Slabs = std::move(RHS.Slabs);
 177     CustomSizedSlabs = std::move(RHS.CustomSizedSlabs);
 178     Allocator = std::move(RHS.Allocator);
 179
 180     RHS.CurPtr = RHS.End = nullptr;
 181     RHS.BytesAllocated = 0;
 182     RHS.Slabs.clear();
 183     RHS.CustomSizedSlabs.clear();
 184     return *this;
 185   }
 186
 187   /// \brief Deallocate all but the current slab and reset the current pointer
 188   /// to the beginning of it, freeing all memory allocated so far.
 189   void Reset() {
 190     // Deallocate all but the first slab, and deallocate all custom-sized slabs.
 191     DeallocateCustomSizedSlabs();
 192     CustomSizedSlabs.clear();
 193
 194     if (Slabs.empty())
 195       return;
 196
 197     // Reset the state.
 198     BytesAllocated = 0;
 199     CurPtr = (char *)Slabs.front();
 200     End = CurPtr + SlabSize;
 201
 202     __asan_poison_memory_region(*Slabs.begin(), computeSlabSize(0));
 203     DeallocateSlabs(std::next(Slabs.begin()), Slabs.end());
 204     Slabs.erase(std::next(Slabs.begin()), Slabs.end());
 205   }
 206
 207   /// \brief Allocate space at the specified alignment.
 208   LLVM_ATTRIBUTE_RETURNS_NONNULL LLVM_ATTRIBUTE_RETURNS_NOALIAS void *
 209   Allocate(size_t Size, size_t Alignment) {
 210     assert(Alignment > 0 && "0-byte alignnment is not allowed. Use 1 instead.");
 211
 212     // Keep track of how many bytes we've allocated.
 213     BytesAllocated += Size;
 214
 215     size_t Adjustment = alignmentAdjustment(CurPtr, Alignment);
 216     assert(Adjustment + Size >= Size && "Adjustment + Size must not overflow");
 217
 218     // Check if we have enough space.
 219     if (Adjustment + Size <= size_t(End - CurPtr)) {
 220       char *AlignedPtr = CurPtr + Adjustment;
 221       CurPtr = AlignedPtr + Size;
 222       // Update the allocation point of this memory block in MemorySanitizer.
 223       // Without this, MemorySanitizer messages for values originated from here
 224       // will point to the allocation of the entire slab.
 225       __msan_allocated_memory(AlignedPtr, Size);
 226       // Similarly, tell ASan about this space.
 227       __asan_unpoison_memory_region(AlignedPtr, Size);
 228       return AlignedPtr;
 229     }
 230
 231     // If Size is really big, allocate a separate slab for it.
 232     size_t PaddedSize = Size + Alignment - 1;
 233     if (PaddedSize > SizeThreshold) {
 234       void *NewSlab = Allocator.Allocate(PaddedSize, 0);
 235       // We own the new slab and don't want anyone reading anyting other than
 236       // pieces returned from this method.  So poison the whole slab.
 237       __asan_poison_memory_region(NewSlab, PaddedSize);
 238       CustomSizedSlabs.push_back(std::make_pair(NewSlab, PaddedSize));
 239
 240       uintptr_t AlignedAddr = alignAddr(NewSlab, Alignment);
 241       assert(AlignedAddr + Size <= (uintptr_t)NewSlab + PaddedSize);
 242       char *AlignedPtr = (char*)AlignedAddr;
 243       __msan_allocated_memory(AlignedPtr, Size);
 244       __asan_unpoison_memory_region(AlignedPtr, Size);
 245       return AlignedPtr;
 246     }
 247
 248     // Otherwise, start a new slab and try again.
 249     StartNewSlab();
 250     uintptr_t AlignedAddr = alignAddr(CurPtr, Alignment);
 251     assert(AlignedAddr + Size <= (uintptr_t)End &&
 252            "Unable to allocate memory!");
 253     char *AlignedPtr = (char*)AlignedAddr;
 254     CurPtr = AlignedPtr + Size;
 255     __msan_allocated_memory(AlignedPtr, Size);
 256     __asan_unpoison_memory_region(AlignedPtr, Size);
 257     return AlignedPtr;
 258   }
 259
 260   // Pull in base class overloads.
 261   using AllocatorBase<BumpPtrAllocatorImpl>::Allocate;
 262
 263   void Deallocate(const void *Ptr, size_t Size) {
 264     __asan_poison_memory_region(Ptr, Size);
 265   }
 266
 267   // Pull in base class overloads.
 268   using AllocatorBase<BumpPtrAllocatorImpl>::Deallocate;
 269
 270   size_t GetNumSlabs() const { return Slabs.size() + CustomSizedSlabs.size(); }
 271
 272   size_t getTotalMemory() const {
 273     size_t TotalMemory = 0;
 274     for (auto I = Slabs.begin(), E = Slabs.end(); I != E; ++I)
 275       TotalMemory += computeSlabSize(std::distance(Slabs.begin(), I));
 276     for (auto &PtrAndSize : CustomSizedSlabs)
 277       TotalMemory += PtrAndSize.second;
 278     return TotalMemory;
 279   }
 280
 281   void PrintStats() const {
 282     detail::printBumpPtrAllocatorStats(Slabs.size(), BytesAllocated,
 283                                        getTotalMemory());
 284   }
 285
 286 private:
 287   /// \brief The current pointer into the current slab.
 288   ///
 289   /// This points to the next free byte in the slab.
 290   char *CurPtr;
 291
 292   /// \brief The end of the current slab.
 293   char *End;
 294
 295   /// \brief The slabs allocated so far.
 296   SmallVector<void *, 4> Slabs;
 297
 298   /// \brief Custom-sized slabs allocated for too-large allocation requests.
 299   SmallVector<std::pair<void *, size_t>, 0> CustomSizedSlabs;
 300
 301   /// \brief How many bytes we've allocated.
 302   ///
 303   /// Used so that we can compute how much space was wasted.
 304   size_t BytesAllocated;
 305
 306   /// \brief The allocator instance we use to get slabs of memory.
 307   AllocatorT Allocator;
 308
 309   static size_t computeSlabSize(unsigned SlabIdx) {
 310     // Scale the actual allocated slab size based on the number of slabs
 311     // allocated. Every 128 slabs allocated, we double the allocated size to
 312     // reduce allocation frequency, but saturate at multiplying the slab size by
 313     // 2^30.
 314     return SlabSize * ((size_t)1 << std::min<size_t>(30, SlabIdx / 128));
 315   }
 316
 317   /// \brief Allocate a new slab and move the bump pointers over into the new
 318   /// slab, modifying CurPtr and End.
 319   void StartNewSlab() {
 320     size_t AllocatedSlabSize = computeSlabSize(Slabs.size());
 321
 322     void *NewSlab = Allocator.Allocate(AllocatedSlabSize, 0);
 323     // We own the new slab and don't want anyone reading anything other than
 324     // pieces returned from this method.  So poison the whole slab.
 325     __asan_poison_memory_region(NewSlab, AllocatedSlabSize);
 326
 327     Slabs.push_back(NewSlab);
 328     CurPtr = (char *)(NewSlab);
 329     End = ((char *)NewSlab) + AllocatedSlabSize;
 330   }
 331
 332   /// \brief Deallocate a sequence of slabs.
 333   void DeallocateSlabs(SmallVectorImpl<void *>::iterator I,
 334                        SmallVectorImpl<void *>::iterator E) {
 335     for (; I != E; ++I) {
 336       size_t AllocatedSlabSize =
 337           computeSlabSize(std::distance(Slabs.begin(), I));
 338       Allocator.Deallocate(*I, AllocatedSlabSize);
 339     }
 340   }
 341
 342   /// \brief Deallocate all memory for custom sized slabs.
 343   void DeallocateCustomSizedSlabs() {
 344     for (auto &PtrAndSize : CustomSizedSlabs) {
 345       void *Ptr = PtrAndSize.first;
 346       size_t Size = PtrAndSize.second;
 347       Allocator.Deallocate(Ptr, Size);
 348     }
 349   }
 350
 351   template <typename T> friend class SpecificBumpPtrAllocator;
 352 };
 353
 354 /// \brief The standard BumpPtrAllocator which just uses the default template
 355 /// paramaters.
 356 typedef BumpPtrAllocatorImpl<> BumpPtrAllocator;
 357
 358 /// \brief A BumpPtrAllocator that allows only elements of a specific type to be
 359 /// allocated.
 360 ///
 361 /// This allows calling the destructor in DestroyAll() and when the allocator is
 362 /// destroyed.
 363 template <typename T> class SpecificBumpPtrAllocator {
 364   BumpPtrAllocator Allocator;
 365
 366 public:
 367   SpecificBumpPtrAllocator() : Allocator() {}
 368   SpecificBumpPtrAllocator(SpecificBumpPtrAllocator &&Old)
 369       : Allocator(std::move(Old.Allocator)) {}
 370   ~SpecificBumpPtrAllocator() { DestroyAll(); }
 371
 372   SpecificBumpPtrAllocator &operator=(SpecificBumpPtrAllocator &&RHS) {
 373     Allocator = std::move(RHS.Allocator);
 374     return *this;
 375   }
 376
 377   /// Call the destructor of each allocated object and deallocate all but the
 378   /// current slab and reset the current pointer to the beginning of it, freeing
 379   /// all memory allocated so far.
 380   void DestroyAll() {
 381     auto DestroyElements = [](char *Begin, char *End) {
 382       assert(Begin == (char*)alignAddr(Begin, alignOf<T>()));
 383       for (char *Ptr = Begin; Ptr + sizeof(T) <= End; Ptr += sizeof(T))
 384         reinterpret_cast<T *>(Ptr)->~T();
 385     };
 386
 387     for (auto I = Allocator.Slabs.begin(), E = Allocator.Slabs.end(); I != E;
 388          ++I) {
 389       size_t AllocatedSlabSize = BumpPtrAllocator::computeSlabSize(
 390           std::distance(Allocator.Slabs.begin(), I));
 391       char *Begin = (char*)alignAddr(*I, alignOf<T>());
 392       char *End = *I == Allocator.Slabs.back() ? Allocator.CurPtr
 393                                                : (char *)*I + AllocatedSlabSize;
 394
 395       DestroyElements(Begin, End);
 396     }
 397
 398     for (auto &PtrAndSize : Allocator.CustomSizedSlabs) {
 399       void *Ptr = PtrAndSize.first;
 400       size_t Size = PtrAndSize.second;
 401       DestroyElements((char*)alignAddr(Ptr, alignOf<T>()), (char *)Ptr + Size);
 402     }
 403
 404     Allocator.Reset();
 405   }
 406
 407   /// \brief Allocate space for an array of objects without constructing them.
 408   T *Allocate(size_t num = 1) { return Allocator.Allocate<T>(num); }
 409 };
 410
 411 }  // end namespace llvm
 412
 413 template <typename AllocatorT, size_t SlabSize, size_t SizeThreshold>
 414 void *operator new(size_t Size,
 415                    llvm::BumpPtrAllocatorImpl<AllocatorT, SlabSize,
 416                                               SizeThreshold> &Allocator) {
 417   struct S {
 418     char c;
 419     union {
 420       double D;
 421       long double LD;
 422       long long L;
 423       void *P;
 424     } x;
 425   };
 426   return Allocator.Allocate(
 427       Size, std::min((size_t)llvm::NextPowerOf2(Size), offsetof(S, x)));
 428 }
 429
 430 template <typename AllocatorT, size_t SlabSize, size_t SizeThreshold>
 431 void operator delete(
 432     void *, llvm::BumpPtrAllocatorImpl<AllocatorT, SlabSize, SizeThreshold> &) {
 433 }
 434
 435 #endif // LLVM_SUPPORT_ALLOCATOR_H