void
MXUser_ReleaseRecLock(MXUserRecLock *lock) // IN/OUT:
{
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_REC);
ASSERT(Atomic_Read(&lock->refCount) > 0);
if (UNLIKELY(lock->vmmLock != NULL)) {
ASSERT(MXUserMX_UnlockRec);
(*MXUserMX_UnlockRec)(lock->vmmLock);
} else {
if (vmx86_stats) {
MXUserHeldStats *heldStats = Atomic_ReadPtr(&lock->heldStatsMem);
if (LIKELY(heldStats != NULL)) {
if (MXRecLockCount(&lock->recursiveLock) == 1) {
MXUserHeldStats *heldStats;
heldStats = Atomic_ReadPtr(&lock->heldStatsMem);
if (UNLIKELY(heldStats != NULL)) {
VmTimeType value;
MXUserHisto *histo = Atomic_ReadPtr(&heldStats->histo);
value = Hostinfo_SystemTimerNS() - heldStats->holdStart;
MXUserBasicStatsSample(&heldStats->data, value);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, value, GetReturnAddress());
}
}
}
}
}
if (vmx86_debug) {
if (MXRecLockCount(&lock->recursiveLock) == 0) {
MXUserDumpAndPanic(&lock->header,
"%s: Release of an unacquired recursive lock\n",
__FUNCTION__);
}
if (!MXRecLockIsOwner(&lock->recursiveLock)) {
MXUserDumpAndPanic(&lock->header,
"%s: Non-owner release of an recursive lock\n",
__FUNCTION__);
}
}
MXUserReleaseTracking(&lock->header);
MXRecLockRelease(&lock->recursiveLock);
}
}
Bool
MXUser_TryDownSemaphore(MXUserSemaphore *sema) // IN/OUT:
{
int err;
Bool downOccurred = FALSE;
ASSERT(sema);
MXUserValidateHeader(&sema->header, MXUSER_TYPE_SEMA);
Atomic_Inc(&sema->activeUserCount);
err = MXUserTryDown(&sema->nativeSemaphore, &downOccurred);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&sema->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
if (vmx86_stats) {
MXUserAcquireStats *acquireStats;
acquireStats = Atomic_ReadPtr(&sema->acquireStatsMem);
if (LIKELY(acquireStats != NULL)) {
MXUserAcquisitionSample(&acquireStats->data, downOccurred,
!downOccurred, 0ULL);
}
}
Atomic_Dec(&sema->activeUserCount);
return downOccurred;
}
Bool
MXUser_TryAcquireExclLock(MXUserExclLock *lock) // IN/OUT:
{
Bool success;
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_EXCL);
if (MXUserTryAcquireFail(lock->header.name)) {
return FALSE;
}
success = MXRecLockTryAcquire(&lock->recursiveLock);
if (success) {
MXUserAcquisitionTracking(&lock->header, FALSE);
if (vmx86_debug && (MXRecLockCount(&lock->recursiveLock) > 1)) {
MXUserDumpAndPanic(&lock->header,
"%s: Acquire on an acquired exclusive lock\n",
__FUNCTION__);
}
}
if (vmx86_stats) {
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (LIKELY(stats != NULL)) {
MXUserAcquisitionSample(&stats->acquisitionStats, success, !success,
0ULL);
}
}
return success;
}
static void
MXUserCondDestroyRecLock(MXUserRecLock *lock) // IN:
{
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_REC);
ASSERT(Atomic_Read(&lock->refCount) > 0);
if (Atomic_ReadDec32(&lock->refCount) == 1) {
if (lock->vmmLock == NULL) {
if (MXRecLockCount(&lock->recursiveLock) > 0) {
MXUserDumpAndPanic(&lock->header,
"%s: Destroy of an acquired recursive lock\n",
__FUNCTION__);
}
MXRecLockDestroy(&lock->recursiveLock);
MXUserRemoveFromList(&lock->header);
if (vmx86_stats) {
MXUserDisableStats(&lock->acquireStatsMem, &lock->heldStatsMem);
}
}
lock->header.signature = 0; // just in case...
free(lock->header.name);
lock->header.name = NULL;
free(lock);
}
}
void
MXUser_DestroyRWLock(MXUserRWLock *lock) // IN:
{
if (LIKELY(lock != NULL)) {
MXUserValidateHeader(&lock->header, MXUSER_TYPE_RW);
if (Atomic_Read(&lock->holderCount) != 0) {
MXUserDumpAndPanic(&lock->header,
"%s: Destroy on an acquired read-write lock\n",
__FUNCTION__);
}
if (LIKELY(lock->useNative)) {
int err = MXUserNativeRWDestroy(&lock->nativeLock);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&lock->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
}
lock->header.signature = 0; // just in case...
MXRecLockDestroy(&lock->recursiveLock);
MXUserRemoveFromList(&lock->header);
if (vmx86_stats) {
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (LIKELY(stats != NULL)) {
MXUserAcquisitionStatsTearDown(&stats->acquisitionStats);
MXUserHistoTearDown(Atomic_ReadPtr(&stats->acquisitionHisto));
MXUserBasicStatsTearDown(&stats->heldStats);
MXUserHistoTearDown(Atomic_ReadPtr(&stats->heldHisto));
free(stats);
}
}
HashTable_FreeUnsafe(lock->holderTable);
free(lock->header.name);
lock->header.name = NULL;
free(lock);
}
}
void
MXUser_DownSemaphore(MXUserSemaphore *sema) // IN/OUT:
{
int err;
ASSERT(sema);
MXUserValidateHeader(&sema->header, MXUSER_TYPE_SEMA);
Atomic_Inc(&sema->activeUserCount);
MXUserAcquisitionTracking(&sema->header, TRUE); // rank checking
if (vmx86_stats) {
VmTimeType start = 0;
Bool tryDownSuccess = FALSE;
MXUserAcquireStats *acquireStats;
acquireStats = Atomic_ReadPtr(&sema->acquireStatsMem);
if (LIKELY(acquireStats != NULL)) {
start = Hostinfo_SystemTimerNS();
}
err = MXUserTryDown(&sema->nativeSemaphore, &tryDownSuccess);
if (LIKELY(err == 0)) {
if (!tryDownSuccess) {
err = MXUserDown(&sema->nativeSemaphore);
}
}
if (LIKELY((err == 0) && (acquireStats != NULL))) {
MXUserHisto *histo;
VmTimeType value = Hostinfo_SystemTimerNS() - start;
MXUserAcquisitionSample(&acquireStats->data, TRUE,
!tryDownSuccess, value);
histo = Atomic_ReadPtr(&acquireStats->histo);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, value, GetReturnAddress());
}
}
} else {
err = MXUserDown(&sema->nativeSemaphore);
}
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&sema->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
MXUserReleaseTracking(&sema->header);
Atomic_Dec(&sema->activeUserCount);
}
void
MXUser_DestroySemaphore(MXUserSemaphore *sema) // IN:
{
if (LIKELY(sema != NULL)) {
int err;
MXUserValidateHeader(&sema->header, MXUSER_TYPE_SEMA);
if (Atomic_Read(&sema->activeUserCount) != 0) {
MXUserDumpAndPanic(&sema->header,
"%s: Attempted destroy on semaphore while in use\n",
__FUNCTION__);
}
sema->header.signature = 0; // just in case...
err = MXUserDestroy(&sema->nativeSemaphore);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&sema->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
MXUserRemoveFromList(&sema->header);
if (vmx86_stats) {
MXUserAcquireStats *acquireStats;
acquireStats = Atomic_ReadPtr(&sema->acquireStatsMem);
if (LIKELY(acquireStats != NULL)) {
MXUserAcquisitionStatsTearDown(&acquireStats->data);
MXUserHistoTearDown(Atomic_ReadPtr(&acquireStats->histo));
free(acquireStats);
}
}
free(sema->header.name);
sema->header.name = NULL;
free(sema);
}
}
void
MXUser_UpSemaphore(MXUserSemaphore *sema) // IN/OUT:
{
int err;
ASSERT(sema);
MXUserValidateHeader(&sema->header, MXUSER_TYPE_SEMA);
Atomic_Inc(&sema->activeUserCount);
err = MXUserUp(&sema->nativeSemaphore);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&sema->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
Atomic_Dec(&sema->activeUserCount);
}
void
MXUser_AcquireExclLock(MXUserExclLock *lock) // IN/OUT:
{
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_EXCL);
MXUserAcquisitionTracking(&lock->header, TRUE);
if (vmx86_stats) {
VmTimeType value = 0;
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
MXRecLockAcquire(&lock->recursiveLock, (stats == NULL) ? NULL : &value);
if (LIKELY(stats != NULL)) {
MXUserHisto *histo;
MXUserAcquisitionSample(&stats->acquisitionStats, TRUE, value != 0,
value);
histo = Atomic_ReadPtr(&stats->acquisitionHisto);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, value, GetReturnAddress());
}
stats->holdStart = Hostinfo_SystemTimerNS();
}
} else {
MXRecLockAcquire(&lock->recursiveLock,
NULL); // non-stats
}
if (vmx86_debug && (MXRecLockCount(&lock->recursiveLock) > 1)) {
MXUserDumpAndPanic(&lock->header,
"%s: Acquire on an acquired exclusive lock\n",
__FUNCTION__);
}
}
void
MXUser_DestroyExclLock(MXUserExclLock *lock) // IN:
{
if (lock != NULL) {
MXUserValidateHeader(&lock->header, MXUSER_TYPE_EXCL);
if (MXRecLockCount(&lock->recursiveLock) > 0) {
MXUserDumpAndPanic(&lock->header,
"%s: Destroy of an acquired exclusive lock\n",
__FUNCTION__);
}
lock->header.signature = 0; // just in case...
MXRecLockDestroy(&lock->recursiveLock);
MXUserRemoveFromList(&lock->header);
if (vmx86_stats) {
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (LIKELY(stats != NULL)) {
MXUserAcquisitionStatsTearDown(&stats->acquisitionStats);
MXUserHistoTearDown(Atomic_ReadPtr(&stats->acquisitionHisto));
MXUserBasicStatsTearDown(&stats->heldStats);
MXUserHistoTearDown(Atomic_ReadPtr(&stats->heldHisto));
free(stats);
}
}
free(lock->header.name);
lock->header.name = NULL;
free(lock);
}
}
void
MXUser_ReleaseExclLock(MXUserExclLock *lock) // IN/OUT:
{
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_EXCL);
if (vmx86_stats) {
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (LIKELY(stats != NULL)) {
MXUserHisto *histo;
VmTimeType value = Hostinfo_SystemTimerNS() - stats->holdStart;
MXUserBasicStatsSample(&stats->heldStats, value);
histo = Atomic_ReadPtr(&stats->heldHisto);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, value, GetReturnAddress());
}
}
}
if (vmx86_debug && !MXRecLockIsOwner(&lock->recursiveLock)) {
int lockCount = MXRecLockCount(&lock->recursiveLock);
MXUserDumpAndPanic(&lock->header,
"%s: Non-owner release of an %s exclusive lock\n",
__FUNCTION__,
lockCount == 0 ? "unacquired" : "acquired");
}
MXUserReleaseTracking(&lock->header);
MXRecLockRelease(&lock->recursiveLock);
}
void
MXUser_ReleaseRWLock(MXUserRWLock *lock) // IN/OUT:
{
HolderContext *myContext;
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_RW);
myContext = MXUserGetHolderContext(lock);
if (vmx86_stats) {
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (LIKELY(stats != NULL)) {
MXUserHisto *histo;
VmTimeType duration = Hostinfo_SystemTimerNS() - myContext->holdStart;
/*
* The statistics are not always atomically safe so protect them
* when necessary
*/
if ((myContext->state == RW_LOCKED_FOR_READ) && lock->useNative) {
MXRecLockAcquire(&lock->recursiveLock,
NULL); // non-stats
}
MXUserBasicStatsSample(&stats->heldStats, duration);
histo = Atomic_ReadPtr(&stats->heldHisto);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, duration, GetReturnAddress());
}
if ((myContext->state == RW_LOCKED_FOR_READ) && lock->useNative) {
MXRecLockRelease(&lock->recursiveLock);
}
}
}
if (UNLIKELY(myContext->state == RW_UNLOCKED)) {
uint32 lockCount = Atomic_Read(&lock->holderCount);
MXUserDumpAndPanic(&lock->header,
"%s: Non-owner release of an %s read-write lock\n",
__FUNCTION__,
lockCount == 0 ? "unacquired" : "acquired");
}
MXUserReleaseTracking(&lock->header);
Atomic_Dec(&lock->holderCount);
if (LIKELY(lock->useNative)) {
int err = MXUserNativeRWRelease(&lock->nativeLock,
myContext->state == RW_LOCKED_FOR_READ);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&lock->header, "%s: Internal error (%d)\n",
__FUNCTION__, err);
}
} else {
ASSERT(Atomic_Read(&lock->holderCount) == 0);
MXRecLockRelease(&lock->recursiveLock);
}
myContext->state = RW_UNLOCKED;
}
static INLINE void
MXUserAcquisition(MXUserRWLock *lock, // IN/OUT:
Bool forRead) // IN:
{
HolderContext *myContext;
ASSERT(lock);
MXUserValidateHeader(&lock->header, MXUSER_TYPE_RW);
MXUserAcquisitionTracking(&lock->header, TRUE);
myContext = MXUserGetHolderContext(lock);
if (UNLIKELY(myContext->state != RW_UNLOCKED)) {
MXUserDumpAndPanic(&lock->header,
"%s: AcquireFor%s after AcquireFor%s\n",
__FUNCTION__,
forRead ? "Read" : "Write",
(myContext->state == RW_LOCKED_FOR_READ) ? "Read" :
"Write");
}
if (vmx86_stats) {
VmTimeType value;
MXUserStats *stats = Atomic_ReadPtr(&lock->statsMem);
if (lock->useNative) {
int err = 0;
Bool contended;
VmTimeType begin = Hostinfo_SystemTimerNS();
contended = MXUserNativeRWAcquire(&lock->nativeLock, forRead, &err);
value = contended ? Hostinfo_SystemTimerNS() - begin : 0;
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&lock->header, "%s: Error %d: contended %d\n",
__FUNCTION__, err, contended);
}
} else {
value = 0;
MXRecLockAcquire(&lock->recursiveLock,
(stats == NULL) ? NULL : &value);
}
if (LIKELY(stats != NULL)) {
MXUserHisto *histo;
/*
* The statistics are not atomically safe so protect them when
* necessary.
*/
if (forRead && lock->useNative) {
MXRecLockAcquire(&lock->recursiveLock,
NULL); // non-stats
}
MXUserAcquisitionSample(&stats->acquisitionStats, TRUE, value != 0,
value);
histo = Atomic_ReadPtr(&stats->acquisitionHisto);
if (UNLIKELY(histo != NULL)) {
MXUserHistoSample(histo, value, GetReturnAddress());
}
if (forRead && lock->useNative) {
MXRecLockRelease(&lock->recursiveLock);
}
myContext->holdStart = Hostinfo_SystemTimerNS();
}
} else {
if (LIKELY(lock->useNative)) {
int err = 0;
MXUserNativeRWAcquire(&lock->nativeLock, forRead, &err);
if (UNLIKELY(err != 0)) {
MXUserDumpAndPanic(&lock->header, "%s: Error %d\n",
__FUNCTION__, err);
}
} else {
MXRecLockAcquire(&lock->recursiveLock,
NULL); // non-stats
}
}
if (!forRead || !lock->useNative) {
ASSERT(Atomic_Read(&lock->holderCount) == 0);
}
Atomic_Inc(&lock->holderCount);
myContext->state = forRead ? RW_LOCKED_FOR_READ : RW_LOCKED_FOR_WRITE;
}
