4 * Userspace QSBR - test program
6 * Copyright February 2009 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License along
19 * with this program; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
27 #include <sys/types.h>
34 #include <urcu/arch.h>
40 #if defined(_syscall0)
41 _syscall0(pid_t
, gettid
)
42 #elif defined(__NR_gettid)
43 static inline pid_t
gettid(void)
45 return syscall(__NR_gettid
);
48 #warning "use pid as tid"
49 static inline pid_t
gettid(void)
56 #include <urcu-qsbr.h>
58 pthread_mutex_t rcu_copy_mutex
= PTHREAD_MUTEX_INITIALIZER
;
60 void rcu_copy_mutex_lock(void)
63 ret
= pthread_mutex_lock(&rcu_copy_mutex
);
65 perror("Error in pthread mutex lock");
70 void rcu_copy_mutex_unlock(void)
74 ret
= pthread_mutex_unlock(&rcu_copy_mutex
);
76 perror("Error in pthread mutex unlock");
85 static struct test_array
*test_rcu_pointer
;
87 #define OUTER_READ_LOOP 2000U
88 #define INNER_READ_LOOP 100000U
89 #define READ_LOOP ((unsigned long long)OUTER_READ_LOOP * INNER_READ_LOOP)
91 #define OUTER_WRITE_LOOP 10U
92 #define INNER_WRITE_LOOP 200U
93 #define WRITE_LOOP ((unsigned long long)OUTER_WRITE_LOOP * INNER_WRITE_LOOP)
98 #define NR_READ num_read
99 #define NR_WRITE num_write
101 static cycles_t
__attribute__((aligned(CAA_CACHE_LINE_SIZE
))) *reader_time
;
102 static cycles_t
__attribute__((aligned(CAA_CACHE_LINE_SIZE
))) *writer_time
;
104 void *thr_reader(void *arg
)
107 struct test_array
*local_ptr
;
108 cycles_t time1
, time2
;
110 printf("thread_begin %s, thread id : %lx, tid %lu\n",
111 "reader", (unsigned long) pthread_self(),
112 (unsigned long) gettid());
115 rcu_register_thread();
117 time1
= caa_get_cycles();
118 for (i
= 0; i
< OUTER_READ_LOOP
; i
++) {
119 for (j
= 0; j
< INNER_READ_LOOP
; j
++) {
121 local_ptr
= _rcu_dereference(test_rcu_pointer
);
123 assert(local_ptr
->a
== 8);
127 _rcu_quiescent_state();
129 time2
= caa_get_cycles();
131 rcu_unregister_thread();
133 reader_time
[(unsigned long)arg
] = time2
- time1
;
136 printf("thread_end %s, thread id : %lx, tid %lu\n",
137 "reader", (unsigned long) pthread_self(),
138 (unsigned long) gettid());
143 void *thr_writer(void *arg
)
146 struct test_array
*new, *old
;
147 cycles_t time1
, time2
;
149 printf("thread_begin %s, thread id : %lx, tid %lu\n",
150 "writer", (unsigned long) pthread_self(),
151 (unsigned long) gettid());
154 for (i
= 0; i
< OUTER_WRITE_LOOP
; i
++) {
155 for (j
= 0; j
< INNER_WRITE_LOOP
; j
++) {
156 time1
= caa_get_cycles();
157 new = malloc(sizeof(struct test_array
));
158 rcu_copy_mutex_lock();
159 old
= test_rcu_pointer
;
164 old
= rcu_xchg_pointer(&test_rcu_pointer
, new);
165 rcu_copy_mutex_unlock();
167 /* can be done after unlock */
172 time2
= caa_get_cycles();
173 writer_time
[(unsigned long)arg
] += time2
- time1
;
178 printf("thread_end %s, thread id : %lx, tid %lu\n",
179 "writer", (unsigned long) pthread_self(),
180 (unsigned long) gettid());
184 int main(int argc
, char **argv
)
187 pthread_t
*tid_reader
, *tid_writer
;
190 cycles_t tot_rtime
= 0;
191 cycles_t tot_wtime
= 0;
194 printf("Usage : %s nr_readers nr_writers\n", argv
[0]);
197 num_read
= atoi(argv
[1]);
198 num_write
= atoi(argv
[2]);
200 reader_time
= malloc(sizeof(*reader_time
) * num_read
);
201 writer_time
= malloc(sizeof(*writer_time
) * num_write
);
202 tid_reader
= malloc(sizeof(*tid_reader
) * num_read
);
203 tid_writer
= malloc(sizeof(*tid_writer
) * num_write
);
205 printf("thread %-6s, thread id : %lx, tid %lu\n",
206 "main", (unsigned long) pthread_self(),
207 (unsigned long) gettid());
209 for (i
= 0; i
< NR_READ
; i
++) {
210 err
= pthread_create(&tid_reader
[i
], NULL
, thr_reader
,
215 for (i
= 0; i
< NR_WRITE
; i
++) {
216 err
= pthread_create(&tid_writer
[i
], NULL
, thr_writer
,
224 for (i
= 0; i
< NR_READ
; i
++) {
225 err
= pthread_join(tid_reader
[i
], &tret
);
228 tot_rtime
+= reader_time
[i
];
230 for (i
= 0; i
< NR_WRITE
; i
++) {
231 err
= pthread_join(tid_writer
[i
], &tret
);
234 tot_wtime
+= writer_time
[i
];
236 free(test_rcu_pointer
);
237 printf("Time per read : %g cycles\n",
238 (double)tot_rtime
/ ((double)NR_READ
* (double)READ_LOOP
));
239 printf("Time per write : %g cycles\n",
240 (double)tot_wtime
/ ((double)NR_WRITE
* (double)WRITE_LOOP
));