$UsrPriv
The $UsrPriv function is used to test whether a user ID has been granted specific Model 204 privileges.
Syntax
The format of the $UsrPriv function is:
$UsrPriv(privilege, logging-option)
Where:
- privilege is the privilege that is to be validated. Privilege can be one of the following values:
- ANY_ADMINISTRATOR
The ANY_ADMINISTRATOR privilege test verifies that the user is User 0 or a system manager.
- CHANGE_FILE_PASSWORD
- CHANGE_LOGIN_PASSWORD
- OVERRIDE_RECORD_SECURITY
- SUPER_USER
- SYSTEM_ADMINISTRATOR
- SYSTEM_MANAGER
- ANY_ADMINISTRATOR
- logging-option specifies whether Model 204 should indicate that an error message should be issued for security violations:
- LOG indicates that any privilege violation is logged.
- NOLOG indicates that the privileges should be determined but any violation found is not logged.
Currently, the logging option affects only the Security Server (formerly RACF) or Top Secret interface. The option has no effect on Model 204; the ACF2 Interface always logs a security violation regardless of the logging option.
LOG is the default if a logging option is not specified.
$UsrPriv returns a numeric true/false value indicating the result of the authorization check, as follows:
Value | User is... |
---|---|
0 | Not authorized for the privilege or an unknown privilege name is specified. |
1 | Authorized for the specified privilege. |
Example
The following statement could be used to test if the current user ID is authorized as a system manager.
IF $USRPRIV('SYSTEM_MANAGER','NOLOG') THEN . . . * PERFORM SYSTEM MANAGER AUTHORIZED CODE END IF * ELSE UNAUTHORIZED FOR SYSTEM MANAGER FUNCTIONS
$UsrPriv and application subsystems
Generally speaking, $UsrPriv will return a value based upon the user's privileges. However, if $UsrPriv is called from within application subsystem (APSY) code, then subsystem privileges may override standard user privileges, as follows:
- If APSY privileges have been set, $UsrPriv returns a value based upon the subsystem privileges rather than the user's privileges.
- If start login privileges have been set for the subsystem, and $UsrPriv is called from within the subsystem initialization procedure, $UsrPriv returns a value based upon the start login privileges.
- If the user's sclass has privileges set, they override standard subsystem privileges for the user, and $UsrPriv returns a value based upon the sclass privileges.