136 lines
4.4 KiB
Matlab
136 lines
4.4 KiB
Matlab
//========================================================================
|
|
// GLFW - An OpenGL framework
|
|
// Platform: Cocoa/NSOpenGL
|
|
// API Version: 2.7
|
|
// WWW: http://www.glfw.org/
|
|
//------------------------------------------------------------------------
|
|
// Copyright (c) 2009-2010 Camilla Berglund <elmindreda@elmindreda.org>
|
|
//
|
|
// This software is provided 'as-is', without any express or implied
|
|
// warranty. In no event will the authors be held liable for any damages
|
|
// arising from the use of this software.
|
|
//
|
|
// Permission is granted to anyone to use this software for any purpose,
|
|
// including commercial applications, and to alter it and redistribute it
|
|
// freely, subject to the following restrictions:
|
|
//
|
|
// 1. The origin of this software must not be misrepresented; you must not
|
|
// claim that you wrote the original software. If you use this software
|
|
// in a product, an acknowledgment in the product documentation would
|
|
// be appreciated but is not required.
|
|
//
|
|
// 2. Altered source versions must be plainly marked as such, and must not
|
|
// be misrepresented as being the original software.
|
|
//
|
|
// 3. This notice may not be removed or altered from any source
|
|
// distribution.
|
|
//
|
|
//========================================================================
|
|
|
|
#include "internal.h"
|
|
|
|
#include <mach/mach_time.h>
|
|
#include <sys/time.h>
|
|
|
|
|
|
//========================================================================
|
|
// Return raw time
|
|
//========================================================================
|
|
|
|
static uint64_t getRawTime( void )
|
|
{
|
|
return mach_absolute_time();
|
|
}
|
|
|
|
|
|
//========================================================================
|
|
// Initialise timer
|
|
//========================================================================
|
|
|
|
void _glfwInitTimer( void )
|
|
{
|
|
mach_timebase_info_data_t info;
|
|
mach_timebase_info( &info );
|
|
|
|
_glfwLibrary.timer.resolution = (double) info.numer / ( info.denom * 1.0e9 );
|
|
_glfwLibrary.timer.base = getRawTime();
|
|
}
|
|
|
|
|
|
//************************************************************************
|
|
//**** Platform implementation functions ****
|
|
//************************************************************************
|
|
|
|
//========================================================================
|
|
// Return timer value in seconds
|
|
//========================================================================
|
|
|
|
double _glfwPlatformGetTime( void )
|
|
{
|
|
return (double) ( getRawTime() - _glfwLibrary.timer.base ) *
|
|
_glfwLibrary.timer.resolution;
|
|
}
|
|
|
|
|
|
//========================================================================
|
|
// Set timer value in seconds
|
|
//========================================================================
|
|
|
|
void _glfwPlatformSetTime( double time )
|
|
{
|
|
_glfwLibrary.timer.base = getRawTime() -
|
|
(uint64_t) ( time / _glfwLibrary.timer.resolution );
|
|
}
|
|
|
|
|
|
//========================================================================
|
|
// Put a thread to sleep for a specified amount of time
|
|
//========================================================================
|
|
|
|
void _glfwPlatformSleep( double time )
|
|
{
|
|
if( time == 0.0 )
|
|
{
|
|
sched_yield();
|
|
return;
|
|
}
|
|
|
|
struct timeval currenttime;
|
|
struct timespec wait;
|
|
pthread_mutex_t mutex;
|
|
pthread_cond_t cond;
|
|
long dt_sec, dt_usec;
|
|
|
|
// Not all pthread implementations have a pthread_sleep() function. We
|
|
// do it the portable way, using a timed wait for a condition that we
|
|
// will never signal. NOTE: The unistd functions sleep/usleep suspends
|
|
// the entire PROCESS, not a signle thread, which is why we can not
|
|
// use them to implement glfwSleep.
|
|
|
|
// Set timeout time, relatvie to current time
|
|
gettimeofday( ¤ttime, NULL );
|
|
dt_sec = (long) time;
|
|
dt_usec = (long) ((time - (double)dt_sec) * 1000000.0);
|
|
wait.tv_nsec = (currenttime.tv_usec + dt_usec) * 1000L;
|
|
if( wait.tv_nsec > 1000000000L )
|
|
{
|
|
wait.tv_nsec -= 1000000000L;
|
|
dt_sec ++;
|
|
}
|
|
wait.tv_sec = currenttime.tv_sec + dt_sec;
|
|
|
|
// Initialize condition and mutex objects
|
|
pthread_mutex_init( &mutex, NULL );
|
|
pthread_cond_init( &cond, NULL );
|
|
|
|
// Do a timed wait
|
|
pthread_mutex_lock( &mutex );
|
|
pthread_cond_timedwait( &cond, &mutex, &wait );
|
|
pthread_mutex_unlock( &mutex );
|
|
|
|
// Destroy condition and mutex objects
|
|
pthread_mutex_destroy( &mutex );
|
|
pthread_cond_destroy( &cond );
|
|
}
|
|
|