Initial revision

src/libCom/arCSCheck.c

@@ -0,0 +1,120 @@
+/****************************************************************************
+			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;
+}