Changeset 7950309 in rtems for testsuites/tmtests

Timestamp:

08/02/95 19:56:51 (28 years ago)

Author:

Joel Sherrill <joel.sherrill@…>

Branches:

4.10, 4.11, 4.8, 4.9, 5, master

Children:

0d55427

Parents:

4f90134

Message:

Added test cases:

+ some from Andy Bray (andy@…) which do not include

task start up cost.

+ cases for interrupt disable, enable, and flash

File:

• testsuites/tmtests/tm26/task1.c (modified) (6 diffs)

testsuites/tmtests/tm26/task1.c

@@ -9 +9 @@
  *  notice must appear in all copies of this file and its derivatives.
  *
- *  $Id$
+ *  task1.c,v 1.3 1995/06/05 23:55:00 joel Exp
  */
 
@@ -32 +32 @@
 
 Thread_Control *Middle_tcb;   /* uses internal RTEMS type */
+
+Thread_Control *Low_tcb;      /* uses internal RTEMS type */
 
 rtems_task High_task(
@@ -167 +169 @@
 )
 {
+  rtems_interrupt_level level;
+
+  Timer_initialize();
+    rtems_interrupt_disable( level );
+  end_time = Read_timer();
+ 
+  put_time(
+    "INTERRUPT DISABLE",
+    end_time,
+    1,
+    0,
+    0
+  );
+
+  Timer_initialize();
+    rtems_interrupt_flash( level );
+  end_time = Read_timer();
+ 
+  put_time(
+    "INTERRUPT FLASH",
+    end_time,
+    1,
+    0,
+    0
+  );
+ 
+  Timer_initialize();
+    rtems_interrupt_enable( level );
+  end_time = Read_timer();
+ 
+  put_time(
+    "INTERRUPT ENABLE",
+    end_time,
+    1,
+    0,
+    0
+  );
+ 
   Timer_initialize();
     _Thread_Disable_dispatch();
@@ -178 +218 @@
     0
   );
-
 
   Timer_initialize();
@@ -239 +278 @@
   Timer_initialize();
     _Context_Switch( &Middle_tcb->Registers, &_Thread_Executing->Registers );
+
+  Timer_initialize();
+    _Context_Switch(&Middle_tcb->Registers, &Low_tcb->Registers);
 }
 
@@ -258 +300 @@
 
   executing    = _Thread_Executing;
+
+  Low_tcb = executing;
+
+  Timer_initialize();
+    _Context_Switch( &executing->Registers, &executing->Registers );
+
+  end_time = Read_timer();
+
+  put_time(
+    "CONTEXT_SWITCH (SELF)",
+    end_time,
+    1,
+    0,
+    0
+  );
+
+  _Context_Switch(&executing->Registers, &Middle_tcb->Registers);
+
+  end_time = Read_timer();
+
+  put_time(
+    "CONTEXT_SWITCH (Initialised)",
+    end_time,
+    1,
+    0,
+    0
+  );
 
   _Thread_Executing =