1 /*
2 * spin4.c
3 *
4 *
5 * --------------------------------------------------------------------------
6 *
7 * Pthreads-win32 - POSIX Threads Library for Win32
8 * Copyright(C) 1998 John E. Bossom
9 * Copyright(C) 1999,2005 Pthreads-win32 contributors
10 *
11 * Contact Email: rpj@callisto.canberra.edu.au
12 *
13 * The current list of contributors is contained
14 * in the file CONTRIBUTORS included with the source
15 * code distribution. The list can also be seen at the
16 * following World Wide Web location:
17 * http://sources.redhat.com/pthreads-win32/contributors.html
18 *
19 * This library is free software; you can redistribute it and/or
20 * modify it under the terms of the GNU Lesser General Public
21 * License as published by the Free Software Foundation; either
22 * version 2 of the License, or (at your option) any later version.
23 *
24 * This library is distributed in the hope that it will be useful,
25 * but WITHOUT ANY WARRANTY; without even the implied warranty of
26 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
27 * Lesser General Public License for more details.
28 *
29 * You should have received a copy of the GNU Lesser General Public
30 * License along with this library in the file COPYING.LIB;
31 * if not, write to the Free Software Foundation, Inc.,
32 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
33 *
34 * --------------------------------------------------------------------------
35 *
36 * Declare a static spinlock object, lock it, spin on it,
37 * and then unlock it again.
38 */
39
40 #include "test.h"
41 #include <sys/timeb.h>
42
43 pthread_spinlock_t lock = PTHREAD_SPINLOCK_INITIALIZER;
44 struct _timeb currSysTimeStart;
45 struct _timeb currSysTimeStop;
46
47 #define GetDurationMilliSecs(_TStart, _TStop) ((_TStop.time*1000+_TStop.millitm) \
48 - (_TStart.time*1000+_TStart.millitm))
49
50 static int washere = 0;
51
func(void * arg)52 void * func(void * arg)
53 {
54 _ftime(&currSysTimeStart);
55 washere = 1;
56 assert(pthread_spin_lock(&lock) == 0);
57 assert(pthread_spin_unlock(&lock) == 0);
58 _ftime(&currSysTimeStop);
59
60 return (void *) (size_t) GetDurationMilliSecs(currSysTimeStart, currSysTimeStop);
61 }
62
63 int
main()64 main()
65 {
66 intptr_t result = 0;
67 pthread_t t;
68 int CPUs;
69 struct _timeb sysTime;
70
71 if ((CPUs = pthread_num_processors_np()) == 1)
72 {
73 printf("Test not run - it requires multiple CPUs.\n");
74 exit(0);
75 }
76
77 assert(pthread_spin_lock(&lock) == 0);
78
79 assert(pthread_create(&t, NULL, func, NULL) == 0);
80
81 while (washere == 0)
82 {
83 sched_yield();
84 }
85
86 do
87 {
88 sched_yield();
89 _ftime(&sysTime);
90 }
91 while (GetDurationMilliSecs(currSysTimeStart, sysTime) <= 1000);
92
93 assert(pthread_spin_unlock(&lock) == 0);
94
95 assert(pthread_join(t, (void **) &result) == 0);
96 assert(result > 1000);
97
98 assert(pthread_spin_destroy(&lock) == 0);
99
100 assert(washere == 1);
101
102 return 0;
103 }
104