Verificando ACL
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
SQL> SELECT PRINCIPAL, HOST, lower_port, upper_port, acl, 'connect' AS PRIVILEGE, DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'connect'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID) UNION ALL SELECT PRINCIPAL, HOST, NULL lower_port, NULL upper_port, acl, 'resolve' AS PRIVILEGE, DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'resolve'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID); PRINCIPA HOST LOWER_PORT UPPER_PORT ACL PRIVILEGE PRIVILE -------- ----- ---------- ---------- ---------------------- ------------ ------- CPD * /sys/acls/ACL_TI.xml connect GRANTED CPD * /sys/acls/ACL_TI.xml connect GRANTED CPD * /sys/acls/ACL_TI.xml resolve GRANTED CPD * /sys/acls/ACL_TI.xml resolve GRANTED |
Dropando ACL
|
1 2 3 4 5 6 7 8 |
SQL> BEGIN DBMS_NETWORK_ACL_ADMIN.DROP_ACL( acl => '/sys/acls/ACL_TI.xml'); END; / PL/SQL procedure successfully completed. |
Verificando ACL
|
1 2 3 4 5 6 7 8 9 10 11 12 |
SQL> SELECT PRINCIPAL, HOST, lower_port, upper_port, acl, 'connect' AS PRIVILEGE, DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'connect'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID) UNION ALL SELECT PRINCIPAL, HOST, NULL lower_port, NULL upper_port, acl, 'resolve' AS PRIVILEGE, DECODE(DBMS_NETWORK_ACL_ADMIN.CHECK_PRIVILEGE_ACLID(aclid, PRINCIPAL, 'resolve'), 1,'GRANTED', 0,'DENIED', NULL) PRIVILEGE_STATUS FROM DBA_NETWORK_ACLS 9 JOIN DBA_NETWORK_ACL_PRIVILEGES USING (ACL, ACLID); no rows selected |