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", pthread_self(), (unsigned long)gettid());
114 rcu_register_thread();
116 time1
= caa_get_cycles();
117 for (i
= 0; i
< OUTER_READ_LOOP
; i
++) {
118 for (j
= 0; j
< INNER_READ_LOOP
; j
++) {
120 local_ptr
= _rcu_dereference(test_rcu_pointer
);
122 assert(local_ptr
->a
== 8);
126 _rcu_quiescent_state();
128 time2
= caa_get_cycles();
130 rcu_unregister_thread();
132 reader_time
[(unsigned long)arg
] = time2
- time1
;
135 printf("thread_end %s, thread id : %lx, tid %lu\n",
136 "reader", pthread_self(), (unsigned long)gettid());
141 void *thr_writer(void *arg
)
144 struct test_array
*new, *old
;
145 cycles_t time1
, time2
;
147 printf("thread_begin %s, thread id : %lx, tid %lu\n",
148 "writer", pthread_self(), (unsigned long)gettid());
151 for (i
= 0; i
< OUTER_WRITE_LOOP
; i
++) {
152 for (j
= 0; j
< INNER_WRITE_LOOP
; j
++) {
153 time1
= caa_get_cycles();
154 new = malloc(sizeof(struct test_array
));
155 rcu_copy_mutex_lock();
156 old
= test_rcu_pointer
;
161 old
= rcu_xchg_pointer(&test_rcu_pointer
, new);
162 rcu_copy_mutex_unlock();
164 /* can be done after unlock */
169 time2
= caa_get_cycles();
170 writer_time
[(unsigned long)arg
] += time2
- time1
;
175 printf("thread_end %s, thread id : %lx, tid %lu\n",
176 "writer", pthread_self(), (unsigned long)gettid());
180 int main(int argc
, char **argv
)
183 pthread_t
*tid_reader
, *tid_writer
;
186 cycles_t tot_rtime
= 0;
187 cycles_t tot_wtime
= 0;
190 printf("Usage : %s nr_readers nr_writers\n", argv
[0]);
193 num_read
= atoi(argv
[1]);
194 num_write
= atoi(argv
[2]);
196 reader_time
= malloc(sizeof(*reader_time
) * num_read
);
197 writer_time
= malloc(sizeof(*writer_time
) * num_write
);
198 tid_reader
= malloc(sizeof(*tid_reader
) * num_read
);
199 tid_writer
= malloc(sizeof(*tid_writer
) * num_write
);
201 printf("thread %-6s, thread id : %lx, tid %lu\n",
202 "main", pthread_self(), (unsigned long)gettid());
204 for (i
= 0; i
< NR_READ
; i
++) {
205 err
= pthread_create(&tid_reader
[i
], NULL
, thr_reader
,
210 for (i
= 0; i
< NR_WRITE
; i
++) {
211 err
= pthread_create(&tid_writer
[i
], NULL
, thr_writer
,
219 for (i
= 0; i
< NR_READ
; i
++) {
220 err
= pthread_join(tid_reader
[i
], &tret
);
223 tot_rtime
+= reader_time
[i
];
225 for (i
= 0; i
< NR_WRITE
; i
++) {
226 err
= pthread_join(tid_writer
[i
], &tret
);
229 tot_wtime
+= writer_time
[i
];
231 free(test_rcu_pointer
);
232 printf("Time per read : %g cycles\n",
233 (double)tot_rtime
/ ((double)NR_READ
* (double)READ_LOOP
));
234 printf("Time per write : %g cycles\n",
235 (double)tot_wtime
/ ((double)NR_WRITE
* (double)WRITE_LOOP
));