Files
libsst/libsst-concurrency/SST_Semaphore_POSIX.c
2026-04-03 00:22:39 -05:00

127 lines
2.9 KiB
C

/*
SST_Semaphore_POSIX.c
Author: Patrick Baggett <ptbaggett@762studios.com>
Created: 12/20/2011
Purpose:
libsst-concurrency semaphore functions for POSIX platforms
License:
This program is free software. It comes without any warranty, to
the extent permitted by applicable law. You can redistribute it
and/or modify it under the terms of the Do What The Fuck You Want
To Public License, Version 2, as published by Sam Hocevar. See
http://sam.zoy.org/wtfpl/COPYING for more details.
*/
#include <SST/SST_Concurrency.h>
#include <SST/SST_Semaphore.h>
#include <semaphore.h> /* POSIX semaphores */
#include <time.h>
#include <stdlib.h> /* malloc()/free() */
#include <errno.h> /* errno */
#include "timespecadd.h"
/******************************************************************************/
SST_Semaphore SST_Concurrency_CreateSemaphore(uint32_t _initialCount)
{
sem_t* sema;
sema = (sem_t*)malloc(sizeof(sem_t));
if(sema)
{
sem_init(sema, 0, (unsigned int)_initialCount);
}
return (SST_Semaphore)sema;
}
/******************************************************************************/
void SST_Concurrency_DestroySemaphore(SST_Semaphore _sema)
{
sem_t* sema = (sem_t*)_sema;
sem_destroy(sema);
free(sema);
}
/******************************************************************************/
void SST_Concurrency_PostSemaphore(SST_Semaphore _sema, uint32_t _count)
{
sem_t* sema = (sem_t*)_sema;
while(_count)
{
/* The Open Group doesn't define a sem_post() that allows
larger than incrementing by 1, so loop. */
sem_post(sema);
_count--;
}
}
/******************************************************************************/
int SST_Concurrency_WaitSemaphore(SST_Semaphore _sema, uint32_t _ticks)
{
int result = 0;
sem_t* sema = (sem_t*)_sema;
int ok;
/* Infinite wait */
if(_ticks == SST_WAIT_INFINITE)
{
/* Wait in a loop until we get a value OTHER than EINTR,
or the function succeeds.
Basically, EINTR means a signal interrupted this function,
so we can retry the wait */
do
{
ok = sem_wait(sema);
if(ok == 0)
break;
} while(errno == EINTR);
/* sem_wait() returns 0 on success, so see if successful */
result = (ok == 0);
}
else /* Maximum wait measured in milliseconds */
{
struct timespec ts, tswait;
clock_gettime(CLOCK_REALTIME, &ts);
tswait.tv_sec = (_ticks / 1000);
tswait.tv_nsec = (_ticks % 1000) * 1000 * 1000;
_sst_add_timespec(&ts, &tswait);
/* EINTER = signal interrupted the function. Loop until we get
something other than a signal interruption */
do
{
ok = sem_timedwait(sema, &ts);
if(ok == 0)
break;
} while(errno == EINTR);
/* Either success or timeout, trap legitimate errors (which
are due to invalid conditions -> bug) */
if(ok < 0 && errno != ETIMEDOUT)
{
result = 0;
}
else
{
/* If this returned success, then save that result
as TRUE */
result = (ok == 0);
}
}
return result;
}