121 lines
3.7 KiB
C
121 lines
3.7 KiB
C
/****************************************************************************
|
||
GTA PROJECT AT division
|
||
|
||
Copyright, 1990, The Regents of the University of California
|
||
Los Alamos National Laboratory
|
||
|
||
FILE PATH: ~gta/ar/arCSCheck.c
|
||
ENVIRONMENT: SunOS, VxWorks
|
||
MAKE OPTIONS:
|
||
SCCS VERSION: $Id$
|
||
*+/mod***********************************************************************
|
||
* TITLE arCSCheck.c - check assumptions about definitions in arCS.h
|
||
*
|
||
* DESCRIPTION
|
||
*
|
||
*-
|
||
* Modification History
|
||
* version date programmer comments
|
||
* ------- -------- ------------ -----------------------------------
|
||
* 1.1 04/01/90 R. Cole initial version
|
||
*
|
||
*****************************************************************************/
|
||
#ifdef AR_CS_NEW_DBR
|
||
# define DB_TEXT_GLBLSOURCE
|
||
#endif
|
||
|
||
#include <genDefs.h>
|
||
#include <tsDefs.h>
|
||
#include <arCS.h>
|
||
#ifndef INCLcadefh
|
||
# include <cadef.h>
|
||
#endif
|
||
|
||
#ifndef INCLdb_accessh
|
||
# ifndef AR_CS_NEW_DBR
|
||
# include <db_access.h>
|
||
# else
|
||
# include <new_access.h>
|
||
# endif
|
||
#endif
|
||
|
||
|
||
|
||
/*+/subr**********************************************************************
|
||
* NAME arCSCheck - check assumptions used by AR about the control system
|
||
*
|
||
* DESCRIPTION
|
||
*
|
||
* RETURNS
|
||
*
|
||
* BUGS
|
||
* o doesn't actually check against GTACS #define's
|
||
*
|
||
* SEE ALSO
|
||
* arCS.h
|
||
*
|
||
* EXAMPLE
|
||
*
|
||
*-*/
|
||
int
|
||
arCSCheck()
|
||
{
|
||
#ifdef NDEBUG
|
||
# define NDEBUG /* force checks even if compiled NDEBUG */
|
||
#endif
|
||
|
||
/*----------------------------------------------------------------------------
|
||
* dimensions for text strings must be multiples of 4 for proper alignment
|
||
* of structures. In addition, specific dimensions are checked for string
|
||
* types which are stored in files--changing these dimensions requires
|
||
* reformatting existing files.
|
||
*
|
||
* Just for documentation purposes, alarm severity and status are checked.
|
||
* Again, these are important because of file layout.
|
||
*---------------------------------------------------------------------------*/
|
||
assert(AR_NAME_DIM % 4 == 0);
|
||
assert(AR_NAME_DIM == 36);
|
||
assert(AR_NAME_DIM == db_name_dim);
|
||
assert(AR_STRVAL_DIM == 40);
|
||
assert(AR_STRVAL_DIM == db_strval_dim);
|
||
assert(AR_DESC_DIM % 4 == 0);
|
||
assert(AR_DESC_DIM == 24);
|
||
assert(AR_DESC_DIM == db_desc_dim);
|
||
assert(AR_UNITS_DIM % 4 == 0);
|
||
assert(AR_UNITS_DIM == 8);
|
||
assert(AR_UNITS_DIM == db_units_dim);
|
||
assert(AR_STATE_DIM == 16);
|
||
assert(AR_STATE_DIM == db_state_dim);
|
||
assert(AR_STATE_TEXT_DIM == 26);
|
||
assert(AR_STATE_TEXT_DIM == db_state_text_dim);
|
||
assert(sizeof(AR_ALM_SEV) == 1);
|
||
assert(sizeof(AR_ALM_STAT) == 1);
|
||
|
||
/*----------------------------------------------------------------------------
|
||
* check for incompatibilities between the assumptions used by AR and
|
||
* the actual sizes in the control system.
|
||
*---------------------------------------------------------------------------*/
|
||
assert(AR_STRVAL_DIM == dbr_size[DBR_STRING]);
|
||
#ifndef AR_CS_NEW_DBR
|
||
assert(2 == dbr_size[DBR_INT]);
|
||
#else
|
||
assert(2 == dbr_size[DBR_SHORT]);
|
||
#endif
|
||
assert(4 == dbr_size[DBR_FLOAT]);
|
||
|
||
/*----------------------------------------------------------------------------
|
||
* miscellaneous
|
||
*---------------------------------------------------------------------------*/
|
||
assert(4 == sizeof(long)); /* block numbers require 32 bit integer;
|
||
also important for file layout */
|
||
assert(2 == sizeof(short)); /* important for file layout */
|
||
assert(4 == sizeof(float)); /* important for file layout */
|
||
assert(1 == sizeof(char)); /* important for file layout */
|
||
assert(2 == sizeof(USHORT));/* important for file layout */
|
||
assert(4 == sizeof(ULONG)); /* important for file layout */
|
||
assert(TS_EPOCH_YEAR == 1990);/* existing file time stamps are
|
||
invalidated if epoch year changes*/
|
||
|
||
return OK;
|
||
}
|