1 /* BEGIN INCLUDE FILE ... saved_dir_info.incl.pl1 */
  2 /* Modified 07/10/82 by Jim Lippard to only have 2 dir ring brackets */
  3 
  4 dcl 1 fseg based (fptr) aligned,
  5     2 fpath char (168) unal,
  6     2 timeof fixed bin (71),
  7     2 nents fixed bin,
  8     2 freep fixed bin,
  9     2 fpad (4) fixed bin,
 10     2 ffirst fixed bin;
 11 
 12 dcl fptr ptr;
 13 
 14 dcl 1 seg_rec based (xp) aligned,
 15     2 fnext bit (18),
 16     2 n_names fixed bin,
 17     2 brstat,
 18       3 type bit (2) unal,
 19       3 nnames bit (16) unal,
 20       3 nrp bit (18) unal,
 21       3 dtm bit (36) unal,
 22       3 dtu bit (36) unal,
 23       3 mode bit (5) unal,
 24       3 padding bit (13) unal,
 25       3 records bit (18) unal,
 26       3 dtd bit (36) unal,
 27       3 dtem bit (36) unal,
 28       3 lvid bit (36) unal,
 29       3 curlen bit (12) unal,
 30       3 bitcnt bit (24) unal,
 31       3 pad1 bit (8) unal,
 32       3 copysw bit (1) unal,
 33       3 tpd bit (1) unal,
 34       3 mdir bit (1) unal,
 35       3 damaged bit (1) unal,
 36       3 pad2 bit (6) unal,
 37       3 rbs (0:2) bit (6) unal,
 38       3 uid bit (36) unal,
 39     2 bc_author char (32) unal,
 40     2 author char (32) unal,
 41     2 max_lth fixed bin (19),
 42     2 ssw bit (1) unal,
 43     2 pad0 bit(35) unal,
 44     2 nacls fixed bin,
 45     2 acls (dummy refer (seg_rec.nacls)),
 46       3 access_name char (32),
 47       3 modes bit (36),
 48     2 names (dummy refer (seg_rec.n_names)),
 49       3 name char (32),
 50     2 end_seg_rec fixed bin;
 51 
 52 dcl 1 dir_rec based (xp) aligned,
 53     2 fnext bit (18),
 54     2 n_names fixed bin,
 55     2 brstat,
 56       3 type bit (2) unal,
 57       3 nnames bit (16) unal,
 58       3 nrp bit (18) unal,
 59       3 dtm bit (36) unal,
 60       3 dtu bit (36) unal,
 61       3 mode bit (5) unal,
 62       3 padding bit (13) unal,
 63       3 records bit (18) unal,
 64       3 dtd bit (36) unal,
 65       3 dtem bit (36) unal,
 66       3 slvid bit (36) unal,
 67       3 curlen bit (12) unal,
 68       3 bitcnt bit (24) unal,
 69       3 pad1 bit (8) unal,
 70       3 copysw bit (1) unal,
 71       3 tpd bit (1) unal,
 72       3 mdir bit (1) unal,                                  /* TRUE if mater dir */
 73       3 damaged bit (1) unal,
 74       3 pad2 bit (6) unal,
 75       3 rbs (0:1) bit (6) unal,
 76       3 pad3 bit (6) unal,
 77       3 uid bit (36) unal,
 78     2 bc_author char (32) unal,
 79     2 author char (32) unal,
 80     2 max_lth fixed bin (19),
 81     2 ssw bit (1) unal,
 82     2 pad0 bit(35) unal,
 83     2 quota fixed bin (18),
 84     2 nacls fixed bin,
 85     2 acls (dummy refer (dir_rec.nacls)),
 86       3 access_name char (32),
 87       3 modes bit (36),
 88     2 nisacls fixed bin,
 89     2 isacls (dummy refer (dir_rec.nisacls)),
 90       3 access_name char (32),
 91       3 modes bit (36),
 92     2 nidacls fixed bin,
 93     2 idacls (dummy refer (dir_rec.nidacls)),
 94       3 access_name char (32),
 95       3 modes bit (36),
 96     2 ncacls fixed bin,
 97     2 cacls (dummy refer (dir_rec.ncacls)),
 98       3 access_name char (32),
 99       3 modes bit (36),
100     2 names (dummy refer (dir_rec.n_names)),
101       3 name char (32),
102     2 end_dir_rec fixed bin;
103 
104 dcl 1 link_rec based (xp) aligned,
105     2 fnext bit (18),
106     2 n_names fixed bin,
107     2 brstat,
108       3 type bit (2) unal,
109       3 nnames bit (16) unal,
110       3 nrp bit (18) unal,
111       3 dtem bit (36) unal,
112       3 dtd bit (36) unal,
113       3 pnl bit (18) unal,
114       3 pnrp bit (18) unal,
115     2 target char (168),
116     2 names (dummy refer (link_rec.n_names)),
117       3 name char (32),
118     2 end_link_rec fixed bin;
119 
120 dcl 1 aclval (nacl) based (tp) aligned,
121     2 access_name char (32),
122     2 modes bit (36);
123 
124 dcl tp ptr;
125 
126 /* END INCLUDE FILE ... saved_dir_info.incl.pl1 */