X-Git-Url: https://git.lttng.org/?p=urcu.git;a=blobdiff_plain;f=test_urcu.c;h=72cceebdd331473d35e516721a9640cf2a3a737f;hp=10d4d9961292d3149d04fe88417a7247de3c8ad8;hb=af02d47e5d0712e5ccde6d8f1ee89f18de798cad;hpb=b257a10b0b05064dcb5dc9d4d1c5f95c0364b9dd diff --git a/test_urcu.c b/test_urcu.c index 10d4d99..72cceeb 100644 --- a/test_urcu.c +++ b/test_urcu.c @@ -5,7 +5,19 @@ * * Copyright February 2009 - Mathieu Desnoyers * - * Distributed under GPLv2 + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program; if not, write to the Free Software Foundation, Inc., + * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */ #include @@ -17,116 +29,279 @@ #include #include #include +#include + +#if defined(_syscall0) +_syscall0(pid_t, gettid) +#elif defined(__NR_gettid) +static inline pid_t gettid(void) +{ + return syscall(__NR_gettid); +} +#else +#warning "use pid as tid" +static inline pid_t gettid(void) +{ + return getpid(); +} +#endif + +#ifndef DYNAMIC_LINK_TEST +#define _LGPL_SOURCE +#else +#define debug_yield_read() +#endif #include "urcu.h" struct test_array { int a; - int b; - char c[200]; }; +static int no_writer_delay; + static struct test_array *test_rcu_pointer; +static unsigned long duration; +static time_t start_time; +static unsigned long __thread duration_interval; +#define DURATION_TEST_DELAY_WRITE 4 +#define DURATION_TEST_DELAY_READ 100 + +/* + * returns 0 if test should end. + */ +static int test_duration_write(void) +{ + if (duration_interval++ >= DURATION_TEST_DELAY_WRITE) { + duration_interval = 0; + if (time(NULL) - start_time >= duration) + return 0; + } + return 1; +} + +static int test_duration_read(void) +{ + if (duration_interval++ >= DURATION_TEST_DELAY_READ) { + duration_interval = 0; + if (time(NULL) - start_time >= duration) + return 0; + } + return 1; +} + #define NR_READ 10 #define NR_WRITE 9 +static unsigned long long __thread nr_writes; +static unsigned long long __thread nr_reads; + +pthread_mutex_t rcu_copy_mutex = PTHREAD_MUTEX_INITIALIZER; + +void rcu_copy_mutex_lock(void) +{ + int ret; + ret = pthread_mutex_lock(&rcu_copy_mutex); + if (ret) { + perror("Error in pthread mutex lock"); + exit(-1); + } +} + +void rcu_copy_mutex_unlock(void) +{ + int ret; + + ret = pthread_mutex_unlock(&rcu_copy_mutex); + if (ret) { + perror("Error in pthread mutex unlock"); + exit(-1); + } +} + +/* + * malloc/free are reusing memory areas too quickly, which does not let us + * test races appropriately. Use a large circular array for allocations. + * ARRAY_SIZE is larger than NR_WRITE, which insures we never run over our tail. + */ +#define ARRAY_SIZE (1048576 * NR_WRITE) +#define ARRAY_POISON 0xDEADBEEF +static int array_index; +static struct test_array test_array[ARRAY_SIZE]; + +static struct test_array *test_array_alloc(void) +{ + struct test_array *ret; + int index; + + rcu_copy_mutex_lock(); + index = array_index % ARRAY_SIZE; + assert(test_array[index].a == ARRAY_POISON || + test_array[index].a == 0); + ret = &test_array[index]; + array_index++; + if (array_index == ARRAY_SIZE) + array_index = 0; + rcu_copy_mutex_unlock(); + return ret; +} -void *thr_reader(void *arg) +static void test_array_free(struct test_array *ptr) { - int qparity, i, j; + if (!ptr) + return; + rcu_copy_mutex_lock(); + ptr->a = ARRAY_POISON; + rcu_copy_mutex_unlock(); +} + +void *thr_reader(void *_count) +{ + unsigned long long *count = _count; struct test_array *local_ptr; - printf("thread %s, thread id : %lu, pid %lu\n", - "reader", pthread_self(), getpid()); - sleep(2); - - urcu_register_thread(); - - for (i = 0; i < 1000; i++) { - for (j = 0; j < 100000000; j++) { - qparity = rcu_read_lock(); - local_ptr = rcu_dereference(test_rcu_pointer); - if (local_ptr) { - assert(local_ptr->a == 8); - assert(local_ptr->b == 12); - assert(local_ptr->c[55] == 2); - } - rcu_read_unlock(qparity); - } + printf("thread_begin %s, thread id : %lx, tid %lu\n", + "reader", pthread_self(), (unsigned long)gettid()); + + rcu_register_thread(); + + for (;;) { + rcu_read_lock(); + local_ptr = rcu_dereference(test_rcu_pointer); + debug_yield_read(); + if (local_ptr) + assert(local_ptr->a == 8); + rcu_read_unlock(); + nr_reads++; + if (!test_duration_read()) + break; } - urcu_unregister_thread(); + rcu_unregister_thread(); + *count = nr_reads; + printf("thread_end %s, thread id : %lx, tid %lu\n", + "reader", pthread_self(), (unsigned long)gettid()); return ((void*)1); } -void *thr_writer(void *arg) +void *thr_writer(void *_count) { - int i; + unsigned long long *count = _count; struct test_array *new, *old; - printf("thread %s, thread id : %lu, pid %lu\n", - "writer", pthread_self(), getpid()); - sleep(2); + printf("thread_begin %s, thread id : %lx, tid %lu\n", + "writer", pthread_self(), (unsigned long)gettid()); - for (i = 0; i < 100000; i++) { - rcu_write_lock(); - new = malloc(sizeof(struct test_array)); + for (;;) { + new = test_array_alloc(); + rcu_copy_mutex_lock(); old = test_rcu_pointer; - if (old) { + if (old) assert(old->a == 8); - assert(old->b == 12); - assert(old->c[55] == 2); - } new->a = 8; - new->b = 12; - new->c[55] = 2; - old = urcu_publish_content(&test_rcu_pointer, new); - rcu_write_unlock(); + old = rcu_publish_content(&test_rcu_pointer, new); + rcu_copy_mutex_unlock(); /* can be done after unlock */ - if (old) { + if (old) old->a = 0; - old->b = 0; - old->c[55] = 0; - } - free(old); - usleep(1); + test_array_free(old); + nr_writes++; + if (!test_duration_write()) + break; + if (!no_writer_delay) + usleep(1); } + printf("thread_end %s, thread id : %lx, tid %lu\n", + "writer", pthread_self(), (unsigned long)gettid()); + *count = nr_writes; return ((void*)2); } -int main() +void show_usage(int argc, char **argv) +{ + printf("Usage : %s duration (s)", argv[0]); +#ifdef DEBUG_YIELD + printf(" [-r] [-w] (yield reader and/or writer)"); +#endif + printf(" [-n] (disable writer delay)"); + printf("\n"); +} + +int main(int argc, char **argv) { int err; pthread_t tid_reader[NR_READ], tid_writer[NR_WRITE]; void *tret; + unsigned long long count_reader[NR_READ], count_writer[NR_WRITE]; + unsigned long long tot_reads = 0, tot_writes = 0; int i; + if (argc < 2) { + show_usage(argc, argv); + return -1; + } + + err = sscanf(argv[1], "%lu", &duration); + if (err != 1) { + show_usage(argc, argv); + return -1; + } + + for (i = 2; i < argc; i++) { + if (argv[i][0] != '-') + continue; + switch (argv[i][1]) { +#ifdef DEBUG_YIELD + case 'r': + yield_active |= YIELD_READ; + break; + case 'w': + yield_active |= YIELD_WRITE; + break; +#endif + case 'n': + no_writer_delay = 1; + break; + } + } + + printf("running test for %lu seconds.\n", duration); + start_time = time(NULL); + printf("thread %-6s, thread id : %lx, tid %lu\n", + "main", pthread_self(), (unsigned long)gettid()); + for (i = 0; i < NR_READ; i++) { - err = pthread_create(&tid_reader[i], NULL, thr_reader, NULL); + err = pthread_create(&tid_reader[i], NULL, thr_reader, + &count_reader[i]); if (err != 0) exit(1); } for (i = 0; i < NR_WRITE; i++) { - err = pthread_create(&tid_writer[i], NULL, thr_writer, NULL); + err = pthread_create(&tid_writer[i], NULL, thr_writer, + &count_writer[i]); if (err != 0) exit(1); } - sleep(10); - - for (i = 0; i < NR_WRITE; i++) { + for (i = 0; i < NR_READ; i++) { err = pthread_join(tid_reader[i], &tret); if (err != 0) exit(1); + tot_reads += count_reader[i]; } for (i = 0; i < NR_WRITE; i++) { err = pthread_join(tid_writer[i], &tret); if (err != 0) exit(1); + tot_writes += count_writer[i]; } + + printf("total number of reads : %llu, writes %llu\n", tot_reads, + tot_writes); + test_array_free(test_rcu_pointer); return 0; }