1 
 2 /* Begin include file ... backup_preamble_header.incl.pl1 */
 3 /* Modified 1/29/73 by N. I. Morris */
 4 /* Modified 7/15/74 by R. E. Mullen */
 5 /* Modified 10/10/74 by A. Kobziar */
 6 
 7 dcl 1 h based aligned,                                      /* backup preamble (segment header) */
 8 
 9     2 dlen fixed binary,
10     2 dname character (168),
11     2 elen fixed binary,
12     2 ename character (32),
13     2 bitcnt fixed binary (24),
14     2 record_type fixed binary,                             /* Logical record type. */
15     2 dtd fixed binary (52),                                /* Date and time dump occurred. */
16     2 dumper_id character (32),                             /* Identification of dumper procedure. */
17 
18     2 bp bit (18),                                          /* Pointer to branches. */
19     2 bc fixed binary,                                      /* Branch count. */
20     2 lp bit (18),                                          /* Pointer to links. */
21     2 lc fixed binary,                                      /* Link count. */
22     2 aclp bit (18),                                        /* Pointer to ACL or CACL */
23     2 aclc fixed binary,                                    /* ACL count. */
24     2 actind bit (18),                                      /* File activity indicator */
25     2 actime bit (36),                                      /* File activity time */
26 
27     2 quota fixed binary,                                   /* Record quota for directory_list record. */
28     2 trp fixed binary (35),                                /* Time-record product .. */
29     2 tlu fixed binary (35),                                /* Time last updated .. */
30     2 inf_acct fixed binary,                                /* Inferior account switch .. */
31     2 term_acct fixed binary (1),                           /* Terminal account switch .. */
32     2 pad1 (3),                                             /* To even out area to 0 mod 8 */
33 
34     2 max_length fixed bin (18),                            /* Max. length of segment */
35     2 switches unal,
36       3 safety_sw bit (1) unal,                             /* Segment safety switch */
37       3 entrypt_sw bit (1) unal,                            /* "1"b -> call limiter enabled */
38       3 security_oosw bit(1) unal,                          /* security out-of-service */
39       3 audit_flag bit(1) unal,                             /* flag for seg reference auditing */
40       3 multiple_class bit (1) unal,                        /* system segment: access class may be higher than parent's */
41       3 pad2 bit(2) unal,                                   /* =pad2 in dir_entry */
42       3 master_dir bit (1) unal,                            /* "1"b => was master dir */
43       3 tpd bit (1) unal,                                   /* TRUE => never put on paging device */
44       3 sw_pad bit (13) unal,                               /* padding in this structure */
45     2 entrypt_bound bit (14) unal,                          /* Call limiter. */
46     2 access_class bit(72),                                 /* access class of entry */
47     2 spad bit(36),                                         /* last word of dir entry */
48     2 status_version fixed bin,                             /* version of status_for_backup struct */
49     2 nss_info_relp bit (18) aligned,                       /* NONZERO => NSS INFO */
50     2 dq_info_relp bit (18) aligned,                                  /* NONZERO => DIRQUOTA INFO */
51 
52     2 inaclp (0:7) bit (18),                                /* Pointer to initial ACL for each ring. */
53     2 inaclc (0:7) fixed bin,                               /* Initial ACL count for each ring. */
54     2 dir_inaclp (0:7) bit (18),                            /* Directory initial ACL pointer for each ring. */
55     2 dir_inaclc (0:7) fixed bin,                           /* Directory initial ACL count for each ring. */
56 
57     2 bitcount_author char (32),                            /* last modifier of the bit count */
58 
59     2 list_area /* area */ (65408);                         /* Area for list_dir and readacl. */
60 
61 dcl  author char (32) aligned based;                        /* Author of entry */
62                                                             /* N. B.  Author is an overlay starting at h.quota */
63 
64 /* End of include file ... backup_preamble_header.incl.pl1 */
65