l4/pkg/libstdc++-v3/contrib/libstdc++-v3-4.6/src/atomic.cc

   1 // Support for atomic operations -*- C++ -*-
   2
   3 // Copyright (C) 2008, 2009, 2010
   4 // Free Software Foundation, Inc.
   5 //
   6 // This file is part of the GNU ISO C++ Library.  This library is free
   7 // software; you can redistribute it and/or modify it under the
   8 // terms of the GNU General Public License as published by the
   9 // Free Software Foundation; either version 3, or (at your option)
  10 // any later version.
  11
  12 // This library is distributed in the hope that it will be useful,
  13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 // GNU General Public License for more details.
  16
  17 // Under Section 7 of GPL version 3, you are granted additional
  18 // permissions described in the GCC Runtime Library Exception, version
  19 // 3.1, as published by the Free Software Foundation.
  20
  21 // You should have received a copy of the GNU General Public License and
  22 // a copy of the GCC Runtime Library Exception along with this program;
  23 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
  24 // <http://www.gnu.org/licenses/>.
  25
  26 #include "gstdint.h"
  27 #include <atomic>
  28 #include <mutex>
  29
  30 #define LOGSIZE 4
  31
  32 namespace
  33 {
  34 #if defined(_GLIBCXX_HAS_GTHREADS) && defined(_GLIBCXX_USE_C99_STDINT_TR1)
  35   std::mutex&
  36   get_atomic_mutex()
  37   {
  38     static std::mutex atomic_mutex;
  39     return atomic_mutex;
  40   }
  41 #endif
  42
  43   std::__atomic_flag_base flag_table[ 1 << LOGSIZE ] =
  44     {
  45       ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT,
  46       ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT,
  47       ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT,
  48       ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT, ATOMIC_FLAG_INIT,
  49     };
  50 } // anonymous namespace
  51
  52 namespace std _GLIBCXX_VISIBILITY(default)
  53 {
  54 _GLIBCXX_BEGIN_NAMESPACE_VERSION
  55
  56   namespace __atomic0
  57   {
  58     bool
  59     atomic_flag::test_and_set(memory_order)
  60     {
  61 #if defined(_GLIBCXX_HAS_GTHREADS) && defined(_GLIBCXX_USE_C99_STDINT_TR1)
  62       lock_guard<mutex> __lock(get_atomic_mutex());
  63 #endif
  64       bool result = _M_i;
  65       _M_i = true;
  66       return result;
  67     }
  68
  69     void
  70     atomic_flag::clear(memory_order)
  71     {
  72 #if defined(_GLIBCXX_HAS_GTHREADS) && defined(_GLIBCXX_USE_C99_STDINT_TR1)
  73       lock_guard<mutex> __lock(get_atomic_mutex());
  74 #endif
  75       _M_i = false;
  76     }
  77
  78   _GLIBCXX_BEGIN_EXTERN_C
  79
  80   bool
  81   atomic_flag_test_and_set_explicit(__atomic_flag_base* __a,
  82                                     memory_order __m) _GLIBCXX_NOTHROW
  83   {
  84     atomic_flag* d = static_cast<atomic_flag*>(__a);
  85     return d->test_and_set(__m);
  86   }
  87
  88   void
  89   atomic_flag_clear_explicit(__atomic_flag_base* __a,
  90                              memory_order __m) _GLIBCXX_NOTHROW
  91   {
  92     atomic_flag* d = static_cast<atomic_flag*>(__a);
  93     return d->clear(__m);
  94   }
  95
  96   void
  97   __atomic_flag_wait_explicit(__atomic_flag_base* __a,
  98                               memory_order __x) _GLIBCXX_NOTHROW
  99   {
 100     while (atomic_flag_test_and_set_explicit(__a, __x))
 101       { };
 102   }
 103
 104   _GLIBCXX_CONST __atomic_flag_base*
 105   __atomic_flag_for_address(const volatile void* __z) _GLIBCXX_NOTHROW
 106   {
 107     uintptr_t __u = reinterpret_cast<uintptr_t>(__z);
 108     __u += (__u >> 2) + (__u << 4);
 109     __u += (__u >> 7) + (__u << 5);
 110     __u += (__u >> 17) + (__u << 13);
 111     if (sizeof(uintptr_t) > 4)
 112       __u += (__u >> 31);
 113     __u &= ~((~uintptr_t(0)) << LOGSIZE);
 114     return flag_table + __u;
 115   }
 116
 117   _GLIBCXX_END_EXTERN_C
 118
 119   } // namespace __atomic0
 120
 121 _GLIBCXX_END_NAMESPACE_VERSION
 122 } // namespace
 123
 124
 125 // XXX GLIBCXX_ABI Deprecated
 126 // gcc-4.5.0
 127 // <atomic> signature changes
 128
 129 // The rename syntax for default exported names is
 130 //   asm (".symver name1,exportedname@GLIBCXX_3.4")
 131 //   asm (".symver name2,exportedname@@GLIBCXX_3.4.5")
 132 // In the future, GLIBCXX_ABI > 6 should remove all uses of
 133 // _GLIBCXX_*_SYMVER macros in this file.
 134
 135 #if defined(_GLIBCXX_SYMVER_GNU) && defined(PIC) \
 136     && defined(_GLIBCXX_HAVE_AS_SYMVER_DIRECTIVE) \
 137     && defined(_GLIBCXX_HAVE_SYMVER_SYMBOL_RENAMING_RUNTIME_SUPPORT)
 138
 139 #define _GLIBCXX_ASM_SYMVER(cur, old, version) \
 140    asm (".symver " #cur "," #old "@@" #version);
 141
 142 _GLIBCXX_ASM_SYMVER(_ZNSt9__atomic011atomic_flag5clearESt12memory_order, _ZNVSt9__atomic011atomic_flag5clearESt12memory_order, GLIBCXX_3.4.11)
 143
 144 _GLIBCXX_ASM_SYMVER(_ZNSt9__atomic011atomic_flag12test_and_setESt12memory_order, _ZNVSt9__atomic011atomic_flag12test_and_setESt12memory_order, GLIBCXX_3.4.11)
 145
 146 #endif