folly/detail/ThreadLocalDetail.h

   1 /*
   2  * Copyright 2013 Facebook, Inc.
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at
   7  *
   8  *   http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 #ifndef FOLLY_DETAIL_THREADLOCALDETAIL_H_
  18 #define FOLLY_DETAIL_THREADLOCALDETAIL_H_
  19
  20 #include <limits.h>
  21 #include <pthread.h>
  22
  23 #include <mutex>
  24 #include <string>
  25 #include <vector>
  26
  27 #include <glog/logging.h>
  28
  29 #include "folly/Foreach.h"
  30 #include "folly/Exception.h"
  31 #include "folly/Malloc.h"
  32
  33 namespace folly {
  34 namespace threadlocal_detail {
  35
  36 /**
  37  * Base class for deleters.
  38  */
  39 class DeleterBase {
  40  public:
  41   virtual ~DeleterBase() { }
  42   virtual void dispose(void* ptr, TLPDestructionMode mode) const = 0;
  43 };
  44
  45 /**
  46  * Simple deleter class that calls delete on the passed-in pointer.
  47  */
  48 template <class Ptr>
  49 class SimpleDeleter : public DeleterBase {
  50  public:
  51   virtual void dispose(void* ptr, TLPDestructionMode mode) const {
  52     delete static_cast<Ptr>(ptr);
  53   }
  54 };
  55
  56 /**
  57  * Custom deleter that calls a given callable.
  58  */
  59 template <class Ptr, class Deleter>
  60 class CustomDeleter : public DeleterBase {
  61  public:
  62   explicit CustomDeleter(Deleter d) : deleter_(d) { }
  63   virtual void dispose(void* ptr, TLPDestructionMode mode) const {
  64     deleter_(static_cast<Ptr>(ptr), mode);
  65   }
  66  private:
  67   Deleter deleter_;
  68 };
  69
  70
  71 /**
  72  * POD wrapper around an element (a void*) and an associated deleter.
  73  * This must be POD, as we memset() it to 0 and memcpy() it around.
  74  */
  75 struct ElementWrapper {
  76   void dispose(TLPDestructionMode mode) {
  77     if (ptr != NULL) {
  78       DCHECK(deleter != NULL);
  79       deleter->dispose(ptr, mode);
  80       if (ownsDeleter) {
  81         delete deleter;
  82       }
  83       ptr = NULL;
  84       deleter = NULL;
  85       ownsDeleter = false;
  86     }
  87   }
  88
  89   template <class Ptr>
  90   void set(Ptr p) {
  91     DCHECK(ptr == NULL);
  92     DCHECK(deleter == NULL);
  93
  94     if (p) {
  95       // We leak a single object here but that is ok.  If we used an
  96       // object directly, there is a chance that the destructor will be
  97       // called on that static object before any of the ElementWrappers
  98       // are disposed and that isn't so nice.
  99       static auto d = new SimpleDeleter<Ptr>();
 100       ptr = p;
 101       deleter = d;
 102       ownsDeleter = false;
 103     }
 104   }
 105
 106   template <class Ptr, class Deleter>
 107   void set(Ptr p, Deleter d) {
 108     DCHECK(ptr == NULL);
 109     DCHECK(deleter == NULL);
 110     if (p) {
 111       ptr = p;
 112       deleter = new CustomDeleter<Ptr,Deleter>(d);
 113       ownsDeleter = true;
 114     }
 115   }
 116
 117   void* ptr;
 118   DeleterBase* deleter;
 119   bool ownsDeleter;
 120 };
 121
 122 /**
 123  * Per-thread entry.  Each thread using a StaticMeta object has one.
 124  * This is written from the owning thread only (under the lock), read
 125  * from the owning thread (no lock necessary), and read from other threads
 126  * (under the lock).
 127  */
 128 struct ThreadEntry {
 129   ElementWrapper* elements;
 130   size_t elementsCapacity;
 131   ThreadEntry* next;
 132   ThreadEntry* prev;
 133 };
 134
 135 // Held in a singleton to track our global instances.
 136 // We have one of these per "Tag", by default one for the whole system
 137 // (Tag=void).
 138 //
 139 // Creating and destroying ThreadLocalPtr objects, as well as thread exit
 140 // for threads that use ThreadLocalPtr objects collide on a lock inside
 141 // StaticMeta; you can specify multiple Tag types to break that lock.
 142 template <class Tag>
 143 struct StaticMeta {
 144   static StaticMeta<Tag>& instance() {
 145     // Leak it on exit, there's only one per process and we don't have to
 146     // worry about synchronization with exiting threads.
 147     static bool constructed = (inst_ = new StaticMeta<Tag>());
 148     (void)constructed; // suppress unused warning
 149     return *inst_;
 150   }
 151
 152   int nextId_;
 153   std::vector<int> freeIds_;
 154   std::mutex lock_;
 155   pthread_key_t pthreadKey_;
 156   ThreadEntry head_;
 157
 158   void push_back(ThreadEntry* t) {
 159     t->next = &head_;
 160     t->prev = head_.prev;
 161     head_.prev->next = t;
 162     head_.prev = t;
 163   }
 164
 165   void erase(ThreadEntry* t) {
 166     t->next->prev = t->prev;
 167     t->prev->next = t->next;
 168     t->next = t->prev = t;
 169   }
 170
 171 #if !__APPLE__
 172   static __thread ThreadEntry threadEntry_;
 173 #endif
 174   static StaticMeta<Tag>* inst_;
 175
 176   StaticMeta() : nextId_(1) {
 177     head_.next = head_.prev = &head_;
 178     int ret = pthread_key_create(&pthreadKey_, &onThreadExit);
 179     checkPosixError(ret, "pthread_key_create failed");
 180
 181     ret = pthread_atfork(/*prepare*/ &StaticMeta::preFork,
 182                          /*parent*/ &StaticMeta::onForkParent,
 183                          /*child*/ &StaticMeta::onForkChild);
 184     checkPosixError(ret, "pthread_atfork failed");
 185   }
 186   ~StaticMeta() {
 187     LOG(FATAL) << "StaticMeta lives forever!";
 188   }
 189
 190   static ThreadEntry* getThreadEntry() {
 191 #if !__APPLE__
 192     return &threadEntry_;
 193 #else
 194     ThreadEntry* threadEntry =
 195         static_cast<ThreadEntry*>(pthread_getspecific(inst_->pthreadKey_));
 196     if (!threadEntry) {
 197         threadEntry = new ThreadEntry();
 198         int ret = pthread_setspecific(inst_->pthreadKey_, threadEntry);
 199         checkPosixError(ret, "pthread_setspecific failed");
 200     }
 201     return threadEntry;
 202 #endif
 203   }
 204
 205   static void preFork(void) {
 206     instance().lock_.lock();  // Make sure it's created
 207   }
 208
 209   static void onForkParent(void) {
 210     inst_->lock_.unlock();
 211   }
 212
 213   static void onForkChild(void) {
 214     // only the current thread survives
 215     inst_->head_.next = inst_->head_.prev = &inst_->head_;
 216     inst_->push_back(getThreadEntry());
 217     inst_->lock_.unlock();
 218   }
 219
 220   static void onThreadExit(void* ptr) {
 221     auto & meta = instance();
 222 #if !__APPLE__
 223     ThreadEntry* threadEntry = getThreadEntry();
 224
 225     DCHECK_EQ(ptr, &meta);
 226     DCHECK_GT(threadEntry->elementsCapacity, 0);
 227 #else
 228     ThreadEntry* threadEntry = static_cast<ThreadEntry*>(ptr);
 229 #endif
 230     {
 231       std::lock_guard<std::mutex> g(meta.lock_);
 232       meta.erase(threadEntry);
 233       // No need to hold the lock any longer; the ThreadEntry is private to this
 234       // thread now that it's been removed from meta.
 235     }
 236     FOR_EACH_RANGE(i, 0, threadEntry->elementsCapacity) {
 237       threadEntry->elements[i].dispose(TLPDestructionMode::THIS_THREAD);
 238     }
 239     free(threadEntry->elements);
 240     threadEntry->elements = NULL;
 241     pthread_setspecific(meta.pthreadKey_, NULL);
 242
 243 #if __APPLE__
 244     // Allocated in getThreadEntry(); free it
 245     delete threadEntry;
 246 #endif
 247   }
 248
 249   static int create() {
 250     int id;
 251     auto & meta = instance();
 252     std::lock_guard<std::mutex> g(meta.lock_);
 253     if (!meta.freeIds_.empty()) {
 254       id = meta.freeIds_.back();
 255       meta.freeIds_.pop_back();
 256     } else {
 257       id = meta.nextId_++;
 258     }
 259     return id;
 260   }
 261
 262   static void destroy(int id) {
 263     try {
 264       auto & meta = instance();
 265       // Elements in other threads that use this id.
 266       std::vector<ElementWrapper> elements;
 267       {
 268         std::lock_guard<std::mutex> g(meta.lock_);
 269         for (ThreadEntry* e = meta.head_.next; e != &meta.head_; e = e->next) {
 270           if (id < e->elementsCapacity && e->elements[id].ptr) {
 271             elements.push_back(e->elements[id]);
 272
 273             /*
 274              * Writing another thread's ThreadEntry from here is fine;
 275              * the only other potential reader is the owning thread --
 276              * from onThreadExit (which grabs the lock, so is properly
 277              * synchronized with us) or from get(), which also grabs
 278              * the lock if it needs to resize the elements vector.
 279              *
 280              * We can't conflict with reads for a get(id), because
 281              * it's illegal to call get on a thread local that's
 282              * destructing.
 283              */
 284             e->elements[id].ptr = nullptr;
 285             e->elements[id].deleter = nullptr;
 286             e->elements[id].ownsDeleter = false;
 287           }
 288         }
 289         meta.freeIds_.push_back(id);
 290       }
 291       // Delete elements outside the lock
 292       FOR_EACH(it, elements) {
 293         it->dispose(TLPDestructionMode::ALL_THREADS);
 294       }
 295     } catch (...) { // Just in case we get a lock error or something anyway...
 296       LOG(WARNING) << "Destructor discarding an exception that was thrown.";
 297     }
 298   }
 299
 300   /**
 301    * Reserve enough space in the ThreadEntry::elements for the item
 302    * @id to fit in.
 303    */
 304   static void reserve(int id) {
 305     auto& meta = instance();
 306     ThreadEntry* threadEntry = getThreadEntry();
 307     size_t prevCapacity = threadEntry->elementsCapacity;
 308     // Growth factor < 2, see folly/docs/FBVector.md; + 5 to prevent
 309     // very slow start.
 310     size_t newCapacity = static_cast<size_t>((id + 5) * 1.7);
 311     assert(newCapacity > prevCapacity);
 312     ElementWrapper* reallocated = nullptr;
 313
 314     // Need to grow. Note that we can't call realloc, as elements is
 315     // still linked in meta, so another thread might access invalid memory
 316     // after realloc succeeds. We'll copy by hand and update our ThreadEntry
 317     // under the lock.
 318     if (usingJEMalloc()) {
 319       bool success = false;
 320       size_t newByteSize = newCapacity * sizeof(ElementWrapper);
 321       size_t realByteSize = 0;
 322
 323       // Try to grow in place.
 324       //
 325       // Note that rallocm(ALLOCM_ZERO) will only zero newly allocated memory,
 326       // even if a previous allocation allocated more than we requested.
 327       // This is fine; we always use ALLOCM_ZERO with jemalloc and we
 328       // always expand our allocation to the real size.
 329       if (prevCapacity * sizeof(ElementWrapper) >=
 330           jemallocMinInPlaceExpandable) {
 331         success = (rallocm(reinterpret_cast<void**>(&threadEntry->elements),
 332                            &realByteSize,
 333                            newByteSize,
 334                            0,
 335                            ALLOCM_NO_MOVE | ALLOCM_ZERO) == ALLOCM_SUCCESS);
 336
 337       }
 338
 339       // In-place growth failed.
 340       if (!success) {
 341         // Note that, unlike calloc,allocm(... ALLOCM_ZERO) zeros all
 342         // allocated bytes (*realByteSize) and not just the requested
 343         // bytes (newByteSize)
 344         success = (allocm(reinterpret_cast<void**>(&reallocated),
 345                           &realByteSize,
 346                           newByteSize,
 347                           ALLOCM_ZERO) == ALLOCM_SUCCESS);
 348       }
 349
 350       if (success) {
 351         // Expand to real size
 352         assert(realByteSize / sizeof(ElementWrapper) >= newCapacity);
 353         newCapacity = realByteSize / sizeof(ElementWrapper);
 354       } else {
 355         throw std::bad_alloc();
 356       }
 357     } else {  // no jemalloc
 358       // calloc() is simpler than malloc() followed by memset(), and
 359       // potentially faster when dealing with a lot of memory, as it can get
 360       // already-zeroed pages from the kernel.
 361       reallocated = static_cast<ElementWrapper*>(
 362           calloc(newCapacity, sizeof(ElementWrapper)));
 363       if (!reallocated) {
 364         throw std::bad_alloc();
 365       }
 366     }
 367
 368     // Success, update the entry
 369     {
 370       std::lock_guard<std::mutex> g(meta.lock_);
 371
 372       if (prevCapacity == 0) {
 373         meta.push_back(threadEntry);
 374       }
 375
 376       if (reallocated) {
 377        /*
 378         * Note: we need to hold the meta lock when copying data out of
 379         * the old vector, because some other thread might be
 380         * destructing a ThreadLocal and writing to the elements vector
 381         * of this thread.
 382         */
 383         memcpy(reallocated, threadEntry->elements,
 384                sizeof(ElementWrapper) * prevCapacity);
 385         using std::swap;
 386         swap(reallocated, threadEntry->elements);
 387       }
 388       threadEntry->elementsCapacity = newCapacity;
 389     }
 390
 391     free(reallocated);
 392
 393 #if !__APPLE__
 394     if (prevCapacity == 0) {
 395       pthread_setspecific(meta.pthreadKey_, &meta);
 396     }
 397 #endif
 398   }
 399
 400   static ElementWrapper& get(int id) {
 401     ThreadEntry* threadEntry = getThreadEntry();
 402     if (UNLIKELY(threadEntry->elementsCapacity <= id)) {
 403       reserve(id);
 404       assert(threadEntry->elementsCapacity > id);
 405     }
 406     return threadEntry->elements[id];
 407   }
 408 };
 409
 410 #if !__APPLE__
 411 template <class Tag> __thread ThreadEntry StaticMeta<Tag>::threadEntry_ = {0};
 412 #endif
 413 template <class Tag> StaticMeta<Tag>* StaticMeta<Tag>::inst_ = nullptr;
 414
 415 }  // namespace threadlocal_detail
 416 }  // namespace folly
 417
 418 #endif /* FOLLY_DETAIL_THREADLOCALDETAIL_H_ */
 419