From fb9fa1537a9765eae90124e5db5770ae7a527d5e Mon Sep 17 00:00:00 2001 From: WeiY Date: Fri, 25 Jan 2013 23:59:49 +0800 Subject: tests: atomic support for RTEMS. Uniprocessor tests for atomic ops. --- testsuites/sptests/spatomic01/Makefile.am | 22 +++++ testsuites/sptests/spatomic01/init.c | 63 ++++++++++++++ testsuites/sptests/spatomic01/spatomic01.doc | 23 +++++ testsuites/sptests/spatomic01/spatomic01.scn | 70 +++++++++++++++ testsuites/sptests/spatomic01/system.h | 51 +++++++++++ testsuites/sptests/spatomic01/tasks.c | 100 +++++++++++++++++++++ testsuites/sptests/spatomic02/Makefile.am | 22 +++++ testsuites/sptests/spatomic02/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic02/spatomic02.doc | 23 +++++ testsuites/sptests/spatomic02/spatomic02.scn | 70 +++++++++++++++ testsuites/sptests/spatomic02/system.h | 51 +++++++++++ testsuites/sptests/spatomic02/tasks.c | 101 ++++++++++++++++++++++ testsuites/sptests/spatomic03/Makefile.am | 22 +++++ testsuites/sptests/spatomic03/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic03/spatomic03.doc | 23 +++++ testsuites/sptests/spatomic03/spatomic03.scn | 102 ++++++++++++++++++++++ testsuites/sptests/spatomic03/system.h | 51 +++++++++++ testsuites/sptests/spatomic03/tasks.c | 110 ++++++++++++++++++++++++ testsuites/sptests/spatomic04/Makefile.am | 22 +++++ testsuites/sptests/spatomic04/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic04/spatomic04.doc | 23 +++++ testsuites/sptests/spatomic04/spatomic04.scn | 102 ++++++++++++++++++++++ testsuites/sptests/spatomic04/system.h | 51 +++++++++++ testsuites/sptests/spatomic04/tasks.c | 110 ++++++++++++++++++++++++ testsuites/sptests/spatomic05/Makefile.am | 22 +++++ testsuites/sptests/spatomic05/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic05/spatomic05.doc | 23 +++++ testsuites/sptests/spatomic05/spatomic05.scn | 102 ++++++++++++++++++++++ testsuites/sptests/spatomic05/system.h | 51 +++++++++++ testsuites/sptests/spatomic05/tasks.c | 109 +++++++++++++++++++++++ testsuites/sptests/spatomic06/Makefile.am | 22 +++++ testsuites/sptests/spatomic06/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic06/spatomic06.doc | 23 +++++ testsuites/sptests/spatomic06/spatomic06.scn | 102 ++++++++++++++++++++++ testsuites/sptests/spatomic06/system.h | 51 +++++++++++ testsuites/sptests/spatomic06/tasks.c | 109 +++++++++++++++++++++++ testsuites/sptests/spatomic07/Makefile.am | 22 +++++ testsuites/sptests/spatomic07/init.c | 69 +++++++++++++++ testsuites/sptests/spatomic07/spatomic07.doc | 24 ++++++ testsuites/sptests/spatomic07/spatomic07.scn | 102 ++++++++++++++++++++++ testsuites/sptests/spatomic07/system.h | 51 +++++++++++ testsuites/sptests/spatomic07/tasks.c | 124 +++++++++++++++++++++++++++ 42 files changed, 2563 insertions(+) create mode 100644 testsuites/sptests/spatomic01/Makefile.am create mode 100644 testsuites/sptests/spatomic01/init.c create mode 100644 testsuites/sptests/spatomic01/spatomic01.doc create mode 100644 testsuites/sptests/spatomic01/spatomic01.scn create mode 100644 testsuites/sptests/spatomic01/system.h create mode 100644 testsuites/sptests/spatomic01/tasks.c create mode 100644 testsuites/sptests/spatomic02/Makefile.am create mode 100644 testsuites/sptests/spatomic02/init.c create mode 100644 testsuites/sptests/spatomic02/spatomic02.doc create mode 100644 testsuites/sptests/spatomic02/spatomic02.scn create mode 100644 testsuites/sptests/spatomic02/system.h create mode 100644 testsuites/sptests/spatomic02/tasks.c create mode 100644 testsuites/sptests/spatomic03/Makefile.am create mode 100644 testsuites/sptests/spatomic03/init.c create mode 100644 testsuites/sptests/spatomic03/spatomic03.doc create mode 100644 testsuites/sptests/spatomic03/spatomic03.scn create mode 100644 testsuites/sptests/spatomic03/system.h create mode 100644 testsuites/sptests/spatomic03/tasks.c create mode 100644 testsuites/sptests/spatomic04/Makefile.am create mode 100644 testsuites/sptests/spatomic04/init.c create mode 100644 testsuites/sptests/spatomic04/spatomic04.doc create mode 100644 testsuites/sptests/spatomic04/spatomic04.scn create mode 100644 testsuites/sptests/spatomic04/system.h create mode 100644 testsuites/sptests/spatomic04/tasks.c create mode 100644 testsuites/sptests/spatomic05/Makefile.am create mode 100644 testsuites/sptests/spatomic05/init.c create mode 100644 testsuites/sptests/spatomic05/spatomic05.doc create mode 100644 testsuites/sptests/spatomic05/spatomic05.scn create mode 100644 testsuites/sptests/spatomic05/system.h create mode 100644 testsuites/sptests/spatomic05/tasks.c create mode 100644 testsuites/sptests/spatomic06/Makefile.am create mode 100644 testsuites/sptests/spatomic06/init.c create mode 100644 testsuites/sptests/spatomic06/spatomic06.doc create mode 100644 testsuites/sptests/spatomic06/spatomic06.scn create mode 100644 testsuites/sptests/spatomic06/system.h create mode 100644 testsuites/sptests/spatomic06/tasks.c create mode 100644 testsuites/sptests/spatomic07/Makefile.am create mode 100644 testsuites/sptests/spatomic07/init.c create mode 100644 testsuites/sptests/spatomic07/spatomic07.doc create mode 100644 testsuites/sptests/spatomic07/spatomic07.scn create mode 100644 testsuites/sptests/spatomic07/system.h create mode 100644 testsuites/sptests/spatomic07/tasks.c diff --git a/testsuites/sptests/spatomic01/Makefile.am b/testsuites/sptests/spatomic01/Makefile.am new file mode 100644 index 0000000000..760b17b73e --- /dev/null +++ b/testsuites/sptests/spatomic01/Makefile.am @@ -0,0 +1,22 @@ + +rtems_tests_PROGRAMS = spatomic01 +spatomic01_SOURCES = init.c tasks.c system.h + +dist_rtems_tests_DATA = spatomic01.scn +dist_rtems_tests_DATA += spatomic01.doc + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../automake/compile.am +include $(top_srcdir)/../automake/leaf.am + + +AM_CPPFLAGS += -I$(top_srcdir)/../support/include + +LINK_OBJS = $(spatomic01_OBJECTS) +LINK_LIBS = $(spatomic01_LDLIBS) + +spatomic01$(EXEEXT): $(spatomic01_OBJECTS) $(spatomic01_DEPENDENCIES) + @rm -f spatomic01$(EXEEXT) + $(make-exe) + +include $(top_srcdir)/../automake/local.am diff --git a/testsuites/sptests/spatomic01/init.c b/testsuites/sptests/spatomic01/init.c new file mode 100644 index 0000000000..7326bf7c95 --- /dev/null +++ b/testsuites/sptests/spatomic01/init.c @@ -0,0 +1,63 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic load operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#define CONFIGURE_INIT +#include "system.h" + +rtems_task Init( + rtems_task_argument argument +) +{ + int i; + char ch; + rtems_id id; + rtems_status_code status; + + /* Put start of test message */ + puts( "\n\n*** spatomic01 TEST ***\n" ); + + /* Create and start tasks to test */ + for ( i=0; i< TASK_NUMS ; i++ ) { + ch = '0' + i; + + status = rtems_task_create( + rtems_build_name( 'T', 'A', ch, ' ' ), + 1, + RTEMS_MINIMUM_STACK_SIZE, + RTEMS_DEFAULT_MODES, + RTEMS_DEFAULT_ATTRIBUTES, + &id + ); + directive_failed( status, "task create" ); + + status = rtems_task_start( id, Test_task, i ); + directive_failed( status, "task start" ); + } + + status = rtems_task_create( + rtems_build_name( 'A', 'T', '0', ' ' ), + 1, + RTEMS_MINIMUM_STACK_SIZE, + RTEMS_DEFAULT_MODES, + RTEMS_DEFAULT_ATTRIBUTES, + &id + ); + directive_failed( status, "task create" ); + + status = rtems_task_start( id, Wait_task, 0 ); + directive_failed( status, "task start" ); + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} diff --git a/testsuites/sptests/spatomic01/spatomic01.doc b/testsuites/sptests/spatomic01/spatomic01.doc new file mode 100644 index 0000000000..dc322a3f55 --- /dev/null +++ b/testsuites/sptests/spatomic01/spatomic01.doc @@ -0,0 +1,23 @@ +# COPYRIGHT (c) 1989-2012. +# On-Line Applications Research Corporation (OAR). +# +# The license and distribution terms for this file may be +# found in the file LICENSE in this distribution or at +# http://www.rtems.com/license/LICENSE. +# + +This file describes the directives and concepts tested by this test set. + +test set name: spatomic01 + +directives: + + _Atomic_Load_int + _Atomic_Load_long + _Atomic_Load_ptr + _Atomic_Load_32 + _Atomic_Load_64 + +concepts: + ++ Ensure that the atomic load operations listed above behave as defined. diff --git a/testsuites/sptests/spatomic01/spatomic01.scn b/testsuites/sptests/spatomic01/spatomic01.scn new file mode 100644 index 0000000000..9979d8033c --- /dev/null +++ b/testsuites/sptests/spatomic01/spatomic01.scn @@ -0,0 +1,70 @@ +*** spatomic01 TEST *** + + +task0: _Atomic_Load_int: SUCCESS + +task0: _Atomic_Load_long: SUCCESS + +task0: _Atomic_Load_ptr: SUCCESS + +task0: _Atomic_Load_32: SUCCESS + +task0: _Atomic_Load_int: SUCCESS + +task0: _Atomic_Load_long: SUCCESS + +task0: _Atomic_Load_ptr: SUCCESS + +task0: _Atomic_Load_32: SUCCESS + +task1: _Atomic_Load_int: SUCCESS + +task1: _Atomic_Load_long: SUCCESS + +task1: _Atomic_Load_ptr: SUCCESS + +task1: _Atomic_Load_32: SUCCESS + +task1: _Atomic_Load_int: SUCCESS + +task1: _Atomic_Load_long: SUCCESS + +task1: _Atomic_Load_ptr: SUCCESS + +task1: _Atomic_Load_32: SUCCESS + +task2: _Atomic_Load_int: SUCCESS + +task2: _Atomic_Load_long: SUCCESS + +task2: _Atomic_Load_ptr: SUCCESS + +task2: _Atomic_Load_32: SUCCESS + +task2: _Atomic_Load_int: SUCCESS + +task2: _Atomic_Load_long: SUCCESS + +task2: _Atomic_Load_ptr: SUCCESS + +task2: _Atomic_Load_32: SUCCESS + +task3: _Atomic_Load_int: SUCCESS + +task3: _Atomic_Load_long: SUCCESS + +task3: _Atomic_Load_ptr: SUCCESS + +task3: _Atomic_Load_32: SUCCESS + +task3: _Atomic_Load_int: SUCCESS + +task3: _Atomic_Load_long: SUCCESS + +task3: _Atomic_Load_ptr: SUCCESS + +task3: _Atomic_Load_32: SUCCESS + + +*** END OF TEST spatomic01 *** + diff --git a/testsuites/sptests/spatomic01/system.h b/testsuites/sptests/spatomic01/system.h new file mode 100644 index 0000000000..55931f24c0 --- /dev/null +++ b/testsuites/sptests/spatomic01/system.h @@ -0,0 +1,51 @@ +/* + * COPYRIGHT (c) 1989-2011. + * On-Line Applications Research Corporation (OAR). + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + */ + +#include "tmacros.h" +#include "test_support.h" + +/* functions */ + +rtems_task Init( + rtems_task_argument argument +); + +rtems_task Test_task( + rtems_task_argument argument +); + +rtems_task Wait_task( + rtems_task_argument argument +); +/* configuration information */ +#define TASK_NUMS 4 + +#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER +#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER + +#define CONFIGURE_MAXIMUM_TASKS \ + (2 + TASK_NUMS) + +#define CONFIGURE_RTEMS_INIT_TASKS_TABLE + +#include + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic01/tasks.c b/testsuites/sptests/spatomic01/tasks.c new file mode 100644 index 0000000000..c75a94d679 --- /dev/null +++ b/testsuites/sptests/spatomic01/tasks.c @@ -0,0 +1,100 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic load operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_LOAD_NO_BARRIER(NAME, TYPE, task_id, mem_bar) \ +{ \ + Atomic_##TYPE t = (Atomic_##TYPE)-1, a = 0; \ + unsigned int i; \ + a = _Atomic_Load_##NAME(&t, mem_bar); \ + rtems_test_assert(a == t); \ + for (i = 0; i < TEST_REPEAT; i++){ \ + t = (Atomic_##TYPE)rand(); \ + a = _Atomic_Load_##NAME(&t, mem_bar); \ + rtems_test_assert(a == t); \ + } \ + printf("\ntask%d: _Atomic_Load_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_LOAD_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_LOAD_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_LOAD_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic02/tasks.c b/testsuites/sptests/spatomic02/tasks.c new file mode 100644 index 0000000000..67c2460885 --- /dev/null +++ b/testsuites/sptests/spatomic02/tasks.c @@ -0,0 +1,101 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic store operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_STORE_NO_BARRIER(NAME, TYPE, task_id, mem_bar) \ +{ \ + Atomic_##TYPE t = (Atomic_##TYPE)-1, a = 0; \ + unsigned int i; \ + _Atomic_Store_##NAME(&a, t, mem_bar); \ + rtems_test_assert(a == t); \ + for (i = 0; i < TEST_REPEAT; i++){ \ + t = (Atomic_##TYPE)rand(); \ + _Atomic_Store_##NAME(&a, t, mem_bar); \ + rtems_test_assert(a == t); \ + } \ + printf("\ntask%d: _Atomic_Store_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_STORE_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_STORE_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_STORE_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_STORE_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test release barrier */ + ATOMIC_STORE_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_STORE_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_STORE_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_STORE_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic03/tasks.c b/testsuites/sptests/spatomic03/tasks.c new file mode 100644 index 0000000000..2218b1b823 --- /dev/null +++ b/testsuites/sptests/spatomic03/tasks.c @@ -0,0 +1,110 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic add operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_FETCH_ADD_NO_BARRIER(NAME, TYPE, task_id, mem_bar)\ +{ \ + Atomic_##TYPE t = 0, a = 0, b = 0; \ + unsigned int i; \ + for (i = 0; i < TEST_REPEAT; i++){ \ + a = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + b = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + t = a; \ + _Atomic_Fetch_add_##NAME(&t, b, mem_bar); \ + rtems_test_assert(t == (Atomic_##TYPE)(a + b)); \ + } \ + printf("\ntask%d: _Atomic_Fetch_add_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_FETCH_ADD_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_FETCH_ADD_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* test release barrier */ + ATOMIC_FETCH_ADD_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_ADD_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic04/tasks.c b/testsuites/sptests/spatomic04/tasks.c new file mode 100644 index 0000000000..4600f398ad --- /dev/null +++ b/testsuites/sptests/spatomic04/tasks.c @@ -0,0 +1,110 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic sub operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_FETCH_SUB_NO_BARRIER(NAME, TYPE, task_id, mem_bar)\ +{ \ + Atomic_##TYPE t = 0, a = 0, b = 0; \ + unsigned int i; \ + for (i = 0; i < TEST_REPEAT; i++){ \ + a = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + b = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + t = a; \ + _Atomic_Fetch_sub_##NAME(&t, b, mem_bar); \ + rtems_test_assert(t == (Atomic_##TYPE)(a - b)); \ + } \ + printf("\ntask%d: _Atomic_Fetch_sub_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_FETCH_SUB_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_FETCH_SUB_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* test release barrier */ + ATOMIC_FETCH_SUB_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_SUB_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic05/tasks.c b/testsuites/sptests/spatomic05/tasks.c new file mode 100644 index 0000000000..d0df98ad0d --- /dev/null +++ b/testsuites/sptests/spatomic05/tasks.c @@ -0,0 +1,109 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic and operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_FETCH_AND_NO_BARRIER(NAME, TYPE, task_id, mem_bar)\ +{ \ + Atomic_##TYPE t = 0, a = 0, b = 0; \ + unsigned int i; \ + for (i = 0; i < TEST_REPEAT; i++){ \ + a = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + b = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + t = a; \ + _Atomic_Fetch_and_##NAME(&t, b, mem_bar); \ + rtems_test_assert(t == (Atomic_##TYPE)(a & b)); \ + } \ + printf("\ntask%d: _Atomic_Fetch_and_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_FETCH_AND_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_FETCH_AND_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* test release barrier */ + ATOMIC_FETCH_AND_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_AND_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic06/tasks.c b/testsuites/sptests/spatomic06/tasks.c new file mode 100644 index 0000000000..753b91ae73 --- /dev/null +++ b/testsuites/sptests/spatomic06/tasks.c @@ -0,0 +1,109 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic or operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_FETCH_OR_NO_BARRIER(NAME, TYPE, task_id, mem_bar) \ +{ \ + Atomic_##TYPE t = 0, a = 0, b = 0; \ + unsigned int i; \ + for (i = 0; i < TEST_REPEAT; i++){ \ + a = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + b = (Atomic_##TYPE)(rand() % ((Atomic_##TYPE)-1 / 2)); \ + t = a; \ + _Atomic_Fetch_or_##NAME(&t, b, mem_bar); \ + rtems_test_assert(t == (Atomic_##TYPE)(a | b)); \ + } \ + printf("\ntask%d: _Atomic_Fetch_or_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_FETCH_OR_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_FETCH_OR_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* test release barrier */ + ATOMIC_FETCH_OR_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_FETCH_OR_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i + +/* global variables */ + +/* + * Keep the names and IDs in global variables so another task can use them. + */ + +TEST_EXTERN volatile bool TaskRan[ TASK_NUMS ]; + +/* + * Handy macros and static inline functions + */ + +/* end of include file */ diff --git a/testsuites/sptests/spatomic07/tasks.c b/testsuites/sptests/spatomic07/tasks.c new file mode 100644 index 0000000000..ff925d0118 --- /dev/null +++ b/testsuites/sptests/spatomic07/tasks.c @@ -0,0 +1,124 @@ +/* + * Copyright (c) 2012 Deng Hengyi. + * + * This test case is to test atomic compare and exchange operation. + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + * + */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "system.h" + +#include +#include + +#define TEST_REPEAT 200000 + +#define ATOMIC_CAS_NO_BARRIER(NAME, TYPE, task_id, mem_bar) \ +{ \ + Atomic_##TYPE a = 0, b = 0; \ + unsigned int i; \ + int r; \ + for (i = 0; i < TEST_REPEAT; i++){ \ + a = rand() % (Atomic_##TYPE)-1; \ + b = a; \ + r = _Atomic_Compare_exchange_##NAME(&b, a + 1, a - 1, mem_bar); \ + if(r != 0){ \ + printf("\ntask%d: _Atomic_Compare_exchange_" #NAME ": FAILED\n", (unsigned int)task_id); \ + rtems_test_exit( 0 ); \ + } \ + b = a; \ + r = _Atomic_Compare_exchange_##NAME(&b, a, a - 1, mem_bar); \ + if((r == 0) ||((r != 0) && ((a - 1) != b))){ \ + printf("\ntask%d: _Atomic_Compare_exchange_" #NAME ": FAILED\n", (unsigned int)task_id); \ + rtems_test_exit( 0 ); \ + } \ + b = a; \ + r = _Atomic_Compare_exchange_##NAME(&b, a + 1, a, mem_bar); \ + if(r != 0){ \ + printf("\ntask%d: _Atomic_Compare_exchange_" #NAME ": FAILED\n", (unsigned int)task_id); \ + rtems_test_exit( 0 ); \ + } \ + } \ + printf("\ntask%d: _Atomic_Compare_exchange_" #NAME ": SUCCESS\n", (unsigned int)task_id); \ +} + +rtems_task Test_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + rtems_status_code status; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Print that the task is up and running. */ + /* test relaxed barrier */ + ATOMIC_CAS_NO_BARRIER(int, Int, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_CAS_NO_BARRIER(long, Long, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_CAS_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELAXED_BARRIER); + + ATOMIC_CAS_NO_BARRIER(32, Int32, argument, ATOMIC_RELAXED_BARRIER); + + /* test acquire barrier */ + ATOMIC_CAS_NO_BARRIER(int, Int, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(long, Long, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(ptr, Pointer, argument, ATOMIC_ACQUIRE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(32, Int32, argument, ATOMIC_ACQUIRE_BARRIER); + + /* test release barrier */ + ATOMIC_CAS_NO_BARRIER(int, Int, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(long, Long, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(ptr, Pointer, argument, ATOMIC_RELEASE_BARRIER); + + ATOMIC_CAS_NO_BARRIER(32, Int32, argument, ATOMIC_RELEASE_BARRIER); + + /* Set the flag that the task is up and running */ + TaskRan[argument] = true; + + status = rtems_task_delete( RTEMS_SELF ); + directive_failed( status, "delete" ); +} + +rtems_task Wait_task( + rtems_task_argument argument + ) +{ + char name[5]; + char *p; + bool allDone; + int i; + + /* Get the task name */ + p = rtems_object_get_name( RTEMS_SELF, 5, name ); + rtems_test_assert( p != NULL ); + + /* Wait on the all tasks to run */ + while (1) { + allDone = true; + for ( i=0; i