1 04/01/82  check_msf_
 2 
 3 
 4 Entry points in check_msf_:
 5    (List is generated by the help command)
 6 
 7 
 8 :Entry:  check_msf_:  04/01/82  check_msf_
 9 
10 
11 Syntax:
12 dcl  check_msf_ entry (char(*), char(*), area(*), fixed bin(35));
13 call check_msf_ (dirname, ename, user_area, code);
14 
15 
16 Function:  checks if a directory satisfies the rules for a properly
17 constructed multisegment file.
18 
19 
20 Arguments:
21 dirname
22    is the absolute pathname of the parent of the directory to be
23    checked for proper multisegment file format.  (Input)
24 ename
25    is the entryname of the directory to be checked for proper
26    multisegment file format.  (input)
27 user_area
28    is a scratch area to be used by check_msf_.  (Input)
29 code
30    is set to zero if the directory passed all tests for proper format;
31    otherwise, it is set to error_table_$bad_ms_file.  (Output)
32 
33 
34 Notes: A directory is considered to be a multisegment file by this
35 subroutine only if it satisifies all of the following conditions:
36 
37 (1) the directory has a non-zero bit count.
38 
39 (2) the directory does not contain any links or directories.
40 
41 (3) the directory contains exactly as many segments as its bit count.
42 Each of these segments must have exactly one name which is the
43 character string representation of a number between zero and one less
44 than the directory's bit count, inclusive.