/*

    SDL - Simple DirectMedia Layer

    Copyright (C) 1997-2006 Sam Lantinga

    This library is free software; you can redistribute it and/or

    modify it under the terms of the GNU Lesser General Public

    License as published by the Free Software Foundation; either

    version 2.1 of the License, or (at your option) any later version.

    This library is distributed in the hope that it will be useful,

    but WITHOUT ANY WARRANTY; without even the implied warranty of

    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public

    License along with this library; if not, write to the Free Software

    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

    Sam Lantinga

    slouken@libsdl.org

*/

#include "SDL_config.h"

/* RISC OS implementations uses pthreads based on linux code */

#if SDL_THREADS_DISABLED

#include "../generic/SDL_syscond.c"

#else

#include <sys/time.h>

#include <unistd.h>

#include <pthread.h>

#include "SDL_thread.h"

#include "SDL_sysmutex_c.h"

struct SDL_cond

{

	pthread_cond_t cond;

};

/* Create a condition variable */

SDL_cond * SDL_CreateCond(void)

{

	SDL_cond *cond;

	cond = (SDL_cond *) SDL_malloc(sizeof(SDL_cond));

	if ( cond ) {

		if ( pthread_cond_init(&cond->cond, NULL) < 0 ) {

			SDL_SetError("pthread_cond_init() failed");

			SDL_free(cond);

			cond = NULL;

		}

	}

	return(cond);

}

/* Destroy a condition variable */

void SDL_DestroyCond(SDL_cond *cond)

{

	if ( cond ) {

		pthread_cond_destroy(&cond->cond);

		SDL_free(cond);

	}

}

/* Restart one of the threads that are waiting on the condition variable */

int SDL_CondSignal(SDL_cond *cond)

{

	int retval;

	if ( ! cond ) {

		SDL_SetError("Passed a NULL condition variable");

		return -1;

	}

	retval = 0;

	if ( pthread_cond_signal(&cond->cond) != 0 ) {

		SDL_SetError("pthread_cond_signal() failed");

		retval = -1;

	}

	return retval;

}

/* Restart all threads that are waiting on the condition variable */

int SDL_CondBroadcast(SDL_cond *cond)

{

	int retval;

	if ( ! cond ) {

		SDL_SetError("Passed a NULL condition variable");

		return -1;

	}

	retval = 0;

	if ( pthread_cond_broadcast(&cond->cond) != 0 ) {

		SDL_SetError("pthread_cond_broadcast() failed");

		retval = -1;

	}

	return retval;

}

int SDL_CondWaitTimeout(SDL_cond *cond, SDL_mutex *mutex, Uint32 ms)

{

	int retval;

	struct timeval delta;

	struct timespec abstime;

	if ( ! cond ) {

		SDL_SetError("Passed a NULL condition variable");

		return -1;

	}

	gettimeofday(&delta, NULL);

	abstime.tv_sec = delta.tv_sec + (ms/1000);

	abstime.tv_nsec = (delta.tv_usec + (ms%1000) * 1000) * 1000;

        if ( abstime.tv_nsec > 1000000000 ) {

          abstime.tv_sec += 1;

          abstime.tv_nsec -= 1000000000;

        }

  tryagain:

	retval = pthread_cond_timedwait(&cond->cond, &mutex->id, &abstime);

	switch (retval) {

	    case EINTR:

		goto tryagain;

		break;

	    case ETIMEDOUT:

		retval = SDL_MUTEX_TIMEDOUT;

		break;

	    case 0:

		break;

	    default:

		SDL_SetError("pthread_cond_timedwait() failed");

		retval = -1;

		break;

	}

	return retval;

}

/* Wait on the condition variable, unlocking the provided mutex.

   The mutex must be locked before entering this function!

 */

int SDL_CondWait(SDL_cond *cond, SDL_mutex *mutex)

{

	int retval;

	if ( ! cond ) {

		SDL_SetError("Passed a NULL condition variable");

		return -1;

	}

	retval = 0;

	if ( pthread_cond_wait(&cond->cond, &mutex->id) != 0 ) {

		SDL_SetError("pthread_cond_wait() failed");

		retval = -1;

	}

	return retval;

}

#endif