LGPL relicensing part 2
[urcu.git] / test_urcu.c
index b92a7d74de5c23fd55d5959e8e5f514d314ef090..72cceebdd331473d35e516721a9640cf2a3a737f 100644 (file)
@@ -5,7 +5,19 @@
  *
  * Copyright February 2009 - Mathieu Desnoyers <mathieu.desnoyers@polymtl.ca>
  *
- * 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 <stdio.h>
@@ -34,25 +46,43 @@ static inline pid_t gettid(void)
 }
 #endif
 
+#ifndef DYNAMIC_LINK_TEST
+#define _LGPL_SOURCE
+#else
+#define debug_yield_read()
+#endif
 #include "urcu.h"
 
 struct test_array {
        int a;
 };
 
+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 100
+#define DURATION_TEST_DELAY_WRITE 4
+#define DURATION_TEST_DELAY_READ 100
 
 /*
  * returns 0 if test should end.
  */
-static int test_duration(void)
+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) {
+       if (duration_interval++ >= DURATION_TEST_DELAY_READ) {
                duration_interval = 0;
                if (time(NULL) - start_time >= duration)
                        return 0;
@@ -63,6 +93,9 @@ static int test_duration(void)
 #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)
@@ -86,60 +119,104 @@ void rcu_copy_mutex_unlock(void)
        }
 }
 
-void *thr_reader(void *arg)
+/*
+ * 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;
+}
+
+static void test_array_free(struct test_array *ptr)
+{
+       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_begin %s, thread id : %lx, tid %lu\n",
                        "reader", pthread_self(), (unsigned long)gettid());
 
-       urcu_register_thread();
+       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();
-               if (!test_duration())
+               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)
 {
+       unsigned long long *count = _count;
        struct test_array *new, *old;
 
        printf("thread_begin %s, thread id : %lx, tid %lu\n",
                        "writer", pthread_self(), (unsigned long)gettid());
 
        for (;;) {
-               new = malloc(sizeof(struct test_array));
+               new = test_array_alloc();
                rcu_copy_mutex_lock();
                old = test_rcu_pointer;
                if (old)
                        assert(old->a == 8);
                new->a = 8;
-               old = urcu_publish_content(&test_rcu_pointer, new);
+               old = rcu_publish_content(&test_rcu_pointer, new);
                rcu_copy_mutex_unlock();
                /* can be done after unlock */
                if (old)
                        old->a = 0;
-               free(old);
-               if (!test_duration())
+               test_array_free(old);
+               nr_writes++;
+               if (!test_duration_write())
                        break;
-               usleep(1);
+               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);
 }
 
@@ -149,6 +226,7 @@ void show_usage(int argc, char **argv)
 #ifdef DEBUG_YIELD
        printf(" [-r] [-w] (yield reader and/or writer)");
 #endif
+       printf(" [-n] (disable writer delay)");
        printf("\n");
 }
 
@@ -157,6 +235,8 @@ 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) {
@@ -170,20 +250,23 @@ int main(int argc, char **argv)
                return -1;
        }
 
-#ifdef DEBUG_YIELD
        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;
                }
        }
-#endif
 
        printf("running test for %lu seconds.\n", duration);
        start_time = time(NULL);
@@ -191,12 +274,14 @@ int main(int argc, char **argv)
                        "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);
        }
@@ -205,13 +290,18 @@ int main(int argc, char **argv)
                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];
        }
-       free(test_rcu_pointer);
+       
+       printf("total number of reads : %llu, writes %llu\n", tot_reads,
+              tot_writes);
+       test_array_free(test_rcu_pointer);
 
        return 0;
 }
This page took 0.02505 seconds and 4 git commands to generate.