1 /* begin include file - access_audit_binary_def */
 2 
 3 /* 1985-02-26 EJ Sharpe: added rcp object definition */
 4 /* 1985-01-25 E. Swenson: added pnt definition */
 5 /* 1985-01-22 EJ Sharpe: created */
 6 
 7 /****
 8           Each access audit log message has binary data including
 9           the audit record header and optionally some extended
10           binary information.  The first 9 bits (fixed bin (9) uns unal)
11           if the extended binary defines the type of the data
12           and, thus, what structure may be used to interpret it.
13 
14           This include file is a registry of the extended binary
15           type values.
16 ****/
17 
18 dcl  (
19           /*type identifier*/ /*type*/       /*include where defined*/
20 
21           AAB_ss_object       init (1), /* access_audit_ssobj_info.incl.pl1 */
22           AAB_ss_link         init (2), /* access_audit_ssobj_info.incl.pl1 */
23           AAB_ia_int_dmn      init (3), /* as_audit_structures.incl.pl1 */
24           AAB_ia_abs          init (4), /* as_audit_structures.incl.pl1 */
25           AAB_ia_abs_proxy    init (5), /* as_audit_structures.incl.pl1 */
26           AAB_channel         init (6), /* as_audit_structures.incl.pl1 */
27           AAB_dial_service    init (7), /* as_audit_structures.incl.pl1 */
28           AAB_pnt_entry       init (8), /* access_audit_pnt_info.incl.pl1 */
29           AAB_rcp_object      init (9), /* access_audit_rcp_info.incl.pl1 */
30           AAB_mseg_msg       init (10) /* access_audit_mseg_info.incl.pl1 */
31      )    fixed bin (9) uns unal static options (constant);
32 
33 /****
34           The following array contains entry name fragments for the
35           expander procedure associated with the respective binary
36           data type.  The actual entry name is generated like:
37 
38           entryname = "expand_"||audit_binary_expanders(TYPE)||"_audit_info_"
39 
40           Note that expand_access_audit_msg_.pl1 keeps a cache of
41           extended binary expander procedure entries.  The cache
42           should be enlarged when the following array grows to more
43           than 36 entries.
44 ****/
45 
46 dcl  audit_binary_expanders (10) char (13) varying internal static options (constant)
47           init (    "ssobj",            /* 1 (first two are internal */
48                     "sslnk",            /* 2  procedures in expand_access_audit_msg_) */
49                     "as_ia",            /* 3 (ia_int_dmn) */
50                     "as_ia",            /* 4 (ia_abs) */
51                     "as_ia",            /* 5 (ia_abs_proxy) */
52                     "channel",          /* 6 */
53                     "dial_serv",        /* 7 */
54                     "pnt",              /* 8 */
55                     "rcp_obj",          /* 9 */
56                     "mseg_msg"          /* 10 */
57                     );
58 
59 /* end include file - access_audit_binary_def.incl.pl1 */