// Copyright 2016 the V8 project authors. All rights reserved.
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

// This file is an internal atomic implementation, use atomicops.h instead.
//
// This implementation uses C++11 atomics' member functions. The code base is
// currently written assuming atomicity revolves around accesses instead of
// C++11's memory locations. The burden is on the programmer to ensure that all
// memory locations accessed atomically are never accessed non-atomically (tsan
// should help with this).
//
// Of note in this implementation:
//  * All NoBarrier variants are implemented as relaxed.
//  * All Barrier variants are implemented as sequentially-consistent.
//  * Compare exchange's failure ordering is always the same as the success one
//    (except for release, which fails as relaxed): using a weaker ordering is
//    only valid under certain uses of compare exchange.
//  * Acquire store doesn't exist in the C11 memory model, it is instead
//    implemented as a relaxed store followed by a sequentially consistent
//    fence.
//  * Release load doesn't exist in the C11 memory model, it is instead
//    implemented as sequentially consistent fence followed by a relaxed load.
//  * Atomic increment is expected to return the post-incremented value, whereas
//    C11 fetch add returns the previous value. The implementation therefore
//    needs to increment twice (which the compiler should be able to detect and
//    optimize).

#ifndef BASE_ATOMICOPS_INTERNALS_PORTABLE_H_
#define BASE_ATOMICOPS_INTERNALS_PORTABLE_H_

#include <atomic>

#if defined(V8_OS_STARBOARD)
#include "starboard/atomic.h"
#endif

#include "src/base/build_config.h"
#include "src/base/macros.h"

namespace v8 {
namespace base {

// This implementation is transitional and maintains the original API for
// atomicops.h.

inline void SeqCst_MemoryFence() {
#if defined(V8_OS_STARBOARD)
  SbAtomicMemoryBarrier();
#else
#if defined(__GLIBCXX__)
  // Work around libstdc++ bug 51038 where atomic_thread_fence was declared but
  // not defined, leading to the linker complaining about undefined references.
  __atomic_thread_fence(std::memory_order_seq_cst);
#else
  std::atomic_thread_fence(std::memory_order_seq_cst);
#endif  //  defined(__GLIBCXX__)
#endif  //  defined(V8_OS_STARBOARD)
}

inline Atomic32 Relaxed_CompareAndSwap(volatile Atomic32* ptr,
                                       Atomic32 old_value, Atomic32 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_CompareAndSwap(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_RELAXED, __ATOMIC_RELAXED);
  return old_value;
#endif
}

inline Atomic32 Relaxed_AtomicExchange(volatile Atomic32* ptr,
                                       Atomic32 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Exchange(ptr, new_value);
#else
  return __atomic_exchange_n(ptr, new_value, __ATOMIC_RELAXED);
#endif
}

inline Atomic32 Relaxed_AtomicIncrement(volatile Atomic32* ptr,
                                        Atomic32 increment) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Increment(ptr, increment);
#else
  return increment + __atomic_fetch_add(ptr, increment, __ATOMIC_RELAXED);
#endif
}

inline Atomic32 Barrier_AtomicIncrement(volatile Atomic32* ptr,
                                        Atomic32 increment) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicBarrier_Increment(ptr, increment);
#else
  return increment + __atomic_fetch_add(ptr, increment, __ATOMIC_SEQ_CST);
#endif
}

inline Atomic32 Acquire_CompareAndSwap(volatile Atomic32* ptr,
                                       Atomic32 old_value, Atomic32 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicAcquire_CompareAndSwap(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_ACQUIRE, __ATOMIC_ACQUIRE);
  return old_value;
#endif
}

inline Atomic8 Release_CompareAndSwap(volatile Atomic8* ptr, Atomic8 old_value,
                                      Atomic8 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicRelease_CompareAndSwap8(ptr, old_value, new_value);
#else
  bool result = __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                                            __ATOMIC_RELEASE, __ATOMIC_RELAXED);
  USE(result);  // Make gcc compiler happy.
  return old_value;
#endif
}

inline Atomic32 Release_CompareAndSwap(volatile Atomic32* ptr,
                                       Atomic32 old_value, Atomic32 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicRelease_CompareAndSwap(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_RELEASE, __ATOMIC_RELAXED);
  return old_value;
#endif
}

inline void Relaxed_Store(volatile Atomic8* ptr, Atomic8 value) {
#if defined(V8_OS_STARBOARD)
  SbAtomicNoBarrier_Store8(ptr, value);
#else
  __atomic_store_n(ptr, value, __ATOMIC_RELAXED);
#endif
}

inline void Relaxed_Store(volatile Atomic32* ptr, Atomic32 value) {
#if defined(V8_OS_STARBOARD)
  SbAtomicNoBarrier_Store(ptr, value);
#else
  __atomic_store_n(ptr, value, __ATOMIC_RELAXED);
#endif
}

inline void Release_Store(volatile Atomic32* ptr, Atomic32 value) {
#if defined(V8_OS_STARBOARD)
  SbAtomicRelease_Store(ptr, value);
#else
  __atomic_store_n(ptr, value, __ATOMIC_RELEASE);
#endif
}

inline Atomic8 Relaxed_Load(volatile const Atomic8* ptr) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Load8(ptr);
#else
  return __atomic_load_n(ptr, __ATOMIC_RELAXED);
#endif
}

inline Atomic32 Relaxed_Load(volatile const Atomic32* ptr) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Load(ptr);
#else
  return __atomic_load_n(ptr, __ATOMIC_RELAXED);
#endif
}

inline Atomic32 Acquire_Load(volatile const Atomic32* ptr) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicAcquire_Load(ptr);
#else
  return __atomic_load_n(ptr, __ATOMIC_ACQUIRE);
#endif
}

#if defined(V8_HOST_ARCH_64_BIT)

inline Atomic64 Relaxed_CompareAndSwap(volatile Atomic64* ptr,
                                       Atomic64 old_value, Atomic64 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_CompareAndSwap64(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_RELAXED, __ATOMIC_RELAXED);
  return old_value;
#endif
}

inline Atomic64 Relaxed_AtomicExchange(volatile Atomic64* ptr,
                                       Atomic64 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Exchange64(ptr, new_value);
#else
  return __atomic_exchange_n(ptr, new_value, __ATOMIC_RELAXED);
#endif
}

inline Atomic64 Relaxed_AtomicIncrement(volatile Atomic64* ptr,
                                        Atomic64 increment) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Increment64(ptr, increment);
#else
  return increment + __atomic_fetch_add(ptr, increment, __ATOMIC_RELAXED);
#endif
}

inline Atomic64 Barrier_AtomicIncrement(volatile Atomic64* ptr,
                                        Atomic64 increment) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicBarrier_Increment64(ptr, increment);
#else
  return increment + __atomic_fetch_add(ptr, increment, __ATOMIC_SEQ_CST);
#endif
}

inline Atomic64 Acquire_CompareAndSwap(volatile Atomic64* ptr,
                                       Atomic64 old_value, Atomic64 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicAcquire_CompareAndSwap64(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_ACQUIRE, __ATOMIC_ACQUIRE);
  return old_value;
#endif
}

inline Atomic64 Release_CompareAndSwap(volatile Atomic64* ptr,
                                       Atomic64 old_value, Atomic64 new_value) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicRelease_CompareAndSwap64(ptr, old_value, new_value);
#else
  __atomic_compare_exchange_n(ptr, &old_value, new_value, false,
                              __ATOMIC_RELEASE, __ATOMIC_RELAXED);
  return old_value;
#endif
}

inline void Relaxed_Store(volatile Atomic64* ptr, Atomic64 value) {
#if defined(V8_OS_STARBOARD)
  SbAtomicNoBarrier_Store64(ptr, value);
#else
  __atomic_store_n(ptr, value, __ATOMIC_RELAXED);
#endif
}

inline void Release_Store(volatile Atomic64* ptr, Atomic64 value) {
#if defined(V8_OS_STARBOARD)
  SbAtomicRelease_Store64(ptr, value);
#else
  __atomic_store_n(ptr, value, __ATOMIC_RELEASE);
#endif
}

inline Atomic64 Relaxed_Load(volatile const Atomic64* ptr) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicNoBarrier_Load64(ptr);
#else
  return __atomic_load_n(ptr, __ATOMIC_RELAXED);
#endif
}

inline Atomic64 Acquire_Load(volatile const Atomic64* ptr) {
#if defined(V8_OS_STARBOARD)
  return SbAtomicAcquire_Load64(ptr);
#else
  return __atomic_load_n(ptr, __ATOMIC_ACQUIRE);
#endif
}

#endif  // defined(V8_HOST_ARCH_64_BIT)
}  // namespace base
}  // namespace v8

#endif  // V8_BASE_ATOMICOPS_INTERNALS_PORTABLE_H_