powerpc: POWER7 optimizations
[glibc.git] / nptl / tst-clock2.c
blobbca40956e20d3659804b24f88a6740d93ee058cd
1 /* Copyright (C) 2003, 2004 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18 02111-1307 USA. */
20 #include <errno.h>
21 #include <pthread.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <time.h>
25 #include <unistd.h>
28 #if defined _POSIX_THREAD_CPUTIME && _POSIX_THREAD_CPUTIME >= 0
29 static pthread_barrier_t b2;
30 static pthread_barrier_t bN;
33 static void *
34 tf (void *arg)
36 int e = pthread_barrier_wait (&b2);
37 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
39 puts ("barrier_wait failed");
40 exit (1);
43 e = pthread_barrier_wait (&bN);
44 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
46 puts ("barrier_wait failed");
47 exit (1);
50 return NULL;
52 #endif
55 int
56 do_test (void)
58 #if defined _POSIX_THREAD_CPUTIME && _POSIX_THREAD_CPUTIME >= 0
59 # define N 10
61 # if _POSIX_THREAD_CPUTIME == 0
62 if (sysconf (_SC_THREAD_CPUTIME) < 0)
64 puts ("_POSIX_THREAD_CPUTIME option not available");
65 return 0;
67 # endif
69 if (pthread_barrier_init (&b2, NULL, 2) != 0
70 || pthread_barrier_init (&bN, NULL, N + 1) != 0)
72 puts ("barrier_init failed");
73 return 1;
76 struct timespec ts = { .tv_sec = 0, .tv_nsec = 100000000 };
77 TEMP_FAILURE_RETRY (nanosleep (&ts, &ts));
79 pthread_t th[N + 1];
80 clockid_t cl[N + 1];
81 # ifndef CLOCK_THREAD_CPUTIME_ID
82 if (pthread_getcpuclockid (pthread_self (), &cl[0]) != 0)
84 puts ("own pthread_getcpuclockid failed");
85 return 1;
87 # else
88 cl[0] = CLOCK_THREAD_CPUTIME_ID;
89 # endif
91 pthread_attr_t at;
93 if (pthread_attr_init (&at) != 0)
95 puts ("attr_init failed");
96 return 1;
99 if (pthread_attr_setstacksize (&at, 1 * 1024 * 1024) != 0)
101 puts ("attr_setstacksize failed");
102 return 1;
105 int i;
106 int e;
107 for (i = 0; i < N; ++i)
109 if (pthread_create (&th[i], &at, tf, NULL) != 0)
111 puts ("create failed");
112 return 1;
115 e = pthread_barrier_wait (&b2);
116 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
118 puts ("barrier_wait failed");
119 return 1;
122 ts.tv_sec = 0;
123 ts.tv_nsec = 100000000;
124 TEMP_FAILURE_RETRY (nanosleep (&ts, &ts));
126 if (pthread_getcpuclockid (th[i], &cl[i + 1]) != 0)
128 puts ("pthread_getcpuclockid failed");
129 return 1;
133 if (pthread_attr_destroy (&at) != 0)
135 puts ("attr_destroy failed");
136 return 1;
139 struct timespec t[N + 1];
140 for (i = 0; i < N + 1; ++i)
141 if (clock_gettime (cl[i], &t[i]) != 0)
143 printf ("clock_gettime round %d failed\n", i);
144 return 1;
147 for (i = 0; i < N; ++i)
149 struct timespec diff;
151 diff.tv_sec = t[i].tv_sec - t[i + 1].tv_sec;
152 diff.tv_nsec = t[i].tv_nsec - t[i + 1].tv_nsec;
153 if (diff.tv_nsec < 0)
155 diff.tv_nsec += 1000000000;
156 --diff.tv_sec;
159 if (diff.tv_sec < 0 || (diff.tv_sec == 0 && diff.tv_nsec < 100000000))
161 printf ("\
162 difference between thread %d and %d too small (%ld.%09ld)\n",
163 i, i + 1, (long int) diff.tv_sec, (long int) diff.tv_nsec);
164 return 1;
167 printf ("diff %d->%d: %ld.%09ld\n",
168 i, i + 1, (long int) diff.tv_sec, (long int) diff.tv_nsec);
171 ts.tv_sec = 0;
172 ts.tv_nsec = 0;
173 for (i = 0; i < N + 1; ++i)
174 if (clock_settime (cl[i], &ts) != 0)
176 printf ("clock_settime(%d) round %d failed\n", cl[i], i);
177 return 1;
180 for (i = 0; i < N + 1; ++i)
182 if (clock_gettime (cl[i], &ts) != 0)
184 puts ("clock_gettime failed");
185 return 1;
188 if (ts.tv_sec > t[i].tv_sec
189 || (ts.tv_sec == t[i].tv_sec && ts.tv_nsec > t[i].tv_nsec))
191 puts ("clock_settime didn't reset clock");
192 return 1;
195 #endif
197 return 0;
201 #define TEST_FUNCTION do_test ()
202 #include "../test-skeleton.c"