Ticket #618: nulltest.c

/*
 *  Exercise the Task Manager API for NULL checks.
 *
 * $Id$
 */

#undef  NDEBUG

#include <bsp.h>
#include <stdlib.h>
#include <stdio.h>
#include <stdlib.h>

#include "tmacros.h"

#if 1
#define PUTS(_s) puts(_s)
#endif

rtems_task task1(
  rtems_task_argument ignored
)
{
  for(;;) {
    printf("Should not get here\n" );
  }
}

void check_task_nulls(void)
{
  rtems_status_code status;
  rtems_id          id;
  void             *p;

  PUTS( "Testing task null checks" );

  /*
   *  task create -- id == NULL
   */
  status = rtems_task_create(
    rtems_build_name( 'T', 'A', '1', ' ' ), 1,
    RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES,
    RTEMS_DEFAULT_ATTRIBUTES, NULL
  );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task create NULL id");

  /*
   *  ident -- NULL id
   */
  status = rtems_task_ident( 0x1234, RTEMS_SEARCH_ALL_NODES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");

  /*
   *  SUCCESSFULLY Create the first task
   */
  status = rtems_task_create(
    rtems_build_name( 'T', 'A', '1', ' ' ), 1,
    RTEMS_MINIMUM_STACK_SIZE, RTEMS_DEFAULT_MODES,
    RTEMS_DEFAULT_ATTRIBUTES, &id
  );
  directive_failed( status, "task create" );
  
  /*
   *  task start -- NULL task body
   */
  status = rtems_task_start( id, NULL, 0 );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task start NULL id");

  /*
   *  SUCCESSFULLY Start the first task
   */
  status = rtems_task_start( id, task1, 0 );
  assert( !status );

  /*
   *  task_get_node - bad return note
   */
  status = rtems_task_get_note( id, RTEMS_NOTEPAD_0, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task getnote NULL");

  /*
   *  task_mode - bad return mode
   */
  status = rtems_task_mode( RTEMS_DEFAULT_MODES, RTEMS_DEFAULT_MODES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task mode NULL");

  /*
   *  task_variable_add - bad pointer 
   */
  status = rtems_task_variable_add( RTEMS_SELF, NULL, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task var add NULL");

  /*
   *  task_variable_get - bad variable 
   */
  status = rtems_task_variable_get( RTEMS_SELF, NULL, &p );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task var get NULL");

  /*
   *  task_variable_get - bad result 
   */
  status = rtems_task_variable_get( RTEMS_SELF, &p, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task var get NULL");

  /*
   *  task_variable_delete - bad pointer 
   */
  status = rtems_task_variable_delete( RTEMS_SELF, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task var delete NULL");

  /* 
   * SUCCESSFULLY set the TOD
   */
  { 
    rtems_time_of_day time = { 2004, 4, 27, 16, 15, 0 };
    status = rtems_clock_set( &time );
    directive_failed( status, "clock set" );
  }

  /*
   *  task_wake_when - bad time buffer 
   */
  status = rtems_task_wake_when( NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task wake when NULL");

  /*
   *  delete the task
   */
  status = rtems_task_delete( id );
  directive_failed( status, "task delete" );
}

void check_clock_nulls(void)
{
  rtems_status_code status;

  PUTS( "Testing clock null checks" );

  /*
   *  clock_get - bad time buffer 
   */
  status = rtems_clock_get( RTEMS_CLOCK_GET_TOD, NULL );

  /*
   *  clock_set - bad time buffer 
   */
  status = rtems_clock_set( NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "clock set when NULL");
}

void check_dpmem_nulls(void)
{
  rtems_status_code status;
  rtems_id id;

  PUTS( "Testing dpmem null checks" );

  /*
   *  port_create - NULL Id
   */
  status = rtems_port_create(
      0x12345678, (void *)0x1000, (void *)0x2000, 1024, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "port create NULL id");

  /*
   *  port_create - SUCCESSFUL
   */
  status = rtems_port_create(
      0x12345678, (void *)0x1000, (void *)0x2000, 1024, &id );
  directive_failed(status, "port create");

  /*
   *  ident -- NULL id
   */
  status = rtems_port_ident( 0x1234, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");

  /*
   *  port_external_to_internal - NULL internal pointer
   */
  status = rtems_port_external_to_internal( id, (void *) 0x1000, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "port 2 int NULL arg");

  /*
   *  port_internal_to_external - NULL external pointer
   */
  status = rtems_port_internal_to_external( id, (void *) 0x2000, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "port 2 ext NULL arg");

  /*
   *  port_delete - SUCCESSFUL
   */
  status = rtems_port_delete( id );
  directive_failed(status, "port delete");
}


void check_event_nulls(void)
{
  rtems_status_code status;

  PUTS( "Testing event null checks" );

  /*
   *  null event out
   */
  status = rtems_event_receive( 0xffffffff, RTEMS_DEFAULT_OPTIONS, 0, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "task wake when NULL");
}

void check_msgq_nulls(void)
{
  rtems_status_code status;
  rtems_id id;
  unsigned int buffer;
  unsigned32 count;

  PUTS( "Testing msgq null checks" );

  /*
   *  message queue create - null id
   */
  status = rtems_message_queue_create(
    0x1234, 10, 10, RTEMS_DEFAULT_ATTRIBUTES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "msgq create NULL id");

  /*
   *  message queue create - SUCCESSFUL
   */
  status = rtems_message_queue_create(
    0x1234, 10, 10, RTEMS_DEFAULT_ATTRIBUTES, &id );
  directive_failed(status, "msgq create");

  /*
   *  ident -- NULL id
   */
  status = rtems_message_queue_ident( 0x1234, RTEMS_SEARCH_ALL_NODES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");

  /*
   * broadcast - null buffer
   */
  status = rtems_message_queue_broadcast( id, NULL, 10, &count );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq brdcst NULL buff");

  /*
   * broadcast - null count
   */
  status = rtems_message_queue_broadcast( id, &buffer, 10, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq brdcst NULL cnt");

  /*
   * flush - null count
   */
  status = rtems_message_queue_flush( id, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq flush NULL cnt");

  /*
   * get number pending - null count
   */
  status = rtems_message_queue_get_number_pending( id, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq get pend NULL cnt");

  /*
   * receive - null buffer
   */
  status = rtems_message_queue_receive( id, NULL, &count, 0, 0 );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq recv NULL buff");

  /*
   * receive - null count
   */
  status = rtems_message_queue_receive( id, &buffer, NULL, 0, 0 );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq recv NULL cnt");

  /*
   * send - null buffer
   */
  status = rtems_message_queue_send( id, NULL, 0 );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "mq send NULL buffer");

  /*
   *  message queue delete - SUCCESSFUL
   */
  status = rtems_message_queue_delete( id );
  directive_failed(status, "msgq delete");
}

void check_part_nulls(void)
{
  rtems_status_code status;
  rtems_id id;
  unsigned char buffer[32];

  PUTS( "Testing part null checks" );

  /*
   *  create - null buffer
   */
  status = rtems_partition_create(
    0x1234, NULL, 1, 1, RTEMS_DEFAULT_ATTRIBUTES, &id );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "pt create NULL buff");

  /*
   *  create - null id
   */
  status = rtems_partition_create(
    0x1234, &buffer, 1, 1, RTEMS_DEFAULT_ATTRIBUTES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "pt create NULL id");

  /*
   *  create - SUCCESSFUL
   */
  status = rtems_partition_create(
    0x1234, &buffer, 24, 8, RTEMS_DEFAULT_ATTRIBUTES, &id );
  directive_failed(status, "pt create");

  /*
   *  ident -- NULL id
   */
  status = rtems_partition_ident( 0x1234, RTEMS_SEARCH_ALL_NODES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");

  /*
   *  get_buffer - null buffer
   */
  status = rtems_partition_get_buffer( id, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "pt get NULL buff");

  /*
   *  return_buffer - null buffer
   */
  status = rtems_partition_return_buffer( id, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "pt return NULL buff");

  /*
   *  delete - SUCCESSFUL
   *  get_buffer - null buffer
   */
  status = rtems_partition_get_buffer( id, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "pt get NULL buff");

  /*
   *  delete - SUCCESSFUL
   */
  status = rtems_partition_delete( id );
  directive_failed(status, "pt delete");

}

void check_period_nulls(void)
{
  rtems_status_code status;

  PUTS( "Testing period null checks" );

  /*
   *  create - null id
   */
  status = rtems_rate_monotonic_create( 0x1234, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "rtmon create NULL id");
}

void check_region_nulls(void)
{
  rtems_status_code status;
  rtems_id id;
  unsigned char buffer[32];
  unsigned32 size;

  PUTS( "Testing region null checks" );

  /*
   *  create - null address
   */
  status = rtems_region_create(
     0x1234, NULL, 8, 4, RTEMS_DEFAULT_ATTRIBUTES, &id );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn create NULL addr");

  /*
   *  create - null id
   */
  status = rtems_region_create(
     0x1234, buffer, 24, 4, RTEMS_DEFAULT_ATTRIBUTES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn create NULL id");

  /*
   *  create - SUCCESSFUL
   */
  status = rtems_region_create(
      0x1234, buffer, 24, 8,  RTEMS_DEFAULT_ATTRIBUTES, &id );
  directive_failed(status, "regn create");

  /*
   *  ident -- NULL id
   */
  status = rtems_region_ident( 0x1234, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");

  /*
   *  extend - null address
   */
  status = rtems_region_extend( id, NULL, 32 );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn extend NULL");

  /*
   *  get segment - null segment
   */
  status = rtems_region_get_segment( id, 2, RTEMS_DEFAULT_OPTIONS, 0, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn get seg NULL");

  /*
   *  get segment size - null segment
   */
  status = rtems_region_get_segment_size( id, NULL, &size );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn get sz NULL seg");

  /*
   *  get segment size - null size
   */
  status = rtems_region_get_segment_size( id, &buffer[4], NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS,"regn get sz NULL sz");

  /*
   *  delete - SUCCESSFUL
   */
  status = rtems_region_delete( id );
  directive_failed(status, "regn delete");
}

void check_sem_nulls(void)
{
  rtems_status_code status;

  PUTS( "Testing sem null checks" );

  /*
   *  create - null id
   */
  status = rtems_semaphore_create(0x1234, 6, RTEMS_DEFAULT_ATTRIBUTES, 1, NULL);
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "sem create NULL id");

  /*
   *  ident -- NULL id
   */
  status = rtems_semaphore_ident( 0x1234, RTEMS_SEARCH_ALL_NODES, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "ident NULL id");
}

void check_timer_nulls(void)
{
  rtems_status_code status;
  rtems_id id;

  PUTS( "Testing timer null checks" );

  /*
   *  create - null id
   */
  status = rtems_timer_create( 0x1234, NULL );
  fatal_directive_status(status, RTEMS_INVALID_ADDRESS, "tmr create NULL id");

  /*
   *  create - SUCCESSFUL
   */
  status = rtems_timer_create( 0x1234, &id );
  directive_failed(status, "tmr create");

  /*
   *  fire after - null routine
   */
  status = rtems_timer_fire_after( id, 1, NULL, NULL );
  fatal_directive_status(
      status, RTEMS_INVALID_ADDRESS, "tmr fire after NULL routine");

  /*
   *  initiate server - SUCCESSFUL
   */
  status = rtems_timer_initiate_server(
    RTEMS_TIMER_SERVER_DEFAULT_PRIORITY, 0, RTEMS_DEFAULT_ATTRIBUTES );
  directive_failed(status, "tmr server initiate");

  /*
   *  fire server after - null routine
   */
  status = rtems_timer_server_fire_after( id, 1, NULL, NULL );
  fatal_directive_status(
      status, RTEMS_INVALID_ADDRESS, "tmr server fire after NULL routine");

  /*
   *  fire when - null routine
   */
  {
    rtems_time_of_day time = { 2004, 4, 27, 16, 15, 0 };

    status = rtems_timer_fire_when( id, &time, NULL, NULL );
    fatal_directive_status(
        status, RTEMS_INVALID_ADDRESS, "tmr fire when NULL routine");

    status = rtems_timer_server_fire_when( id, &time, NULL, NULL );
    fatal_directive_status(
        status, RTEMS_INVALID_ADDRESS, "tmr server fire when NULL routine");
  }


  /*
   *  delete - SUCCESSFUL
   */
  status = rtems_timer_delete( id );
  directive_failed(status, "tmr delete");
}

rtems_task Init(
  rtems_task_argument ignored
)
{

  check_task_nulls();
  check_clock_nulls();
  check_dpmem_nulls();
  check_event_nulls();
  check_msgq_nulls();
  check_part_nulls();
  check_period_nulls();
  check_region_nulls();
  check_sem_nulls();
  check_timer_nulls();

#if 0
  status = rtems_task_delete( RTEMS_SELF );
#endif

  PUTS( "Testing complete" );
  exit( 0 );
}

/* configuration information */

#define CONFIGURE_TEST_NEEDS_CONSOLE_DRIVER
#define CONFIGURE_TEST_NEEDS_CLOCK_DRIVER
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE

/* one main thread, one test thread, and a timer server */
#define CONFIGURE_MAXIMUM_TASKS 3
#define CONFIGURE_MAXIMUM_PORTS 1
#define CONFIGURE_MAXIMUM_MESSAGE_QUEUES 1
#define CONFIGURE_MAXIMUM_PARTITIONS 1
#define CONFIGURE_MAXIMUM_REGIONS 1
#define CONFIGURE_MAXIMUM_TIMERS 1

#define CONFIGURE_INIT

#include <confdefs.h>

/* end of file */