1 /* BEGIN INCLUDE FILE ... mlsys_parse_ca_options.incl.pl1 */
 2 /* Created:  June 1983 by G. Palter */
 3 /* Modified: March 1984 by G. Palter to remove ignore_log_save option */
 4 
 5 /* Options for the mlsys_utils_$parse_address_control_arguments, mlsys_utils_$parse_address_list_control_arguments, and
 6    mlsys_utils_$parse_mailbox_control_arguments entrypoints */
 7 
 8 dcl  1 parse_ca_options aligned based (parse_ca_options_ptr),
 9        2 version character (8) unaligned,
10        2 logbox_creation_mode fixed binary,                 /* specifies the action to be taken if the address/mailbox is
11                                                                the user's logbox, address/mailbox validation is requested,
12                                                                and the logbox does not exist */
13        2 savebox_creation_mode fixed binary,                /* ... same as above but for any savebox */
14        2 flags,
15          3 abort_on_errors bit (1) unaligned,               /* ON => use ssu_$abort_line to report errors (ie: abort on
16                                                                the first error); OFF => use ssu_$print_message */
17          3 validate_addresses bit (1) unaligned,            /* ON => validate the existence of the address/mailbox;
18                                                                OFF => only validate the command/request line syntax */
19          3 mbz bit (34) unaligned;                          /* must be set to ""b by the caller */
20 
21 dcl  PARSE_CA_OPTIONS_VERSION_1 character (8) static options (constant) initial ("mlspca01");
22 
23 dcl  parse_ca_options_ptr pointer;
24 
25 
26 /* Defined logbox/savebox creation modes */
27 
28 dcl  (DONT_CREATE_MAILBOX               initial (0),        /* do not create the mailbox and issue an error message */
29       QUERY_TO_CREATE_MAILBOX           initial (1),        /* ask the user for permission to create the mailbox */
30       CREATE_AND_ANNOUNCE_MAILBOX       initial (2),        /* create the mailbox and inform the user of this action */
31       SILENTLY_CREATE_MAILBOX           initial (3))        /* create the mailbox but don't inform the user */
32           fixed binary static options (constant);
33 
34 /* END INCLUDE FILE ... mlsys_parse_ca_options.incl.pl1 */