1 /* BEGIN INCLUDE FILE ... user_attributes.incl.pl1 TAC 10/79 */ 2 3 4 /****^ HISTORY COMMENTS: 5 1) change(86-12-11,Brunelle), approve(87-07-13,MCR7741), 6 audit(87-04-19,GDixon), install(87-08-04,MR12.1-1056): 7 Add incl for abs_attributes.incl.pl1 to automatically include absentee 8 attribute switches. 9 2) change(87-04-19,GDixon), approve(87-07-13,MCR7741), 10 audit(87-07-16,Brunelle), install(87-08-04,MR12.1-1056): 11 A) Add USER_ATTRIBUTE_NAMES arrays. attribute_names.incl.pl1 can thereby 12 be deleted. 13 B) Add constants identifying attributes that can be changed by user at 14 login, etc. 15 END HISTORY COMMENTS */ 16 17 18 /* Modified 82-01-03 E. N. Kittlitz. to declare a complete level-1 structure */ 19 20 /* format: style4 */ 21 dcl 1 user_attributes aligned based, /* the user user_attributes */ 22 (2 administrator bit (1), /* 1 system administrator privileges */ 23 2 primary_line bit (1), /* 2 user has primary-line privileges */ 24 2 nobump bit (1), /* 2 user cannot be bumped */ 25 2 guaranteed_login bit (1), /* 4 user has guaranteed login privileges */ 26 2 anonymous bit (1), /* 5 used only in SAT. project may have anon.users */ 27 2 nopreempt bit (1), /* 6 used only in PDT. user not preemptable by others 28 . of same project (distinct from "nobump") */ 29 2 nolist bit (1), /* 7 don't list user on "who" */ 30 2 dialok bit (1), /* 8 user may have multiple consoles */ 31 2 multip bit (1), /* 9 user may have several processes */ 32 2 bumping bit (1), /* 10 in SAT. Can users in project bump each other? */ 33 2 brief bit (1), /* 11 no login or logout message */ 34 2 vinitproc bit (1), /* 12 user may change initial procedure */ 35 2 vhomedir bit (1), /* 13 user may change homedir */ 36 2 nostartup bit (1), /* 14 user does not want start_up.ec */ 37 2 sb_ok bit (1), /* 15 user may be standby */ 38 2 pm_ok bit (1), /* 16 user may be primary */ 39 2 eo_ok bit (1), /* 17 user may be edit_only */ 40 2 daemon bit (1), /* 18 user may login as daemon */ 41 2 vdim bit (1), /* 19 * OBSOLETE * user may change outer mdle */ 42 2 no_warning bit (1), /* 20 no warning message */ 43 2 igroup bit (1), /* 21 in SAT: this project may give its users individual groups 44 . in PDT: this user has an individual load control group */ 45 2 save_pdir bit (1), /* 22 save pdir after fatal process error */ 46 2 disconnect_ok bit (1), /* 23 ok to save user's disconnected processes */ 47 2 save_on_disconnect bit (1), /* 24 save them unless -nosave login arg is given */ 48 2 pad bit (12)) unaligned; 49 50 dcl USER_ATTRIBUTE_NAMES (0:24) char (20) int static options (constant) init 51 ("none", /* 0 */ 52 "administrator", /* 1 */ 53 "primary_line", /* 2 */ 54 "nobump", /* 3 */ 55 "guaranteed_login", /* 4 */ 56 "anonymous", /* 5 */ 57 "nopreempt", /* 6 */ 58 "nolist", /* 7 */ 59 "dialok", /* 8 */ 60 "multip", /* 9 */ 61 "bumping", /* 10 */ 62 "brief", /* 11 */ 63 "vinitproc", /* 12 */ 64 "vhomedir", /* 13 */ 65 "nostartup", /* 14 */ 66 "no_secondary", /* 15 */ 67 "no_prime", /* 16 */ 68 "no_eo", /* 17 */ 69 "daemon", /* 18 */ 70 "", /* 19 vdim OBSOLETE */ 71 "no_warning", /* 20 */ 72 "igroup", /* 21 */ 73 "save_pdir", /* 22 */ 74 "disconnect_ok", /* 23 */ 75 "save_on_disconnect"); /* 24 */ 76 77 dcl ALT_USER_ATTRIBUTE_NAMES (0:24) char (20) int static options (constant) init 78 ("null", /* 0 */ 79 "admin", /* 1 */ 80 "", "", /* 2 - 3 */ 81 "guar", /* 4 */ 82 "anon", /* 5 */ 83 "", "", /* 6 - 7 */ 84 "dial", /* 8 */ 85 "multi_login", /* 9 */ 86 "preempting", /* 10 */ 87 "", /* 11 */ 88 "v_process_overseer", /* 12 */ 89 "v_home_dir", /* 13 */ 90 "no_start_up", /* 14 */ 91 "no_sec", /* 15 */ 92 "no_primary", /* 16 */ 93 "no_edit_only", /* 17 */ 94 "op_login", /* 18 */ 95 "", /* 19 */ 96 "nowarn", /* 20 */ 97 "", "", "", /* 21 - 23 */ 98 "save"); /* 24 */ 99 100 dcl USER_ATTRIBUTES_always_allowed bit (36) aligned int static 101 options(constant) init("000000000010000000010000000000000000"b); 102 /* SAT/PDT attributes not needed for user to give (brief, no_warning) */ 103 104 dcl USER_ATTRIBUTES_default_in_pdt bit (36) aligned int static 105 options(constant) init("000000000010000000010000000000000000"b); 106 /* PDT value for (brief, no_warning) is default */ 107 108 dcl USER_ATTRIBUTES_settable_by_user bit (36) aligned int static 109 options(constant) init("000100000110010000010000000000000000"b); 110 /* user MIGHT set (bump, ns, brief, guar, no_warning) */ 111 112 %include user_abs_attributes; 113 114 /* END INCLUDE FILE ... user_attributes.incl.pl1 */