2007-12-19 Joel Sherrill <joel.sherrill@OARcorp.com>

	* sp07/init.c, sp07/system.h, sp07/tdelete.c, sp07/sp07.scn:
	Add test cases for User Extension Manager to improve code coverage.
	* sp21/task1.c: Fix spelling error.

4 files changed, 69 insertions, 6 deletions

diff --git a/testsuites/sptests/sp07/init.c b/testsuites/sptests/sp07/init.c
index 5339a196fe..8ead04cbdd 100644
--- a/testsuites/sptests/sp07/init.c
+++ b/testsuites/sptests/sp07/init.c
@@ -40,13 +40,26 @@ rtems_task Init(
 )
 {
   rtems_status_code status;
+  rtems_id          id;
 
   puts( "\n\n*** TEST 7 ***" );
 
   buffered_io_initialize();
 
-  Extension_name[ 1 ] =  rtems_build_name( 'E', 'X', 'T', ' ' );
+  Extension_name[ 1 ] =  rtems_build_name( 'E', 'X', 'T', '1' );
+  Extension_name[ 2 ] =  rtems_build_name( 'E', 'X', 'T', '2' );
 
+  puts  ( "rtems_extension_create - bad id pointer -- RTEMS_INVALID_ADDRESS" );
+  status = rtems_extension_create( 0xa5a5a5a5, &Extensions, NULL );
+  fatal_directive_status(
+    status, RTEMS_INVALID_ADDRESS, "rtems_extension_create" );
+
+  puts  ( "rtems_extension_create - bad name -- RTEMS_INVALID_NAME" );
+  status = rtems_extension_create( 0, &Extensions, &id );
+  fatal_directive_status(
+    status, RTEMS_INVALID_NAME, "rtems_extension_create #1" );
+
+  puts( "rtems_extension_create - first one -- OK" );
   status = rtems_extension_create(
     Extension_name[ 1 ],
     &Extensions,
@@ -54,6 +67,46 @@ rtems_task Init(
   );
   directive_failed( status, "rtems_extension_create" );
 
+  puts( "rtems_extension_create - second one-- OK" );
+  status = rtems_extension_create(
+    Extension_name[ 2 ],
+    &Extensions,
+    &Extension_id[ 2 ]
+  );
+  directive_failed( status, "rtems_extension_create #2" );
+
+  puts  ( "rtems_extension_create -- RTEMS_TOO_MANY" );
+  status = rtems_extension_create( 0xa5a5a5a5, &Extensions, &id );
+  fatal_directive_status( status, RTEMS_TOO_MANY, "rtems_extension_create" );
+
+  puts( "rtems_extension_delete - second one -- OK" );
+  status = rtems_extension_delete( Extension_id[ 2 ] );
+  directive_failed( status, "rtems_extension_delete #2" );
+
+  puts( "rtems_extension_delete - second one again -- RTEMS_INVALID_ID" );
+  status = rtems_extension_delete( Extension_id[ 2 ] );
+  fatal_directive_status(
+    status,
+    RTEMS_INVALID_ID,
+    "rtems_extension_delete #2 bad"
+  );
+
+  puts  ( "rtems_extension_ident -- OK" );
+  status = rtems_extension_ident( Extension_name[1], &id );
+  directive_failed( status, "rtems_extension_ident" );
+
+  puts  ( "rtems_extension_ident - bad name -- RTEMS_INVALID_NAME" );
+  status = rtems_extension_ident( Extension_name[2], &id );
+  fatal_directive_status( status, RTEMS_INVALID_NAME, "rtems_extension_ident" );
+
+  puts  ( "rtems_extension_ident - bad name -- RTEMS_INVALID_ADDRESS" );
+  status = rtems_extension_ident( Extension_name[2], NULL );
+  fatal_directive_status(
+    status,
+    RTEMS_INVALID_ADDRESS,
+    "rtems_extension_ident"
+  );
+
   Task_name[ 1 ] = rtems_build_name( 'T', 'A', '1', ' ' );
   Task_name[ 2 ] = rtems_build_name( 'T', 'A', '2', ' ' );
   Task_name[ 3 ] = rtems_build_name( 'T', 'A', '3', ' ' );
diff --git a/testsuites/sptests/sp07/sp07.scn b/testsuites/sptests/sp07/sp07.scn
index 1b6ec9e3b6..2bbf8a7f0a 100644
--- a/testsuites/sptests/sp07/sp07.scn
+++ b/testsuites/sptests/sp07/sp07.scn
@@ -1,4 +1,14 @@
 *** TEST 7 ***
+rtems_extension_create - bad id pointer -- RTEMS_INVALID_ADDRESS
+rtems_extension_create - bad name -- RTEMS_INVALID_NAME
+rtems_extension_create - first one -- OK
+rtems_extension_create - second one-- OK
+rtems_extension_create -- RTEMS_TOO_MANY
+rtems_extension_delete - second one -- OK
+rtems_extension_delete - second one again -- RTEMS_INVALID_ID
+rtems_extension_ident -- OK
+rtems_extension_ident - bad name -- RTEMS_INVALID_NAME
+rtems_extension_ident - bad name -- RTEMS_INVALID_ADDRESS
 TASK_CREATE - TA1  - created
 TASK_CREATE - TA2  - created
 TASK_CREATE - TA3  - created
@@ -25,9 +35,9 @@ TA1 - rtems_task_set_priority - set TA2's priority: 01
 TA2 - rtems_task_get_note - get RTEMS_NOTEPAD_8 - current priority: 01
 TA2 - rtems_task_suspend - suspend TA1
 TA2 - rtems_task_set_priority - set priority of TA1 ( blocked )
-TASK_DELETE - TA2  TASK_DELETEdeleting - TA1 
-TASK_DELETE - TA2  TASK_DELETEdeleting - TA3 
-TASK_DELETE - TA2  TASK_DELETEdeleting - TA2 
+TASK_DELETE - TA2  TASK_DELETE deleting - TA1 
+TASK_DELETE - TA2  TASK_DELETE deleting - TA3 
+TASK_DELETE - TA2  TASK_DELETE deleting - TA2 
 TA4 - exitting task
 RTEMS_TASK_EXITTED - extension invoked for TA4 
 *** END OF TEST 7 ***
diff --git a/testsuites/sptests/sp07/system.h b/testsuites/sptests/sp07/system.h
index 29ad406eac..0299423caa 100644
--- a/testsuites/sptests/sp07/system.h
+++ b/testsuites/sptests/sp07/system.h
@@ -76,7 +76,7 @@ rtems_extension Task_exit_extension(
 #define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
 #define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
 
-#define CONFIGURE_MAXIMUM_USER_EXTENSIONS     1
+#define CONFIGURE_MAXIMUM_USER_EXTENSIONS     2
 #define CONFIGURE_TICKS_PER_TIMESLICE       100
 
 #define CONFIGURE_RTEMS_INIT_TASKS_TABLE
diff --git a/testsuites/sptests/sp07/tdelete.c b/testsuites/sptests/sp07/tdelete.c
index f70852d0bd..868ae7a3c0 100644
--- a/testsuites/sptests/sp07/tdelete.c
+++ b/testsuites/sptests/sp07/tdelete.c
@@ -30,7 +30,7 @@ rtems_extension Task_delete_extension(
 
   if ( task_number( running_task->Object.id ) > 0 ) {
     name = Task_name[ task_number( running_task->Object.id ) ];
-    sprintf( line, "TASK_DELETE - %c%c%c%c TASK_DELETE",
+    sprintf( line, "TASK_DELETE - %c%c%c%c TASK_DELETE ",
       (name >> 24) & 0xff,
       (name >> 16) & 0xff,
       (name >> 8) & 0xff,