forked from Imagelibrary/rtems
9e15e9bfba
* sp04/tswitch.c, sp07/task1.c, sp07/task2.c, sp09/screen07.c, sp11/task1.c, sp11/task2.c, sp12/pridrv.c, sp12/pritask.c, sp13/task1.c, sp14/asr.c, sp14/task1.c, sp19/first.c, sp19/fptask.c, sp19/inttest.h, sp19/task1.c, sp20/task1.c, sp25/task1.c, sp26/task1.c, sp28/init.c, sp29/init.c, sp31/task1.c, sp32/init.c, sp33/init.c, sp34/changepri.c, sp36/strict_order_mut.c, sp37/init.c, sp43/init.c, sp44/init.c, sp48/init.c, sp54/init.c, sp59/init.c, sp65/init.c, sp68/init.c, spchain/init.c, spclockget/init.c, spfatal03/testcase.h, spfatal07/testcase.h, spfatal_support/init.c: Do not line length exceed 80 columns.
130 lines
3.1 KiB
C
130 lines
3.1 KiB
C
/*
|
|
* 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.
|
|
*
|
|
* $Id$
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <rtems.h>
|
|
#include <rtems/error.h>
|
|
|
|
static rtems_id taskId1;
|
|
static rtems_id taskId2;
|
|
rtems_interval ticksPerSecond;
|
|
|
|
#include "system.h"
|
|
|
|
static int
|
|
isSuspended (rtems_id tid)
|
|
{
|
|
rtems_status_code sc;
|
|
|
|
sc = rtems_task_is_suspended (tid);
|
|
if (sc == RTEMS_ALREADY_SUSPENDED)
|
|
return 1;
|
|
if (sc != RTEMS_SUCCESSFUL)
|
|
printf ("rtems_task_is_suspended: %s\n", rtems_status_text (sc));
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
subTask1 (rtems_task_argument arg)
|
|
{
|
|
rtems_status_code sc;
|
|
|
|
rtems_task_wake_after (ticksPerSecond * 3);
|
|
sc = rtems_event_send (taskId2, 1);
|
|
if (sc != RTEMS_SUCCESSFUL) {
|
|
printf ("subTask1 - Can't send event (%d)\n", sc);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|
|
rtems_task_wake_after (ticksPerSecond * 3);
|
|
printf ("subTask1 - Event sent\n");
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
printf ("subTask1 - Back to task 1\n");
|
|
rtems_task_wake_after (ticksPerSecond * 3);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|
|
|
|
static void
|
|
subTask2 (rtems_task_argument arg)
|
|
{
|
|
rtems_status_code sc;
|
|
rtems_event_set ev;
|
|
|
|
rtems_task_wake_after (ticksPerSecond * 1);
|
|
sc = rtems_event_receive(
|
|
1,
|
|
RTEMS_WAIT|RTEMS_EVENT_ANY,
|
|
RTEMS_NO_TIMEOUT,
|
|
&ev
|
|
);
|
|
if (sc != RTEMS_SUCCESSFUL) {
|
|
printf ("subTask2 - Can't receive event (%d)\n", sc);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|
|
printf ("subTask2 - Task 1 suspended? - should be 0: %d\n",
|
|
isSuspended (taskId1));
|
|
rtems_task_wake_after (ticksPerSecond * 4);
|
|
printf ("subTask2 - Task 1 suspended? - should be 1: %d\n",
|
|
isSuspended (taskId1));
|
|
rtems_task_resume (taskId1);
|
|
printf ("subTask2 - Task 1 suspended? - should be 0: %d\n",
|
|
isSuspended (taskId1));
|
|
rtems_task_wake_after (ticksPerSecond * 4);
|
|
printf ("subTask2 - Task 1 suspended? - should be 1: %d\n",
|
|
isSuspended (taskId1));
|
|
|
|
puts( "*** END OF TEST 26 ***" );
|
|
rtems_test_exit( 0 );
|
|
}
|
|
|
|
static void
|
|
createTask (char c, rtems_id *tid)
|
|
{
|
|
rtems_status_code sc;
|
|
|
|
sc = rtems_task_create (rtems_build_name('S','u','b',c),
|
|
RTEMS_MAXIMUM_PRIORITY - 1u,
|
|
RTEMS_MINIMUM_STACK_SIZE * 4,
|
|
RTEMS_PREEMPT|RTEMS_NO_TIMESLICE|RTEMS_NO_ASR|RTEMS_INTERRUPT_LEVEL(0),
|
|
RTEMS_NO_FLOATING_POINT|RTEMS_LOCAL,
|
|
tid);
|
|
if (sc != RTEMS_SUCCESSFUL) {
|
|
printf ("Can't create task (%d)\n", sc);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|
|
}
|
|
|
|
static void
|
|
startTask (rtems_id tid, rtems_task_entry entry_point)
|
|
{
|
|
rtems_status_code sc;
|
|
|
|
sc = rtems_task_start (tid, entry_point, 0);
|
|
if (sc != RTEMS_SUCCESSFUL) {
|
|
printf ("Can't start task (%d)\n", sc);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|
|
}
|
|
|
|
void
|
|
task1 (void)
|
|
{
|
|
ticksPerSecond = rtems_clock_get_ticks_per_second();
|
|
createTask ('1', &taskId1);
|
|
createTask ('2', &taskId2);
|
|
startTask (taskId1, subTask1);
|
|
startTask (taskId2, subTask2);
|
|
rtems_task_suspend (RTEMS_SELF);
|
|
}
|