summaryrefslogtreecommitdiff
path: root/tests/benchtest2.c
blob: f2932b99af4e16f9eedc4f384940557277c03d1c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
/*
 * benchtest1.c
 *
 * Measure time taken to complete an elementary operation.
 *
 * - Mutex
 *   Two threads iterate over lock/unlock for each mutex type.
 *   The two threads are forced into lock-step using two mutexes,
 *   forcing the threads to block on each lock operation. The
 *   time measured is therefore the worst case senario.
 */

#include "test.h"
#include <sys/timeb.h>

#ifdef __GNUC__
#include <stdlib.h>
#endif

#define ITERATIONS      100000L

pthread_mutex_t gate1, gate2;
pthread_mutexattr_t ma;
long durationMilliSecs;
long overHeadMilliSecs = 0;
struct _timeb currSysTimeStart;
struct _timeb currSysTimeStop;
pthread_t worker;
int running = 0;

#define GetDurationMilliSecs(_TStart, _TStop) ((_TStop.time*1000+_TStop.millitm) \
                                               - (_TStart.time*1000+_TStart.millitm))

/*
 * Dummy use of j, otherwise the loop may be removed by the optimiser
 * when doing the overhead timing with an empty loop.
 */
#define TESTSTART \
  { int i, j = 0, k = 0; _ftime(&currSysTimeStart); for (i = 0; i < ITERATIONS; i++) { j++;

#define TESTSTOP \
  }; _ftime(&currSysTimeStop); if (j + k == i) j++; }


void *
overheadThread(void * arg)
{
  do
    {
      sched_yield();
    }
  while (running);

  return NULL;
}


void *
workerThread(void * arg)
{
  do
    {
      (void) pthread_mutex_lock(&gate1);
      (void) pthread_mutex_lock(&gate2);
      (void) pthread_mutex_unlock(&gate1);
      sched_yield();
      (void) pthread_mutex_unlock(&gate2);
    }
  while (running);

  return NULL;
}

void
runTest (char * testNameString, int mType)
{
#ifdef PTHREAD_MUTEX_DEFAULT
  pthread_mutexattr_settype(&ma, mType);
#endif
  pthread_mutex_init(&gate1, &ma);
  pthread_mutex_init(&gate2, &ma);

  (void) pthread_mutex_lock(&gate1);
  (void) pthread_mutex_lock(&gate2);

  running = 1;

  (void) pthread_create(&worker, NULL, workerThread, NULL);

  TESTSTART
  (void) pthread_mutex_unlock(&gate1);
  sched_yield();
  (void) pthread_mutex_unlock(&gate2);
  (void) pthread_mutex_lock(&gate1);
  (void) pthread_mutex_lock(&gate2);
  TESTSTOP

  running = 0;

  (void) pthread_mutex_unlock(&gate2);
  (void) pthread_mutex_unlock(&gate1);

  (void) pthread_join(worker, NULL);

  pthread_mutex_destroy(&gate2);
  pthread_mutex_destroy(&gate1);

  durationMilliSecs = GetDurationMilliSecs(currSysTimeStart, currSysTimeStop)
    - overHeadMilliSecs;

  printf( "%-25s %15ld %15ld %15.3f\n",
          testNameString,
          ITERATIONS,
          durationMilliSecs,
          (float) durationMilliSecs * 1E3 / ITERATIONS / 4   /* Four locks/unlocks per iteration */);
}


int
main (int argc, char *argv[])
{
  pthread_mutexattr_init(&ma);

  printf( "Two threads, blocking mutex locks/unlocks.\n\n");

  printf( "%-25s %15s %15s %15s\n",
          "Test",
          "Iterations",
          "Total(msec)",
          "lock/unlock(usec)");

  /*
   * Time the loop overhead so we can subtract it from the actual test times.
   */

  running = 1;

  (void) pthread_create(&worker, NULL, overheadThread, NULL);

  TESTSTART
  sched_yield();
  TESTSTOP

  running = 0;

  (void) pthread_join(worker, NULL);

  pthread_mutex_destroy(&gate2);
  pthread_mutex_destroy(&gate1);

  durationMilliSecs = GetDurationMilliSecs(currSysTimeStart, currSysTimeStop)
    - overHeadMilliSecs;

  printf( "%-25s %15ld %15ld\n",
          "Overhead",
          ITERATIONS,
          durationMilliSecs);

  overHeadMilliSecs = durationMilliSecs;

  /*
   * Now we can start the actual tests
   */
#ifdef PTHREAD_MUTEX_DEFAULT
  runTest("PTHREAD_MUTEX_DEFAULT", PTHREAD_MUTEX_DEFAULT);

  runTest("PTHREAD_MUTEX_NORMAL", PTHREAD_MUTEX_NORMAL);

  runTest("PTHREAD_MUTEX_ERRORCHECK", PTHREAD_MUTEX_ERRORCHECK);

  runTest("PTHREAD_MUTEX_RECURSIVE", PTHREAD_MUTEX_RECURSIVE);
#else
  runTest("Blocking locks", 0);
#endif

  /*
   * End of tests.
   */

  pthread_mutexattr_destroy(&ma);

  return 0;
}