source: rtems/testsuites/sptests/sp09/screen13.c @ 9b4422a2

4.11
Last change on this file since 9b4422a2 was 9b4422a2, checked in by Joel Sherrill <joel.sherrill@…>, on May 3, 2012 at 3:09:24 PM

Remove All CVS Id Strings Possible Using a Script

Script does what is expected and tries to do it as
smartly as possible.

+ remove occurrences of two blank comment lines

next to each other after Id string line removed.

+ remove entire comment blocks which only exited to

contain CVS Ids

+ If the processing left a blank line at the top of

a file, it was removed.

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