1 /* include backup_dir_list */
 2 /* Created by R H Campbell. */
 3 /* Modified 15 June 1970, R H Campbell, 30 March l971, R A Tilden. */
 4 /* Last modified by Kobziar 2/10/75 to add access_class */
 5 /* Last modified by Greenberg 11/4/76 for vtoc_error bit */
 6 dcl 1 br (1000) based aligned,                              /* branch array returned by list_dir */
 7     2 (vtoc_error bit (1),                                  /* Vtoc error on this entry */
 8      pad1 bit (1), uid bit (70),
 9      pad2 bit (20), dtu bit (52),
10      pad3 bit (20), dtm bit (52),
11      pad4 bit (20), dtd bit (52),
12      pad5 bit (20), dtbm bit (52),
13      access_class bit (72),
14      dirsw bit (1), optionsw bit (2), bc bit (24), consistsw bit (2), mode bit (5), usage bit (2),
15      usagect bit (17), nomore bit (1), (cl, ml) bit (9),
16      acct bit (36),
17     (hlim, llim) bit (17),
18      multiple_class bit (1), pad7 bit (1),
19     (rb1, rb2, rb3) bit (6), pad8 bit (18),
20     (pad9, namerp) bit (18),
21      ix bit (18), dump_me bit (1), nnames bit (17)) unaligned;  /* ix is pointer to i'th (sorted) entry. */
22 
23 dcl  nnames fixed bin;                                      /* Number of elements in name array. */
24 
25 dcl 1 name (1000 /* nnames */) based aligned,
26     2 size bit (17),
27     2 string character (32);
28 
29 dcl 1 lk (1) based aligned,                                 /* link array returned by list_dir */
30     2 (pad1 bit (2), uid bit (70),
31      pad2 bit (20), dtu bit (52),
32      pad3 bit (20), dtm bit (52),
33      pad4 bit (20), dtd bit (52),
34     (pathnamerp, namerp) bit (18),
35      ix bit (18), dump_me bit (1), nnames bit (17)) unaligned;  /* ix is pointer to i'th (sorted) entry. */
36 
37 dcl 1 path based (pp) aligned,                              /* path name structure from list_dir (one per link) */
38     2 size bit (17),
39     2 author character(32),                                 /* author of link, and */
40     2 name character (168);                                 /* path name. */
41 
42 dcl 1 old_path based (pp) aligned,                          /* path name as it existed prior to inclusion of author */
43     2 size bit (17),
44     2 name character (168);
45                                                             /* end backup_dir_list */