OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [tests/] [sptests/] [sp09/] [screen01.c] - Blame information for rev 721

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback 
/*  Screen1
2 
 *
3 
 *  This routine generates error screen 1 for test 9.
4 
 *
5 
 *  Input parameters:  NONE
6 
 *
7 
 *  Output parameters:  NONE
8 
 *
9 
 *  COPYRIGHT (c) 1989-1999.
10 
 *  On-Line Applications Research Corporation (OAR).
11 
 *
12 
 *  The license and distribution terms for this file may be
13 
 *  found in the file LICENSE in this distribution or at
14 
 *  http://www.OARcorp.com/rtems/license.html.
15 
 *
16 
 *  $Id: screen01.c,v 1.2 2001-09-27 12:02:31 chris Exp $
17 
 */
18 
 
19 
#include "system.h"
20 
 
21 
void Screen1()
22 
{
23 
  rtems_unsigned32    notepad_value;
24 
  rtems_id            self_id;
25 
  rtems_task_priority previous_priority;
26 
  rtems_status_code   status;
27 
 
28 
  status = rtems_task_delete( 100 );
29 
  fatal_directive_status(
30 
    status,
31 
    RTEMS_INVALID_ID,
32 
    "rtems_task_delete with illegal id"
33 
  );
34 
  puts( "TA1 - rtems_task_delete - RTEMS_INVALID_ID" );
35 
 
36 
  status = rtems_task_get_note( RTEMS_SELF, 100, &notepad_value );
37 
  fatal_directive_status(
38 
    status,
39 
    RTEMS_INVALID_NUMBER,
40 
    "rtems_task_get_note with illegal notepad"
41 
  );
42 
  puts( "TA1 - rtems_task_get_note - RTEMS_INVALID_NUMBER" );
43 
 
44 
  status = rtems_task_get_note( 100, RTEMS_NOTEPAD_LAST, &notepad_value );
45 
  fatal_directive_status(
46 
    status,
47 
    RTEMS_INVALID_ID,
48 
    "rtems_task_get_note with illegal id"
49 
  );
50 
  puts( "TA1 - rtems_task_get_note - RTEMS_INVALID_ID" );
51 
 
52 
  status = rtems_task_ident( RTEMS_SELF, RTEMS_SEARCH_ALL_NODES, &self_id );
53 
  directive_failed( status, "rtems_task_ident of self" );
54 
 
55 
  if ( self_id != Task_id[ 1 ] ) {
56 
    puts( "ERROR - rtems_task_ident - incorrect ID returned!" );
57 
  }
58 
  puts( "TA1 - rtems_task_ident - current task RTEMS_SUCCESSFUL" );
59 
 
60 
  status = rtems_task_ident( 100, RTEMS_SEARCH_ALL_NODES, &Junk_id );
61 
  fatal_directive_status(
62 
    status,
63 
    RTEMS_INVALID_NAME,
64 
    "rtems_task_ident with illegal name (local)"
65 
  );
66 
  puts( "TA1 - rtems_task_ident - global RTEMS_INVALID_NAME" );
67 
 
68 
  status = rtems_task_ident( 100, 1, &Junk_id );
69 
  fatal_directive_status(
70 
    status,
71 
    RTEMS_INVALID_NAME,
72 
    "rtems_task_ident with illegal name (global)"
73 
  );
74 
  puts( "TA1 - rtems_task_ident - local RTEMS_INVALID_NAME" );
75 
 
76 
  /*
77 
   *  This one case is different if MP is enabled/disabled.
78 
   */
79 
 
80 
  status = rtems_task_ident( 100, 2, &Junk_id );
81 
#if defined(RTEMS_MULTIPROCESSING)
82 
  fatal_directive_status(
83 
    status,
84 
    RTEMS_INVALID_NODE,
85 
    "rtems_task_ident with illegal node"
86 
  );
87 
#else
88 
  fatal_directive_status(
89 
    status,
90 
    RTEMS_INVALID_NAME,
91 
    "rtems_task_ident with illegal node"
92 
  );
93 
#endif
94 
  puts( "TA1 - rtems_task_ident - RTEMS_INVALID_NODE" );
95 
 
96 
  status = rtems_task_restart( 100, 0 );
97 
  fatal_directive_status(
98 
    status,
99 
    RTEMS_INVALID_ID,
100 
    "rtems_task_restart with illegal id"
101 
  );
102 
  puts( "TA1 - rtems_task_restart - RTEMS_INVALID_ID" );
103 
 
104 
  status = rtems_task_resume( 100 );
105 
  fatal_directive_status(
106 
    status,
107 
    RTEMS_INVALID_ID,
108 
    "rtems_task_resume with illegal id"
109 
  );
110 
  puts( "TA1 - rtems_task_resume - RTEMS_INVALID_ID" );
111 
 
112 
  status = rtems_task_resume( RTEMS_SELF );
113 
  fatal_directive_status(
114 
    status,
115 
    RTEMS_INCORRECT_STATE,
116 
    "rtems_task_resume of ready task"
117 
  );
118 
  puts( "TA1 - rtems_task_resume - RTEMS_INCORRECT_STATE" );
119 
 
120 
  status = rtems_task_set_priority( RTEMS_SELF, 512, &previous_priority );
121 
  fatal_directive_status(
122 
    status,
123 
    RTEMS_INVALID_PRIORITY,
124 
    "rtems_task_set_priority with illegal priority"
125 
  );
126 
  puts( "TA1 - rtems_task_set_priority - RTEMS_INVALID_PRIORITY" );
127 
 
128 
  status = rtems_task_set_priority( 100, 8, &previous_priority );
129 
  fatal_directive_status(
130 
    status,
131 
    RTEMS_INVALID_ID,
132 
    "rtems_task_set_priority with illegal id"
133 
  );
134 
  puts( "TA1 - rtems_task_set_priority - RTEMS_INVALID_ID" );
135 
 
136 
  status = rtems_task_set_note(
137 
    RTEMS_SELF,
138 
    RTEMS_NOTEPAD_LAST+10,
139 
    notepad_value
140 
  );
141 
  fatal_directive_status(
142 
    status,
143 
    RTEMS_INVALID_NUMBER,
144 
    "rtems_task_set_note with illegal notepad"
145 
  );
146 
  puts( "TA1 - rtems_task_set_note - RTEMS_INVALID_NUMBER" );
147 
 
148 
  status = rtems_task_set_note( 100, RTEMS_NOTEPAD_LAST, notepad_value );
149 
  fatal_directive_status(
150 
    status,
151 
    RTEMS_INVALID_ID,
152 
    "rtems_task_set_note with illegal id"
153 
  );
154 
  puts( "TA1 - rtems_task_set_note - RTEMS_INVALID_ID" );
155 
 
156 
  status = rtems_task_start( 100, Task_1, 0 );
157 
  fatal_directive_status(
158 
    status,
159 
    RTEMS_INVALID_ID,
160 
    "rtems_task_start with illegal id"
161 
  );
162 
  puts( "TA1 - rtems_task_start - RTEMS_INVALID_ID" );
163 
 
164 
  status = rtems_task_start( 0, Task_1, 0 );
165 
  fatal_directive_status(
166 
    status,
167 
    RTEMS_INCORRECT_STATE,
168 
    "rtems_task_start of ready task"
169 
  );
170 
  puts( "TA1 - rtems_task_start - RTEMS_INCORRECT_STATE" );
171 
 
172 
  status = rtems_task_suspend( 100 );
173 
  fatal_directive_status(
174 
    status,
175 
    RTEMS_INVALID_ID,
176 
    "rtems_task_suspend with illegal id"
177 
  );
178 
  puts( "TA1 - rtems_task_suspend - RTEMS_INVALID_ID" );
179 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.