source: rtems/testsuites/sptests/sp09/screen13.c @ dde827b

4.104.114.84.95
Last change on this file since dde827b was 08311cc3, checked in by Joel Sherrill <joel.sherrill@…>, on 11/17/99 at 17:51:34

Updated copyright notice.
  • Property mode set to 100644
File size: 4.0 KB
Line 
1/*  Screen13
2 *
3 *  This routine generates error screen 13 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$
17 */
18
19#include "system.h"
20
21void Screen13()
22{
23  rtems_time_of_day time;
24  rtems_status_code status;
25
26  status = rtems_io_close( 0xffff, 0x0000, NULL);
27  fatal_directive_status(
28    status,
29    RTEMS_INVALID_NUMBER,
30    "rtems_io_close with bad major number"
31  );
32  puts( "TA1 - rtems_io_close - RTEMS_INVALID_NUMBER" );
33  status = rtems_io_control( 0xffff, 0x00000, NULL);
34  fatal_directive_status(
35    status,
36    RTEMS_INVALID_NUMBER,
37    "rtems_io_close with bad major number"
38  );
39  puts( "TA1 - rtems_io_control - RTEMS_INVALID_NUMBER" );
40  status = rtems_io_initialize( 0xffff, 0x00000, NULL);
41  fatal_directive_status(
42    status,
43    RTEMS_INVALID_NUMBER,
44    "rtems_io_initialize with bad major number"
45  );
46  puts( "TA1 - rtems_io_initialize - RTEMS_INVALID_NUMBER" );
47  status = rtems_io_open( 0xffff, 0x00000, NULL);
48  fatal_directive_status(
49    status,
50    RTEMS_INVALID_NUMBER,
51    "rtems_io_open with bad major number"
52  );
53  puts( "TA1 - rtems_io_open - RTEMS_INVALID_NUMBER" );
54  status = rtems_io_read( 0xffff, 0x00000, NULL);
55  fatal_directive_status(
56    status,
57    RTEMS_INVALID_NUMBER,
58    "rtems_io_read with bad major number"
59  );
60  puts( "TA1 - rtems_io_read - RTEMS_INVALID_NUMBER" );
61  status = rtems_io_write( 0xffff, 0x0ffff, NULL);
62  fatal_directive_status(
63    status,
64    RTEMS_INVALID_NUMBER,
65    "rtems_io_write with bad major number"
66  );
67  puts( "TA1 - rtems_io_write - RTEMS_INVALID_NUMBER" );
68
69  build_time( &time, 12, 31, 2000, 23, 59, 59, 0 );
70  status = rtems_clock_set( &time );
71  directive_failed( status, "rtems_clock_set" );
72  print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" );
73  status = rtems_task_wake_after( 1 * TICKS_PER_SECOND );
74  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
75  directive_failed( status, "rtems_clock_set" );
76  print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" );
77
78  build_time( &time, 12, 31, 1999, 23, 59, 59, 0 );
79  status = rtems_clock_set( &time );
80  directive_failed( status, "rtems_clock_set" );
81  print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" );
82  status = rtems_task_wake_after( 1 * TICKS_PER_SECOND );
83  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
84  directive_failed( status, "rtems_clock_set" );
85  print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" );
86
87  build_time( &time, 12, 31, 2100, 23, 59, 59, 0 );
88  status = rtems_clock_set( &time );
89  directive_failed( status, "rtems_clock_set" );
90  print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" );
91  status = rtems_task_wake_after( 1 * TICKS_PER_SECOND );
92  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
93  directive_failed( status, "rtems_clock_set" );
94  print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" );
95
96  build_time( &time, 12, 31, 2099, 23, 59, 59, 0 );
97  status = rtems_clock_set( &time );
98  directive_failed( status, "rtems_clock_set" );
99  print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" );
100  status = rtems_task_wake_after( 1 * TICKS_PER_SECOND );
101  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
102  directive_failed( status, "rtems_clock_set" );
103  print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" );
104
105  build_time( &time, 12, 31, 1991, 23, 59, 59, 0 );
106  status = rtems_clock_set( &time );
107  directive_failed( status, "rtems_clock_set" );
108  print_time( "TA1 - rtems_clock_set - ", &time, " - RTEMS_SUCCESSFUL\n" );
109  status = rtems_task_wake_after( 1 * TICKS_PER_SECOND );
110  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, &time );
111  directive_failed( status, "rtems_clock_set" );
112  print_time( "TA1 - rtems_clock_get - ", &time, " - RTEMS_SUCCESSFUL\n" );
113}
Note: See TracBrowser for help on using the repository browser.