/*
 * (C) Copyright 1996- ECMWF.
 *
 * This software is licensed under the terms of the Apache Licence Version 2.0
 * which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
 * In applying this licence, ECMWF does not waive the privileges and immunities
 * granted to it by virtue of its status as an intergovernmental organisation nor
 * does it submit to any jurisdiction.
 */


#include <sys/sem.h>

#include "eckit/os/SharedInt.h"


//-----------------------------------------------------------------------------

namespace eckit {

//-----------------------------------------------------------------------------

SharedInt::SharedInt(const PathName& path,int count):
	Semaphore(path,2*count)
{
}

SharedInt::~SharedInt()
{
}

void SharedInt::use(int n)
{
	Semaphore::lower(2*n);
}

void SharedInt::release(int n)
{
	Semaphore::raise(2*n);
}

void SharedInt::newLimit(short val,unsigned short n)
{
	int v;
	while( (v = semctl(semaphore_,2*n+1,GETVAL,0)) != val)
	{
		if(v<0) throw FailedSystemCall("semctl GETVAL");
        short delta = val - v;
        typedef unsigned short int U;
        struct sembuf set[] = {{ U(2*n), delta, 0,},{ U(2*n+1), delta, 0,}};
		SYSCALL(semop(semaphore_,set,NUMBER(set)));
	}
}

int SharedInt::limit(int n) const
{
	return Semaphore::get(2*n+1);
}

int SharedInt::free(int n) const
{
	return Semaphore::get(2*n);
}


//-----------------------------------------------------------------------------

} // namespace eckit

