2011-07-26 Pawel Zagorski <pzagor@agh.edu.pl>

	PR 1853/tests
	* Makefile.am, configure.ac: Add test for case where a thread is
	non-preemptive, multiple threads are ready at that priority, a higher
	priority thread is heir and the thread yields.
	* sp74/.cvsignore, sp74/Makefile.am, sp74/init.c, sp74/sp74.doc,
	sp74/sp74.scn: New files.

5 files changed, 153 insertions, 0 deletions

diff --git a/testsuites/sptests/sp74/.cvsignore b/testsuites/sptests/sp74/.cvsignore
new file mode 100644
index 0000000000..282522db03
--- /dev/null
+++ b/testsuites/sptests/sp74/.cvsignore
@@ -0,0 +1,2 @@
+Makefile
+Makefile.in
diff --git a/testsuites/sptests/sp74/Makefile.am b/testsuites/sptests/sp74/Makefile.am
new file mode 100644
index 0000000000..0a56183af4
--- /dev/null
+++ b/testsuites/sptests/sp74/Makefile.am
@@ -0,0 +1,26 @@
+##
+##  $Id$
+##
+
+MANAGERS = all
+
+rtems_tests_PROGRAMS = sp74 
+sp74_SOURCES = init.c
+
+dist_rtems_tests_DATA = sp74.scn
+dist_rtems_tests_DATA += sp74.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 = $(sp74_OBJECTS) $(sp74_LDADD)
+LINK_LIBS = $(sp74_LDLIBS)
+
+sp74$(EXEEXT): $(sp74_OBJECTS) $(sp74_DEPENDENCIES)
+	@rm -f sp74$(EXEEXT)
+	$(make-exe)
+
+include $(top_srcdir)/../automake/local.am
diff --git a/testsuites/sptests/sp74/init.c b/testsuites/sptests/sp74/init.c
new file mode 100644
index 0000000000..64cdea9726
--- /dev/null
+++ b/testsuites/sptests/sp74/init.c
@@ -0,0 +1,93 @@
+/* 
+ *  COPYRIGHT (c) 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.
+ *
+ *  $Id$
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <tmacros.h>
+
+/*
+ *  Keep the names and IDs in global variables so another task can use them.
+ */
+rtems_id   Task_id[ 3 ];         /* array of task ids */
+rtems_name Task_name[ 3 ];       /* array of task names */
+
+rtems_task Test_task(
+  rtems_task_argument index
+)
+{
+  puts( "Successfully yielded it to higher priority task" );
+
+  puts( "*** END OF SP74 TEST ***" );
+  rtems_test_exit( 0 );
+}
+
+rtems_task Init(
+  rtems_task_argument argument
+)
+{
+  rtems_status_code   	status;
+
+  puts( "\n\n*** SP74 (YIELD) TEST ***" );
+
+  Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' );
+  Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' );
+
+  puts( "Create TA1 at higher priority task" );
+  status = rtems_task_create(
+    Task_name[ 1 ],
+    1,
+    RTEMS_MINIMUM_STACK_SIZE,
+    RTEMS_DEFAULT_MODES,
+    RTEMS_DEFAULT_ATTRIBUTES,
+    &Task_id[ 1 ]
+  );
+  directive_failed( status, "create 1" );
+
+  puts( "Create TA2 at equal priority task" );
+  status = rtems_task_create(
+    Task_name[ 2 ],
+    2,
+    RTEMS_MINIMUM_STACK_SIZE,
+    RTEMS_DEFAULT_MODES,
+    RTEMS_DEFAULT_ATTRIBUTES,
+    &Task_id[ 2 ]
+  );
+  directive_failed( status, "create 2" );
+
+  status = rtems_task_start( Task_id[ 1 ], Test_task, 1 );
+  directive_failed( status, "start 1" );
+
+  status = rtems_task_start( Task_id[ 2 ], Test_task, 2 );
+  directive_failed( status, "start 2" );
+
+  puts( "Yield to TA1" );
+  status = rtems_task_wake_after( RTEMS_YIELD_PROCESSOR );
+  directive_failed( status, "yield" );
+
+  puts( "*** should now get here ***" );
+}
+
+/* configuration information */
+#include <bsp.h> /* for device driver prototypes */
+
+#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
+#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
+
+#define CONFIGURE_MAXIMUM_TASKS           3
+#define CONFIGURE_INIT_TASK_PRIORITY      2
+
+#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
+
+#define CONFIGURE_INIT
+#include <rtems/confdefs.h>
+/* end of file */
diff --git a/testsuites/sptests/sp74/sp74.doc b/testsuites/sptests/sp74/sp74.doc
new file mode 100644
index 0000000000..699dd97fa7
--- /dev/null
+++ b/testsuites/sptests/sp74/sp74.doc
@@ -0,0 +1,26 @@
+#
+#  $Id$
+#
+#  COPYRIGHT (c) 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.
+#
+
+This file describes the directives and concepts tested by this test set.
+
+test set name:  spsimplesched04
+
+directives:
+  + rtems_task_wake_after - yield case when non-preemptive
+
+concepts:
+
++ This test is specifically designed to exercise the yield case when
+  a task is non-preemptive, a higher priority task is ready, and there
+  are multiple threads ready at the same priority as the non-preemptive
+  task.
+
++ test where there is more than one thread at a priority with the executing thread being non-preemptive. Create a higher priority thread and then yield. sparc init task at priority 2, non-preemptive create task at priority 2 create task at priority 1 yield 
diff --git a/testsuites/sptests/sp74/sp74.scn b/testsuites/sptests/sp74/sp74.scn
new file mode 100644
index 0000000000..a4a01d49e4
--- /dev/null
+++ b/testsuites/sptests/sp74/sp74.scn
@@ -0,0 +1,6 @@
+*** SP74 (YIELD) TEST ***

+Create TA1 at higher priority task

+Create TA2 at equal priority task

+Yield to TA1

+Successfully yielded it to higher priority task

+*** END OF SP74 TEST ***