Libgomp: config/posix/time.c Source File

00001 /* Copyright (C) 2005, 2009 Free Software Foundation, Inc.
00002    Contributed by Richard Henderson <rth@redhat.com>.
00003 
00004    This file is part of the GNU OpenMP Library (libgomp).
00005 
00006    Libgomp is free software; you can redistribute it and/or modify it
00007    under the terms of the GNU General Public License as published by
00008    the Free Software Foundation; either version 3, or (at your option)
00009    any later version.
00010 
00011    Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
00012    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
00013    FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
00014    more details.
00015 
00016    Under Section 7 of GPL version 3, you are granted additional
00017    permissions described in the GCC Runtime Library Exception, version
00018    3.1, as published by the Free Software Foundation.
00019 
00020    You should have received a copy of the GNU General Public License and
00021    a copy of the GCC Runtime Library Exception along with this program;
00022    see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
00023    <http://www.gnu.org/licenses/>.  */
00024 
00025 /* This file contains system specific timer routines.  It is expected that
00026    a system may well want to write special versions of each of these.
00027 
00028    The following implementation uses the most simple POSIX routines.
00029    If present, POSIX 4 clocks should be used instead.  */
00030 
00031 #include "libgomp.h"
00032 #include <unistd.h>
00033 #if TIME_WITH_SYS_TIME
00034 # include <sys/time.h>
00035 # include <time.h>
00036 #else
00037 # if HAVE_SYS_TIME_H
00038 #  include <sys/time.h>
00039 # else
00040 #  include <time.h>
00041 # endif
00042 #endif
00043 
00044 
00045 double
00046 omp_get_wtime (void)
00047 {
00048 #ifdef HAVE_CLOCK_GETTIME
00049   struct timespec ts;
00050 # ifdef CLOCK_MONOTONIC
00051   if (clock_gettime (CLOCK_MONOTONIC, &ts) < 0)
00052 # endif
00053     clock_gettime (CLOCK_REALTIME, &ts);
00054   return ts.tv_sec + ts.tv_nsec / 1e9;
00055 #else
00056   struct timeval tv;
00057   gettimeofday (&tv, NULL);
00058   return tv.tv_sec + tv.tv_usec / 1e6;
00059 #endif
00060 }
00061 
00062 double
00063 omp_get_wtick (void)
00064 {
00065 #ifdef HAVE_CLOCK_GETTIME
00066   struct timespec ts;
00067 # ifdef CLOCK_MONOTONIC
00068   if (clock_getres (CLOCK_MONOTONIC, &ts) < 0)
00069 # endif
00070     clock_getres (CLOCK_REALTIME, &ts);
00071   return ts.tv_sec + ts.tv_nsec / 1e9;
00072 #else
00073   return 1.0 / sysconf(_SC_CLK_TCK);
00074 #endif
00075 }
00076 
00077 ialias (omp_get_wtime)
00078 ialias (omp_get_wtick)