]> git.sesse.net Git - vlc/blobdiff - src/misc/mtime.c
Win32: use Win32DebugOutputMsgW instead of ANSI version
[vlc] / src / misc / mtime.c
index ac8afb58f862dfbccc6b4fa80615e4e34e343510..dd95a61a665aec6e71ee8129cc973d8d0a58558b 100644 (file)
@@ -2,7 +2,7 @@
  * mtime.c: high resolution time management functions
  * Functions are prototyped in vlc_mtime.h.
  *****************************************************************************
- * Copyright (C) 1998-2007 the VideoLAN team
+ * Copyright (C) 1998-2007 VLC authors and VideoLAN
  * Copyright © 2006-2007 Rémi Denis-Courmont
  * $Id$
  *
  *          Rémi Denis-Courmont <rem$videolan,org>
  *          Gisle Vanem
  *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * This program 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 program 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 General Public License for more details.
+ * 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 General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this program; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  *****************************************************************************/
 
 /*****************************************************************************
 #endif
 
 #include <vlc_common.h>
-
-#include <time.h>                      /* clock_gettime(), clock_nanosleep() */
 #include <assert.h>
-#include <errno.h>
 
 #ifdef HAVE_UNISTD_H
-#   include <unistd.h>                                           /* select() */
-#endif
-
-#ifdef HAVE_KERNEL_OS_H
-#   include <kernel/OS.h>
-#endif
-
-#if defined( WIN32 ) || defined( UNDER_CE )
-#   include <windows.h>
-#   include <mmsystem.h>
-#endif
-
-#if defined(HAVE_SYS_TIME_H)
-#   include <sys/time.h>
-#endif
-
-#if defined(__APPLE__) && !defined(__powerpc__) && !defined(__ppc__) && !defined(__ppc64__)
-#define USE_APPLE_MACH 1
-#   include <mach/mach.h>
-#   include <mach/mach_time.h>
-#endif
-
-#if !defined(HAVE_STRUCT_TIMESPEC)
-struct timespec
-{
-    time_t  tv_sec;
-    int32_t tv_nsec;
-};
+# include <unistd.h>
 #endif
-
-#if defined(HAVE_NANOSLEEP) && !defined(HAVE_DECL_NANOSLEEP)
-int nanosleep(struct timespec *, struct timespec *);
-#endif
-
-#if !defined (_POSIX_CLOCK_SELECTION)
-#  define _POSIX_CLOCK_SELECTION (-1)
+#if !defined (_POSIX_TIMERS)
+# define _POSIX_TIMERS (-1)
 #endif
-
-# if (_POSIX_CLOCK_SELECTION < 0)
-/*
- * We cannot use the monotonic clock if clock selection is not available,
- * as it would screw vlc_cond_timedwait() completely. Instead, we have to
- * stick to the realtime clock. Nevermind it screws everything up when ntpdate
- * warps the wall clock.
- */
-#  undef CLOCK_MONOTONIC
-#  define CLOCK_MONOTONIC CLOCK_REALTIME
-#elif !defined (HAVE_CLOCK_NANOSLEEP)
-/* Clock selection without clock in the first place, I don't think so. */
-#  error We have quite a situation here! Fix me if it ever happens.
+#if (_POSIX_TIMERS > 0)
+# include <time.h> /* clock_gettime() */
+#else
+# include <sys/time.h>
 #endif
 
 /**
@@ -149,211 +105,6 @@ char *secstotimestr( char *psz_buffer, int32_t i_seconds )
     return psz_buffer;
 }
 
-#if defined (HAVE_CLOCK_NANOSLEEP)
-static unsigned prec = 0;
-
-static void mprec_once( void )
-{
-    struct timespec ts;
-    if( clock_getres( CLOCK_MONOTONIC, &ts ))
-        clock_getres( CLOCK_REALTIME, &ts );
-
-    prec = ts.tv_nsec / 1000;
-}
-#endif
-
-/**
- * Return a value that is no bigger than the clock precision
- * (possibly zero).
- */
-static inline unsigned mprec( void )
-{
-#if defined (HAVE_CLOCK_NANOSLEEP)
-    static pthread_once_t once = PTHREAD_ONCE_INIT;
-    pthread_once( &once, mprec_once );
-    return prec;
-#else
-    return 0;
-#endif
-}
-
-#ifdef USE_APPLE_MACH
-static mach_timebase_info_data_t mtime_timebase_info;
-static pthread_once_t mtime_timebase_info_once = PTHREAD_ONCE_INIT;
-static void mtime_init_timebase(void)
-{
-    mach_timebase_info(&mtime_timebase_info);
-}
-#endif
-
-/**
- * Return high precision date
- *
- * Use a 1 MHz clock when possible, or 1 kHz
- *
- * Beware ! It doesn't reflect the actual date (since epoch), but can be the machine's uptime or anything (when monotonic clock is used)
- */
-mtime_t mdate( void )
-{
-    mtime_t res;
-
-#if defined (HAVE_CLOCK_NANOSLEEP)
-    struct timespec ts;
-
-    /* Try to use POSIX monotonic clock if available */
-    if( clock_gettime( CLOCK_MONOTONIC, &ts ) == EINVAL )
-        /* Run-time fallback to real-time clock (always available) */
-        (void)clock_gettime( CLOCK_REALTIME, &ts );
-
-    res = ((mtime_t)ts.tv_sec * (mtime_t)1000000)
-           + (mtime_t)(ts.tv_nsec / 1000);
-
-#elif defined( HAVE_KERNEL_OS_H )
-    res = real_time_clock_usecs();
-
-#elif defined( USE_APPLE_MACH )
-    pthread_once(&mtime_timebase_info_once, mtime_init_timebase);
-    uint64_t date = mach_absolute_time();
-    mach_timebase_info_data_t tb = mtime_timebase_info;
-
-    /* tb.denom is uint32_t, switch to 64 bits to prevent overflow. */
-    uint64_t denom = tb.denom;
-
-    /* Switch to microsecs */
-    denom *= 1000LL;
-
-    /* Split the division to prevent overflow */
-    lldiv_t d = lldiv (tb.numer, denom);
-
-    res = (d.quot * date) + ((d.rem * date) / denom);
-
-#elif defined( WIN32 ) || defined( UNDER_CE )
-    /* We don't need the real date, just the value of a high precision timer */
-    LARGE_INTEGER counter, freq;
-    if (!QueryPerformanceCounter (&counter)
-     || !QueryPerformanceFrequency (&freq))
-        abort();
-
-    /* Convert to from (1/freq) to microsecond resolution */
-    /* We need to split the division to avoid 63-bits overflow */
-    lldiv_t d = lldiv (counter.QuadPart, freq.QuadPart);
-
-    res = (d.quot * 1000000) + ((d.rem * 1000000) / freq.QuadPart);
-
-#else
-    struct timeval tv_date;
-
-    /* gettimeofday() cannot fail given &tv_date is a valid address */
-    (void)gettimeofday( &tv_date, NULL );
-    res = (mtime_t) tv_date.tv_sec * 1000000 + (mtime_t) tv_date.tv_usec;
-#endif
-
-    return res;
-}
-
-#undef mwait
-/**
- * Wait for a date
- *
- * This function uses select() and an system date function to wake up at a
- * precise date. It should be used for process synchronization. If current date
- * is posterior to wished date, the function returns immediately.
- * \param date The date to wake up at
- */
-void mwait( mtime_t date )
-{
-    /* If the deadline is already elapsed, or within the clock precision,
-     * do not even bother the system timer. */
-    date -= mprec();
-
-#if defined (HAVE_CLOCK_NANOSLEEP)
-    lldiv_t d = lldiv( date, 1000000 );
-    struct timespec ts = { d.quot, d.rem * 1000 };
-
-    int val;
-    while( ( val = clock_nanosleep( CLOCK_MONOTONIC, TIMER_ABSTIME, &ts,
-                                    NULL ) ) == EINTR );
-    if( val == EINVAL )
-    {
-        ts.tv_sec = d.quot; ts.tv_nsec = d.rem * 1000;
-        while( clock_nanosleep( CLOCK_REALTIME, 0, &ts, NULL ) == EINTR );
-    }
-
-#elif defined (WIN32)
-    mtime_t i_total;
-
-    while( (i_total = (date - mdate())) > 0 )
-    {
-        const mtime_t i_sleep = i_total / 1000;
-        DWORD i_delay = (i_sleep > 0x7fffffff) ? 0x7fffffff : i_sleep;
-        vlc_testcancel();
-        SleepEx( i_delay, TRUE );
-    }
-    vlc_testcancel();
-
-#else
-    mtime_t delay = date - mdate();
-    if( delay > 0 )
-        msleep( delay );
-
-#endif
-}
-
-
-#include "libvlc.h" /* vlc_backtrace() */
-#undef msleep
-
-/**
- * Portable usleep(). Cancellation point.
- *
- * \param delay the amount of time to sleep
- */
-void msleep( mtime_t delay )
-{
-#if defined( HAVE_CLOCK_NANOSLEEP )
-    lldiv_t d = lldiv( delay, 1000000 );
-    struct timespec ts = { d.quot, d.rem * 1000 };
-
-    int val;
-    while( ( val = clock_nanosleep( CLOCK_MONOTONIC, 0, &ts, &ts ) ) == EINTR );
-    if( val == EINVAL )
-    {
-        ts.tv_sec = d.quot; ts.tv_nsec = d.rem * 1000;
-        while( clock_nanosleep( CLOCK_REALTIME, 0, &ts, &ts ) == EINTR );
-    }
-
-#elif defined( HAVE_KERNEL_OS_H )
-    snooze( delay );
-
-#elif defined( WIN32 ) || defined( UNDER_CE )
-    mwait (mdate () + delay);
-
-#elif defined( HAVE_NANOSLEEP )
-    struct timespec ts_delay;
-
-    ts_delay.tv_sec = delay / 1000000;
-    ts_delay.tv_nsec = (delay % 1000000) * 1000;
-
-    while( nanosleep( &ts_delay, &ts_delay ) && ( errno == EINTR ) );
-
-#elif defined (USE_APPLE_MACH)
-    /* The version that should be used, if it was cancelable */
-    pthread_once(&mtime_timebase_info_once, mtime_init_timebase);
-    uint64_t mach_time = delay * 1000 * mtime_timebase_info.denom / mtime_timebase_info.numer;
-    mach_wait_until(mach_time + mach_absolute_time());
-
-#else
-    struct timeval tv_delay;
-
-    tv_delay.tv_sec = delay / 1000000;
-    tv_delay.tv_usec = delay % 1000000;
-
-    /* If a signal is caught, you are screwed. Update your OS to nanosleep()
-     * or clock_nanosleep() if this is an issue. */
-    select( 0, NULL, NULL, NULL, &tv_delay );
-#endif
-}
-
 /*
  * Date management (internal and external)
  */
@@ -434,9 +185,11 @@ void date_Move( date_t *p_date, mtime_t i_difference )
  */
 mtime_t date_Increment( date_t *p_date, uint32_t i_nb_samples )
 {
-    mtime_t i_dividend = (mtime_t)i_nb_samples * 1000000 * p_date->i_divider_den;
-    p_date->date += i_dividend / p_date->i_divider_num;
-    p_date->i_remainder += (int)(i_dividend % p_date->i_divider_num);
+    mtime_t i_dividend = i_nb_samples * CLOCK_FREQ * p_date->i_divider_den;
+    lldiv_t d = lldiv( i_dividend, p_date->i_divider_num );
+
+    p_date->date += d.quot;
+    p_date->i_remainder += (int)d.rem;
 
     if( p_date->i_remainder >= p_date->i_divider_num )
     {
@@ -476,66 +229,26 @@ mtime_t date_Decrement( date_t *p_date, uint32_t i_nb_samples )
     return p_date->date;
 }
 
-#ifndef HAVE_GETTIMEOFDAY
-
-#ifdef WIN32
-
-/*
- * Number of micro-seconds between the beginning of the Windows epoch
- * (Jan. 1, 1601) and the Unix epoch (Jan. 1, 1970).
- *
- * This assumes all Win32 compilers have 64-bit support.
- */
-#if defined(_MSC_VER) || defined(_MSC_EXTENSIONS) || defined(__WATCOMC__)
-#   define DELTA_EPOCH_IN_USEC  11644473600000000Ui64
-#else
-#   define DELTA_EPOCH_IN_USEC  11644473600000000ULL
-#endif
-
-static uint64_t filetime_to_unix_epoch (const FILETIME *ft)
-{
-    uint64_t res = (uint64_t) ft->dwHighDateTime << 32;
-
-    res |= ft->dwLowDateTime;
-    res /= 10;                   /* from 100 nano-sec periods to usec */
-    res -= DELTA_EPOCH_IN_USEC;  /* from Win epoch to Unix epoch */
-    return (res);
-}
-
-static int gettimeofday (struct timeval *tv, void *tz )
-{
-    FILETIME  ft;
-    uint64_t tim;
-
-    if (!tv) {
-        return VLC_EGENERIC;
-    }
-    GetSystemTimeAsFileTime (&ft);
-    tim = filetime_to_unix_epoch (&ft);
-    tv->tv_sec  = (long) (tim / 1000000L);
-    tv->tv_usec = (long) (tim % 1000000L);
-    return (0);
-}
-
-#endif
-
-#endif
-
 /**
  * @return NTP 64-bits timestamp in host byte order.
  */
 uint64_t NTPtime64 (void)
 {
+#if (_POSIX_TIMERS > 0)
     struct timespec ts;
-#if defined (CLOCK_REALTIME) && !defined (__OS2__)
+
     clock_gettime (CLOCK_REALTIME, &ts);
 #else
+    struct timeval tv;
+    struct
     {
-        struct timeval tv;
-        gettimeofday (&tv, NULL);
-        ts.tv_sec = tv.tv_sec;
-        ts.tv_nsec = tv.tv_usec * 1000;
-    }
+        uint32_t tv_sec;
+        uint32_t tv_nsec;
+    } ts;
+
+    gettimeofday (&tv, NULL);
+    ts.tv_sec = tv.tv_sec;
+    ts.tv_nsec = tv.tv_usec * 1000;
 #endif
 
     /* Convert nanoseconds to 32-bits fraction (232 picosecond units) */