/* BEGIN INCLUDE FILE ... whotab.incl.pl1 */ /* Modified 740723 by PG to add security info */ /* Modified April 1976 by T. Casey to add shift and shift start and end times */ /* Modified May 1979 by T. Casey for MR7.0a to add foreground absentee variables */ /* Modified June 1981 by E. N. Kittlitz to add n_rate_structures. */ /* Modified December 1981 by E. N. Kittlitz to expand header. */ /* Modified 84-11-14 by E. A. Ranzenbach to add "session" fiedld in place of obsolete system ID... */ dcl 1 whotab based (whoptr) aligned, 2 mxusers fixed bin, /* max. number of users on system */ 2 n_users fixed bin, /* current number of users */ 2 mxunits fixed bin, /* maximun "load units" allowed */ 2 n_units fixed bin, /* current load */ 2 timeup fixed bin (71), /* time system was started */ 2 session char (8), /* AS state, same as anstbl.session */ 2 nextsd fixed bin (71), /* time we will shutdown */ 2 until fixed bin (71), /* projected time we start up again */ 2 lastsd fixed bin (71), /* time of last crash or shutdown */ 2 erfno char (8), /* if a crash, the error number */ 2 obsolete_why char (32), /* reason for last shutdown */ 2 installation_id char (32), /* name of installation */ 2 obsolete_message char (32), /* message for all users */ 2 abs_event fixed bin (71), /* event channel associated with absentee */ 2 abs_procid bit (36) aligned, /* process to whom messages about absentee are signalled */ 2 max_abs_users fixed bin, /* max number of absentee users */ 2 abs_users fixed bin, /* number of absentee users logged-in */ 2 n_daemons fixed bin, /* Number of daemon users logged in */ 2 request_channel fixed bin (71), /* System master channel for requests to AS. */ 2 request_process_id bit (36), /* Process ID of request dispatcher */ 2 shift fixed bin, /* current shift (copied from anstbl, for users to see) */ 2 next_shift_change_time fixed bin (71), /* time current shift ends */ 2 last_shift_change_time fixed bin (71), /* time current shift started */ 2 fg_abs_users fixed bin (17) unal, /* number of foreground absentee users */ 2 n_rate_structures fixed bin (9) unsigned unal, /* number of rate_structures defined at bootload */ 2 pad1 bit (9) unal, 2 pad (3) fixed bin, 2 version fixed bin, /* structure version */ 2 header_size fixed bin, /* length of header in words */ 2 entry_size fixed bin, /* length of entry in words */ /* laste_adjust is used only by Answering Service programs */ 2 laste_adjust fixed bin, /* count of 32 wd blocks in hdr from header_extension_mbz1 */ 2 laste fixed bin, /* index of last entry in use (includes laste_adjust) */ 2 freep fixed bin (18) unsigned, /* index of first free entry. chained thru "chain" */ /* whotab header extension: The header is extended from 64 words by annexing whole user entries from the 'e' array. Each 'e' entry is 32 words long. Each annexed block has its first word set to zero, indicating that no user entry is present. This allows existing programs to function with old definitions of whotab. Obviously no new header field can be more than 31 contiguous words in length. In the Answering Service, all programs using whotab must be compiled with the latest version. Only lg_ctl_ uses laste_adjust. */ 2 header_extension_mbz1 fixed bin, /* location 100o */ 2 n_abs (4) fixed bin, /* number of processes from each background queue */ 2 abs_qres (4) fixed bin, /* number of absentee positions reserved for each queue */ 2 abs_cpu_limit (4) fixed bin (35), /* current absentee cpu limits */ 2 abs_control, /* see absentee_user_table */ 3 mnbz bit (1) unal, /* must not be zero */ 3 abs_maxu_auto bit (1) unal, /* 1 if automatic */ 3 abs_maxq_auto bit (1) unal, /* 1 if automatic */ 3 abs_qres_auto bit (1) unal, /* 1 if automatic */ 3 abs_cpu_limit_auto bit (1) unal, /* 1 if automatic */ 3 queue_dropped (-1:4) bit (1) unal, /* 1 if queue dropped */ 3 abs_up bit (1) unal, /* 1 if absentee facility is running */ 3 abs_stopped bit (1) unal, /* 1 if absentee facility is stopped */ 3 control_pad bit (23) unal, 2 installation_request_channel fixed bin (71), /* IPC channel for install command */ 2 installation_request_pid bit (36), /* installation process identifier */ 2 sysid char (32), /* current system name */ 2 header_extension_pad1 (7) fixed bin, /* pad to size of e element, offset 137o */ 2 header_extension_mbz2 fixed bin, /* offset 140o */ 2 message char (124), /* message for all users */ 2 header_extension_mbz3 fixed bin, /* offset 200o */ 2 why char (124), /* reason for last shutdown */ 2 e (1000), /* offset 240o */ 3 active fixed bin, /* nonzero means logged in */ 3 person char (28) aligned, /* person name */ 3 project char (28), /* project id */ 3 anon fixed bin, /* 1 if anonymous user */ 3 padding fixed bin (71), 3 timeon fixed bin (71), /* time of login */ 3 units fixed bin, /* load units */ 3 stby fixed bin, /* 1 if stby */ 3 idcode char (4), /* tty id code */ 3 chain fixed bin (18) unsigned, /* chain for free list */ 3 proc_type fixed bin, /* 1 = interactive, 2 = absentee, 3 = daemon */ 3 group char (8), /* party-line group */ 3 fg_abs bit (1) unal, /* "1"b if foreground absentee user */ 3 disconnected bit (1) unaligned, /* "1"b if process is disconnected */ 3 suspended bit (1) unaligned, /* "1"b if process is suspended */ 3 pad2 bit (33) unal, 3 cant_bump_until fixed bin (71), /* protected from primary bump till here */ 3 process_authorization bit (72); /* access authorization of process */ dcl WHOTAB_VERSION_1 fixed bin init (1) static options (constant); /* END INCLUDE FILE ... whotab.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 */