Blame rt/tst-clock.c

Packit Service 1c5418
/* Test program for POSIX clock_* functions.
Packit Service 1c5418
   Copyright (C) 2000-2018 Free Software Foundation, Inc.
Packit Service 1c5418
   This file is part of the GNU C Library.
Packit Service 1c5418
   Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
Packit Service 1c5418
Packit Service 1c5418
   The GNU C Library is free software; you can redistribute it and/or
Packit Service 1c5418
   modify it under the terms of the GNU Lesser General Public
Packit Service 1c5418
   License as published by the Free Software Foundation; either
Packit Service 1c5418
   version 2.1 of the License, or (at your option) any later version.
Packit Service 1c5418
Packit Service 1c5418
   The GNU C Library is distributed in the hope that it will be useful,
Packit Service 1c5418
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 1c5418
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit Service 1c5418
   Lesser General Public License for more details.
Packit Service 1c5418
Packit Service 1c5418
   You should have received a copy of the GNU Lesser General Public
Packit Service 1c5418
   License along with the GNU C Library; if not, see
Packit Service 1c5418
   <http://www.gnu.org/licenses/>.  */
Packit Service 1c5418
Packit Service 1c5418
#include <stdio.h>
Packit Service 1c5418
#include <string.h>
Packit Service 1c5418
#include <time.h>
Packit Service 1c5418
#include <stdint.h>
Packit Service 1c5418
Packit Service 1c5418
Packit Service 1c5418
/* We want to see output immediately.  */
Packit Service 1c5418
#define STDOUT_UNBUFFERED
Packit Service 1c5418
Packit Service 1c5418
/* We expect to run at least 10 seconds.  */
Packit Service 1c5418
#define TIMEOUT 15
Packit Service 1c5418
Packit Service 1c5418
static int
Packit Service 1c5418
clock_test (clockid_t cl)
Packit Service 1c5418
{
Packit Service 1c5418
  struct timespec old_ts;
Packit Service 1c5418
  struct timespec ts;
Packit Service 1c5418
  struct timespec waitit;
Packit Service 1c5418
  int result = 0;
Packit Service 1c5418
  int i;
Packit Service 1c5418
Packit Service 1c5418
  memset (&ts, '\0', sizeof ts);
Packit Service 1c5418
Packit Service 1c5418
  waitit.tv_sec = 0;
Packit Service 1c5418
  waitit.tv_nsec = 500000000;
Packit Service 1c5418
Packit Service 1c5418
  /* Get and print resolution of the clock.  */
Packit Service 1c5418
  if (clock_getres (cl, &ts) == 0)
Packit Service 1c5418
    {
Packit Service 1c5418
      if (ts.tv_nsec < 0 || ts.tv_nsec >= 1000000000)
Packit Service 1c5418
	{
Packit Service 1c5418
	  printf ("clock %d: nanosecond value of resolution wrong\n", cl);
Packit Service 1c5418
	  result = 1;
Packit Service 1c5418
	}
Packit Service 1c5418
      else
Packit Service 1c5418
	printf ("clock %d: resolution = %jd.%09jd secs\n",
Packit Service 1c5418
		cl, (intmax_t) ts.tv_sec, (intmax_t) ts.tv_nsec);
Packit Service 1c5418
    }
Packit Service 1c5418
  else
Packit Service 1c5418
    {
Packit Service 1c5418
      printf ("clock %d: cannot get resolution\n", cl);
Packit Service 1c5418
      result = 1;
Packit Service 1c5418
    }
Packit Service 1c5418
Packit Service 1c5418
  memset (&ts, '\0', sizeof ts);
Packit Service 1c5418
  memset (&old_ts, '\0', sizeof old_ts);
Packit Service 1c5418
Packit Service 1c5418
  /* Next get the current time value a few times.  */
Packit Service 1c5418
  for (i = 0; i < 10; ++i)
Packit Service 1c5418
    {
Packit Service 1c5418
      if (clock_gettime (cl, &ts) == 0)
Packit Service 1c5418
	{
Packit Service 1c5418
	  if (ts.tv_nsec < 0 || ts.tv_nsec >= 1000000000)
Packit Service 1c5418
	    {
Packit Service 1c5418
	      printf ("clock %d: nanosecond value of time wrong (try %d)\n",
Packit Service 1c5418
		      cl, i);
Packit Service 1c5418
	      result = 1;
Packit Service 1c5418
	    }
Packit Service 1c5418
	  else
Packit Service 1c5418
	    {
Packit Service 1c5418
	      printf ("clock %d: time = %jd.%09jd secs\n",
Packit Service 1c5418
		      cl, (intmax_t) ts.tv_sec, (intmax_t) ts.tv_nsec);
Packit Service 1c5418
Packit Service 1c5418
	      if (memcmp (&ts, &old_ts, sizeof ts) == 0)
Packit Service 1c5418
		{
Packit Service 1c5418
		  printf ("clock %d: time hasn't changed (try %d)\n", cl, i);
Packit Service 1c5418
		  result = 1;
Packit Service 1c5418
Packit Service 1c5418
		  old_ts = ts;
Packit Service 1c5418
		}
Packit Service 1c5418
	    }
Packit Service 1c5418
	}
Packit Service 1c5418
      else
Packit Service 1c5418
	{
Packit Service 1c5418
	  printf ("clock %d: cannot get time (try %d)\n", cl, i);
Packit Service 1c5418
	  result = 1;
Packit Service 1c5418
	}
Packit Service 1c5418
Packit Service 1c5418
      /* Wait a bit before the next iteration.  */
Packit Service 1c5418
      nanosleep (&waitit, NULL);
Packit Service 1c5418
    }
Packit Service 1c5418
Packit Service 1c5418
  return result;
Packit Service 1c5418
}
Packit Service 1c5418
Packit Service 1c5418
static int
Packit Service 1c5418
do_test (void)
Packit Service 1c5418
{
Packit Service 1c5418
  clockid_t cl;
Packit Service 1c5418
  int result;
Packit Service 1c5418
Packit Service 1c5418
  result = clock_test (CLOCK_REALTIME);
Packit Service 1c5418
Packit Service 1c5418
  if (clock_getcpuclockid (0, &cl) == 0)
Packit Service 1c5418
    /* XXX It's not yet a bug when this fails.  */
Packit Service 1c5418
    clock_test (cl);
Packit Service 1c5418
  else
Packit Service 1c5418
	  printf("CPU clock unavailble, skipping test\n");
Packit Service 1c5418
Packit Service 1c5418
  return result;
Packit Service 1c5418
}
Packit Service 1c5418
#define TEST_FUNCTION do_test ()
Packit Service 1c5418
Packit Service 1c5418
Packit Service 1c5418
#include "../test-skeleton.c"