Subversion Repositories openrisc_me

/*  tmacros.h

 *

 *  This include file contains macros which are useful in the RTEMS

 *  test suites.

 *

 *  COPYRIGHT (c) 1989-1999.

 *  On-Line Applications Research Corporation (OAR).

 *

 *  The license and distribution terms for this file may be

 *  found in the file LICENSE in this distribution or at

 *  http://www.OARcorp.com/rtems/license.html.

 *

 *  $Id: tmacros.h,v 1.2 2001-09-27 12:02:38 chris Exp $

 */

#ifndef __TMACROS_h

#define __TMACROS_h

#ifdef __cplusplus

extern "C" {

#endif

#include <bsp.h>    /* includes <rtems.h> */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <assert.h>

#include <rtems/error.h>

#define FOREVER 1                  /* infinite loop */

#ifdef TEST_INIT

#define TEST_EXTERN 

#define CONFIGURE_INIT

#else

#define TEST_EXTERN extern

#endif

#define check_dispatch_disable_level( _expect ) \

  do { \

    extern volatile rtems_unsigned32 _Thread_Dispatch_disable_level; \

    if ( (_expect) != -1 && _Thread_Dispatch_disable_level != (_expect) ) { \

      printf( "\n_Thread_Dispatch_disable_level is (%d) not %d\n", \

              _Thread_Dispatch_disable_level, (_expect) ); \

      fflush(stdout); \

      exit( 1 ); \

    } \

  } while ( 0 )

/*

 *  These macros properly report errors within the Classic API

 */

#define directive_failed( _dirstat, _failmsg )  \

 fatal_directive_status( _dirstat, RTEMS_SUCCESSFUL, _failmsg )

#define directive_failed_with_level( _dirstat, _failmsg, _level )  \

 fatal_directive_status_with_level( \

      _dirstat, RTEMS_SUCCESSFUL, _failmsg, _level )

#define fatal_directive_status( _stat, _desired, _msg ) \

  fatal_directive_status_with_level( _stat, _desired, _msg, 0 )

#define fatal_directive_status_with_level( _stat, _desired, _msg, _level ) \

  do { \

    check_dispatch_disable_level( _level ); \

    if ( (_stat) != (_desired) ) { \

      printf( "\n%s FAILED -- expected (%s) got (%s)\n", \

              (_msg), rtems_status_text(_desired), rtems_status_text(_stat) ); \

      fflush(stdout); \

      exit( _stat ); \

    } \

  } while ( 0 )

/*

 *  These macros properly report errors from the POSIX API

 */

#define posix_service_failed( _dirstat, _failmsg )  \

 fatal_posix_service_status( _dirstat, RTEMS_SUCCESSFUL, _failmsg )

#define posix_service_failed_with_level( _dirstat, _failmsg, _level )  \

 fatal_posix_service_status_with_level( \

      _dirstat, RTEMS_SUCCESSFUL, _failmsg, _level )

#define fatal_posix_service_status( _stat, _desired, _msg ) \

  fatal_posix_service_status_with_level( _stat, _desired, _msg, 0 )

#define fatal_posix_service_status_with_level( _stat, _desired, _msg, _level ) \

  do { \

    check_dispatch_disable_level( _level ); \

    if ( (_stat) != (_desired) ) { \

      printf( "\n%s FAILED -- expected (%s) got (%s)\n", \

              (_msg), strerror(_desired), strerror(_stat) ); \

      fflush(stdout); \

      exit( _stat ); \

    } \

  } while ( 0 )

/*

 *  Generic integer version of the error reporting

 */

#define int_service_failed( _dirstat, _failmsg )  \

 fatal_int_service_status( _dirstat, RTEMS_SUCCESSFUL, _failmsg )

#define int_service_failed_with_level( _dirstat, _failmsg, _level )  \

 fatal_int_service_status_with_level( \

      _dirstat, RTEMS_SUCCESSFUL, _failmsg, _level )

#define fatal_int_service_status( _stat, _desired, _msg ) \

  fatal_int_service_status_with_level( _stat, _desired, _msg, 0 )

#define fatal_int_service_status_with_level( _stat, _desired, _msg, _level ) \

  do { \

    check_dispatch_disable_level( _level ); \

    if ( (_stat) != (_desired) ) { \

      printf( "\n%s FAILED -- expected (%d) got (%d)\n", \

              (_msg), (_desired), (_stat) ); \

      fflush(stdout); \

      exit( _stat ); \

    } \

  } while ( 0 )

/*

 *  Print the time

 */

#define sprint_time(_str, _s1, _tb, _s2) \

  do { \

    sprintf( (str), "%s%02d:%02d:%02d   %02d/%02d/%04d%s", \

       _s1, (_tb)->hour, (_tb)->minute, (_tb)->second, \

       (_tb)->month, (_tb)->day, (_tb)->year, _s2 ); \

  } while ( 0 )

#define print_time(_s1, _tb, _s2) \

  do { \

    printf( "%s%02d:%02d:%02d   %02d/%02d/%04d%s", \

       _s1, (_tb)->hour, (_tb)->minute, (_tb)->second, \

       (_tb)->month, (_tb)->day, (_tb)->year, _s2 ); \

    fflush(stdout); \

  } while ( 0 )

#define put_dot( _c ) \

  do { \

    putchar( _c ); \

    fflush( stdout ); \

  } while ( 0 )

#define new_line  puts( "" )

#define puts_nocr printf

#ifdef RTEMS_TEST_NO_PAUSE

#define rtems_test_pause() \

    do { \

      printf( "<pause>\n" ); fflush( stdout ); \

  } while ( 0 )

#define rtems_test_pause_and_screen_number( _screen ) \

  do { \

    printf( "<pause - screen %d>\n", (_screen) ); fflush( stdout ); \

  } while ( 0 )

#else

#define rtems_test_pause() \

  do { \

    char buffer[ 80 ]; \

    printf( "<pause>" ); fflush( stdout ); \

    gets( buffer ); \

    puts( "" ); \

  } while ( 0 )

#define rtems_test_pause_and_screen_number( _screen ) \

  do { \

    char buffer[ 80 ]; \

    printf( "<pause - screen %d>", (_screen) ); fflush( stdout ); \

    gets( buffer ); \

    puts( "" ); \

  } while ( 0 )

#endif

#define put_name( name, crlf ) \

{ rtems_unsigned32 c0, c1, c2, c3; \

  c0 = (name >> 24) & 0xff; \

  c1 = (name >> 16) & 0xff; \

  c2 = (name >> 8) & 0xff; \

  c3 = name & 0xff; \

  putchar( (char)c0 ); \

  if ( c1 ) putchar( (char)c1 ); \

  if ( c2 ) putchar( (char)c2 ); \

  if ( c3 ) putchar( (char)c3 ); \

  if ( crlf ) \

    putchar( '\n' ); \

}

#ifndef build_time

#define build_time( TB, MON, DAY, YR, HR, MIN, SEC, TK ) \

  { (TB)->year   = YR;  \

    (TB)->month  = MON; \

    (TB)->day    = DAY; \

    (TB)->hour   = HR;  \

    (TB)->minute = MIN; \

    (TB)->second = SEC; \

    (TB)->ticks  = TK; }

#endif

#define task_number( tid ) \

  ( rtems_get_index( tid ) - \

     rtems_configuration_get_rtems_api_configuration()->number_of_initialization_tasks )

static inline rtems_unsigned32 get_ticks_per_second( void )

{

  rtems_interval ticks_per_second;

  (void) rtems_clock_get( RTEMS_CLOCK_GET_TICKS_PER_SECOND, &ticks_per_second );

  return ticks_per_second;

}

#define TICKS_PER_SECOND get_ticks_per_second()

#ifdef __cplusplus

}

#endif

#endif