/* BEGIN INCLUDE FILE ... backup_control.incl.pl1 */ /* Modified: July 1982 by G. Palter to add features for proper support of AIM in IMFT (version 4) */ /* Modified: August 1983 by Robert Coren to add minimum access class enforcement */ /* Modified: November 1983 by Robert Coren to add "upgrade_to_user_auth" flag */ /* Hierarchy dumper/reloader subroutine control structure */ dcl 1 backup_control aligned based (backup_control_ptr), 2 header, /* allows people to use like (!) */ 3 version character (8) unaligned, 3 tape_entry entry (character (*)) variable, /* returns next tape label */ 3 data_iocb pointer, /* -> I/O switch to use for dumping/loading if preattached */ 3 maximum_access_class bit (72) aligned, /* maximum access class for anything to be dumped */ 3 minimum_access_class bit (72) aligned, /* minimum access class for anything to be dumped */ 3 maximum_dir_access_class bit (72) aligned, /* no directory above this access class is dumped */ 3 user_for_access_check, /* data required to validate user's access */ 4 id character (32) unaligned, /* Person.Project.tag */ 4 authorization bit (72), /* the user's process authorization */ 4 ring fixed binary, /* the user's ring o execution */ 3 minimum_ring fixed binary, /* no ring bracket is set below this value */ 3 aim_translations, /* data required to translate AIM attributes on the tape */ 4 source_attributes_ptr pointer, 4 target_attributes_ptr pointer, 3 options aligned, 4 map_sw bit(1) unaligned, /* ON to write map segment */ 4 debug_sw bit (1) unaligned, /* ON to check quotas and not trim subtrees */ 4 no_reload_sw bit (1) unaligned, /* ON to not load for backup_load_ */ 4 hold_sw bit (1) unaligned, /* ON to not demount tape afterwards */ 4 preattached bit (1) unaligned, /* ON => perform loading/dumping to supplied I/O switch */ 4 error_file bit (1) unaligned, /* ON => generate an error file anyway */ 4 first bit (1) unaligned, /* ON => for reload, stop after all requests satisfied */ 4 caller_handles_conditions bit (1) unaligned, /* ON => caller of backup_dump_ handles faults */ 4 allow_dir_overwrite bit (1) unaligned, /* ON => allow reloaded seg to overwrite a dir */ 4 enforce_max_access_class bit (1) unaligned, /* ON => do not dump anything above given access class */ 4 dont_dump_upgraded_dirs bit (1) unaligned, /* ON => do not dump directories above given access class */ 4 check_effective_access bit (1) unaligned, /* ON => do not dump branches specified user can't touch */ 4 restore_access_class bit (1) unaligned, /* ON => restore AIM attributes even in debug mode */ 4 enforce_minimum_ring bit (1) unaligned, /* ON => do not give anything ring bracket below minimum */ 4 translate_access_class bit (1) unaligned, /* ON => translate access classes read from tape */ 4 enforce_min_access_class bit (1) unaligned, /* ON => do not dump anything below given access class */ 4 upgrade_to_user_auth bit (1) unaligned, /* ON => set access class of branch being dumped to user's authorization */ 4 pad bit (19) unaligned, 3 request_count fixed binary, /* # of entries to load or dump */ 2 requests (backup_control_request_count refer (backup_control.request_count)), 3 path character (168) unaligned, /* pathname of object to be dumped/loaded */ 3 new_path character (168) unaligned, /* pathname for object when reloading if not same as above */ 3 switches aligned, 4 no_primary_sw bit (1) unaligned, /* do not use primary pathname */ 4 trim_sw bit (1) unaligned, /* trim target directories */ 4 pad bit (34) unaligned, 3 found bit(1) aligned, /* ON => found on tape by backup_load_ (output) */ 3 loaded bit (1) aligned, /* ON => loaded by backup_load_ (output) */ 3 status_code fixed binary (35), /* ON => per-entry status code (output) */ 3 error_name character (65) unaligned; /* ON => some information about what happened (output) */ dcl backup_control_ptr pointer; dcl backup_control_request_count fixed binary; /* for allocations */ dcl BACKUP_CONTROL_VERSION_5 character (8) static options (constant) initial ("hbc_0005"); /* END INCLUDE FILE ... backup_control.incl.pl1 */ */ ----------------------------------------------------------- Historical Background This edition of the Multics software materials and documentation is provided and donated to Massachusetts Institute of Technology by Group Bull including Bull HN Information Systems Inc. as a contribution to computer science knowledge. This donation is made also to give evidence of the common contributions of Massachusetts Institute of Technology, Bell Laboratories, General Electric, Honeywell Information Systems Inc., Honeywell Bull Inc., Groupe Bull and Bull HN Information Systems Inc. to the development of this operating system. Multics development was initiated by Massachusetts Institute of Technology Project MAC (1963-1970), renamed the MIT Laboratory for Computer Science and Artificial Intelligence in the mid 1970s, under the leadership of Professor Fernando Jose Corbato. Users consider that Multics provided the best software architecture for managing computer hardware properly and for executing programs. Many subsequent operating systems incorporated Multics principles. Multics was distributed in 1975 to 2000 by Group Bull in Europe , and in the U.S. by Bull HN Information Systems Inc., as successor in interest by change in name only to Honeywell Bull Inc. and Honeywell Information Systems Inc. . ----------------------------------------------------------- Permission to use, copy, modify, and distribute these programs and their documentation for any purpose and without fee is hereby granted,provided that the below copyright notice and historical background appear in all copies and that both the copyright notice and historical background and this permission notice appear in supporting documentation, and that the names of MIT, HIS, Bull or Bull HN not be used in advertising or publicity pertaining to distribution of the programs without specific prior written permission. Copyright 1972 by Massachusetts Institute of Technology and Honeywell Information Systems Inc. Copyright 2006 by Bull HN Information Systems Inc. Copyright 2006 by Bull SAS All Rights Reserved */