//===-- Implementation of pthread_spin_unlock function --------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//

#include "src/pthread/pthread_spin_unlock.h"
#include "hdr/errno_macros.h"
#include "src/__support/common.h"
#include "src/__support/threads/identifier.h"
#include "src/__support/threads/spin_lock.h"

namespace LIBC_NAMESPACE_DECL {

static_assert(sizeof(pthread_spinlock_t::__lockword) == sizeof(SpinLock) &&
                  alignof(decltype(pthread_spinlock_t::__lockword)) ==
                      alignof(SpinLock),
              "pthread_spinlock_t::__lockword and SpinLock must be of the same "
              "size and alignment");

LLVM_LIBC_FUNCTION(int, pthread_spin_unlock, (pthread_spinlock_t * lock)) {
  // If an implementation detects that the value specified by the lock argument
  // to pthread_spin_lock() or pthread_spin_trylock() does not refer to an
  // initialized spin lock object, it is recommended that the function should
  // fail and report an [EINVAL] error.
  if (!lock)
    return EINVAL;
  auto spin_lock = reinterpret_cast<SpinLock *>(&lock->__lockword);
  if (!spin_lock || spin_lock->is_invalid())
    return EINVAL;
  // If an implementation detects that the value specified by the lock argument
  // to pthread_spin_unlock() refers to a spin lock object for which the current
  // thread does not hold the lock, it is recommended that the function should
  // fail and report an [EPERM] error.
  if (lock->__owner != internal::gettid())
    return EPERM;
  // Release the lock.
  lock->__owner = 0;
  spin_lock->unlock();
  return 0;
}
} // namespace LIBC_NAMESPACE_DECL