(file) Return to AtomicInt.h CVS log (file) (dir) Up to [Pegasus] / pegasus / src / Pegasus / Common

Diff for /pegasus/src/Pegasus/Common/AtomicInt.h between version 1.18 and 1.18.4.2

version 1.18, 2010/01/22 04:30:46 version 1.18.4.2, 2013/09/14 23:08:17
Line 95 
Line 95 
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END
  
 //==============================================================================  // if GNU GCC version >= 4.7.0, use the built-in atomic operations
 //  // Clang uses libstdc++ and Atmic operations in clang appreared in clang 3.1
 // PEGASUS_PLATFORM_LINUX_IX86_GNU  #if defined(GCC_VERSION) && GCC_VERSION >= 40700 || \
 // PEGASUS_PLATFORM_DARWIN_IX86_GNU     defined (__clang__ ) && ( __clang_major__ >= 3 && __clang_minor__ >= 1)
 //  
 //==============================================================================  
   
 #if defined(PEGASUS_PLATFORM_LINUX_IX86_GNU) || \  
     defined(PEGASUS_PLATFORM_DARWIN_IX86_GNU)  
 # define PEGASUS_ATOMIC_INT_DEFINED # define PEGASUS_ATOMIC_INT_DEFINED
  
 // Note: this lock can be eliminated for single processor systems.  
 # define PEGASUS_ATOMIC_LOCK "lock ; "  
   
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
 struct AtomicType struct AtomicType
Line 119 
Line 111 
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline AtomicIntTemplate<AtomicType>::AtomicIntTemplate(Uint32 n) inline AtomicIntTemplate<AtomicType>::AtomicIntTemplate(Uint32 n)
 { {
     _rep.n = n;      __atomic_store_n (&_rep.n, n, __ATOMIC_SEQ_CST);
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
Line 130 
Line 122 
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline Uint32 AtomicIntTemplate<AtomicType>::get() const inline Uint32 AtomicIntTemplate<AtomicType>::get() const
 { {
     return _rep.n;      return __atomic_load_n (&_rep.n, __ATOMIC_SEQ_CST);
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline void AtomicIntTemplate<AtomicType>::set(Uint32 n) inline void AtomicIntTemplate<AtomicType>::set(Uint32 n)
 { {
     _rep.n = n;      __atomic_store_n (&_rep.n, n, __ATOMIC_SEQ_CST);
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline void AtomicIntTemplate<AtomicType>::inc() inline void AtomicIntTemplate<AtomicType>::inc()
 { {
     asm volatile(      __atomic_fetch_add (&_rep.n, 1, __ATOMIC_SEQ_CST);
         PEGASUS_ATOMIC_LOCK "incl %0"  
         :"=m" (_rep.n)  
         :"m" (_rep.n));  
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline void AtomicIntTemplate<AtomicType>::dec() inline void AtomicIntTemplate<AtomicType>::dec()
 { {
     asm volatile(      __atomic_fetch_sub (&_rep.n, 1, __ATOMIC_SEQ_CST);
         PEGASUS_ATOMIC_LOCK "decl %0"  
         :"=m" (_rep.n)  
         :"m" (_rep.n));  
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero() inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero()
 { {
     unsigned char c;      return (__atomic_fetch_sub (&_rep.n, 1, __ATOMIC_SEQ_CST) == 1);
   
     asm volatile(  
         PEGASUS_ATOMIC_LOCK "decl %0; sete %1"  
         :"=m" (_rep.n), "=qm" (c)  
         :"m" (_rep.n) : "memory");  
   
     return c != 0;  
 } }
  
 typedef AtomicIntTemplate<AtomicType> AtomicInt; typedef AtomicIntTemplate<AtomicType> AtomicInt;
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END
  
 #endif /* PEGASUS_PLATFORM_LINUX_IX86_GNU */  #else //!(GCC_VERSION && GCC_VERSION >= 40700), use platform specific atomics
  
 //============================================================================== //==============================================================================
 // //
   // PEGASUS_PLATFORM_LINUX_IX86_GNU
   // PEGASUS_PLATFORM_LINUX_IX86_CLANG
   // PEGASUS_PLATFORM_DARWIN_IX86_GNU
 // PEGASUS_PLATFORM_LINUX_X86_64_GNU // PEGASUS_PLATFORM_LINUX_X86_64_GNU
   // PEGASUS_PLATFORM_LINUX_X86_64_CLANG
 // //
 //============================================================================== //==============================================================================
  
 #if defined(PEGASUS_PLATFORM_LINUX_X86_64_GNU)  #if defined(PEGASUS_PLATFORM_LINUX_IX86_GNU) || \
       defined(PEGASUS_PLATFORM_LINUX_IX86_CLANG) || \
       defined(PEGASUS_PLATFORM_DARWIN_IX86_GNU) || \
       defined(PEGASUS_PLATFORM_LINUX_X86_64_GNU) || \
       defined(PEGASUS_PLATFORM_LINUX_X86_64_CLANG)
 # define PEGASUS_ATOMIC_INT_DEFINED # define PEGASUS_ATOMIC_INT_DEFINED
  
 // Note: this lock can be eliminated for single processor systems. // Note: this lock can be eliminated for single processor systems.
Line 253 
Line 240 
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END
  
 #endif /* PEGASUS_PLATFORM_LINUX_X86_64_GNU */  #endif /* PEGASUS_PLATFORM_LINUX_IX86_GNU */
  
 //============================================================================== //==============================================================================
 // //
Line 345 
Line 332 
 //============================================================================== //==============================================================================
 // //
 // PEGASUS_PLATFORM_LINUX_PPC_GNU // PEGASUS_PLATFORM_LINUX_PPC_GNU
   // PEGASUS_PLATFORM_LINUX_PPC64_GNU
 // //
 //============================================================================== //==============================================================================
  
 #if defined(PEGASUS_PLATFORM_LINUX_PPC_GNU)  #if defined(PEGASUS_PLATFORM_LINUX_PPC_GNU) || \
       defined(PEGASUS_PLATFORM_LINUX_PPC64_GNU)
 # define PEGASUS_ATOMIC_INT_DEFINED # define PEGASUS_ATOMIC_INT_DEFINED
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
Line 444 
Line 433 
  
 //============================================================================== //==============================================================================
 // //
   // PEGASUS_PLATFORM_LINUX_PPC_E500_GNU
   //
   //==============================================================================
   
   #if defined(PEGASUS_PLATFORM_LINUX_PPC_E500_GNU)
   # define PEGASUS_ATOMIC_INT_DEFINED
   
   PEGASUS_NAMESPACE_BEGIN
   
   struct AtomicType
   {
       volatile Uint32 n;
   };
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline AtomicIntTemplate<AtomicType>::AtomicIntTemplate(Uint32 n)
   {
       _rep.n = n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline AtomicIntTemplate<AtomicType>::~AtomicIntTemplate()
   {
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline Uint32 AtomicIntTemplate<AtomicType>::get() const
   {
       return _rep.n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::set(Uint32 n)
   {
       // sync is required for SMP machines.
       asm volatile("sync" : : :);
       _rep.n = n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::inc()
   {
       int t;
   
       asm volatile(
           "1: lwarx %0,0,%1\n"
           "addic %0,%0,1\n"
           "stwcx. %0,0,%1\n"
           "bne- 1b\n"
           "isync"
           : "=&r" (t)
           : "r" (&_rep.n)
           : "cc", "memory");
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::dec()
   {
       int c;
   
       asm volatile(
           "1: lwarx %0,0,%1\n"
           "addic %0,%0,-1\n"
           "stwcx. %0,0,%1\n"
           "bne- 1b\n"
           "isync"
           : "=&r" (c)
           : "r" (&_rep.n)
           : "cc", "memory");
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero()
   {
       int c;
   
       asm volatile(
           "1: lwarx %0,0,%1\n"
           "addic %0,%0,-1\n"
           "stwcx. %0,0,%1\n"
           "bne- 1b\n"
           "isync"
           : "=&r" (c)
           : "r" (&_rep.n)
           : "cc", "memory");
   
       return c == 0;
   }
   
   typedef AtomicIntTemplate<AtomicType> AtomicInt;
   
   PEGASUS_NAMESPACE_END
   
   #endif /* PEGASUS_PLATFORM_LINUX_PPC_E500_GNU */
   
   //==============================================================================
   //
   // PEGASUS_PLATFORM_LINUX_XSCALE_GNU
   //
   //==============================================================================
   
   #if defined (PEGASUS_PLATFORM_LINUX_XSCALE_GNU)
   # define PEGASUS_ATOMIC_INT_DEFINED
   
   PEGASUS_NAMESPACE_BEGIN
   
   inline void AtomicIntDisableIRQs(unsigned long& flags)
   {
       unsigned long temp;
       unsigned long x;
   
       asm volatile(
           "mrs %0, cpsr\n"
           "orr %1, %0, #128\n"
           "msr cpsr_c, %1\n"
           : "=r" (x), "=r" (temp)
           :
           : "memory");
   
       flags = x;
   }
   
   inline void AtomicIntEnableIRQs(unsigned long x)
   {
       unsigned long temp;
   
       asm volatile(
           "mrs %0, cpsr\n"
           "orr %1, %0, #128\n"
           "msr cpsr_c, %1\n"
           : "=r" (x), "=r" (temp)
           :
           : "memory");
   }
   
   struct AtomicType
   {
       volatile Uint32 n;
   };
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline AtomicIntTemplate<AtomicType>::AtomicIntTemplate(Uint32 n)
   {
       _rep.n = n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline AtomicIntTemplate<AtomicType>::~AtomicIntTemplate()
   {
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline Uint32 AtomicIntTemplate<AtomicType>::get() const
   {
       return _rep.n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::set(Uint32 n)
   {
       _rep.n = n;
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::inc()
   {
       unsigned long flags;
       AtomicIntDisableIRQs(flags);
       _rep.n++;
       AtomicIntEnableIRQs(flags);
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline void AtomicIntTemplate<AtomicType>::dec()
   {
       unsigned long flags;
       AtomicIntDisableIRQs(flags);
       _rep.n--;
       AtomicIntEnableIRQs(flags);
   }
   
   PEGASUS_TEMPLATE_SPECIALIZATION
   inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero()
   {
       Uint32 tmp;
       unsigned long flags;
       AtomicIntDisableIRQs(flags);
       tmp = --_rep.n;
       AtomicIntEnableIRQs(flags);
       return tmp == 0;
   }
   
   typedef AtomicIntTemplate<AtomicType> AtomicInt;
   
   PEGASUS_NAMESPACE_END
   
   #endif /* PEGASUS_PLATFORM_LINUX_XSCALE_GNU */
   
   
   #endif /* GCC_VERSION && GCC_VERSION >= 40700 */
   
   //==============================================================================
   //
 // PEGASUS_OS_TYPE_WINDOWS // PEGASUS_OS_TYPE_WINDOWS
 // //
 //============================================================================== //==============================================================================
Line 676 
Line 868 
  
 #endif /* PEGASUS_PLATFORM_HPUX_IA64_ACC */ #endif /* PEGASUS_PLATFORM_HPUX_IA64_ACC */
  
 //==============================================================================  #if defined (PEGASUS_PLATFORM_HPUX_IA64_GNU)
 //  #include <atomic>
 // PEGASUS_PLATFORM_LINUX_XSCALE_GNU  
 //  
 //==============================================================================  
   
 #if defined (PEGASUS_PLATFORM_LINUX_XSCALE_GNU)  
 # define PEGASUS_ATOMIC_INT_DEFINED  
  
 PEGASUS_NAMESPACE_BEGIN PEGASUS_NAMESPACE_BEGIN
  
 inline void AtomicIntDisableIRQs(unsigned long& flags)  
 {  
     unsigned long temp;  
     unsigned long x;  
   
     asm volatile(  
         "mrs %0, cpsr\n"  
         "orr %1, %0, #128\n"  
         "msr cpsr_c, %1\n"  
         : "=r" (x), "=r" (temp)  
         :  
         : "memory");  
   
     flags = x;  
 }  
   
 inline void AtomicIntEnableIRQs(unsigned long x)  
 {  
     unsigned long temp;  
   
     asm volatile(  
         "mrs %0, cpsr\n"  
         "orr %1, %0, #128\n"  
         "msr cpsr_c, %1\n"  
         : "=r" (x), "=r" (temp)  
         :  
         : "memory");  
 }  
   
 struct AtomicType struct AtomicType
 { {
     volatile Uint32 n;          volatile uint32_t n;
 }; };
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
Line 747 
Line 904 
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline void AtomicIntTemplate<AtomicType>::inc() inline void AtomicIntTemplate<AtomicType>::inc()
 { {
     unsigned long flags;          atomic_inc_32(&_rep.n);
     AtomicIntDisableIRQs(flags);  
     _rep.n++;  
     AtomicIntEnableIRQs(flags);  
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline void AtomicIntTemplate<AtomicType>::dec() inline void AtomicIntTemplate<AtomicType>::dec()
 { {
     unsigned long flags;          atomic_dec_32(&_rep.n);
     AtomicIntDisableIRQs(flags);  
     _rep.n--;  
     AtomicIntEnableIRQs(flags);  
 } }
  
 PEGASUS_TEMPLATE_SPECIALIZATION PEGASUS_TEMPLATE_SPECIALIZATION
 inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero() inline bool AtomicIntTemplate<AtomicType>::decAndTestIfZero()
 { {
     Uint32 tmp;          return atomic_dec_32_nv(&_rep.n) == 0;
     unsigned long flags;  
     AtomicIntDisableIRQs(flags);  
     tmp = --_rep.n;  
     AtomicIntEnableIRQs(flags);  
     return tmp == 0;  
 } }
   
 typedef AtomicIntTemplate<AtomicType> AtomicInt; typedef AtomicIntTemplate<AtomicType> AtomicInt;
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END
  
 #endif /* PEGASUS_PLATFORM_LINUX_XSCALE_GNU */  #endif //PEGASUS_PLATFORM_HPUX_IA64_ACC
  
 //============================================================================== //==============================================================================
 // //
Line 913 
Line 1058 
  
 //============================================================================== //==============================================================================
 // //
 // PEGASUS_PLATFORM_AIX_RS_IBMCXX  // PEGASUS_PLATFORM_AIX_RS_IBMCXX, PEGASUS_PLATFORM_PASE_ISERIES_IBMCXX
 // //
 //============================================================================== //==============================================================================
  
 #if defined (PEGASUS_PLATFORM_AIX_RS_IBMCXX)  #if defined (PEGASUS_PLATFORM_AIX_RS_IBMCXX)|| \
       defined (PEGASUS_PLATFORM_PASE_ISERIES_IBMCXX)
 # define PEGASUS_ATOMIC_INT_DEFINED # define PEGASUS_ATOMIC_INT_DEFINED
  
 # include <sys/atomic_op.h> # include <sys/atomic_op.h>
Line 974 
Line 1120 
  
 PEGASUS_NAMESPACE_END PEGASUS_NAMESPACE_END
  
 #endif /* PEGASUS_PLATFORM_AIX_RS_IBMCXX */  #endif /* PEGASUS_PLATFORM_AIX_RS_IBMCXX, \
           PEGASUS_PLATFORM_PASE_ISERIES_IBMCXX */
  
  
 //============================================================================== //==============================================================================

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.18.4.2
No CVS admin address has been configured
 Powered by
ViewCVS 0.9.2