1 /* BEGIN INCLUDE FILE: suffix_info.incl.pl1 */
 2 /* format: style3,indcomtxt,idind30 */
 3 /**** Jay Pattin 2/13/83
 4       M. Pandolf 1984.11.30 to set FS_OBJECT_TYPE_MSF to -multisegment_file
 5 
 6       The include file copy_flags.incl.pl1 must be included in any program using this include file.
 7 
 8       This structure is returned by the suffix_XXX_$suffix_info subroutines */
 9 
10 declare   suffix_info_ptr               ptr;
11 
12 declare   1 suffix_info                 aligned based (suffix_info_ptr),
13             2 version                   char (8),
14             2 type                      char (32) unaligned,
15             2 type_name                 char (32) unaligned,          /* Singular name of the object type, e.g. "mailbox" */
16             2 plural_name               char (32) unaligned,          /* Plural of above, e.g. "mailboxes" */
17             2 flags                     unaligned,
18               3 standard_object         bit (1) unaligned,  /* ON if not an extended object (no suffix_XXX_) */
19               3 extended_acl            bit (1) unaligned,  /* ON if uses extended ACLs, off if regular ACLs */
20               3 has_switches            bit (1) unaligned,  /* ON if supports switches for objects */
21               3 mbz1                    bit (33) unaligned,
22             2 modes                     char (36),          /* correspondence between bits and chars for extended modes */
23             2 max_mode_len              fixed bin,          /* maximum number of modes on an object */
24             2 num_ring_brackets         fixed bin,          /* number of ring brackets on object */
25             2 copy_flags                like copy_flags,    /* See copy_flags.incl.pl1 */
26             2 info_pathname             char (168) unaligned;
27                                                             /* pathname of info segment containing more info */
28 
29 declare   SUFFIX_INFO_VERSION_1         char (8) static options (constant) init ("SUFFIX01");
30 
31 /* This information is returned by the suffix_XXX_$list_switches subroutines */
32 
33 declare   switch_list_ptr               ptr,
34           alloc_switch_count            fixed bin,
35           alloc_switch_name_count       fixed bin;
36 
37 declare   1 switch_list                 aligned based (switch_list_ptr),
38             2 version                   char (8),           /* SWITCH_LIST_VERSION_1 */
39             2 switch_count              fixed bin,          /* total number of switches */
40             2 switch_name_count         fixed bin,          /* total number of names */
41             2 switches                  (alloc_switch_count refer (switch_list.switch_count)),
42               3 name_index              fixed bin,          /* index of first name for this switch */
43               3 name_count              fixed bin,          /* number of names for this switch */
44               3 default_value           bit (1) aligned,    /* default setting for this switch */
45               3 mbz1                    bit (36) aligned,   /* reserved for future use */
46             2 names                     (alloc_switch_name_count refer (switch_list.switch_name_count)) char (32);
47 
48 declare   SWITCH_LIST_VERSION_1         char (8) static options (constant) init ("SWLIST01");
49 
50 declare   (
51           FS_OBJECT_TYPE_SEGMENT        init ("-segment"),
52           FS_OBJECT_TYPE_DIRECTORY      init ("-directory"),
53           FS_OBJECT_TYPE_MSF            init ("-multisegment_file"),
54           FS_OBJECT_TYPE_DM_FILE        init ("-dm_file"),
55           FS_OBJECT_TYPE_LINK           init ("-link")
56           )                             char (32) unaligned int static options (constant);
57 
58 /* END INCLUDE FILE: suffix_info.incl.pl1 */