-- --**************************************************************************** --* * --* Copyright (c) 2001 * --* by DIGITAL Equipment Corporation, Maynard, Mass. * --* * --* This software is furnished under a license and may be used and copied * --* only in accordance with the terms of such license and with the * --* inclusion of the above copyright notice. This software or any other * --* copies thereof may not be provided or otherwise made available to any * --* other person. No title to and ownership of the software is hereby * --* transferred. * --* * --* The information in this software is subject to change without notice * --* and should not be construed as a commitment by DIGITAL Equipment * --* Corporation. * --* * --* DIGITAL assumes no responsibility for the use or reliability of its * --* software on equipment which is not supplied by DIGITAL. * --* * --**************************************************************************** --******************************************************************************************************************** -- Created: 15-MAR-2001 22:53:14 by OpenVMS SDL EV1-33 -- Source: 18-DEC-1991 18:48:53 $11$DUA933:[LIB_ADA.LIS]NSAIDTDEF.SDL;1 --******************************************************************************************************************** with SYSTEM; use SYSTEM; with STARLET; use STARLET; with CONDITION_HANDLING; use CONDITION_HANDLING; package NSAIDTDEF is -- module $NSAIDTDEF --+ -- Security Auditing Impure Data Table offset definitions --- NSA_C_IDT_LENGTH : constant := 4794; NSA_K_IDT_LENGTH : constant := 4794; NSA_K_IDT_PAGES : constant := 10; -- Number of pages for IDT type NSAIDT_TYPE is record IDT_ALARM_HDR : STRING(1 .. 46); -- Alarm header buffer IDT_RECORD_BUF : STRING(1 .. 1024); -- Record buffer IDT_RECORD_DESCR : UNSIGNED_QUADWORD; -- Record buffer descriptor IDT_RECORD_DT : STRING(1 .. 128); -- Record descriptor table FILLER_1 : UNSIGNED_LONGWORD; -- Spare (was obsolete CJF field; IDT_AUDIT_CHAN -- audit journal channel number) FILLER_2 : UNSIGNED_BYTE_ARRAY (1 .. 3584); -- expand to 10 pages end record; for NSAIDT_TYPE use record IDT_ALARM_HDR at 0 range 0 .. 367; IDT_RECORD_BUF at 46 range 0 .. 8191; IDT_RECORD_DESCR at 1070 range 0 .. 63; IDT_RECORD_DT at 1078 range 0 .. 1023; FILLER_1 at 1206 range 0 .. 31; FILLER_2 at 1210 range 0 .. 28671; end record; for NSAIDT_TYPE'SIZE use 38352; NSAIDT_TYPE_INIT : constant NSAIDT_TYPE := (IDT_ALARM_HDR => (others => ASCII.NUL), IDT_RECORD_BUF => (others => ASCII.NUL), IDT_RECORD_DESCR => (0, 0), IDT_RECORD_DT => (others => ASCII.NUL), FILLER_1 => 0, FILLER_2 => (others => 0)); end NSAIDTDEF;